Merge branch 'masterpiece' of ssh://192.168.10.159:/1TBHDD/ikong/taobin_project into masterpiece

This commit is contained in:
Pakin 2024-08-29 08:52:47 +07:00
commit 34d8c9cfa0
132 changed files with 17214 additions and 4333 deletions

View file

@ -452,12 +452,7 @@
Var Tel2DFlag = 0
Var Tel2D = TelephoneNumber
Trim Tel2D 1
If Tel2D = "0" Then
Var Tel2DFlag = 1
EndIf
TRY "ROOT/taobin_project/xml/verify_number.ev"
If Tel2DFlag = 1 Then

View file

@ -92,25 +92,26 @@
Var TelephoneNumber = TelephoneNumberX
Var TNumberTaobinMemberXXX = TelephoneNumber
Var Seeker.IsAlreadyGetReward = Ext1c
Var SetAPlusOutOfStock = Ext1d
Var SetAOutOfStock = Ext1e
Var CleansingGelOutOfStock = Ext1f
Var TumbleBottleOutOfStock = Ext1g
Var ClearGelOutOfStock = Ext1h
Var E_GiftCard100BathOutOfStock = Ext1i
Var ClearGel4mlOutOfStock = Ext1j
Var E_GiftCard100BathOutOfStock = 1
Var TumbleBottleOutOfStock = 1
Var LustrousOutOfStock = Ext1x4
Var LipTintOilOutOfStock = Ext1x5
Var BlushAndLipOutOfStock = Ext1x6
Var RandomOutOfStock = Ext1x7
Var CalvinKleinOutOfStock = Ext1x8
Var DoubleSerumOutOfStock = Ext1x9
Var SetAOutOfStock = Ext1x10
Var SetAPlusOutOfStock = Ext1x11
Var PopmartLabubuV2OutOfStock = Ext1x12
DEBUGVAR SuperSetOutOfStock
DEBUGVAR BalanceEssenceTonerOutOfStock
DEBUGVAR CleansingGelOutOfStock
DEBUGVAR TumbleBottleOutOfStock
DEBUGVAR ClearGelOutOfStock
DEBUGVAR LustrousOutOfStock
DEBUGVAR LipTintOilOutOfStock
DEBUGVAR BlushAndLipOutOfStock
DEBUGVAR RandomOutOfStock
DEBUGVAR CalvinKleinOutOfStock
DEBUGVAR DoubleSerumOutOfStock
DEBUGVAR SetAOutOfStock
DEBUGVAR SetAPlusOutOfStock
DEBUGVAR PopmartLabubuV2OutOfStock
If TaobinName = "" Then
Var Seeker.IsLineMember = 0
@ -143,38 +144,6 @@
EndIf
EndIf
If SuperSetOutOfStock = 1 Then
If BalanceEssenceTonerOutOfStock = 1 Then
If CleansingGalOutOfStock = 1 Then
If TumbleBottleOutOfStock = 1 Then
If ClearGalOutOfStock = 1 Then
If E_GiftCard100BathOutOfStock = 1 Then
If ClearGel4mlOutOfStock = 1 Then
SAVELOG "All reward out of stock skip to normal collect point."
WRITE_FILE "/mnt/sdcard/robinson_beauty_reward_out_of_stock" "1"
If Seeker.CodeChannel = 1 Then
If Seeker.CollectPointMain = 1 Then
GETACCEXT Param1 23
Open "ROOT/taobin_project/xml/page_collect_point_2.xml"
Else
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
Else
GETACCEXT Param1 23
Open "ROOT/taobin_project/xml/page_collect_point_2.xml"
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
EndIf
Var Seeker.PointTaobinStr = ParamCP
Var Seeker.TNumberTaobinMember = TelephoneNumberX
@ -213,6 +182,7 @@
SPLIT Ext1a "/" 7 MenuPoint[6]
SPLIT Ext1a "/" 8 MenuPoint[7]
SPLIT Ext1a "/" 9 MenuPoint[8]
SPLIT Ext1a "/" 10 MenuPoint[9]
INT MenuPoint[0]
@ -224,6 +194,7 @@
INT MenuPoint[6]
INT MenuPoint[7]
INT MenuPoint[8]
INT MenuPoint[9]
DEBUGVAR MenuPoint[0]
DEBUGVAR MenuPoint[1]
@ -234,6 +205,7 @@
DEBUGVAR MenuPoint[6]
DEBUGVAR MenuPoint[7]
DEBUGVAR MenuPoint[8]
DEBUGVAR MenuPoint[9]
; Menu 1
If Seeker.selected_a_drink = "12-05-03-0064" Then
@ -269,6 +241,14 @@
; Menu 4
If Seeker.selected_a_drink = "12-01-02-0073" Then
If MenuPoint[3] = 1 then
Else
Var MenuPoint[3] = 1
Var newPointIndex = 3
EndIf
EndIf
If Seeker.selected_a_drink = "12-21-02-0073" Then
If MenuPoint[3] = 1 then
@ -313,6 +293,14 @@
; Menu 8
If Seeker.selected_a_drink = "12-01-02-0074" Then
If MenuPoint[7] = 1 then
Else
Var MenuPoint[7] = 1
Var newPointIndex = 7
EndIf
EndIf
If Seeker.selected_a_drink = "12-21-02-0074" Then
If MenuPoint[7] = 1 then
@ -333,6 +321,16 @@
EndIf
EndIf
; Menu 10
If Seeker.selected_a_drink = "12-05-03-0115" Then
If MenuPoint[9] = 1 then
Else
Var MenuPoint[9] = 1
Var newPointIndex = 9
EndIf
EndIf
Var CurrentIndexPoint = -1
@ -390,6 +388,12 @@
Var PointNameIndex[CurrentIndexPoint] = 8
EndIf
If MenuPoint[9] = 1 Then
Var CurrentIndexPoint = CurrentIndexPoint + 1
Var PointState[CurrentIndexPoint] = 1
Var PointNameIndex[CurrentIndexPoint] = 9
EndIf
DEBUGVAR Seeker.selected_a_drink
DEBUGVAR newPointIndex

View file

