MYS: add promotion mystery cup

inter/mys/xml/event/mystery_cup/random.ev

@@ -0,0 +1,72 @@
+; 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