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

This commit is contained in:
wanlop run 2024-11-14 13:40:50 +07:00
commit abb01bb895
294 changed files with 55493 additions and 3806 deletions

View file

@ -0,0 +1,153 @@
<Popup>
<Width> 1080 </Width>
<Height> 1920 </Height>
<Volume> SoundVolume </Volume>
<EventOpen>
Var Timeout = 0
Var ImageDir = "ROOT/taobin_project/image/event/happy_trios/"
If show_eng = "true" Then
Var Image = ImageDir + "send_code_pending_en.png"
Else
Var Image = ImageDir + "send_code_pending_th.png"
EndIf
Var CodeIsSended = 0
DEBUGVAR Image
DEBUGVAR TelephoneNumber
Var Param1 = "152"
Var Param2 = ""
Var Param3 = ""
AddData 43 TelephoneNumber Param1 Param2 Param3
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
Var Timeout = Timeout + 1
If Timeout > 5 Then
If CodeIsSended = 1 Then
If CoffeePoint >= 28 Then
If GetDrink5Bath = 1 Then
Open "ROOT/taobin_project/xml/page_display_get_drink_5_baht.xml"
Else
If Seeker.IsLineMember = 0 Then
If LuckyDrawCampaign = 1 Then
Open "ROOT/taobin_project/xml/sometime/page_campaign_ads_lucky_draw.xml"
Else
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
Else
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
EndIf
Else
If Seeker.IsLineMember = 0 Then
If LuckyDrawCampaign = 1 Then
Open "ROOT/taobin_project/xml/sometime/page_campaign_ads_lucky_draw.xml"
Else
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
Else
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
EndIf
Else
If show_eng = "true" Then
Var Image = ImageDir + "send_code_fail_en.png"
Else
Var Image = ImageDir + "send_code_fail_th.png"
EndIf
Var Timeout = 0
EndIf
EndIf
TimerReset
Refresh
</EventTimeout>
<EventMachine>
If MachineStage = "drink-success" Then
Var MachineState_Result = 1
EndIf
If MachineStage = "drink-failed" Then
Var MachineState_Result = 2
EndIf
</EventMachine>
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
</EventSecurity>
<EventActionOk>
If Ext1a = "ok" Then
If show_eng = "true" Then
Var Image = ImageDir + "send_code_complate_en.png"
Else
Var Image = ImageDir + "send_code_complate_th.png"
EndIf
Var CodeIsSended = 1
Else
Var Seeker.TaobinErrorNetwork = 1
Var Seeker.PointTaobinStr = ParamCP
Var TelephoneNumber = TelephoneNumberX
Var Seeker.TNumberTaobinMember= TelephoneNumber
If show_eng = "true" Then
Var Image = ImageDir + "send_code_fail_en.png"
Else
Var Image = ImageDir + "send_code_fail_th.png"
EndIf
EndIf
Var Timeout = 0
Refresh
</EventActionOk>
<EventActionError>
Var Seeker.TaobinErrorNetwork = 1
Var Seeker.PointTaobinStr = ParamCP
Var TelephoneNumber = TelephoneNumberX
Var Seeker.TNumberTaobinMember= TelephoneNumber
If show_eng = "true" Then
Var Image = ImageDir + "send_code_fail_en.png"
Else
Var Image = ImageDir + "send_code_fail_th.png"
EndIf
Var Timeout = 0
Refresh
</EventActionError>
;include="ROOT/taobin_project/inc/video.inc"
<Image>
<X> 0 </X>
<Y> 380 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/alpha.png" </Filename>
</Image>
<Image>
<X> 158 </X>
<Y> 607 </Y>
<Filename> Image </Filename>
</Image>
</Popup>

View file

@ -0,0 +1,41 @@
[
{
"name": "happy_trios",
"template": "/event/promotion_template.inc",
"config": {
"normal_eng": "ROOT/taobin_project/image/event/happy_trios/happy_trios.png",
"normal_thai": "ROOT/taobin_project/image/event/happy_trios/happy_trios.png",
"press_eng": "ROOT/taobin_project/image/event/happy_trios/happy_trios.png",
"press_thai": "ROOT/taobin_project/image/event/happy_trios/happy_trios.png",
"disable_eng": "ROOT/taobin_project/image/event/happy_trios/happy_trios.png",
"disable_thai": "ROOT/taobin_project/image/event/happy_trios/happy_trios.png",
"event_on_click": "ROOT/taobin_project/xml/event/happy_trios/page_catalog_group_pro_happy_trios.xml"
}
},
{
"name": "weekday_discount",
"template": "/event/promotion_template.inc",
"config": {
"normal_eng": "ROOT/taobin_project/image/event/weekday_discount/weekday_discount_en.png",
"normal_thai": "ROOT/taobin_project/image/event/weekday_discount/weekday_discount_th.png",
"press_eng": "ROOT/taobin_project/image/event/weekday_discount/weekday_discount_en.png",
"press_thai": "ROOT/taobin_project/image/event/weekday_discount/weekday_discount_th.png",
"disable_eng": "ROOT/taobin_project/image/event/weekday_discount/weekday_discount_en.png",
"disable_thai": "ROOT/taobin_project/image/event/weekday_discount/weekday_discount_th.png",
"event_on_click": "ROOT/taobin_project/xml/page_catalog_group_pro_weekday_discount_event_on.xml"
}
},
{
"name": "oreo_11",
"template": "/event/promotion_template.inc",
"config": {
"normal_eng": "ROOT/taobin_project/image/event/oreo_11/oreo_11_th.png",
"normal_thai": "ROOT/taobin_project/image/event/oreo_11/oreo_11_th.png",
"press_eng": "ROOT/taobin_project/image/event/oreo_11/oreo_11_th.png",
"press_thai": "ROOT/taobin_project/image/event/oreo_11/oreo_11_th.png",
"disable_eng": "ROOT/taobin_project/image/event/oreo_11/oreo_11_th.png",
"disable_thai": "ROOT/taobin_project/image/event/oreo_11/oreo_11_th.png",
"event_on_click": "ROOT/taobin_project/xml/page_catalog_group_pro_oreo_11_fixed.xml"
}
}
]

View file

@ -1 +1 @@
/event/promotion_robinson_beauty.xml
/event/promotion_happy_trios.xml

File diff suppressed because it is too large Load diff

File diff suppressed because it is too large Load diff