@ -70,83 +70,92 @@
If PointState[0] = 1 Then
Var PointCount = PointCount + 1
If show_eng = "true" Then
Var taobinImgPoint[0] = "/point1.png"
Var taobinImgPoint[0] = "/point_1_en.png"
Else
Var taobinImgPoint[0] = "/point1_en.png"
Var taobinImgPoint[0] = "/point_1.png"
EndIf
EndIf
If PointState[1] = 1 Then
Var PointCount = PointCount + 1
If show_eng = "true" Then
Var taobinImgPoint[1] = "/point2.png"
Var taobinImgPoint[1] = "/point_2_en.png"
Else
Var taobinImgPoint[1] = "/point2_en.png"
Var taobinImgPoint[1] = "/point_2.png"
EndIf
EndIf
If PointState[2] = 1 Then
Var PointCount = PointCount + 1
If show_eng = "true" Then
Var taobinImgPoint[2] = "/point3.png"
Var taobinImgPoint[2] = "/point_3_en.png"
Else
Var taobinImgPoint[2] = "/point3_en.png"
Var taobinImgPoint[2] = "/point_3.png"
EndIf
EndIf
If PointState[3] = 1 Then
Var PointCount = PointCount + 1
If show_eng = "true" Then
Var taobinImgPoint[3] = "/point4.png"
Var taobinImgPoint[3] = "/point_4_en.png"
Else
Var taobinImgPoint[3] = "/point4_en.png"
Var taobinImgPoint[3] = "/point_4.png"
EndIf
EndIf
If PointState[4] = 1 Then
Var PointCount = PointCount + 1
If show_eng = "true" Then
Var taobinImgPoint[4] = "/point5.png"
Var taobinImgPoint[4] = "/point_5_en.png"
Else
Var taobinImgPoint[4] = "/point5_en.png"
Var taobinImgPoint[4] = "/point_5.png"
EndIf
EndIf
If PointState[5] = 1 Then
Var PointCount = PointCount + 1
If show_eng = "true" Then
Var taobinImgPoint[5] = "/point6.png"
Var taobinImgPoint[5] = "/point_6_en.png"
Else
Var taobinImgPoint[5] = "/point6_en.png"
Var taobinImgPoint[5] = "/point_6.png"
EndIf
EndIf
If PointState[6] = 1 Then
Var PointCount = PointCount + 1
If show_eng = "true" Then
Var taobinImgPoint[6] = "/point7.png"
Var taobinImgPoint[6] = "/point_7_en.png"
Else
Var taobinImgPoint[6] = "/point7_en.png"
Var taobinImgPoint[6] = "/point_7.png"
EndIf
EndIf
If PointState[7] = 1 Then
Var PointCount = PointCount + 1
If show_eng = "true" Then
Var taobinImgPoint[7] = "/point8.png"
Var taobinImgPoint[7] = "/point_8_en.png"
Else
Var taobinImgPoint[7] = "/point8_en.png"
Var taobinImgPoint[7] = "/point_8.png"
EndIf
EndIf
If PointState[8] = 1 Then
Var PointCount = PointCount + 1
If show_eng = "true" Then
Var taobinImgPoint[8] = "/point9.png"
Else
Var taobinImgPoint[8] = "/point9_en.png"
EndIf
If MenuPoint[9] = 1 Then
If show_eng = "true" Then
Var taobinImgPoint[8] = "/point_10_en.png"
Else
Var taobinImgPoint[8] = "/point_10.png"
EndIf
Else
If show_eng = "true" Then
Var taobinImgPoint[8] = "/point_9_en.png"
Else
Var taobinImgPoint[8] = "/point_9.png"
EndIf
EndIf
EndIf
Var PointDiff = 10 - PointCount
Var PointDiff = 9 - PointCount
If show_eng = "true" Then
Var MemberText = "YOUR GORGEOUS STATUS"
Var MissionText = "SIP, SAVOR, GLOW!"
Var TaobinLevelDesc1 = PointDiff + " menus to win! Beauty gift from Robinson Beauty."
Var TaobinLevelDesc1 = "" + PointDiff
Var TaobinLevelDesc1 = TaobinLevelDesc1 + " menus to win! Beauty gift from Robinson Beauty."
Var TaobinLevelDesc2 = "Gather all 9 Tao Bin x Robinson Beauty menus to win!"
Var subTitle_Y = 839
@ -167,6 +176,10 @@
EndIf
If PointCount = 9 Then
Var CloseBtnImg = PointRootDir + "/bn_random.png"
EndIf
Var CurrentPointSlot = newPointIndex + 1
Var UpdatePoint = 0
@ -347,68 +360,68 @@
<Image>
<X> 237 </X>
<Y> 1058 </Y>
<Y> 1089 </Y>
<Filename> Var( PointRootDir + taobinImgPoint[0]) </Filename>
</Image>
<Image>
<X> 440 </X>
<Y> 1058 </Y>
<Y> 1089 </Y>
<Filename> Var( PointRootDir + taobinImgPoint[1]) </Filename>
</Image>
<Image>
<X> 642 </X>
<Y> 1058 </Y>
<Y> 1089 </Y>
<Filename> Var( PointRootDir + taobinImgPoint[2]) </Filename>
</Image>
<Image>
<X> 237 </X>
<Y> 1267 </Y>
<Y> 1271 </Y>
<Filename> Var( PointRootDir + taobinImgPoint[3]) </Filename>
</Image>
<Image>
<X> 440 </X>
<Y> 1267 </Y>
<Y> 1271 </Y>
<Filename> Var( PointRootDir + taobinImgPoint[4]) </Filename>
</Image>
<Image>
<X> 642 </X>
<Y> 1267 </Y>
<Y> 1271 </Y>
<Filename> Var( PointRootDir + taobinImgPoint[5]) </Filename>
</Image>
<Image>
<X> 237 </X>
<Y> 1449 </Y>
<Y> 1453 </Y>
<Filename> Var( PointRootDir + taobinImgPoint[6]) </Filename>
</Image>
<Image>
<X> 440 </X>
<Y> 1449 </Y>
<Y> 1453 </Y>
<Filename> Var( PointRootDir + taobinImgPoint[7]) </Filename>
</Image>
<Image>
<X> 642 </X>
<Y> 1449 </Y>
<Y> 1453 </Y>
<Filename> Var( PointRootDir + taobinImgPoint[8]) </Filename>
</Image>
<Button>
<X> 352 </X>
<X> 403 </X>
<Y> 1660 </Y>
<Filename> CloseBtnImg </Filename>
<FilenamePress> CloseBtnImg </FilenamePress>
@ -416,11 +429,22 @@
<Volume> SoundVolume </Volume>
<EventClick>
; goto lid straw
If PointCount = 9 Then
If SELLONLINE = 1 Then
Var CurrentPointCheck = ""
Else
Var CurrentPointCheck = "check"
EndIf
Var val3 = "X"
AddData 37 TelephoneNumber CurrentPointSlot CurrentPointCheck val3
Var CurrentPointCheck = "check"
Var val3 = "X"
AddData 37 TelephoneNumber CurrentPointSlot CurrentPointCheck val3
Var UpdatePoint = 1
Open "ROOT/taobin_project/xml/event/robinson_beauty/page_robinson_beauty_random.xml"
Else
Var CurrentPointCheck = "check"
Var val3 = "X"
AddData 37 TelephoneNumber CurrentPointSlot CurrentPointCheck val3
Var UpdatePoint = 1
EndIf
</EventClick>
</Button>

View file

