I sard กกต

This commit is contained in:
kong 2023-07-12 22:17:28 +07:00
parent 80ccab2571
commit 40bd35a369
29 changed files with 1034 additions and 264 deletions

View file

@ -165,7 +165,7 @@ Var IndexOfRateupOreoAll = IndexOfRateupOreoAll + 1
Var ListOfOreoAll[IndexOfRateupOreoAll] = "12-99-03-0029"
Var ListOfOreoTea[IndexOfRateupOreoTea] = "12-99-03-0029"
Var IndexOfRateupOreoAll = IndexOfRateupOreoAll + 1
Var IndexOfRateupOreoAll = IndexOfRateupOreoAll + 1
Var IndexOfRateupOreoMilk = IndexOfRateupOreoMilk + 1
EndIf
@ -193,6 +193,28 @@ Var IndexOfRateupOreoAll = IndexOfRateupOreoAll + 1
Var IndexOfTea = IndexOfTea + 1
EndIf
; THAI MILK TEA OREO SMOOTHIE
If $12-99-03-0040.Button = "Enable" Then
Var ListOfAllRandom[IndexOfAllRandom] = "12-99-03-0040"
Var ListOfTea[IndexOfTea] = "12-99-03-0040"
Var IndexOfAllRandom = IndexOfAllRandom + 1
Var IndexOfTea = IndexOfTea + 1
Var ListOfOreoAll[IndexOfRateupOreoAll] = "12-99-03-0040"
Var ListOfOreoTea[IndexOfRateupOreoTea] = "12-99-03-0040"
Var IndexOfRateupOreoAll = IndexOfRateupOreoAll + 1
Var IndexOfRateupOreoTea = IndexOfRateupOreoTea + 1
EndIf
; THAI MILK TEA SMOOTHIE
If $12-99-03-0041.Button = "Enable" Then
Var ListOfAllRandom[IndexOfAllRandom] = "12-99-03-0041"
Var ListOfTea[IndexOfTea] = "12-99-03-0041"
Var IndexOfAllRandom = IndexOfAllRandom + 1
Var IndexOfTea = IndexOfTea + 1
EndIf
; Tokyo bana^2 milk smoothie
If $12-99-03-0033.Button = "Enable" Then
Var ListOfAllRandom[IndexOfAllRandom] = "12-99-03-0033"
@ -249,11 +271,17 @@ Var IndexOfRateupOreoAll = IndexOfRateupOreoAll + 1
Var IndexOfCoffee = IndexOfCoffee + 1
EndIf
DEBUGVAR IndexOfAllRandom
DEBUGVAR IndexOfCoffee
DEBUGVAR IndexOfMilk
DEBUGVAR IndexOfTea
DEBUGVAR IndexOfRateupOreoAll
DEBUGVAR IndexOfRateupOreoCoffee
DEBUGVAR IndexOfRateupOreoMilk
DEBUGVAR IndexOfRateupOreoTea
If IndexOfAllRandom = 0 Then
Var SubRandAllButtonEnable = "Disable"
EndIf
@ -268,4 +296,25 @@ Var IndexOfRateupOreoAll = IndexOfRateupOreoAll + 1
Var SubRandTeaButtonEnable = "Disable"
EndIf
If IndexOfRateupOreoAll = 0 Then
Var SubRandAllButtonEnable = "Disable"
EndIf
If IndexOfRateupOreoCoffee = 0 Then
Var SubRandCoffButtonEnable = "Disable"
EndIf
If IndexOfRateupOreoMilk = 0 Then
Var SubRandMilkButtonEnable = "Disable"
EndIf
If IndexOfRateupOreoTea = 0 Then
Var SubRandTeaButtonEnable = "Disable"
EndIf
Var ResultRandomIndex = 0
Refresh