taobin_project/inter/mys/xml/event/mystery_cup/random.ev
2025-05-26 14:32:46 +07:00

72 lines
No EOL
1.8 KiB
Text

; BigBigbutton
Var OreoGuarantee = 0
; load-from-persist
CacheVarStr "get" OreoGuarantee
INT OreoGuarantee
If OreoGuarantee = "" Then
Var OreoGuarantee = 0
EndIf
Var ResultRandomIndexCofee = 0
Var ResultRandomIndexTea = 0
Var ResultRandomIndexMilk = 0
Var ResultRandomIndexOtherTemp = 0
Var RandomCoffeeCheckOkLength = RandomCoffeeCheckOkIdx - 1
Var RandomTeaCheckOkLength = RandomTeaCheckOkIdx - 1
Var RandomMilkCheckOkLength = RandomMilkCheckOkIdx - 1
Var RandomOtherCheckOkLength = RandomOtherCheckOkIdx - 1
Random2 0 RandomCoffeeCheckOkLength ResultRandomIndexCofee
Random2 0 RandomTeaCheckOkLength ResultRandomIndexTea
Random2 0 RandomMilkCheckOkLength ResultRandomIndexMilk
Random2 0 RandomOtherCheckOkLength ResultRandomIndexOtherTemp
Var OreoGuarantee = OreoGuarantee + 1
If OreoGuarantee = 10 Then
; reset
Var OreoGuarantee = 0
Var ResultRandomIndexTea = 0
Var ResultRandomIndexMilk = 0
SAVELOG "Woosh! Secret Rare (Rateup!)"
Else
If ResultRandomIndexTea = 0 Then
Var OreoGuarantee = 0
SAVELOG "Holy Moly! Tearala Oreore poom pow!"
EndIf
If ResultRandomIndexMilk = 0 Then
Var OreoGuarantee = 0
SAVELOG "Holy Jeez! Miluku Oreore poom pow pow!"
EndIf
EndIf
CacheVarStr "put" OreoGuarantee
DEBUGVAR ResultRandomIndexCofee
DEBUGVAR ResultRandomIndexTea
DEBUGVAR ResultRandomIndexMilk
DEBUGVAR ResultRandomIndexOtherTemp
Var ProductCodeRandomCoffee = RandMystCoffeeEnabled[ResultRandomIndexCofee]
Var ProductCodeRandomTea = RandMystTeaEnabled[ResultRandomIndexTea]
Var ProductCodeRandomMilk = RandMystMilkEnabled[ResultRandomIndexMilk]
Var ResultRandomIndexOther = RandMystOtherEnabled[ResultRandomIndexOtherTemp]
; ProductCodeRandom -> ProductCodeRandomCoffee
DEBUGVAR ProductCodeRandomCoffee
DEBUGVAR ProductCodeRandomTea
DEBUGVAR ProductCodeRandomMilk
DEBUGVAR ResultRandomIndexOther