@ -55,6 +55,9 @@
; Menu 4
If Seeker.selected_a_drink = "12-01-02-0073" Then
Var newPointIndex = 3
EndIf
If Seeker.selected_a_drink = "12-21-02-0073" Then
Var newPointIndex = 3
EndIf
@ -79,6 +82,9 @@
; Menu 8
If Seeker.selected_a_drink = "12-01-02-0074" Then
Var newPointIndex = 7
EndIf
If Seeker.selected_a_drink = "12-21-02-0074" Then
Var newPointIndex = 7
EndIf
@ -88,7 +94,11 @@
If Seeker.selected_a_drink = "12-02-03-0053" Then
Var newPointIndex = 8
EndIf
; Menu 10
If Seeker.selected_a_drink = "12-05-03-0115" Then
Var newPointIndex = 8
EndIf
Var CurrentPointSlot = newPointIndex + 1
Var CurrentPointCheck = "check"

View file

@ -12,6 +12,8 @@
Var MaxRandomIndex = 0
Var SelectNumber = 0
Var ShakeCount = 0
Var SelectingState = "Enable"
Var SelectedState = "Invisible"
@ -24,10 +26,6 @@
Var MaxRandomIndex = MaxRandomIndex + 1
Var rewardList[MaxRandomIndex] = "set_a_plus"
Var MaxRandomIndex = MaxRandomIndex + 1
Var rewardList[MaxRandomIndex] = "set_a_plus"
Var MaxRandomIndex = MaxRandomIndex + 1
Var rewardList[MaxRandomIndex] = "set_a_plus"
Var MaxRandomIndex = MaxRandomIndex + 1
EndIf
If SetAOutOfStock = 0 Then
@ -142,7 +140,7 @@
Var MaxRandomIndex = MaxRandomIndex + 1
EndIf
If randomOutOfStock = 0 Then
If RandomOutOfStock = 0 Then
Var rewardList[MaxRandomIndex] = "random"
Var MaxRandomIndex = MaxRandomIndex + 1
Var rewardList[MaxRandomIndex] = "random"
@ -241,6 +239,13 @@
Var MaxRandomIndex = MaxRandomIndex + 1
EndIf
If PopmartLabubuV2OutOfStock = 0 Then
Var rewardList[MaxRandomIndex] = "labubu"
Var MaxRandomIndex = MaxRandomIndex + 1
Var rewardList[MaxRandomIndex] = "labubu"
Var MaxRandomIndex = MaxRandomIndex + 1
EndIf
</EventOpen>
@ -259,7 +264,7 @@
EndIf
If SelectedState = "Enable" Then
If Timeout > 5 Then
If Timeout > 4 Then
Open "ROOT/taobin_project/xml/event/robinson_beauty/page_robinson_beauty_random_result.xml"
EndIf
EndIf
@ -280,7 +285,28 @@
<X> 0 </X>
<Y> 380 </Y>
<State> SelectingState </State>
<Filename> Var( DirImage + "/random_select.png") </Filename>
<Filename> Var( DirImage + "/random_select_bg.png") </Filename>
</Image>
; Fotune cookie
<Image>
<X> 404 </X>
<Y> 845 </Y>
<State> SelectingState </State>
<Filename> Var( DirImage + "/random_fortune_cookie.png") </Filename>
<EventClick>
Var ShakeCount = ShakeCount + 1
If ShakeCount >= 3 Then
Random2 1 11 SelectNumber
Function 2
EndIf
</EventClick>
<Animation>
<Style> "shake-image" </Style>
<OnChangeValue> ShakeCount </OnChangeValue>
</Animation>
</Image>
<Image>
@ -296,105 +322,6 @@
<Filename> Var( DirImage + "/random_text.png") </Filename>
</Image>
<Image>
<X> 573 </X>
<Y> 932 </Y>
<Width> 40 </Width>
<Height> 72 </Height>
<EventClick>
Var SelectNumber = 1
Function 2
</EventClick>
</Image>
<Image>
<X> 460 </X>
<Y> 944 </Y>
<Width> 37 </Width>
<Height> 41 </Height>
<EventClick>
Var SelectNumber = 2
Function 2
</EventClick>
</Image>
<Image>
<X> 593 </X>
<Y> 1056 </Y>
<Width> 37 </Width>
<Height> 68 </Height>
<EventClick>
Var SelectNumber = 3
Function 2
</EventClick>
</Image>
<Image>
<X> 525 </X>
<Y> 979 </Y>
<Width> 39 </Width>
<Height> 68 </Height>
<EventClick>
Var SelectNumber = 4
Function 2
</EventClick>
</Image>
<Image>
<X> 445 </X>
<Y> 1101 </Y>
<Width> 40 </Width>
<Height> 68 </Height>
<EventClick>
Var SelectNumber = 5
Function 2
</EventClick>
</Image>
<Image>
<X> 634 </X>
<Y> 989 </Y>
<Width> 38 </Width>
<Height> 72 </Height>
<EventClick>
Var SelectNumber = 6
Function 2
</EventClick>
</Image>
<Image>
<X> 495 </X>
<Y> 1051 </Y>
<Width> 40 </Width>
<Height> 67 </Height>
<EventClick>
Var SelectNumber = 7
Function 2
</EventClick>
</Image>
<Image>
<X> 506 </X>
<Y> 907 </Y>
<Width> 38 </Width>
<Height> 65 </Height>
<EventClick>
Var SelectNumber = 8
Function 2
</EventClick>
</Image>
<Image>
<X> 412 </X>
<Y> 993 </Y>
<Width> 41 </Width>
<Height> 70 </Height>
<EventClick>
Var SelectNumber = 9
Function 2
</EventClick>
</Image>
<Function2>
; Random coupon
Var randResultInt = 0
@ -403,6 +330,7 @@
DEBUGVAR MaxRandomIndex
If MaxRandomIndex > 0 Then
Random2 0 MaxRandomIndex randResultInt
DEBUGVAR randResultInt
Var randResultStr = rewardList[randResultInt]
Else
Var randResultStr = "discount_50"
@ -410,47 +338,51 @@
If randResultStr = "set_a_plus" Then
Var CodeType = ""
Var CodeType = "144"
EndIf
if randResultStr = "set_a" Then
Var CodeType = ""
Var CodeType = "143"
EndIf
If randResultStr = "lustrous" Then
Var CodeType = ""
Var CodeType = "137"
EndIf
If randResultStr = "lip_tint_oil" Then
Var CodeType = ""
Var CodeType = "138"
EndIf
If randResultStr = "blush_and_lip" Then
Var CodeType = ""
Var CodeType = "139"
EndIf
If randResultStr = "random" Then
Var CodeType = ""
Var CodeType = "140"
EndIf
If randResultStr = "double_serum" Then
Var CodeType = ""
Var CodeType = "141"
EndIf
If randResultStr = "calvin_klein" Then
Var CodeType = ""
Var CodeType = "142"
EndIf
If randResultStr = "discount_50" Then
Var CodeType = ""
Var CodeType = "145"
EndIf
If randResultStr = "labubu" Then
Var CodeType = "146"
EndIf
If SelectNumber = 0 Then
Random2 1 9 SelectNumber
Random2 1 11 SelectNumber
EndIf
Var SelectedNumberImage = DirImage + "random_"
Var SelectedNumberImage = DirImage + "/random_"
Var SelectedNumberImage = SelectedNumberImage + SelectNumber
Var SelectedNumberImage = SelectedNumberImage + ".png"
@ -498,4 +430,8 @@
Open "ROOT/taobin_project/xml/event/robinson_beauty/page_robinson_beauty_random.xml"
</EventUnitTest3>
<EventUnitTest4>
Function 2
</EventUnitTest4>
</Popup>

