'12-2-19
'StarBucks ordering system
'Emulates an ordering system for Starbucks
'
UpperLeftX = 1
UpperLeftY = 1
WindowHeight = 900
WindowWidth = 400
'Starting buttons
button #Menu1.HotCoffe, "Hot Coffes", [HotCoffe], UL, 100, 100, 100, 50
button #Menu1.ColdCoffe, "Cold Coffes", [ColdCoffe], UL, 200, 100, 100, 50
button #Menu1.HotTea, "Hot Teas", [ColdCoffe], UL, 100, 150, 100, 50
button #Menu1.IcedTea, "Iced Teas", [IcedTeas], UL, 200, 150, 100, 50
'other universal buttons
button #ConfirmItem.Yes, "Yes", [ItemConfirmed], UL, 100, 150, 100, 50
button #ConfirmItem.No, "No", [ItemCancelled], UL, 200, 150, 100, 50
button #ConfirmItem.MoreThanOne "More Then 1", [MoreThenOne], UL,  150, 200, 100, 50
'Hot Coffe Buttons
button #HotCoffe.Expresso, "Expresso Shots", [Expressos], UL, 100, 100, 100, 50
button #HotCoffee.Cappuccinos, "Cappuccinos", [Cappuccinos], UL, 200, 100, 100, 50
button #HotCoffee.Lattes, "Lattes", [Lattes],  UL, 100, 150, 100, 50
button #HotCoffee.Americanos, "Americanos", [Americanos], UL, 200, 150, 100, 50
button #HotCoffee.Brewed_Coffees, "Brewed Coffees", [Brewed_Coffees], UL, 100, 200, 100, 50
button #ExpressoShots.Express, "Expresso", [Expresso], UL, 100, 100, 100, 50
button #ExpressoShots.EspressoConPanna, "Espresso Con Panna", [EspressoConPanna] UL 100, 200, 100, 50
open "Menu" for window as #Menu1
wait
[HotCoffee]
open "Hot Coffees" for window as #HotCoffee
wait
'handles everything dealing with expresso shots
[Expressos]
open "Expressos" for window as #ExpressoShots
CurrentCatagory = 1
wait
[Expresso]
open "Confirm  item" for window as #ConfirmItem
CurrentItem = 0
wait
[EspressoConPanna]
open "Confirm item" for window as #ConfirmItem
'handles everything dealing with Cappuccinos
[Cappuccinos]
notice "Cappuccinos was pressed"
'handles everything with lattes
[Lattes]
notice "Lattes was pressed"
'handles everything with  Americanos
[Americanos]
notice "Americanos was pressed"
'handles everything with Brewed Coffeees
[Brewed_Coffees]
notice "Brewed Coffeees was pressed"
close #HotCoffee
close #Menu1