View file

@ -7,6 +7,7 @@ DEBUGVAR OpenFromPageBoard
DEBUGVAR WeekdayDiscountPro
DEBUGVAR WeekdayDiscountProEventOn
DEBUGVAR OreoDiscount11Pro
DEBUGVAR HappyTriosPro
Var PromotionState1 = "Invisible"
Var PromotionState2 = "Invisible"
@ -28,49 +29,68 @@ Else
; zone promote
If HalloweenPro = 1 Then
If HappyTriosPro = 1 Then
Var PromotionState1 = "Enable"
Var ProEnableCount = 1
If JemilaPro = 1 Then
Var CountEnablePromotion = 1
If WeekdayDiscountProEventOn = 1 Then
Var PromotionState2 = "Enable"
Var ProEnableCount = ProEnableCount + 1
Var CountEnablePromotion = CountEnablePromotion + 1
EndIf
If ProEnableCount > 1 Then
Var FileRecommendToOpen = "ROOT/taobin_project/xml/event/double_promotion_halloween_and_jemila.xml"
Else
Var FileRecommendToOpen = "ROOT/taobin_project/xml/event/promotion_halloween.xml"
EndIf
EndIf
If WeekdayDiscountPro = 1 Then
Var ProEnableCount = 1
Var PromotionState1 = "Enable"
If OreoDiscount11Pro = 1 Then
Var PromotionState2 = "Enable"
Var ProEnableCount = ProEnableCount + 1
Var PromotionState3 = "Enable"
Var CountEnablePromotion = CountEnablePromotion + 1
EndIf
Var FileRecommendToOpen = "ROOT/taobin_project/xml/event/weekday_discount/promotion_weekday_discount.xml"
If ProEnableCount > 1 Then
If CountEnablePromotion > 1 Then
If WeekdayDiscountProEventOn = 1 Then
Var FileRecommendToOpen = "ROOT/taobin_project/xml/event/weekday_discount/multi_promotion_weekday_discount_event_on.xml"
Var FileRecommendToOpen = "ROOT/taobin_project/xml/event/triple_promotion_happy_trios_and_weekday_discount_and_oreo_11_event_on.xml"
Else
Var FileRecommendToOpen = "ROOT/taobin_project/xml/event/weekday_discount/promotion_oreo_discount_11.xml"
Var FileRecommendToOpen = "ROOT/taobin_project/xml/event/triple_promotion_happy_trios_and_weekday_discount_and_oreo_11.xml"
EndIf
Else
Var FileRecommendToOpen = "ROOT/taobin_project/xml/event/promotion_happy_trios.xml"
EndIf
Else
If WeekdayDiscountPro = 1 Then
Var ProEnableCount = 1
Var PromotionState1 = "Enable"
If OreoDiscount11Pro = 1 Then
Var PromotionState2 = "Enable"
Var ProEnableCount = ProEnableCount + 1
EndIf
Else
If WeekdayDiscountProEventOn = 1 Then
Var FileRecommendToOpen = "ROOT/taobin_project/xml/event/weekday_discount/promotion_weekday_discount_event_on.xml"
Var FileRecommendToOpen = "ROOT/taobin_project/xml/event/weekday_discount/promotion_weekday_discount.xml"
If ProEnableCount > 1 Then
If WeekdayDiscountProEventOn = 1 Then
Var FileRecommendToOpen = "ROOT/taobin_project/xml/event/weekday_discount/multi_promotion_weekday_discount_event_on.xml"
Else
Var FileRecommendToOpen = "ROOT/taobin_project/xml/event/weekday_discount/promotion_oreo_discount_11_event_on.xml"
EndIf
Else
Var FileRecommendToOpen = "ROOT/taobin_project/xml/event/weekday_discount/promotion_weekday_discount.xml"
If WeekdayDiscountProEventOn = 1 Then
Var FileRecommendToOpen = "ROOT/taobin_project/xml/event/weekday_discount/promotion_weekday_discount_event_on.xml"
Else
Var FileRecommendToOpen = "ROOT/taobin_project/xml/event/weekday_discount/promotion_weekday_discount.xml"
EndIf
EndIf
Else
If OreoDiscount11Pro = 1 Then
Var FileRecommendToOpen = "ROOT/taobin_project/xml/event/promotion_oreo_discount_11.xml"
EndIf
EndIf
EndIf
If OpenFromPageBoard = 1 Then
DEBUGVAR FreeEnergyDrink
DEBUGVAR BigButtonEnable

View file

@ -149,6 +149,17 @@ Var FromOreoDiscount11Pro = 0
Var Seeker.BuyOreo11ProFlag = 0
Var FromBeforeGoToOreo = 0
; Happy trios, 21 - 30 Nov
Var HappyTriosPro = 0
Var FromHappyTriosPro = 0
; Jemila Topping Free every Wednesday, start 20 Nov
Var JemilaToppingFlag = 0
Var JemilaToppingFreeFlag = 0
; Sugar Zero Cal Free every day, start 20 Nov
Var SugarZeroCalFreeFlag = 0
Var NewCollectPoint = 1
Var PayMentCodeShouldCollectPromotionPoint = 0
Var NotCollectPointPromotion = 0
@ -258,6 +269,20 @@ If SystemDateMonthInt = 11 Then
EndIf
EndIf
If SystemDateDayInt >= 20 Then
Var JemilaToppingFlag = 1
Var SugarZeroCalFreeFlag = 1
If SystemDateDayOfWeek = "Wednesday" Then
Var JemilaToppingFreeFlag = 1
EndIf
EndIf
If SystemDateDayInt >= 21 Then
Var HappyTriosPro = 1
EndIf
If WeekdayDiscountPro = 1 Then
If SystemTimeHourInt >= 16 Then
@ -272,6 +297,15 @@ If SystemDateMonthInt = 11 Then
EndIf
EndIf
If SystemDateMonthInt > 11 Then
Var JemilaToppingFlag = 1
Var SugarZeroCalFreeFlag = 1
If SystemDateDayOfWeek = "Wednesday" Then
Var JemilaToppingFreeFlag = 1
EndIf
EndIf
If BoxID = 105005 Then
Var NewFlowPaymentCode = 1
@ -281,6 +315,11 @@ If BoxID = 105005 Then
Var WeekdayDiscountPro = 1
Var WeekdayDiscountProEventOn = 1
Var OreoDiscount11Pro = 1
Var HappyTriosPro = 1
Var JemilaToppingFlag = 1
Var JemilaToppingFreeFlag = 1
Var SugarZeroCalFreeFlag = 1
EndIf
If BoxID = 172331 Then
@ -481,6 +520,7 @@ If OreoEnable = "true" Then
Else
Var OreoDiscount11Pro = 0
Var HappyTriosPro = 0
EndIf
@ -572,3 +612,5 @@ READ_FILE "/mnt/sdcard/coffeevending/app_manager/app_list/king_power_service/ena
If POSMachineFlag = 1 Then
Var ConnectWithPOSMachine = 1
EndIf
DEBUGVAR SystemDateDayOfWeek