View file

@ -10,67 +10,97 @@
Var DirImage = "ROOT/taobin_project/image/event/robinson_beauty"
If CodeType = "" Then
Var RewardText = DirImage + "/super_set_reward_text.png"
Var RewardImage = DirImage + "/super_set_reward.png"
Var RewardImage_X = 27
Var RewardImage_Y = 876
Var RewardBg = DirImage + "/reward_bg.png"
If CodeType = "137" Then
Var RewardText = DirImage + "/reward_lustrous_lipstick_name.png"
Var RewardImage = DirImage + "/reward_lustrous_lipstick.png"
Var RewardText_X = 88
Var RewardText_Y = 546
Var RewardImage_X = 424
Var RewardImage_Y = 883
EndIf
If CodeType = "" Then
Var RewardText = DirImage + "/balance_essence_toner_reward_text.png"
Var RewardImage = DirImage + "/balance_essence_toner_reward.png"
Var RewardImage_X = 328
Var RewardImage_Y = 843
If CodeType = "138" Then
Var RewardText = DirImage + "/reward_lip_tint_oil_name.png"
Var RewardImage = DirImage + "/reward_lip_tint_oil.png"
Var RewardText_X = 18
Var RewardText_Y = 923
Var RewardImage_X = 169
Var RewardImage_Y = 578
EndIf
If CodeType = "" Then
Var RewardText = DirImage + "/cleansing_gel_reward_text.png"
Var RewardImage = DirImage + "/cleansing_gel_reward.png"
Var RewardImage_X = 270
Var RewardImage_Y = 833
If CodeType = "139" Then
Var RewardText = DirImage + "/reward_blush_and_linp_name.png"
Var RewardImage = DirImage + "/reward_blush_and_linp.png"
Var RewardText_X = 170
Var RewardText_Y = 541
Var RewardImage_X = 114
Var RewardImage_Y = 892
EndIf
If CodeType = "" Then
Var RewardText = DirImage + "/tumble_bottle_reward_text.png"
Var RewardImage = DirImage + "/tumble_bottle_reward.png"
Var RewardImage_X = 148
Var RewardImage_Y = 608
If CodeType = "140" Then
Var RewardText = DirImage + "/reward_random_name.png"
Var RewardImage = DirImage + "/reward_random.png"
Var RewardText_X = 307
Var RewardText_Y = 573
Var RewardImage_X = 156
Var RewardImage_Y = 839
EndIf
If CodeType = "" Then
Var RewardText = DirImage + "/clear_gel_reward_text.png"
Var RewardImage = DirImage + "/clear_gel_reward.png"
Var RewardImage_X = 445
Var RewardImage_Y = 864
If CodeType = "141" Then
Var RewardText = DirImage + "/reward_double_serum_name.png"
Var RewardImage = DirImage + "/reward_double_serum.png"
Var RewardText_X = 160
Var RewardText_Y = 623
Var RewardImage_X = 127
Var RewardImage_Y = 848
EndIf
If CodeType = "" Then
Var RewardText = DirImage + "/e_gift_card_100_bath_reward_text.png"
Var RewardImage = DirImage + "/e_gift_card_100_bath_reward.png"
Var RewardImage_X = 254
Var RewardImage_Y = 805
If CodeType = "142" Then
Var RewardText = DirImage + "/reward_calvin_klein_name.png"
Var RewardImage = DirImage + "/reward_calvin_klein.png"
Var RewardText_X = 117
Var RewardText_Y = 541
Var RewardImage_X = 178
Var RewardImage_Y = 787
EndIf
If CodeType = "" Then
Var RewardText = DirImage + "/clear_gel_4_ml_reward_text.png"
Var RewardImage = DirImage + "/clear_gel_4_ml_reward.png"
Var RewardImage_X = 267
Var RewardImage_Y = 808
If CodeType = "143" Then
Var RewardText = DirImage + "/reward_set_a_name.png"
Var RewardImage = DirImage + "/reward_set_a.png"
Var RewardText_X = 283
Var RewardText_Y = 545
Var RewardImage_X = 114
Var RewardImage_Y = 819
EndIf
If CodeType = "" Then
Var RewardText = DirImage + "/clear_gel_4_ml_reward_text.png"
Var RewardImage = DirImage + "/clear_gel_4_ml_reward.png"
Var RewardImage_X = 267
Var RewardImage_Y = 808
If CodeType = "144" Then
Var RewardText = DirImage + "/reward_set_a_plus_name.png"
Var RewardImage = DirImage + "/reward_set_a_plus.png"
Var RewardText_X = 255
Var RewardText_Y = 545
Var RewardImage_X = 134
Var RewardImage_Y = 863
EndIf
If CodeType = "" Then
Var RewardText = DirImage + "/clear_gel_4_ml_reward_text.png"
Var RewardImage = DirImage + "/clear_gel_4_ml_reward.png"
Var RewardImage_X = 267
Var RewardImage_Y = 808
If CodeType = "145" Then
Var RewardText = DirImage + "/reward_discount_name.png"
Var RewardImage = DirImage + "/reward_discount.png"
Var RewardText_X = 361
Var RewardText_Y = 725
Var RewardImage_X = 137
Var RewardImage_Y = 748
Var RewardBg = DirImage + "/reward_bg_no_line.png"
EndIf
If CodeType = "146" Then
Var RewardText = DirImage + "/reward_popmart_labubu_v2_name.png"
Var RewardImage = DirImage + "/reward_popmart_labubu_v2.png"
Var RewardText_X = 173
Var RewardText_Y = 533
Var RewardImage_X = 277
Var RewardImage_Y = 901
EndIf
Var CodeReward = CodeType
@ -117,7 +147,7 @@
<Image>
<X> 0 </X>
<Y> 380 </Y>
<Filename> Var( DirImage + "/bg_reward.png") </Filename>
<Filename> RewardBg </Filename>
</Image>
<Image>
@ -127,17 +157,11 @@
</Image>
<Image>
<X> 126 </X>
<Y> 595 </Y>
<X> RewardText_X </X>
<Y> RewardText_Y </Y>
<Filename> RewardText </Filename>
</Image>
<Image>
<X> 229 </X>
<Y> 1662 </Y>
<Filename> Var( DirImage + "/reward_result_line_register_text.png") </Filename>
</Image>
;
<Image>
<X> 751 </X>

View file

@ -394,6 +394,10 @@
Var adver_brewing_count_down = 10
Var VideoPlayFile = "ROOT/taobin_project/image/page_doing/tao_adv1.png"
Var PictureFile = brew_txt1
TRY "ROOT/taobin_project/video/script3_frist_brewing.ev"
EndIf
Var CampaignEnable = 0

View file

