help please to include pin to enter into this section and validated pin
with this RegReadPin("pin_adults", "preferences", "0000")
this code
Function CreateAdultsMenu() as integer
screen = CreateObject("roGridScreen")
port = CreateObject("roMessagePort")
screen.SetMessagePort(port)
screen.SetBreadcrumbText("Adults", "Full Menu")
screen.SetupLists(2)
screen.SetListNames(["Healthy Choices", "Tasty Choices"])
screen.SetContentList(0, GetAdultsMenuOptions_Healthy())
screen.SetContentList(1, GetAdultsMenuOptions_Tasty())
screen.show()
while (true)
msg = wait(0, port)
if type(msg) = "roGridScreenEvent"
if (msg.isScreenClosed())
return -1
endif
endif
end while
End Function
Function GetAdultsMenuOptions_Healthy() as object
options = [
{ Title: "Fruit"
Description: "A Variety of Fresh Fruit"
HDPosterUrl:"pkg://images/fruit.jpg"
SDPosterUrl:"pkg://images/fruit.jpg"
}
{ Title: "Salad"
Description: "Straight from Local Growers"
HDPosterUrl:"pkg://images/salad.jpg",
SDPosterUrl:"pkg://images/salad.jpg",
}
{ Title: "Yogurt"
Description: "Always a Good Choice"
HDPosterUrl:"pkg://images/yogurt.jpg",
SDPosterUrl:"pkg://images/yogurt.jpg",
}
{ Title: "Smoothies"
Description: "In a Variety of Great Fruit Flavors"
HDPosterUrl:"pkg://images/smoothie.jpg",
SDPosterUrl:"pkg://images/smoothie.jpg",
}
{ Title: "Celery Sticks"
Description: "A Desperate Last Resort"
HDPosterUrl:"pkg://images/celery.jpg",
SDPosterUrl:"pkg://images/celery.jpg",
}
]
return options
End Function
Function GetAdultsMenuOptions_Tasty() as object
options = [
{ Title: "American"
Description: "The Classic Burger"
HDPosterUrl:"pkg://images/burger.jpg"
SDPosterUrl:"pkg://images/burger.jpg"
}
{ Title: "Chinese"
Description: "Served with plenty of MSG"
HDPosterUrl:"pkg://images/chinese.jpg",
SDPosterUrl:"pkg://images/chinese.jpg",
}
{ Title: "Japanese"
Description: "We have lots of sushi"
HDPosterUrl:"pkg://images/sushi.jpg",
SDPosterUrl:"pkg://images/sushi.jpg",
}
{ Title: "Mexican"
Description: "Great Burritos"
HDPosterUrl:"pkg://images/mexican.jpg",
SDPosterUrl:"pkg://images/mexican.jpg",
}
{ Title: "Indian"
Description: "Curries and More"
HDPosterUrl:"pkg://images/indian.jpg",
SDPosterUrl:"pkg://images/indian.jpg",
}
]
return options
End Function
Our system http://www.rokumanager.com