"Enable"
1080
1920
"0xeae6e1"
"ROOT/taobin_project/sounds/chaching.mp3"
SoundVolume
; On open
Var CountDownThankyou = 3
Var CountDownBrewing = BrewTime
Var CountUpBrewing = 0
SAVELOG BrewTime
Var ShowCountDownBrewing = CountDownBrewing
Var Timeout = 0
Var ChangeFlag = 0
Var ErrTimeout = 0
Var ActionOKCase = 0
Var ChangeTimeout = 0
Var ChangeFlag2 = 0
Var GotoStoreCredit0 = 0
Var StoreCreditAmount = 0
Var MachineState_Result = 0
Var ChangeOK = 0
If show_eng = "true" Then
Var ImageDoing = "ROOT/taobin_project/image/page_doing/img2_eng.png"
Var show_btp = "ROOT/taobin_project/image/bn_thai_lang_press.png"
Var show_btn = "ROOT/taobin_project/image/bn_thai_lang.png"
Var BottomText = PicturePath + "text_bottom_eng.png"
Else
Var ImageDoing = "ROOT/taobin_project/image/page_doing/img2.png"
Var show_btp = "ROOT/taobin_project/image/bn_eng_lang_press.png"
Var show_btn = "ROOT/taobin_project/image/bn_eng_lang.png"
Var BottomText = PicturePath + "text_bottom_thai2.png"
EndIf
DEBUGVAR StarwState
DEBUGVAR LidState
DEBUGVAR BottomText
If StarwState = "Press" Then
Machine StrawWithDelay
LED LedDoorLid Blink 255 255 255 255
EndIf
If LidState = "Press" Then
Machine LidWithDelay
LED LedDoorLid Blink 255 255 255 255
EndIf
If CART_INDEX = 2 Then
Var showname = CART2_NAME_THAI
Var PictureDrink = "ROOT/taobin_project/image/page_drink_select/" + CART2_PICTURE
EndIf
If CART_INDEX = 3 Then
Var showname = CART3_NAME_THAI
Var PictureDrink = "ROOT/taobin_project/image/page_drink_select/" + CART3_PICTURE
EndIf
1000
Var CountDownBrewing = CountDownBrewing - 1
Var CountDownThankyou = CountDownThankyou - 1
Var Timeout = Timeout + 1
If Timeout = 3 Then
If CART_INDEX = 0 Then
Else
;Cart "MakeID" CART_INDEX
Var VideoPath = "/mnt/sdcard/coffeevending/taobin_project/animation01/"
Var VideoFileBegin = "TaoBin2_draft02_art"
Var VideoFileEnd = ".mp4"
Var PicturePath = "/mnt/sdcard/coffeevending/taobin_project/image/page_doing/"
Var PictureBegin = "txt_"
Var VideoPlayFile = VideoPath
Var VideoPlayFile = VideoPlayFile + VideoFileBegin
Var VideoPlayFile = VideoPlayFile + "1"
Var VideoPlayFile = VideoPlayFile + VideoFileEnd
Var PictureFile = PicturePath
Var PictureFile = PictureFile + PictureBegin
Var PictureFile = PictureFile + "1"
Var PictureFile = PictureFile + PictureEnd
EndIf
EndIf
; run test;
If CountDownThankyou = 0 Then
Var CountDownBrewing = BrewTime
Var CountUpBrewing = 0
SAVELOG BrewTime
Var ShowCountDownBrewing = CountDownBrewing
Open "ROOT/taobin_project/xml/page_brewing3Multi.xml"
EndIf
Var ShowCountDownBrewing = CountDownBrewing
Refresh
TimerReset
;
; 0
; 0
; "ROOT/taobin_project/image/ad_medium_2.png"
;
375
623
331
435
PictureDrink
0
938
1080
Center
72
KanitMediumTTF
0x513C2F
showname
If ChangeStatus = "payout-end" Then
EndIf