@ -14,10 +14,7 @@
Var Timeout = 0
<<<<<<< HEAD
=======
Var FromRobinsonBeautyPro = 0
>>>>>>> d60c9e3869794302ccb03e1d7b65f6e600a7b226
;include="ROOT/taobin_project/xml/menu_catalog_new_menu.xml"

View file

@ -12,10 +12,7 @@
Var Timeout = 0
<<<<<<< HEAD
=======
Var FromRobinsonBeautyPro = 0
>>>>>>> d60c9e3869794302ccb03e1d7b65f6e600a7b226
;include="ROOT/taobin_project/xml/menu_catalog_new_menu.xml"
@ -38,7 +35,7 @@
Var block_index_override = 0
Var block_index_move = 0
</Script>
; menu_new_list 9
; menu_new_list 10
; ==================> Len = 12
; - - 12-05-03-0064
<Block>
@ -2819,6 +2816,258 @@ CHEE TEA" </Value>
<Value> text_unavailable </Value>
<Align> center-vertical-horizontal </Align>
</Text>
</Block>
; - - -
; ==================> Len = 12
; - - 12-05-03-0115
<Block>
<MarginLeft> 33 </MarginLeft>
<MarginTop> 22 </MarginTop>
<Width> 225 </Width>
<Height> 296 </Height>
<State> Flag( 12-05-03-0115.Button,$Sum1205030115) </State>
<Button>
<State> $Sum1205030115 </State>
<Filename> "ROOT/taobin_project/image/page_drink_n//bn_iced_7UP_Lychee_SODA_robinson_beauty.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/page_drink_press_n//bn_iced_7UP_Lychee_SODA_robinson_beauty.png" </FilenamePress>
<FilenameDisable> "ROOT/taobin_project/image/page_drink_disable_n2//bn_iced_7UP_Lychee_SODA_robinson_beauty.png" </FilenameDisable>
<OverlayImage> xmlpro( 12-05-03-0115, "ROOT/taobin_project/image/menu_overlay_set/button_overlay_%s_posi1.png") </OverlayImage>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventOnClick>
Var NameDrink = "ROBINSON UP CHEE SMOOTHIE"
Var NameDrinkTH = "โรบินสันอัพชี่"
Var DrinkDescriptionTH = "เซเว่น อัพ ลิ้นจี่ มะนาว โซดา "
Var DrinkDescription = "7Up Lychee Lime Soda"
Var PictureDrink = "ROOT/taobin_project/image/page_drink_picture2_n/" + "bn_iced_7UP_Lychee_SODA_robinson_beauty.png"
Var OpenFromXML = CurrentXMLFileName2
Var PriceD1 = $-.Price
Var PriceD2 = $-.Price
Var PriceD3 = $12-05-03-0115.Price
Var PD_CODE1 = "##-##-##-####"
Var PD_CODE2 = "##-##-##-####"
Var PD_CODE3 = "12-05-03-0115"
Var PD_STAGE_1 = "Disable2"
Var PD_STAGE_2 = "Disable2"
Var PD_STAGE_3 = $12-05-03-0115.Button
Var OverlayMenuFilter !assigned xmlpro( 12-05-03-0115, "ROOT/taobin_project/image/menu_overlay_set/button_overlay_pic_%s_posi1.png")
DEBUGVAR OverlayMenuFilter
Var SelectCountDrinkType = 0
Var DefaultDrinkType = 0
If PD_STAGE_1 = "Enable" Then
Var SelectCountDrinkType = SelectCountDrinkType + 1
Var DefaultDrinkType = 1
EndIf
If PD_STAGE_2 = "Enable" Then
Var SelectCountDrinkType = SelectCountDrinkType + 1
Var DefaultDrinkType = 2
EndIf
If PD_STAGE_3 = "Enable" Then
Var SelectCountDrinkType = SelectCountDrinkType + 1
Var DefaultDrinkType = 3
EndIf
If PD_STAGE_2 = "Enable" Then
Topping "Load" "-"
Else
If PD_STAGE_1 = "Enable" Then
Topping "Load" "-"
Else
Topping "Load" "12-05-03-0115"
EndIf
EndIf
Var menu_name_eng_hot = $##-##-##-####.NameE
Var menu_desc_eng_hot = $##-##-##-####.descriptionE
Var menu_name_thai_hot = $##-##-##-####.Name
Var menu_desc_thai_hot = $##-##-##-####.description
Var menu_name_eng_cold = $##-##-##-####.NameE
Var menu_desc_eng_cold = $##-##-##-####.descriptionE
Var menu_name_thai_cold = $##-##-##-####.Name
Var menu_desc_thai_cold = $##-##-##-####.description
Var menu_name_eng_blender = $12-05-03-0115.NameE
Var menu_desc_eng_blender = $12-05-03-0115.descriptionE
Var menu_name_thai_blender = $12-05-03-0115.Name
Var menu_desc_thai_blender = $12-05-03-0115.description
DEBUGVAR PD_STAGE_1
DEBUGVAR PD_STAGE_2
DEBUGVAR PD_STAGE_3
Var SelectDrinkType = 0
Var FromRobinsonBeautyPro = 1
Open "ROOT/taobin_project/xml/page_topping_select5.xml"
</EventOnClick>
</Button>
<Text>
<X> 16 </X>
<Y> 164 </Y>
<Size> 24 </Size>
<Width>220</Width>
<Mode> "multi2" </Mode>
<Font> KanitMediumTTF </Font>
<Color> 0x322B26 </Color>
<State> showthaiText </State>
<Value> "โรบินสันอัพชี่" </Value>
</Text>
<Text>
<X> 16 </X>
<Y> 220 </Y>
<Size> 14 </Size>
<Width>220</Width>
<Font> KanitMediumTTF </Font>
<Color> 0x6F5F51 </Color>
<State> showthaiText </State>
<Value> "เซเว่น อัพ ลิ้นจี่ มะนาว โซดา " </Value>
</Text>
<Text>
<X> 16 </X>
<Y> 164 </Y>
<Size> 22 </Size>
<Width>220</Width>
<Mode> "multi2" </Mode>
<Font> KanitMediumTTF </Font>
<Color> 0x322B26 </Color>
<State> showengText </State>
<Value> "ROBINSON UP CHEE SMOOTHIE" </Value>
</Text>
<Text>
<X> 16 </X>
<Y> 220 </Y>
<Size> 14 </Size>
<Width>220</Width>
<Font> KanitMediumTTF </Font>
<Color> 0x6F5F51 </Color>
<State> showengText </State>
<Value> "7Up Lychee Lime Soda" </Value>
</Text>
<Image>
<X> 16 </X>
<Y> 264 </Y>
<Filename> Var( DirImage2 + "option_deactive.png" ) </Filename>
</Image>
<Image>
<X> 16 </X>
<Y> 264 </Y>
<State> "Invisible" </State>
<Filename> Var( DirImage2 + "hot.png" ) </Filename>
<FilenameDisable> Var( DirImage2 + "hot_db.png" ) </FilenameDisable>
</Image>
<Text>
<X> 50 </X>
<Y> TextPriceMenuY </Y>
<Size> TextPriceMenuSize </Size>
<Width>220</Width>
<Font> KanitMediumTTF </Font>
<Color> 0x6F5F51 </Color>
<ColorDisable> 0xEAE6E1 </ColorDisable>
<State> "Invisible" </State>
<Value> StringFmt( $-.Price , DisplayFormat, PreScaleConvertShow) </Value>; test
</Text>
<Image>
<X> 81 </X>
<Y> 264 </Y>
<Filename> Var( DirImage2 + "cold.png" ) </Filename>
<FilenameDisable> Var( DirImage2 + "cold_db.png" ) </FilenameDisable>
<State> "Invisible" </State>
</Image>
<Text>
<X> 115 </X>
<Y> TextPriceMenuY </Y>
<Size> TextPriceMenuSize </Size>
<Width>220</Width>
<Font> KanitMediumTTF </Font>
<Color> 0x6F5F51 </Color>
<ColorDisable> 0xEAE6E1 </ColorDisable>
<State> "Invisible" </State>
<Value> StringFmt( $-.Price , DisplayFormat, PreScaleConvertShow) </Value>; test
</Text>
<Image>
<X> 146 </X>
<Y> 264 </Y>
<Filename> Var( DirImage2 + "blend.png" ) </Filename>
<FilenameDisable> Var( DirImage2 + "blend_db.png" ) </FilenameDisable>
<State> $12-05-03-0115.Button </State>
</Image>
<Text>
<X> 180 </X>
<Y> TextPriceMenuY </Y>
<Size> TextPriceMenuSize </Size>
<Width>220</Width>
<Font> KanitRegularTTF </Font>
<Color> 0x6F5F51 </Color>
<ColorDisable> 0xEAE6E1 </ColorDisable>
<State> $12-05-03-0115.Button </State>
<Value> StringFmt( $12-05-03-0115.Price , DisplayFormat, PreScaleConvertShow) </Value>; test
</Text>
<Image>
<X> 81 </X>
<Y> 264 </Y>
<State>
eval(
If ICE_PROCESS_STATUS = 2 Then
Var ice_tab_process_show = "Invisible"
Else
Var ice_tab_process_show = "Invisible"
EndIf
Var return = ice_tab_process_show
)
</State>
<Filename> "ROOT/taobin_project/image/drink_option/ice_tab_unavalible.png" </Filename>
<FilenameDisable> "ROOT/taobin_project/image/drink_option/ice_tab_unavalible_dis.png" </FilenameDisable>
</Image>
<Image>
<X> 49 </X>
<Y> 117 </Y>
<State>
eval(
If $Sum1205030115 = "Disable" Then
STRCONTAIN "ERR" $##-##-##-####.TAG tag1_is_disable
STRCONTAIN "ERR" $##-##-##-####.TAG tag2_is_disable
STRCONTAIN "ERR" $12-05-03-0115.TAG tag3_is_disable
Var return = "Invisible"
If tag1_is_disable = "true" Then
Var return = "Enable"
EndIf
If tag2_is_disable = "true" Then
Var return = "Enable"
EndIf
If tag3_is_disable = "true" Then
Var return = "Enable"
EndIf
Else
Var return = "Invisible"
EndIf
)
</State>
<Filename> "ROOT/taobin_project/image//img_menu_err2.png" </Filename>
</Image>
<Text>
<X> 84 </X>
<Y> 266 </Y>
<Size> 10 </Size>
<Font> OpunMediumTTF </Font>
<Color> 0xDE794E </Color>
<State> ice_tab_process_show </State>
<Value> ice_show_open </Value>
</Text>
<Text>
<X> 48 </X>
<Y> 116 </Y>
<Size> 32 </Size>
<Width>128</Width>
<Height>64</Height>
<Font> MITRegularTTF </Font>
<Color> 0x5A5A5A </Color>
<Mode> "disable-show" </Mode>
<State> $Sum1205030115 </State>
<Value> text_unavailable </Value>
<Align> center-vertical-horizontal </Align>
</Text>
</Block>
; - - -
</FrameScroll>

