125 lines
3.8 KiB
Text
125 lines
3.8 KiB
Text
TRY "/mnt/sdcard/coffeevending/taobin_project/inter/mys/xml/event/tricker.ev"
|
|
|
|
Var XMLProfilePreEvent = XMLProfile
|
|
DEBUGVAR XMLProfile
|
|
STRCONTAIN "PromoYuzu250" XMLProfile HasProYuzu250Concat
|
|
STRCONTAIN "PromoReduced" XMLProfile IsProfileReduce
|
|
|
|
Var refresh_str = "-RefreshProf"
|
|
STRCONTAIN refresh_str XMLProfile HasRefreshProf
|
|
|
|
DEBUGVAR HasRefreshProf
|
|
DEBUGVAR NeedRefreshProfile
|
|
|
|
; refresh-profile-after-promo-end
|
|
If NeedRefreshProfile = 1 Then
|
|
|
|
READ_FILE "/mnt/sdcard/coffeevending/profile/price/profile_MYS_slot_3.json" ProfileSlot3MYS
|
|
READ_FILE "/mnt/sdcard/coffeevending/profile/price/profile_MYS_slot_4.json" ProfileSlot4MYS
|
|
|
|
STRCONTAIN "Drop" ProfileSlot3MYS PromoYuzuDrop
|
|
STRCONTAIN "Drop" ProfileSlot4MYS PromoYuzuDis50Drop
|
|
|
|
DEBUGVAR PromoYuzuDrop
|
|
DEBUGVAR PromoYuzuDis50Drop
|
|
|
|
If HasRefreshProf = "true" Then
|
|
|
|
DEBUGVAR "case already refresh"
|
|
|
|
; restore-profile
|
|
CacheVarStr "get" XMLProfilePreEvent
|
|
Var XMLProfile = XMLProfilePreEvent
|
|
Var NeedRefreshProfile = 0
|
|
Else
|
|
; save-current-as-pre
|
|
CacheVarStr "put" XMLProfilePreEvent
|
|
|
|
If PromoYuzuDrop = "true" Then
|
|
DEBUGVAR "case yuzu drop --> refresh"
|
|
Var XMLProfile = XMLProfile + refresh_str
|
|
Else
|
|
If PromoYuzuDis50Drop = "true" Then
|
|
DEBUGVAR "case yuzu drop discount 50% --> refresh"
|
|
Var XMLProfile = XMLProfile + refresh_str
|
|
EndIf
|
|
EndIf
|
|
|
|
EndIf
|
|
Else
|
|
|
|
DEBUGVAR HasProYuzu250Concat
|
|
DEBUGVAR ProReducedPriceEnable
|
|
DEBUGVAR IgnoreProfileFromRunEV
|
|
|
|
If ProReducedPriceEnable = 1 Then
|
|
|
|
Else
|
|
DEBUGVAR "Case pro reduce end"
|
|
; case-pro-reduce-end
|
|
If IgnoreProfileFromRunEV = 1 Then
|
|
DEBUGVAR "Pro yuzu ongoing"
|
|
; concat-profile
|
|
If HasProYuzu250Concat = "true" Then
|
|
DEBUGVAR "Pro yuzu concat"
|
|
Else
|
|
|
|
If IsProfileReduce = "true" Then
|
|
DEBUGVAR "Pro reduce was set but disabled from trick"
|
|
CacheVarStr "get" XMLProfilePreEvent
|
|
If XMLProfilePreEvent = "" Then
|
|
DEBUGVAR "Get PreEvent Empty"
|
|
Var XMLProfile = "General"
|
|
Else
|
|
DEBUGVAR "Restore profile by pre-event, also concat Yuzu"
|
|
DEBUGVAR XMLProfilePreEvent
|
|
Var XMLProfile = XMLProfilePreEvent + "-"
|
|
Var XMLProfile = XMLProfile + "PromoYuzu250"
|
|
|
|
EndIf
|
|
|
|
Else
|
|
DEBUGVAR "No pro reduce, concat pro yuzu"
|
|
CacheVarStr "put" XMLProfilePreEvent
|
|
|
|
Var XMLProfile = XMLProfile + "-"
|
|
Var XMLProfile = XMLProfile + "PromoYuzu250"
|
|
|
|
EndIf
|
|
EndIf
|
|
Else
|
|
If IsProfileReduce = "true" Then
|
|
DEBUGVAR "No yuzu but set pro reduce"
|
|
CacheVarStr "get" XMLProfilePreEvent
|
|
If XMLProfilePreEvent = "" Then
|
|
DEBUGVAR "PreEvent empty, set General"
|
|
Var XMLProfile = "General"
|
|
Else
|
|
DEBUGVAR "Restore profile by pre-event"
|
|
Var XMLProfile = XMLProfilePreEvent
|
|
EndIf
|
|
|
|
Else
|
|
|
|
If HasProYuzu250Concat = "true" Then
|
|
CacheVarStr "get" XMLProfilePreEvent
|
|
Var XMLProfile = XMLProfilePreEvent
|
|
EndIf
|
|
|
|
DEBUGVAR "Store profile pre event"
|
|
DEBUGVAR XMLProfilePreEvent
|
|
CacheVarStr "put" XMLProfilePreEvent
|
|
EndIf
|
|
|
|
EndIf
|
|
|
|
EndIf
|
|
|
|
|
|
|
|
If IgnoreProfileFromRunEV = 1 Then
|
|
Var ToggleAfterEventProfileOff = 1
|
|
EndIf
|
|
|
|
|
|
EndIf
|