File diff suppressed because it is too large Load diff

View file

@ -287,6 +287,10 @@
from_oreo_11 = True
else:
from_oreo_11 = False
if current_file_name == "page_catalog_group_pro_happy_trios.skt":
from_happy_trios = True
else:
from_happy_trios = False
#print ("######################################################################################################")
idx_of_eng = 2
@ -641,6 +645,9 @@
if from_oreo_11:
out_xml( '\t\tVar FromOreoDiscount11Pro = 1 \r\n')
if from_happy_trios:
out_xml( '\t\tVar FromHappyTriosPro = 1 \r\n')
out_xml( '\t\t\r\n')
out_xml( '\t\t'+ button_add_string +'\r\n')
out_xml( '\t\tOpen "ROOT/taobin_project/xml/page_topping_select5.xml"\r\n')
@ -1291,6 +1298,9 @@
if from_oreo_11:
out_xml( '\t\tVar FromOreoDiscount11Pro = 1 \r\n')
if from_happy_trios:
out_xml( '\t\tVar FromHappyTriosPro = 1 \r\n')
out_xml( '\t\t\r\n')
out_xml( '\t\t\r\n')

View file

@ -3,7 +3,7 @@
<Height> 1920 </Height>
<EventOpen>
Var SetSpiralOnline = 0
; Reset here
Var CheckCupStateDoorCupClose = ""

View file

@ -12,6 +12,8 @@
Var ToggleAfterEventProfileOff = 0
Var SetSpiralOnline = 0
;TopView "hide"
;OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/xml/topview_blank_main.xml"
Var FileNumber = 1

View file

@ -6,7 +6,8 @@
<Volume> SoundVolume </Volume>
<EventOpen>
Var waitAckPay = 0
Var ChangeFlag = 0
If New_Payment = 1 Then
Open "ROOT/taobin_project/xml/page_NewBrewing3Conti.xml"

View file

@ -5,12 +5,17 @@
;<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
If SetSpiralOnline = 1 Then
Open "ROOT/taobin_project/xml/page_back_to_main.xml"
EndIf
If InternationalEnable = 1 Then
Open "/mnt/sdcard/coffeevending/taobin_project/xml/page_catalog.lxml"
EndIf
If SpiralOnline = "true" Then
Open "/mnt/sdcard/coffeevending/taobin_project/xml/page_catalog_with_vending.xml"
If Seeker = "next" Then
Open "/mnt/sdcard/coffeevending/taobin_project/xml/page_catalog3.xml"
Else

View file

@ -0,0 +1,37 @@
<?hurr
#include=menu_head.py
?>
<Popup>
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
;<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
; On open
;include="ROOT/taobin_project/xml/menu_catalog_default_init.xml"
Var Timeout = 0
Var FromHappyTriosPro = 0
;include="ROOT/taobin_project/xml/menu_catalog_new_menu.xml"
</EventOpen>
;include="ROOT/taobin_project/xml/menu_catalog_new.xml"
<?hurr
#include=menu_new_layout_gen_v2.py
?>
<?hurr
#include=menu_new_layout_gen.py
?>
</Popup>

File diff suppressed because it is too large Load diff

View file

@ -15,7 +15,7 @@
EndIf
If Seeker = "next" Then
Open "ROOT/taobin_project/xml/page_catalog.xml"
;Open "ROOT/taobin_project/xml/page_catalog.xml"
EndIf
Var NextPage = "-"

View file