View file

@ -576,12 +576,7 @@
Var Tel2DFlag = 0
Var Tel2D = TelephoneNumber
Trim Tel2D 1
If Tel2D = "0" Then
Var Tel2DFlag = 1
EndIf
TRY "ROOT/taobin_project/xml/verify_number.ev"
If Tel2DFlag = 1 Then

View file

@ -555,12 +555,7 @@
Var Tel2DFlag = 0
Var Tel2D = TelephoneNumber
Trim Tel2D 1
If Tel2D = "0" Then
Var Tel2DFlag = 1
EndIf
TRY "ROOT/taobin_project/xml/verify_number.ev"

View file

@ -264,6 +264,20 @@
EndIf
EndIf
If RobinsonBeautyPro = 1 Then
If FromRobinsonBeautyPro = 1 Then
If Seeker.CodeChannel = 1 Then
If Seeker.CollectPointPromotion = 1 Then
GETACCEXT TelephoneNumber 32
Open "ROOT/taobin_project/xml/event/robinson_beauty/page_collect_point_robinson_beauty_2.xml"
EndIf
Else
GETACCEXT TelephoneNumber 32
Open "ROOT/taobin_project/xml/event/robinson_beauty/page_collect_point_robinson_beauty_2.xml"
EndIf
EndIf
EndIf
GETACCEXT Param1 23
Open "ROOT/taobin_project/xml/page_collect_point_2.xml"
@ -381,14 +395,24 @@
EndIf
EndIf
If PepweenCollectPoint = 0 Then
GETACCEXT TelephoneNumber 31
Open "ROOT/taobin_project/xml/event/pepween/page_collect_point_pro_pepween_2.xml"
Else
GETACCEXT Param1 23
Open "ROOT/taobin_project/xml/page_collect_point_2.xml"
If RobinsonBeautyPro = 1 Then
If FromRobinsonBeautyPro = 1 Then
If Seeker.CodeChannel = 1 Then
If Seeker.CollectPointPromotion = 1 Then
GETACCEXT TelephoneNumber 32
Open "ROOT/taobin_project/xml/event/robinson_beauty/page_collect_point_robinson_beauty_2.xml"
EndIf
Else
GETACCEXT TelephoneNumber 32
Open "ROOT/taobin_project/xml/event/robinson_beauty/page_collect_point_robinson_beauty_2.xml"
EndIf
EndIf
EndIf
GETACCEXT Param1 23
Open "ROOT/taobin_project/xml/page_collect_point_2.xml"
EndIf
Var Tel_Confirm_Flag = 1
@ -803,12 +827,7 @@
Var Tel2DFlag = 0
Var Tel2D = TelephoneNumber
Trim Tel2D 1
If Tel2D = "0" Then
Var Tel2DFlag = 1
EndIf
TRY "ROOT/taobin_project/xml/verify_number.ev"
If Tel2DFlag = 1 Then
@ -927,15 +946,24 @@
EndIf
EndIf
If PepweenCollectPoint = 0 Then
GETACCEXT TelephoneNumber 31
Open "ROOT/taobin_project/xml/event/pepween/page_collect_point_pro_pepween_2.xml"
Else
GETACCEXT Param1 23
;Open "ROOT/taobin_project/xml/page_catalog.xml"
Open "ROOT/taobin_project/xml/page_collect_point_2.xml"
If RobinsonBeautyPro = 1 Then
If FromRobinsonBeautyPro = 1 Then
If Seeker.CodeChannel = 1 Then
If Seeker.CollectPointPromotion = 1 Then
GETACCEXT TelephoneNumber 32
Open "ROOT/taobin_project/xml/event/robinson_beauty/page_collect_point_robinson_beauty_2.xml"
EndIf
Else
GETACCEXT TelephoneNumber 32
Open "ROOT/taobin_project/xml/event/robinson_beauty/page_collect_point_robinson_beauty_2.xml"
EndIf
EndIf
EndIf
GETACCEXT Param1 23
;Open "ROOT/taobin_project/xml/page_catalog.xml"
Open "ROOT/taobin_project/xml/page_collect_point_2.xml"
Else
If show_eng = "true" Then

