Convert to new step adv

This commit is contained in:
wanlop run 2024-02-27 21:53:17 +07:00
parent 6291622e02
commit f4584099bc
30 changed files with 50 additions and 509 deletions

View file

@ -158,7 +158,6 @@
Var LidState = Lid1Status
;Lid1Status
Var StarwState = "Enable"
Var LidStrawCountDown = 15
If Lid1Status = "Disable" Then
@ -211,237 +210,10 @@
EndIf
Var LidStrawCountDown = LidStrawCountDown - 1
; count down
If LidStrawCountDown = 1 Then
Var LidStrawCountDown = 10
If StarwState = "Press" Then
Machine Straw
EndIf
If LidState = "Press" Then
Machine Lid
EndIf
If InternationalEnable = 1 Then
Var Brew3Inter = CountryRootPath + "/xml/page_brewing3.lxml"
Open Brew3Inter
Else
Open "ROOT/taobin_project/xml/page_brewing3.xml"
EndIf
EndIf
Var ShowCountDownBrewing = CountDownBrewing
; animation video loop
If AnimationOn = "true" Then
Var CountUpBrewing = CountUpBrewing + 1
Var SlotVideo = CountUpBrewing / AnimationVideoPlayTime
If CountUpBrewing < 4 Then
Else
If PreviseStepVideo = SlotVideo Then
;SAVELOG SlotVideo
Else
Var PreviseStepVideo = SlotVideo
;SAVELOG PreviseStepVideo
;SAVELOG SlotVideo
;SAVELOG CountUpBrewing
;Var CountDownVideoTime = CountDownVideoTimeReload
Var StepVideo = SlotVideo + 2
;SAVELOG StepVideo
If StepVideo = 1 Then
Var videoID = VideoID1
EndIf
If StepVideo = 2 Then
Var videoID = VideoID2
EndIf
If StepVideo = 3 Then
Var videoID = VideoID3
EndIf
If StepVideo = 4 Then
Var videoID = VideoID4
EndIf
If StepVideo = 5 Then
Var videoID = VideoID5
EndIf
If StepVideo = 6 Then
Var videoID = VideoID6
EndIf
If StepVideo = 7 Then
Var videoID = VideoID7
EndIf
;SAVELOG videoID
If videoID = 0 Then
Else
If videoID = "---" Then
Else
Var VideoPlayFile = VideoPath
Var VideoPlayFile = VideoPlayFile + VideoFileBegin
Var VideoPlayFile = VideoPlayFile + videoID
Var VideoPlayFile = VideoPlayFile + VideoFileEnd
Var PictureFile = PicturePath
Var PictureFile = PictureFile + PictureBegin
Var PictureFile = PictureFile + videoID
Var PictureFile = PictureFile + PictureEnd
SAVELOG VideoPlayFile
SAVELOG PictureFile
EndIf
EndIf
EndIf
EndIf
EndIf
If StrawAutoRelease1 = "true" Then
Var StrawAutoRelease1 = "false"
Var StarwState = "Press"
EndIf
Refresh
TimerReset
</EventTimeout>
;<Image>
;<X> 0 </X>
;<Y> 0 </Y>
;<Filename> "ROOT/taobin_project/image/ad_medium_2.png" </Filename>
;</Image>
;include="ROOT/taobin_project/inc/video.inc"
<Video>
<X> 0 </X>
<Y> 380 </Y>
<Width> 1080</Width>
<Height> 840 </Height>
<Refresh> "Reload" </Refresh>
<Loop> "true" </Loop>
<Filename> VideoPlayFile </Filename>
</Video>
<Image>
<X> 0 </X>
<Y> 1289 </Y>
<Filename> Var( DirImage + "/text2.png" ) </Filename>
</Image>
<Image>
<X> 78 </X>
<Y> 1425 </Y>
<Filename> lid_straw_bg_iamge </Filename>
</Image>
<Button>
<X> 750 </X>
<Y> 1783 </Y>
<Filename> Var( DirImage + "/bn_ok.png" )</Filename>
<FilenamePress> Var( DirImage + "/bn_ok.png" )</FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
If StarwState = "Press" Then
Machine Straw
LED LedDoorLid Blink 255 255 255 255
EndIf
If LidState = "Press" Then
Machine Lid
LED LedDoorLid Blink 255 255 255 255
EndIf
If InternationalEnable = 1 Then
Var Brew3Inter = CountryRootPath + "/xml/page_brewing3.lxml"
Open Brew3Inter
Else
Open "ROOT/taobin_project/xml/page_brewing3.xml"
EndIf
</EventClick>
</Button>
; starw left
<Button>
<X> 126 </X>
<Y> 1474 </Y>
<State> StarwState </State>
<Filename> "ROOT/taobin_project/image/page_lid_straw/bn_straw.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/page_lid_straw/bp_straw.png" </FilenamePress>
<EventClick>
</EventClick>
</Button>
; lid left
<Button>
<X> 126 </X>
<Y> 1584 </Y>
<State> LidState </State>
<Filename> "ROOT/taobin_project/image/page_lid_straw/bn_lid.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/page_lid_straw/bp_lid.png" </FilenamePress>
<EventClick>
</EventClick>
</Button>
<Button>
<X> 901 </X>
<Y> 1494 </Y>
<Width> 50 </Width>
<Height> 50 </Height>
<State> StarwState </State>
<Mode> "No" </Mode>
<Filename> "ROOT/taobin_project/image/page_lid_straw/cb_straw_nch.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/page_lid_straw/cb_straw_ch.png" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
SAVELOG StarwState
If StarwState = "Press" Then
Var StarwState = "Enable"
Else
Var StarwState = "Press"
EndIf
Refresh
</EventClick>
</Button>
<Button>
<X> 901 </X>
<Y> 1604 </Y>
<Width> 50 </Width>
<Height> 50 </Height>
<State> LidState </State>
<Mode> "No" </Mode>
<Filename> "ROOT/taobin_project/image/page_lid_straw/cb_lid_nch.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/page_lid_straw/cb_lid_ch.png" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
SAVELOG LidState
If LidState = "Press" Then
Var LidState = "Enable"
Else
Var LidState = "Press"
EndIf
Refresh
</EventClick>
</Button>
; remove by kong ; optimize new step advertise