@ -26,7 +26,7 @@
DEBUGVAR TelephoneNumber
DEBUGVAR TelephoneNumberX
If show_eng = "true" Then
If show_eng = "true" Then
Var DirImage = "ROOT/taobin_project/image/display_point_en"
Var page_doing_show_time_image = "ROOT/taobin_project/image/page_doing/img2.png"
@ -38,7 +38,7 @@
Var IMG_CNT = "ROOT/taobin_project/image/page_doing/img2.png"
EndIf
Var CoffeePointTmp = CoffeePoint
If CoffeePoint > 29 Then
@ -46,8 +46,8 @@
Var CoffeePointTmp = 30
EndIf
Var pImage = CoffeePointTmp * 20
Var pImage = pImage / 30
@ -66,14 +66,14 @@
Var TaobinExpireMonthX = ""
Var TaobinExpireYear = ""
SPLIT TaobinExpire "/" 1 TaobinExpireDay
SPLIT TaobinExpire "/" 2 TaobinExpireMonth
SPLIT TaobinExpire "/" 3 TaobinExpireYear
If show_eng = "true" Then
If show_eng = "true" Then
If TaobinExpireMonth = "01" Then
Var TaobinExpireMonth = "Jan"
@ -140,7 +140,7 @@
Var TaobinExpireYear = TaobinExpireYear + 0
Else
Else
If TaobinExpireMonth = "01" Then
Var TaobinExpireMonth = "ม.ค."
@ -217,17 +217,17 @@
Var ExpireStrTmp = ExpireStrTmp + " "
Var ExpireStrTmp = ExpireStrTmp + TaobinExpireYear
If TaobinLevel = "1" Then
Var PointMaskState = "Enable"
EndIf
If show_eng = "true" Then
If show_eng = "true" Then
Var TaobinLevelDesc3 = TaobinCoupons
Var TaobinLevelDesc3 = TaobinLevelDesc3 + " coupons are available for you"
@ -261,7 +261,7 @@
If TaobinLevel = "3" Then
Var TaobinLevelDesc1 = "Flying turtle level until " + ExpireStrTmp
Var PointDiff = 200 - CoffeePointRank
Var TaobinLevelDesc2 = "Earn " + PointDiff
Var TaobinLevelDesc2 = TaobinLevelDesc2 + " shells "
@ -282,7 +282,7 @@
If TaobinLevel = "4" Then
Var TaobinLevelDesc1 = "Master turtle level until " + ExpireStrTmp
Var TaobinLevelDesc2 = ""
Var TaobinLeveImg = "/taoLevel4.png"
@ -346,7 +346,7 @@
If TaobinLevel = "4" Then
Var TaobinLevelDesc1 = "ระดับสมาชิก ผู้เฒ่าเต่า จนถึง " + ExpireStrTmp
Var TaobinLevelDesc2 = ""
Var TaobinLeveImg = "/taoLevel4.png"
@ -357,7 +357,7 @@
Var CheckCoupons = 0
Var MakeDrinkState = 0
@ -609,7 +609,7 @@
Var PreviousSeeker.UseGet15Discount = 0
Var PreviousSeeker.UseGetDrink5Bath = 0
Else
If PreviousSeeker.TNumberTaobinCredit = Seeker.TNumberTaobinCredit Then
If PreviousSeeker.UseGet15Discount = 1 Then
Var Get15DiscountState = "Disable2"
@ -655,74 +655,48 @@
Var xPointEndDate = 490
Var yPointEndDate = 1570
If show_eng = "true" Then
If show_eng = "true" Then
Var xPointEndDate = 575
Var yPointEndDate = 1563
EndIf
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
<EventTimeout>
Var CountDownBrewing = BREW_CNT
Var ShowCountDownBrewing = CountDownBrewing
Var Timeout = Timeout + 1
If Timeout > 5 Then
; goto lid straw
If CoffeePoint >= 28 Then
If GetDrink5Bath = 1 Then
Open "ROOT/taobin_project/xml/page_display_get_drink_5_baht.xml"
Else
If Seeker.IsLineMember = 0 Then
If LuckyDrawCampaign = 1 Then
Open "ROOT/taobin_project/xml/sometime/page_campaign_ads_lucky_draw.xml"
Else
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
Else
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
EndIf
Else
If Seeker.IsLineMember = 0 Then
If LuckyDrawCampaign = 1 Then
Open "ROOT/taobin_project/xml/sometime/page_campaign_ads_lucky_draw.xml"
Else
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
Else
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
EndIf
; process next page
Function 2
EndIf
TimerReset
Refresh
</EventTimeout>
</EventTimeout>
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
</EventSecurity>
<EventActionOk>
If CheckCoupons = 1 Then
Var MakeDrinkState = 1
Var CouponPage = 1
Var CouponPage = 1
Var CouponInfo1 = Ext1a
Var CouponInfo2 = Ext1b
Var CouponInfo3 = Ext1c
@ -733,23 +707,23 @@
Var CouponInfo8 = Ext1h
Var CouponInfo9 = Ext1i
Var CouponInfo10 = Ext1j
Var TelephoneNumber = TelephoneNumberX
GETACCEXT TelephoneNumber 13
Var CheckCoupons = 2
Var CheckCoupons = 2
Else
If CheckCoupons = 2 Then
If CheckCoupons = 2 Then
Var TaobinCredit = Ext1b
Open "ROOT/taobin_project/xml/page_check_member2.xml"
Open "ROOT/taobin_project/xml/page_check_member2.xml"
EndIf
EndIf
</EventActionOk>
@ -763,6 +737,46 @@
EndIf
</EventMachine>
<Function2>
If FromHappyTriosPro = 1 Then
If Seeker.VendingCode = "PX6" Then
Else
Open "ROOT/taobin_project/xml/event/happy_trios/page_sending_discount_code.xml"
EndIf
EndIf
If CoffeePoint >= 28 Then
If GetDrink5Bath = 1 Then
Open "ROOT/taobin_project/xml/page_display_get_drink_5_baht.xml"
Else
If Seeker.IsLineMember = 0 Then
If LuckyDrawCampaign = 1 Then
Open "ROOT/taobin_project/xml/sometime/page_campaign_ads_lucky_draw.xml"
Else
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
Else
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
EndIf
Else
If Seeker.IsLineMember = 0 Then
If LuckyDrawCampaign = 1 Then
Open "ROOT/taobin_project/xml/sometime/page_campaign_ads_lucky_draw.xml"
Else
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
Else
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
EndIf
</Function2>
;include="ROOT/taobin_project/inc/video.inc"
@ -835,34 +849,12 @@
<FilenamePress> Var( DirImage + KeepBpBtnImage ) </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
; goto lid straw
;Open "ROOT/taobin_project/xml/page_back_to_main.xml"
If CoffeePoint >= 28 Then
If GetDrink5Bath = 1 Then
Open "ROOT/taobin_project/xml/page_display_get_drink_5_baht.xml"
Else
If Seeker.IsLineMember = 0 Then
If LuckyDrawCampaign = 1 Then
Open "ROOT/taobin_project/xml/sometime/page_campaign_ads_lucky_draw.xml"
Else
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
Else
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
EndIf
Else
If Seeker.IsLineMember = 0 Then
If LuckyDrawCampaign = 1 Then
Open "ROOT/taobin_project/xml/sometime/page_campaign_ads_lucky_draw.xml"
Else
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
Else
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
EndIf
; process next page
Function 2
</EventClick>
</Button>
@ -878,7 +870,7 @@
<FilenameDisable2> Var( DirImage + "/disable2_get15discount.png" )</FilenameDisable2>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
Open "ROOT/taobin_project/xml/page_display_get_15_discount.xml"
@ -1223,7 +1215,7 @@
</EventUnitTest1>
<EventUnitTest2>
If show_eng = "true" Then
If show_eng = "true" Then
Var show_eng = "false"
Else
Var show_eng = "true"
@ -1242,4 +1234,3 @@
</Popup>

View file

