Merge branch 'masterpiece' of ssh://forthrd.ddns.net:2222/1TBHDD/ikong/taobin_project into masterpiece

This commit is contained in:
wanlop run 2024-03-12 22:49:46 +07:00
commit ce828588f7
18 changed files with 15834 additions and 24 deletions

View file

@ -17,6 +17,7 @@
Var PointMaskState = "Invisible"
Var showRandomBtnState = "Invisible"
Var showCloseBtnState = "Enable"
Var CoffeePointStr = CoffeePoint
@ -191,6 +192,7 @@
If PointCount = 10 Then
Var showRandomBtnState = "Enable"
Var showCloseBtnState = "Invisible"
EndIf
Var CurrentPointSlot = newPointIndex + 1
@ -578,6 +580,25 @@
</Button>
<Button>
<X> 610 </X>
<Y> 1660 </Y>
<State> showCloseBtnState </State>
<Filename> Var( DirImage + "/bn_close.png" )</Filename>
<FilenamePress> Var( DirImage + "/bp_close.png" )</FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
; goto lid straw
Var CurrentPointCheck = "check"
Var val3 = "X"
AddData 37 TelephoneNumber CurrentPointSlot CurrentPointCheck val3
Var UpdatePoint = 1
</EventClick>
</Button>
;
<Image>

View file

@ -243,6 +243,24 @@
EndIf
EndIf
If FreeEnergyDrink = 1 Then
If FromPowerUpPro = 1 Then
; AddData
; +1 in quota in this id card
Var Param1 = ""
Var Param2 = ""
Var Param3 = ""
AddData 44 TelephoneNumber IDNum Param1 Param2
; clear id
Var IDNum = ""
Var FromPowerUpPro = 0
Var AddData = 0
Var DisableFromPowerup = "true"
EndIf
EndIf
If GetFreeFromError = 1 Then
;Var GetFreeFromError = 0
Var TelephoneNumberProblem = TelephoneNumberGOTFree
@ -314,6 +332,11 @@
Var SelectMenuBetweenBrewEnable1 = "Invisible"
EndIf
If DisableFromPowerup = "true" Then
Var SelectMenuBetweenBrewEnable1 = "Invisible"
Var SelectMenuBetweenBrewEnable1Text = "Invisible"
EndIf
If SelectMenuBetweenBrewEnable1 = "Enable" Then
Var EnableGetMoreStrawFileName = "Enable"
Var SelectMenuBetweenBrewEnable1Blink = "Enable"
@ -1407,6 +1430,11 @@
Var SelectMenuBetweenBrewEnable1Text = "Invisible"
EndIf
If DisableFromPowerup = "true" Then
Var SelectMenuBetweenBrewEnable1 = "Invisible"
Var SelectMenuBetweenBrewEnable1Text = "Invisible"
EndIf
If SelectMenuBetweenBrewEnable1 = "Enable" Then
If SelectMenuBetweenBrewEnable1Blink = "Enable" Then
Var SelectMenuBetweenBrewEnable1Blink = "Invisible"

View file

@ -6,6 +6,10 @@
<Volume> SoundVolume </Volume>
<Sound> PlaySoundLag </Sound>
<EventOpen>
; force
; TODO: test
CoinVending OFF
Var cash_disable = "0"

View file

@ -277,23 +277,6 @@
SAVELOG BrewTime
Var ShowCountDownBrewing = CountDownBrewing
If FreeEnergyDrink = 1 Then
If FromPowerUpPro = 1 Then
; AddData
; +1 in quota in this id card
Var Param1 = ""
Var Param2 = ""
Var Param3 = ""
Var TelephoneNumber = "0899999999"
AddData 44 TelephoneNumber IDNum Param1 Param2
; clear id
Var IDNum = ""
Var FromPowerUpPro = 0
EndIf
EndIf
If RoadShow = "true" Then