"Enable"
1080
1920
"0xeae6e1"
SoundVolume
SAVELOG " spiral sell v3"
Var Timeout = 0
Var LastMakeSpiralResult = 0
Var ShowSwapVDO = "ROOT/taobin_project/spiral/video/sp01.mp4"
GenHashWithTimeStamp SpiralRef
Var Seeker.sprial_product_code = LinkProductCodeAnotherMachine[0]
DEBUGVAR Seeker.sprial_product_code
Var ServiceCredit = Seeker.sprial_product_code
SPIRAL_SELL ServiceCredit SpiralRef
Var TimeOutSmoothiesProcess = 120
DEBUGVAR Seeker.SmoothieToPayment
1000
Var Timeout = Timeout + 1
; test
;If Timeout > 10 Then
; Var LastMakeSpiralResult = 2
;EndIf
DEBUGVAR LastMakeSpiralResult
If LastMakeSpiralResult = 1 Then
Var SessionID4 = MachineSpiralID
Var SessionID4 = SessionID4 + ":"
Var SessionID4 = SessionID4 + MachineSpiralVMName
Var SessionID4 = SessionID4 + ":"
Var SessionID4 = SessionID4 + MachineSpiralSlotID
Var SessionID4 = SessionID4 + ":"
Var SessionID4 = SessionID4 + ServiceCredit
Var SessionID4 = SessionID4 + ":"
Var SessionID4 = SessionID4 + 1
Var SessionID4 = SessionID4 + ":"
Var SessionID4 = SessionID4 + MachineSpiralRemaining
Var SpiralPayDetail="locker:S:0:"
Var SpiralPayDetail = SpiralPayDetail + SessionID4
DEBUGVAR SpiralPayDetail
Var Seeker.sprial_pay_detail = SpiralPayDetail
If Seeker = "next" Then
Var NextOrder = "true"
Var NextSmoothie = 1
Open "ROOT/taobin_project/xml/page_spiral_before_conti.xml"
EndIf
OpenInst 3 "ROOT/taobin_project/xml/topview2.xml"
Open "ROOT/taobin_project/inter/tha/xml/page_smoothie_suggest_and_process.xml"
EndIf
If LastMakeSpiralResult = 2 Then
TRY "/mnt/sdcard/coffeevending/taobin_project/xml/process/spiral_pay_fail.ev"
Open "ROOT/taobin_project/xml/page_spiral_failed.xml"
EndIf
If Timeout > 120 Then
TRY "/mnt/sdcard/coffeevending/taobin_project/xml/process/spiral_pay_fail.ev"
Open "ROOT/taobin_project/xml/page_spiral_failed.xml"
EndIf
TimerReset
Refresh
;include="ROOT/taobin_project/inc/video.inc"
"LastMakeSpiralResult set success"
"LastMakeSpiralResult set fail"