@ -28,7 +28,7 @@
Var DirImageLuckeyDraw = "ROOT/taobin_project/image/event/lucky_draw_collect_point/"
If show_eng = "true" Then
If show_eng = "true" Then
Var DirImage = "ROOT/taobin_project/image/display_point_en"
Var page_doing_show_time_image = "ROOT/taobin_project/image/page_doing/img2.png"
@ -40,7 +40,7 @@
Var IMG_CNT = "ROOT/taobin_project/image/page_doing/img2.png"
EndIf
Var CoffeePointTmp = CoffeePoint
If CoffeePoint > 29 Then
@ -48,8 +48,8 @@
Var CoffeePointTmp = 30
EndIf
Var pImage = CoffeePointTmp * 20
Var pImage = pImage / 30
@ -68,14 +68,14 @@
Var TaobinExpireMonthX = ""
Var TaobinExpireYear = ""
SPLIT TaobinExpire "/" 1 TaobinExpireDay
SPLIT TaobinExpire "/" 2 TaobinExpireMonth
SPLIT TaobinExpire "/" 3 TaobinExpireYear
If show_eng = "true" Then
If show_eng = "true" Then
If TaobinExpireMonth = "01" Then
Var TaobinExpireMonth = "Jan"
@ -142,7 +142,7 @@
Var TaobinExpireYear = TaobinExpireYear + 0
Else
Else
If TaobinExpireMonth = "01" Then
Var TaobinExpireMonth = "ม.ค."
@ -219,14 +219,14 @@
Var ExpireStrTmp = ExpireStrTmp + " "
Var ExpireStrTmp = ExpireStrTmp + TaobinExpireYear
Var CurrentLevel = ""
If TaobinLevel = "1" Then
Var PointMaskState = "Enable"
EndIf
If show_eng = "true" Then
If show_eng = "true" Then
Var TaobinLevelDesc3 = TaobinCoupons
Var TaobinLevelDesc3 = TaobinLevelDesc3 + " coupons are available for you"
@ -260,7 +260,7 @@
If TaobinLevel = "3" Then
Var TaobinLevelDesc1 = "Flying turtle level until " + ExpireStrTmp
Var PointDiff = 200 - CoffeePointRank
Var TaobinLevelDesc2 = "Earn " + PointDiff
Var TaobinLevelDesc2 = TaobinLevelDesc2 + " shells "
@ -360,7 +360,7 @@
Var MakeDrinkState = 0
@ -611,7 +611,7 @@
Var PreviousSeeker.UseGet15Discount = 0
Var PreviousSeeker.UseGetDrink5Bath = 0
Else
If PreviousSeeker.TNumberTaobinCredit = Seeker.TNumberTaobinCredit Then
If PreviousSeeker.UseGet15Discount = 1 Then
Var Get15DiscountState = "Disable2"
@ -657,11 +657,11 @@
Var xPointEndDate = 490
Var yPointEndDate = 1570
If show_eng = "true" Then
If show_eng = "true" Then
Var xPointEndDate = 575
Var yPointEndDate = 1563
EndIf
Var LuckyDrawTicketFormat = "%03.0f"
Var ShowLuckyDrawTicketState = "Enable"
Var ShowLuckyDrawAds = "Invisible"
@ -704,7 +704,7 @@
Var LuckyDrawGoalImg = "/goal_regular.png"
Var targetDate = "31-12-2024"
EndIf
If SystemDateYearInt = 2025 Then
If SystemDateMonthInt = 1 Then
Var LuckyDrawGoalImg = "/goal_Tesla.png"
@ -748,70 +748,47 @@
EndIf
Else
Var ShowLuckyDrawTicketState = "Invisible"
Var ShowLuckyDrawAds = "Enable"
EndIf
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
<EventTimeout>
Var CountDownBrewing = BREW_CNT
Var ShowCountDownBrewing = CountDownBrewing
Var Timeout = Timeout + 1
If Timeout > 5 Then
; goto lid straw
If CoffeePoint >= 28 Then
If GetDrink5Bath = 1 Then
Open "ROOT/taobin_project/xml/page_display_get_drink_5_baht.xml"
Else
If Seeker.IsLineMember = 0 Then
If LuckyDrawCampaign = 1 Then
Open "ROOT/taobin_project/xml/sometime/page_campaign_ads_lucky_draw.xml"
Else
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
Else
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
EndIf
Else
If Seeker.IsLineMember = 0 Then
If LuckyDrawCampaign = 1 Then
Open "ROOT/taobin_project/xml/sometime/page_campaign_ads_lucky_draw.xml"
Else
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
Else
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
EndIf
; process next page
Function 2
EndIf
TimerReset
Refresh
</EventTimeout>
</EventTimeout>
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
</EventSecurity>
@ -825,6 +802,44 @@
EndIf
</EventMachine>
<Function2>
If FromHappyTriosPro = 1 Then
If Seeker.VendingCode = "PX6" Then
Else
Open "ROOT/taobin_project/xml/event/happy_trios/page_sending_discount_code.xml"
EndIf
EndIf
If CoffeePoint >= 28 Then
If GetDrink5Bath = 1 Then
Open "ROOT/taobin_project/xml/page_display_get_drink_5_baht.xml"
Else
If Seeker.IsLineMember = 0 Then
If LuckyDrawCampaign = 1 Then
Open "ROOT/taobin_project/xml/sometime/page_campaign_ads_lucky_draw.xml"
Else
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
Else
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
EndIf
Else
If Seeker.IsLineMember = 0 Then
If LuckyDrawCampaign = 1 Then
Open "ROOT/taobin_project/xml/sometime/page_campaign_ads_lucky_draw.xml"
Else
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
Else
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
EndIf
</Function2>
;include="ROOT/taobin_project/inc/video.inc"
@ -1020,34 +1035,12 @@
<FilenamePress> Var( DirImage + KeepBpBtnImage ) </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
; goto lid straw
;Open "ROOT/taobin_project/xml/page_back_to_main.xml"
If CoffeePoint >= 28 Then
If GetDrink5Bath = 1 Then
Open "ROOT/taobin_project/xml/page_display_get_drink_5_baht.xml"
Else
If Seeker.IsLineMember = 0 Then
If LuckyDrawCampaign = 1 Then
Open "ROOT/taobin_project/xml/sometime/page_campaign_ads_lucky_draw.xml"
Else
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
Else
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
EndIf
Else
If Seeker.IsLineMember = 0 Then
If LuckyDrawCampaign = 1 Then
Open "ROOT/taobin_project/xml/sometime/page_campaign_ads_lucky_draw.xml"
Else
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
Else
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
EndIf
; process next page
Function 2
</EventClick>
</Button>
@ -1063,7 +1056,7 @@
<FilenameDisable2> Var( DirImage + "/disable2_get15discount.png" )</FilenameDisable2>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
Open "ROOT/taobin_project/xml/page_display_get_15_discount.xml"
@ -1373,7 +1366,7 @@
</EventUnitTest1>
<EventUnitTest2>
If show_eng = "true" Then
If show_eng = "true" Then
Var show_eng = "false"
Else
Var show_eng = "true"
@ -1392,4 +1385,3 @@
</Popup>