View file

@ -495,12 +495,7 @@
Var Tel2DFlag = 0
Var Tel2D = TelephoneNumber
Trim Tel2D 1
If Tel2D = "0" Then
Var Tel2DFlag = 1
EndIf
TRY "ROOT/taobin_project/xml/verify_number.ev"
If Tel2DFlag = 1 Then

View file

@ -411,16 +411,6 @@
If Tel_Confirm_Flag = 1 Then
Var Tel2DFlag = 0
Var Tel2D = PinNumber
Trim Tel2D 1
Var Tel2DFlag = 1
If PinNumber = OtpCode Then
Open "ROOT/taobin_project/xml/page_identityMember_consent.xml"
Else

View file

@ -365,7 +365,7 @@
Var PayState2 = "Disable"
Var PayState3 = "Disable"
Var PayState4 = "Disable"
Var PayState5 = "Disable"
Var PayState5 = "Enable"
Var PayState6 = "Disable"
Var PayOfflineMode = 1

View file

@ -231,78 +231,10 @@
</EventClick>
</Button>
<Button>
<X> 440 </X>
<Y> 965 </Y>
<State> WalletEnable </State>
<Filename> "ROOT/taobin_project/image/collectiing/bn_pay_with_shoppy.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_pay_with_shoppy.png" </FilenamePress>
<FilenameDisable> "ROOT/taobin_project/image/collectiing/bd_pay_with_shoppy.png" </FilenameDisable>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var QR_POPUP = "/img_popup2.png"
Var LOADING_STATE = "Enable"
Var QRCODE99 = ""
Var FlagQROpened = 1
Var alphaState = "Enable"
;CoinVending OFF
VendingQR ON
Var SessionID2 = SelectSlot + ":"
Var SessionID2 = SessionID2 + Seeker.ExtendData
Var CreditAmount1 = ""
Var ServiceAmountFlow = ""
Var TelephoneNumberQR = "0899999999"
Var ServiceType = "coffee"
Var ECommerceQR = ""
Var ECommerceQR = ECommerceQR + PriceDrink
Var ECommerceQR = ECommerceQR + "/"
Var ECommerceQR = ECommerceQR + DiscountDrink
Var ECommerceQR = ECommerceQR + "/"
Var ECommerceQR = ECommerceQR + SessionID2
Var ECommerceQR = ECommerceQR + "/"
Var ECommerceQR = ECommerceQR + SelectDrink
Var ECommerceQR = ECommerceQR + "/"
Var ECommerceQR = ECommerceQR + "AIR:2/"
;If IntVendingCampaign > 0 Then
; Var ECommerceQR = ECommerceQR + Seeker.VendingCode
; Var ECommerceQR = ECommerceQR + ":"
; Var ECommerceQR = ECommerceQR + Seeker.CodeNumber
; Var ECommerceQR = ECommerceQR + ":"
; Var ECommerceQR = ECommerceQR + Seeker.VendingCampaignRI3
;EndIf
Var ServiceParameter = "max"
Var ServiceCharge = 0
Var AccountType = "new"
Var testservice = "kbank"
Var tc = ""
Var GetScore = ""
Var OperatorName = ""
Var SessionID = ""
GetPayInfo TelephoneNumberQR ECommerceQR ServiceType ServiceParameter SessionID OperatorName CreditAmount1 ServiceAmountFlow GetScore tc
Var ReqPayInfoFlag = 2
Var ReqPayInfoFromCashOther = 1
Open "ROOT/taobin_project/xml/page_payment_cash.xml"
</EventClick>
</Button>
<Button>
<X> 441 </X>
<Y> 741 </Y>
<State> WalletEnable </State>
<Filename> "ROOT/taobin_project/image/collectiing/bn_pay_with_paotang.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_pay_with_paotang.png" </FilenamePress>
@ -366,8 +298,8 @@
</Button>
<Button>
<X> 209 </X>
<Y> 965 </Y>
<X> 675 </X>
<Y> 741 </Y>
<State> WalletEnable </State>
<Filename> "ROOT/taobin_project/image/collectiing/bn_pay_with_linepay.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_pay_with_linepay.png" </FilenamePress>
@ -430,52 +362,21 @@
</EventClick>
</Button>
<Button>
<X> 209 </X>
<Y> 1112 </Y>
<State> "Invisible" </State>
<Filename> "ROOT/taobin_project/image/collectiing/bn_pay_with_codeXXX.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bn_pay_with_codeXXX.png" </FilenamePress>
<FilenameDisable> "ROOT/taobin_project/image/collectiing/bn_pay_with_codeXXX.png" </FilenameDisable>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
</EventClick>
</Button>
<Button>
<X> 441 </X>
<Y> 1112 </Y>
<State> "Invisible" </State>
<Filename> "ROOT/taobin_project/image/collectiing/bn_pay_with_codeXXX.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bn_pay_with_codeXXX.png" </FilenamePress>
<FilenameDisable> "ROOT/taobin_project/image/collectiing/bn_pay_with_codeXXX.png" </FilenameDisable>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
</EventClick>
</Button>
<Button>
<X> 675 </X>
<Y> 741 </Y>
<Y> 965 </Y>
<State> WalletEnable </State>
<Filename> "ROOT/taobin_project/image/collectiing/bn_pay_with_lazpay.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_pay_with_lazpay.png" </FilenamePress>
<FilenameDisable> "ROOT/taobin_project/image/collectiing/bd_pay_with_lazpay.png" </FilenameDisable>
<Filename> "ROOT/taobin_project/image/collectiing/bn_pay_with_shoppy.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_pay_with_shoppy.png" </FilenamePress>
<FilenameDisable> "ROOT/taobin_project/image/collectiing/bd_pay_with_shoppy.png" </FilenameDisable>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var QR_POPUP = "/img_popup10.png"
Var QR_POPUP = "/img_popup2.png"
Var LOADING_STATE = "Enable"
Var QRCODE99 = ""
@ -502,7 +403,7 @@
Var ECommerceQR = ECommerceQR + "/"
Var ECommerceQR = ECommerceQR + SelectDrink
Var ECommerceQR = ECommerceQR + "/"
Var ECommerceQR = ECommerceQR + "LZP:2/"
Var ECommerceQR = ECommerceQR + "AIR:2/"
;If IntVendingCampaign > 0 Then
; Var ECommerceQR = ECommerceQR + Seeker.VendingCode
@ -522,7 +423,7 @@
Var SessionID = ""
GetPayInfo TelephoneNumberQR ECommerceQR ServiceType ServiceParameter SessionID OperatorName CreditAmount1 ServiceAmountFlow GetScore tc
Var ReqPayInfoFlag = 6
Var ReqPayInfoFlag = 2
Var ReqPayInfoFromCashOther = 1
Open "ROOT/taobin_project/xml/page_payment_cash.xml"
@ -530,7 +431,7 @@
</Button>
<Button>
<X> 675 </X>
<X> 440 </X>
<Y> 965 </Y>
<State> WalletEnable </State>
<Filename> "ROOT/taobin_project/image/collectiing/bn_pay_with_maxme.png" </Filename>
@ -595,10 +496,8 @@
</Button>
<Button>
<X> 208 </X>
<Y> 1189 </Y>
<X> 675 </X>
<Y> 965 </Y>
<State> WalletEnable </State>
<Filename> "ROOT/taobin_project/image/collectiing/bn_pay_with_wechat.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_pay_with_wechat.png" </FilenamePress>
@ -661,8 +560,9 @@
</EventClick>
</Button>
<Button>
<X> 440 </X>
<X> 208 </X>
<Y> 1189 </Y>
<State> WalletEnable </State>
<Filename> "ROOT/taobin_project/image/collectiing/bn_pay_with_make.png" </Filename>
@ -729,7 +629,7 @@
</Button>
<Button>
<X> 675 </X>
<X> 440 </X>
<Y> 1189 </Y>
<State> "Enable" </State>
<Filename> "ROOT/taobin_project/image/collectiing/bn_pay_with_cashAli.png" </Filename>
@ -793,31 +693,9 @@
</EventClick>
</Button>
<Button>
<X> 673 </X>
<Y> 1112 </Y>
<State> "Invisible" </State>
<Filename> "ROOT/taobin_project/image/collectiing/bn_pay_with_ccard1.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_pay_with_ccard1.png" </FilenamePress>
<FilenameDisable> "ROOT/taobin_project/image/collectiing/bd_pay_with_ccard1.png" </FilenameDisable>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var QR_POPUP = "/img_popup8.png"
Var alphaState = "Enable"
Coin CARD
Var ReqPayInfoFromCashOther = 2
Open "ROOT/taobin_project/xml/page_payment_cash.xml"
</EventClick>
</Button>
<Button>
<X> 208 </X>
<Y> 1413 </Y>
<X> 675 </X>
<Y> 1189 </Y>
<State> WalletEnable </State>
<Filename> "ROOT/taobin_project/image/collectiing/bn_pay_with_cashUnion.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_pay_with_cashUnion.png" </FilenamePress>
@ -878,6 +756,23 @@
Var ReqPayInfoFromCashOther = 1
Open "ROOT/taobin_project/xml/page_payment_cash.xml"
</EventClick>
</Button>
<Button>
<X> 208 </X>
<Y> 1413 </Y>
<State> "Enable" </State>
<Filename> "ROOT/taobin_project/image/collectiing/bn_pay_with_codeXXX.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bn_pay_with_codeXXX.png" </FilenamePress>
<FilenameDisable> "ROOT/taobin_project/image/collectiing/bn_pay_with_codeXXX.png" </FilenameDisable>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
</EventClick>
</Button>
@ -913,6 +808,28 @@
</EventClick>
</Button>
<Button>
<X> 673 </X>
<Y> 1112 </Y>
<State> "Invisible" </State>
<Filename> "ROOT/taobin_project/image/collectiing/bn_pay_with_ccard1.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_pay_with_ccard1.png" </FilenamePress>
<FilenameDisable> "ROOT/taobin_project/image/collectiing/bd_pay_with_ccard1.png" </FilenameDisable>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var QR_POPUP = "/img_popup8.png"
Var alphaState = "Enable"
Coin CARD
Var ReqPayInfoFromCashOther = 2
Open "ROOT/taobin_project/xml/page_payment_cash.xml"
</EventClick>
</Button>
<Button>

