Add button request straw

This commit is contained in:
kong 2022-09-27 10:19:04 +07:00
parent bba1c5167a
commit 4fdcf04fa6
5 changed files with 42 additions and 0 deletions

Binary file not shown.

After

Width:  |  Height:  |  Size: 5.1 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 123 B

Binary file not shown.

After

Width:  |  Height:  |  Size: 4.8 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 5.6 KiB

View file

@ -49,11 +49,22 @@
Var IMG_CNT = "ROOT/taobin_project/image/page_doing/img2_eng.png"
Play "ROOT/taobin_project/sound_eng/Wait_a_moment.mp3"
Var bnGetMoreStrawFileName = "ROOT/taobin_project/image/page_doing/bn_get_more_straw_en.png"
Var bpGetMoreStrawFileName = "ROOT/taobin_project/image/page_doing/bp_get_more_straw_en.png"
Var XStraw = 336
Else
;Var DirImage = "ROOT/taobin_project/image/collect_point1"
Play "ROOT/taobin_project/sound_thai/thankyou.mp3"
Var IMG_CNT = "ROOT/taobin_project/image/page_doing/img2.png"
Var bnGetMoreStrawFileName = "ROOT/taobin_project/image/page_doing/bn_get_more_straw.png"
Var bpGetMoreStrawFileName = "ROOT/taobin_project/image/page_doing/bp_get_more_straw.png"
Var XStraw = 382
EndIf
Var waitAckPay = 0
@ -232,9 +243,12 @@
EndIf
If EnableSelectMenuBetweenBrew = "Enable" Then
Var EnableGetMoreStrawFileName = "Enable"
Var EnableSelectMenuBetweenBrewBlink = "Enable"
Else
Var EnableSelectMenuBetweenBrewBlink = "Invisible"
Var EnableGetMoreStrawFileName = "Invisible"
EndIf
; Hide
@ -248,6 +262,7 @@
EndIf
</EventOpen>
@ -1012,6 +1027,16 @@
Var EnableSelectMenuBetweenBrewBlink = "Invisible"
EndIf
If EnableGetMoreStrawFileName = "PressForever" Then
If EnableGetMoreStrawFileNameCountDown > 0 Then
Var EnableGetMoreStrawFileNameCountDown = EnableGetMoreStrawFileNameCountDown - 1
If EnableGetMoreStrawFileNameCountDown = 0 Then
Var EnableGetMoreStrawFileName = "Enable"
EndIf
EndIf
EndIf
Refresh
TimerReset
@ -1220,6 +1245,23 @@
</EventClick>
</Button>
<Button>
<X> XStraw </X>
<Y> 1787 </Y>
<State>EnableGetMoreStrawFileName</State>
<Filename> bnGetMoreStrawFileName </Filename>
<FilenamePress> bpGetMoreStrawFileName </FilenamePress>
<Mode> "No" </Mode>
<EventClick>
Var EnableGetMoreStrawFileNameCountDown = 5
Var EnableGetMoreStrawFileName = "PressForever"
Machine Straw
</EventClick>
</Button>
<Button>
<X> 10 </X>
<Y> 500 </Y>