View file

@ -31,6 +31,14 @@
; EndIf
;EndIf
If SpiralOnline = "true"
If show_eng = "true" Then
Var DirImageSpiral = "ROOT/taobin_project/image/page2_en/page2"
Else
Var DirImageSpiral = "ROOT/taobin_project/image/page2"
EndIf
EndIf
If MachineStage = "mcu-upgrade" Then
If show_eng = "true" Then
Var DirImage = "ROOT/taobin_project/image/vending_error_en/"
@ -149,6 +157,10 @@
DEBUGVAR MachineStage
DEBUGVAR NETCORE_EVENT_CNT_TMP
If SpiralOnline = "true" Then
Open "ROOT/taobin_project/xml/page_show_error_spiral.xml"
EndIf
Var EmergencyStop = "-"
If DoorCupPosition = "bottom" Then

View file

@ -0,0 +1,438 @@
<Page>
<X> 0 </X>
<Y> 608 </Y>
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1312 </Height>
<Background> "0xEAE6E1" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
Var countClick = 0
Var countClick2 = 0
Var SetSpiralOnline = 0
DEBUGVAR MachineStage
DEBUGVAR stop_now
OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/xml/page_list.xml"
Var DirImage = "ROOT/taobin_project/image/vending_error"
Var show_error_normal = "Invisible"
Var show_error_sp1 = "Enable"
;If EmergencyStop = "true" Then
; Var stop_now = "true"
; If show_eng = "true" Then
; Var DirImage = "ROOT/taobin_project/image/vending_error_en/"
; Else
; Var DirImage = "ROOT/taobin_project/image/vending_error"
; EndIf
;EndIf
If SpiralOnline = "true"
If show_eng = "true" Then
Var DirImageSpiral = "ROOT/taobin_project/image/page2_en/page2"
Else
Var DirImageSpiral = "ROOT/taobin_project/image/page2"
EndIf
EndIf
If MachineStage = "mcu-upgrade" Then
If show_eng = "true" Then
Var DirImage = "ROOT/taobin_project/image/vending_error_en/"
Else
Var DirImage = "ROOT/taobin_project/image/vending_error"
EndIf
EndIf
If NeedUpgrade = "true" Then
If show_eng = "true" Then
Var DirImage = "ROOT/taobin_project/image/vending_error_en/"
Else
Var DirImage = "ROOT/taobin_project/image/vending_error"
EndIf
EndIf
DEBUGVAR stop_now
DEBUGVAR MachineStage
If MachineStage = "close-maintenance" Then
If stop_now = "true" Then
If show_eng = "true" Then
Var DirImage = "ROOT/taobin_project/image/vending_error_en/"
Else
Var DirImage = "ROOT/taobin_project/image/vending_error"
EndIf
Else
Var show_error_normal = "Enable"
Var show_error_sp1 = "Invisible"
If show_eng = "true" Then
Var DirImage = "ROOT/taobin_project/image/close_en/"
Else
Var DirImage = "ROOT/taobin_project/image/close_th"
EndIf
EndIf
EndIf
DEBUGVAR DirImage
If MachineStage = "drink-failed" Then
If stop_now = "true" Then
If show_eng = "true" Then
Var DirImage = "ROOT/taobin_project/image/vending_error_en/"
Else
Var DirImage = "ROOT/taobin_project/image/vending_error"
EndIf
Else
Var show_error_normal = "Enable"
Var show_error_sp1 = "Invisible"
If show_eng = "true" Then
Var DirImage = "ROOT/taobin_project/image/close_en/"
Else
Var DirImage = "ROOT/taobin_project/image/close_th"
EndIf
EndIf
EndIf
If NETCORE_LOST_CNT > 0 Then
If show_eng = "true" Then
Var DirImage = "ROOT/taobin_project/image/vending_error_en/"
Else
Var DirImage = "ROOT/taobin_project/image/vending_error"
EndIf
EndIf
If NETCORE_EVENT_CNT_X >= 30 Then
Var NETCORE_EVENT_CNT_X = 0
If show_eng = "true" Then
Var DirImage = "ROOT/taobin_project/image/vending_error_en/"
Else
Var DirImage = "ROOT/taobin_project/image/vending_error"
EndIf
EndIf
StopLongPlay
If LEDSet = "true" Then
Else
LED LedDoorCup On 255 0 0 255
LED LedDoorLid Off 255 255 255 255
EndIf
Var MaintenanceCard = 20
Random MaintenanceCard
Var index = 1 + MaintenanceCard
If show_eng = "true" Then
Var RandomImage = "ROOT/taobin_project/image/close_en/Frame" + index
Var RandomImage = RandomImage + ".png"
Else
Var RandomImage = "ROOT/taobin_project/image/close_en/Frame" + index
Var RandomImage = RandomImage + ".png"
EndIf
DEBUGVAR Seeker
DEBUGVAR DoorCupPosition
DEBUGVAR DoorLidPosition
DEBUGVAR EmergencyStop
Var TimeOut = 0
Var textStep = 0
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
DEBUGVAR NETCORE_LOST_CNT
DEBUGVAR MachineStage
DEBUGVAR NETCORE_EVENT_CNT_TMP
Var EmergencyStop = "-"
If DoorCupPosition = "bottom" Then
If stop_now_from_door_cup = 1 Then
Var stop_now = "false"
Var EmergencyStop = "false"
SAVELOG "stop_now_from_door_cup is set"
Var stop_now_from_door_cup = 0
Var MachineErrorDetailAll = " --- "
EndIf
Else
Var EmergencyStop = "true"
EndIf
If EmergencyStop = "true" Then
If DoorCupPosition = "bottom" Then
; It normal
Var EmergencyStop = "false"
Else
Var MachineErrorDetailAll = "Emergency stop!"
EndIf
Else
Var MachineErrorDetailAll = MachineErrorDetail + " / "
Var MachineErrorDetailAll = MachineErrorDetailAll + MachineErrorDetailEng
If textStep > 3 Then
Var textStep = 0
Var MachineErrorDetailAll = MachineErrorDetailAll + " [ \ ]"
EndIf
If textStep = 3 Then
Var MachineErrorDetailAll = MachineErrorDetailAll + " [ - ]"
EndIf
If textStep = 2 Then
Var MachineErrorDetailAll = MachineErrorDetailAll + " [ / ]"
EndIf
If textStep = 1 Then
Var MachineErrorDetailAll = MachineErrorDetailAll + " [ | ]"
EndIf
Var textStep = textStep + 1
;DEBUGVAR MachineErrorDetailAll
;DEBUGVAR textStep
If NETCORE_LOST_CNT > 0 Then
Else
DEBUGVAR NCIC07_EVENT_CNT
DEBUGVAR NETCORE_EVENT_CNT_TMP
If NCIC07_EVENT_CNT = NETCORE_EVENT_CNT_TMP Then
Var NETCORE_LOST_COUNT_UP = NETCORE_LOST_COUNT_UP + 1
DEBUGVAR NETCORE_LOST_COUNT_UP
If NETCORE_LOST_COUNT_UP > 300 Then
SAVELOG " NETCORE_LOST_COUNT_UP out !"
Reboot
EndIf
Var NETCORE_LOST_COUNT_UP_STR = " Net " + NETCORE_LOST_COUNT_UP
If textStep = 4 Then
Var MachineErrorDetailAll = NETCORE_LOST_COUNT_UP_STR + " ###"
EndIf
If textStep = 3 Then
Var MachineErrorDetailAll = NETCORE_LOST_COUNT_UP_STR + " ###"
EndIf
If textStep = 2 Then
Var MachineErrorDetailAll = NETCORE_LOST_COUNT_UP_STR + " ##"
EndIf
If textStep = 1 Then
Var MachineErrorDetailAll = NETCORE_LOST_COUNT_UP_STR + " #"
EndIf
Else
; zone all ok
If stop_now_from_netcore_event = 1 Then
Var stop_now = "false"
SAVELOG "stop_now_from_netcore_event is set"
Var stop_now_from_netcore_event = 0
EndIf
If MachineStage = "" Then
Var LEDSet = "false"
Open "ROOT/taobin_project/xml/page_board.xml"
EndIf
If MachineStage = "show-menu" Then
Var LEDSet = "false"
Open "ROOT/taobin_project/xml/page_board.xml"
EndIf
If MachineStage = "remove-cup" Then
Var LEDSet = "false"
Open "ROOT/taobin_project/xml/page_remove_cup.xml"
EndIf
If MachineStage = "drink-failed" Then
Var FirstOpen = 1
Var LEDSet = "true"
;Open "ROOT/taobin_project/xml/page_show_error.xml"
Refresh
EndIf
If FirstOpen = 1 Then
Var FirstOpen = 0
If MachineStage = "close-maintenance" Then
Var LEDSet = "true"
;Open "ROOT/taobin_project/xml/page_show_error.xml"
Refresh
EndIf
EndIf
EndIf
EndIf
EndIf
Var TimeOut = TimeOut + 1
If TimeOut > 60 Then
Var TimeOut = 0
Open "ROOT/taobin_project/xml/page_show_error.xml"
EndIf
Refresh
TimerReset
Var LEDSet = "true"
;Open "ROOT/taobin_project/xml/page_show_error.xml"
</EventTimeout>
<Image>
<State> show_error_normal </State>
<X> 127 </X>
<Y> 688 </Y>
<Filename> Var(DirImage + "/img1.png") </Filename>
</Image>
<Image>
<State> show_error_normal </State>
<X> 0 </X>
<Y> 924 </Y>
<Filename> RandomImage </Filename>
</Image>
;<Image>
;<State> show_error_sp1 </State>
;<X> 0 </X>
;<Y> 897 </Y>
;<Filename> Var(DirImage + "/img1.png") </Filename>
;</Image>
<Image>
<State> show_error_sp1 </State>
<X> 160 </X>
<Y> 724 </Y>
<Filename> Var(DirImage + "/textspiral.png") </Filename>
</Image>
<Image>
<State> show_error_sp1 </State>
<X> 0 </X>
<Y> 1685 </Y>
<Filename> Var(DirImage + "/text2.png") </Filename>
</Image>
<Button>
<X> 990 </X>
<Y> 640 </Y>
<Filename> show_btn </Filename>
<FilenamePress> show_btp </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
; eng
If show_eng = "true" Then
Var show_eng = "false"
Else
Var show_eng = "true"
EndIf
Var ClickCountMainTe = 0
Open "ROOT/taobin_project/xml/page_show_error.xml"
</EventClick>
</Button>
<Button>
<X> 0 </X>
<Y> 1860 </Y>
<Width> 200 </Width>
<Height> 50 </Height>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var countClick = countClick + 1
If countClick = 3 Then
EndIf
If countClick = 10 Then
Var countClick = 0
MainMenu
EndIf
Refresh
</EventClick>
</Button>
<Button>
<X> 250 </X>
<Y> 944 </Y>
<Width> 100 </Width>
<Height> 100 </Height>
<State>SpiralOnlineStage</State>
<Filename> Var(DirImageSpiral + "/bn_vending_machine2.png") </Filename>
<FilenamePress> Var(DirImageSpiral + "/bp_vending_machine2.png") </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
If SpiralOnline = "true" Then
Var SetSpiralOnline = 1
OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/spiral/xml/page_catalog_vending_machine.xml"
EndIf
TopView "show"
Open "/mnt/sdcard/coffeevending/taobin_project/xml/page_main_blank.xml"
</EventClick>
</Button>
<Button>
<X> 870 </X>
<Y> 1860 </Y>
<Width> 200 </Width>
<Height> 50 </Height>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
</EventClick>
</Button>
<Text>
<X> 5 </X>
<Y> 1868 </Y>
<Size> 24 </Size>
<Align> Center </Align>
<Width> 1080 </Width>
<Font> RobotoRegular </Font>
<Color> 0xDE794E </Color>
<Value> MachineErrorDetailAll </Value>
</Text>
<EventUnitTest6>
PushFile "/sdcard/" "RootManPicture" "scn_240703193755.png"
</EventUnitTest6>
</Page>

