taobin_project/inter/mys/xml/event/event_profile.ev

80 lines
2.3 KiB
Text
Raw Normal View History

2024-09-16 17:11:48 +07:00
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
DEBUGVAR HasProYuzu250Concat
DEBUGVAR ProReducedPriceEnable
DEBUGVAR IgnoreProfileFromRunEV
2024-09-16 17:11:48 +07:00
If ProReducedPriceEnable = 1 Then
Else
DEBUGVAR "Case pro reduce end"
2024-09-16 17:11:48 +07:00
; case-pro-reduce-end
If IgnoreProfileFromRunEV = 1 Then
DEBUGVAR "Pro yuzu ongoing"
2024-09-16 17:11:48 +07:00
; concat-profile
If HasProYuzu250Concat = "true" Then
DEBUGVAR "Pro yuzu concat"
2024-09-16 17:11:48 +07:00
Else
2024-09-16 17:11:48 +07:00
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
2024-09-16 17:11:48 +07:00
Else
DEBUGVAR "No pro reduce, concat pro yuzu"
2024-09-16 17:11:48 +07:00
CacheVarStr "put" XMLProfilePreEvent
Var XMLProfile = XMLProfile + "-"
Var XMLProfile = XMLProfile + "PromoYuzu250"
2024-09-16 17:11:48 +07:00
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
2024-09-16 17:11:48 +07:00
EndIf
EndIf
2024-10-29 13:16:54 +07:00
If IgnoreProfileFromRunEV = 1 Then
Var ToggleAfterEventProfileOff = 1
EndIf