View file

@ -633,12 +633,7 @@
Var Tel2DFlag = 0
Var Tel2D = TelephoneNumber
Trim Tel2D 1
If Tel2D = "0" Then
Var Tel2DFlag = 1
EndIf
TRY "ROOT/taobin_project/xml/verify_number.ev"
If Tel2DFlag = 1 Then

View file

@ -511,12 +511,7 @@
Var Tel2DFlag = 0
Var Tel2D = TelephoneNumber
Trim Tel2D 1
If Tel2D = "0" Then
Var Tel2DFlag = 1
EndIf
TRY "ROOT/taobin_project/xml/verify_number.ev"
If Tel2DFlag = 1 Then

View file

@ -36,8 +36,7 @@
DEBUGVAR topping9
DEBUGVAR topping10
Var PayCredit = 1
</EventOpen>
<Timeout> 1000 </Timeout>

View file

@ -226,12 +226,7 @@
Var Tel2DFlag = 0
Var Tel2D = TelephoneNumber
Trim Tel2D 1
If Tel2D = "0" Then
Var Tel2DFlag = 1
EndIf
TRY "ROOT/taobin_project/xml/verify_number.ev"
If Tel2DFlag = 1 Then

View file

@ -593,12 +593,7 @@
Var Tel2DFlag = 0
Var Tel2D = TelephoneNumber
Trim Tel2D 1
If Tel2D = "0" Then
Var Tel2DFlag = 1
EndIf
TRY "ROOT/taobin_project/xml/verify_number.ev"
If Tel2DFlag = 1 Then

View file

@ -86,7 +86,9 @@
EndIf
TRY "ROOT/taobin_project/inter/tha/hardware/exhaust_fan_schedule.ev"
Var exhaust_fan_schedule = CountryRootPath + "/hardware/exhaust_fan_schedule.ev"
TRY exhaust_fan_schedule
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>

20
xml/verify_number.ev Normal file
View file

@ -0,0 +1,20 @@
Var Tel2D = TelephoneNumber
Trim Tel2D 2
If Tel2D = "06" Then
Var Tel2DFlag = 1
EndIf
If Tel2D = "07" Then
Var Tel2DFlag = 1
EndIf
If Tel2D = "08" Then
Var Tel2DFlag = 1
EndIf
If Tel2D = "09" Then
Var Tel2DFlag = 1
EndIf

View file

@ -19,6 +19,8 @@
Open "ROOT/taobin_project/xml/sold_cup_count.xml"
EndIf
EndIf
</EventOpen>
<Timeout> 33000 </Timeout>