View file

@ -911,7 +911,7 @@
CRLFToSpace showname
CRLFToSpace showdesc
If SugarSoundFlag = 1 Then
If SelectDrinkType = 1 Then
@ -948,7 +948,7 @@
Function 2
</EventClick>
</Button>
@ -1035,6 +1035,9 @@
DEBUGVAR toppingID2index4
DEBUGVAR toppingID2index5
DEBUGVAR toppingID3index1
DEBUGVAR toppingID3index2
DEBUGVAR toppingID6index1
DEBUGVAR toppingID6index2
DEBUGVAR toppingID6index3
@ -1396,6 +1399,8 @@
If showOreoAddEnable = "Press" Then
Var showOreoAddEnable = "Disable"
EndIf
Var CollagenState = "Disable"
EndIf
; i f cold menu disable away
@ -2005,7 +2010,18 @@
Var SugarZeroCalPrice = 10
Var priceFormat = "(+฿%.0f)"
Var SugarZeroCalPriceStr !assigned StringFmt( SugarZeroCalPrice , priceFormat, PreScaleConvertShow)
Var SugarZeroCalState = "Invisible"
Var SugarZeroCalFreeState = "Invisible"
If SugarZeroCalFreeFlag = 1 Then
Var SugarZeroCalFreeState = "Enable"
Var SugarZeroCalPrice = 0
Else
Var SugarZeroCalState = "Enable"
Var SugarZeroCalPriceStr !assigned StringFmt( SugarZeroCalPrice , priceFormat, PreScaleConvertShow)
EndIf
Var SugarNormalCheck = "PressForever"
Else
@ -2339,13 +2355,30 @@
EndIf
;-END
If TOPPING3 = "Collagen" Then
DEBUGVAR TOPPING3
If TOPPING3 = "Collagen(mix)" Then
Var CollagenState = "Enable"
Var ExtraTopping = "Enable"
Else
Var CollagenState = "Invisible"
Var ShowCollagenOnly = "Invisible"
EndIf
If JemilaToppingFlag = 1 Then
If CollagenState = "Enable" Then
If JemilaToppingFreeFlag = 1 Then
Var CollagenToppingBg = "/bg_top_jemila_free.png"
Var CollagenToppingPrice = 0
Else
Var CollagenToppingBg = "/bg_top_jemila.png"
Var CollagenToppingPrice = 5
EndIf
EndIf
Else
Var CollagenState = "Invisible"
EndIf
EndIf
;topping_price_refresh = 0
@ -3811,12 +3844,18 @@
<X> SugarZeroCalPrice_X </X>
<Y> 67 </Y>
<Font> KanitRegularTTF </Font>
<State> "Enable" </State>
<State> SugarZeroCalState </State>
<Size> 28 </Size>
<Color> 0x84776F </Color>
<Value> SugarZeroCalPriceStr </Value>
</Text>
<Image>
<X> SugarZeroCalPrice_X </X>
<Y> 75 </Y>
<State> SugarZeroCalFreeState </State>
<Filename> Var( DirImage + "/free.png" ) </Filename>
</Image>
; sugar1
<Button>
@ -4425,12 +4464,19 @@
<X> SugarZeroCalPrice_X </X>
<Y> 67 </Y>
<Font> KanitRegularTTF </Font>
<State> "Enable" </State>
<State> SugarZeroCalState </State>
<Size> 28 </Size>
<Color> 0x84776F </Color>
<Value> SugarZeroCalPriceStr </Value>
</Text>
<Image>
<X> SugarZeroCalPrice_X </X>
<Y> 75 </Y>
<State> SugarZeroCalFreeState </State>
<Filename> Var( DirImage + "/free.png" ) </Filename>
</Image>
; sugar1
<Button>
@ -4741,12 +4787,19 @@
<X> SugarZeroCalPrice_X </X>
<Y> 67 </Y>
<Font> KanitRegularTTF </Font>
<State> "Enable" </State>
<State> SugarZeroCalState </State>
<Size> 28 </Size>
<Color> 0x84776F </Color>
<Value> SugarZeroCalPriceStr </Value>
</Text>
<Image>
<X> SugarZeroCalPrice_X </X>
<Y> 75 </Y>
<State> SugarZeroCalFreeState </State>
<Filename> Var( DirImage + "/free.png" ) </Filename>
</Image>
; sugar1
<Button>
@ -5535,6 +5588,82 @@
</Row1>
<Row1>
<Width> 986 </Width>
<Height> "auto" </Height>
<State> CollagenState </State>
;
<Image>
<X> 0 </X>
<Y> 0 </Y>
<Filename> Var( DirImage + CollagenToppingBg ) </Filename>
</Image>
;
<Button>
<X> 40 </X>
<Y> 5 </Y>
<State> CollagenState </State>
<Mode> "No" </Mode>
<Filename> "ROOT/taobin_project/image/topping2/bn_add_jemila.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/topping2/bp_add_jemila.png" </FilenamePress>
<FilenameDisable> "ROOT/taobin_project/image/topping2/bd_add_jemila.png" ) </FilenameDisable>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
SAVELOG "Press add jemila"
If CollagenState = "Press" Then
Var CollagenState = "Enable"
Else
Var CollagenState = "Press"
EndIf
Function 2
Refresh
</EventClick>
<Animation>
<Style> "shake-text" </Style>
<OnEvent> "OnValueChange" </OnEvent>
</Animation>
</Button>
;
<Button>
<X> 896 </X>
<Y> 14 </Y>
<State> CollagenState </State>
<Mode> "No" </Mode>
<Filename> Var( DirImage + "/cb_notcheck.png" ) </Filename>
<FilenamePress> Var( DirImage + "/cb_checked.png" ) </FilenamePress>
<FilenameDisable> Var( DirImage + "/cb_checkdis.png" ) </FilenameDisable>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
SAVELOG "Press add jemila"
If CollagenState = "Press" Then
Var CollagenState = "Enable"
Else
Var CollagenState = "Press"
EndIf
Function 2
Refresh
</EventClick>
<Animation>
<Style> "shake-text" </Style>
<OnEvent> "OnValueChange" </OnEvent>
</Animation>
</Button>
</Row1>
;
;
@ -7607,6 +7736,15 @@
EndIf
If CollagenState = "Press" Then
Var TOPPING_PRICE = TOPPING_PRICE + CollagenToppingPrice
Var topping3 = toppingID3index2
Var DisableUsingCode = "true"
Else
Var topping3 = toppingID3index1
Var DisableUsingCode = "false"
EndIf
If SugarZeroCalEnable = "true" Then
If SugarZeroCalOption = "Enable" Then