diff --git a/xml/menu_board.xml b/xml/menu_board.xml
index 7c7e6ef8..1673db85 100644
--- a/xml/menu_board.xml
+++ b/xml/menu_board.xml
@@ -27,7 +27,7 @@
Var countClick = 0
- Var RoadShow = "true"
+ Var RoadShow = "false"
1000
diff --git a/xml/menu_page3.xml b/xml/menu_page3.xml
deleted file mode 100644
index 26b36167..00000000
--- a/xml/menu_page3.xml
+++ /dev/null
@@ -1,199 +0,0 @@
-
-
- 1080
- 1312
- "ROOT/image/BG_Menu_Page3.bmp"
- "ROOT/sounds/selectConfirm.wav"
- SoundVolume
-
-
- ; On open
-
- Var Timeout = 0
- Var QRCODE99 = ""
- Var QRCODETMP = ""
-
- Var QRChannel = 0
- Var CodeChannel = 0
- Var GetPayInfoFlag = 0
-
-
-
-
-
- 1000
-
- ;Open "ROOT/xml/menu_board.xml"
-
-
-
- If GetPayInfoFlag = 0 Then
- Var Timeout = Timeout + 1
- If Timeout > 30 Then
- Open "ROOT/xml/menu_board.xml"
- EndIf
- Else
- Var Timeout = Timeout + 1
- If Timeout > 30 Then
- Open "ROOT/xml/menu_page4.xml"
- EndIf
- EndIf
-
-
- TimerReset
- Refresh
-
-
- Var CreditAmount = 0
- Var QRCODE99 = SessionID
- Var QRCODE99 = QRCODE99 + Ext1a
- Var QRCODE99 = QRCODE99 + Ext21
- Var QRCODETMP = QRCODE99
- Open "ROOT/xml/menu_page4.xml"
-
-
- Var QRCODE99 = ""
- Var CreditAmount = 0
- Open "ROOT/xml/menu_page4.xml"
-
-
-
-
-
-
-
-
-
-
-
-
- 450
- 218
-
- PictureDrink
-
-
-
-
- 505
- 492
-310
- Center
- 30
- fontType1
- 0x000000
- NameDrink
-
-
-
- 505
- 580
-310
- Center
- 30
- fontType1
- 0x000000
- SweetChoosed
-
-
-
- 505
- 670
-310
- Center
- 25
- fontType1
- 0x000000
- PriceDrink
-
-
-
-
-
-
-
- 505
- 1000
-310
- Center
- 25
- fontType1
- 0x000000
- NHaveDrink
-
-
-
-
-
- Open "/media/bt/xml/security_alarm.xml"
-
-
-
-
diff --git a/xml/menu_page3_alter.xml b/xml/menu_page3_alter.xml
deleted file mode 100644
index cdcefe31..00000000
--- a/xml/menu_page3_alter.xml
+++ /dev/null
@@ -1,167 +0,0 @@
-
-
- 1080
- 1312
- "ROOT/image/BG_Menu_Page3.bmp"
- "ROOT/sounds/selectConfirm.wav"
- SoundVolume
-
-
- ; On open
-
- Var Timeout = 0
- Var QRCODE99 = ""
- Var QRCODETMP = ""
-
- Var QRChannel = 0
- Var CodeChannel = 0
- Var GetPayInfoFlag = 0
-
-
- Topping "Select1-ID" topping1
- Topping "Select2-ID" topping2
- Topping "Select3-ID" topping3
-
- Topping "Pack" "Send"
-
- If GetPayInfoFlag = 0 Then
-
- Var BG_Menu_Page4 = "ROOT/image/BG_Cash_Page4.bmp"
- Var PayState1 = "PressForever"
- Var PayState2 = "Enable"
- Var PayState3 = "Enable"
- Var RemainAmount = 0
- PrepareDrink SelectDrink SelectSugarID
-
- Var SessionID2 = SelectSlot + ":"
- Var SessionID2 = SessionID2 + sugarID
- Var SessionID2 = SessionID2 + "000"
-
- Var CreditAmount1 = ""
- Var ServiceAmountFlow = ""
- Var TelephoneNumber = "0899999999"
- Var ServiceType = "coffee"
- Var ECommerce = ""
- Var ECommerce = ECommerce + PriceDrink
- Var ECommerce = ECommerce + "/"
- Var ECommerce = ECommerce + DiscountDrink
- Var ECommerce = ECommerce + "/"
- Var ECommerce = ECommerce + SessionID2
- Var ECommerce = ECommerce + "/"
- Var ECommerce = ECommerce + SelectDrink
- Var ECommerce = ECommerce + "/"
- Var ECommerce = ECommerce + "KBA"
- Var ServiceParameter = "max"
- Var ServiceCharge = 0
- Var AccountType = "new"
- Var testservice = "kbank"
- Var tc = ""
- Var GetScore = ""
- Var OperatorName = ""
- Var SessionID = ""
-
-
- GetPayInfo TelephoneNumber ECommerce ServiceType ServiceParameter SessionID OperatorName CreditAmount1 ServiceAmountFlow GetScore tc
- Var Timeout = 0
- Var GetPayInfoFlag = 1
- EndIf
-
- 1000
-
- ;Open "ROOT/xml/menu_board.xml"
-
-
-
-
- Var Timeout = Timeout + 1
- If Timeout > 30 Then
- Open "ROOT/xml/menu_page4.xml"
- EndIf
-
-
- TimerReset
- Refresh
-
-
- Var CreditAmount = 0
- Var QRCODE99 = SessionID
- Var QRCODE99 = QRCODE99 + Ext1a
- Var QRCODE99 = QRCODE99 + Ext21
- Var QRCODETMP = QRCODE99
- Open "ROOT/xml/menu_page4.xml"
-
-
- Var QRCODE99 = ""
- Var CreditAmount = 0
- Open "ROOT/xml/menu_page4.xml"
-
-
-
-
-
-
-
-
- 450
- 218
-
- PictureDrink
-
-
-
-
- 505
- 492
-310
- Center
- 30
- fontType1
- 0x000000
- NameDrink
-
-
-
- 505
- 580
-310
- Center
- 30
- fontType1
- 0x000000
- SweetChoosed
-
-
-
- 505
- 670
-310
- Center
- 25
- fontType1
- 0x000000
- PriceDrink
-
-
-
-
-
-
-
- 505
- 1000
-310
- Center
- 25
- fontType1
- 0x000000
- NHaveDrink
-
-
-
-
-
- Open "/media/bt/xml/security_alarm.xml"
-
-
-
-
diff --git a/xml/menu_page4-1.xml b/xml/menu_page4-1.xml
deleted file mode 100644
index f258155b..00000000
--- a/xml/menu_page4-1.xml
+++ /dev/null
@@ -1,65 +0,0 @@
-
-
- 1080
- 1312
- "ROOT/image/BG_Loading_Page5.bmp"
- "ROOT/sounds/pleaseWait.wav"
-
-
- ; On open
-
- Var Timeout = 0
- Var ErrTimeout = 0
- Var ChangeTimeout = 0
- Var ChangeFlag = 0
- Var MachineState_Result = 0
-
-
-
-
-
- 2000
-
-
- Var ProcessText = ""
- Open "ROOT/xml/menu_CollectPoint_Page1.xml"
- TimerReset
- Refresh
-
-
-
-
-
-
-
-
- 183
- 350
- GIFShowProcess
-
-
-
-
-
-
-
- 420
- 250
-250
- Center
- 30
- fontType1
- 0x000000
- ProcessText
-
-
-
-
-
-
-
- Open "/media/bt/xml/security_alarm.xml"
-
-
-
-
diff --git a/xml/menu_page4-Code.xml b/xml/menu_page4-Code.xml
deleted file mode 100644
index 6d0ca6ba..00000000
--- a/xml/menu_page4-Code.xml
+++ /dev/null
@@ -1,414 +0,0 @@
-
-
- 1080
- 1312
- "ROOT/image/BG_Enter_Code.bmp"
- "ROOT/sounds/Code8digit.m4a"
- SoundVolume
-
-
- ; On open
-
- Var Timeout = 0
-
- Var GetPayInfoFlag = 0
- Var CodeChannel = 0
-
- ;Var VendingQRCode = "ERROR"
- VendingQR ON
- Var QRCODE99 = ""
-
- CoinVending OFF
-
-
-
-
-
- 1000
-
- ;Open "ROOT/xml/menu_board.xml"
-
- Var Timeout = Timeout + 1
- If Timeout > 30 Then
- VendingQR OFF
- Open "ROOT/xml/menu_board.xml"
- EndIf
-
- TimerReset
- Refresh
-
-
-
- If VendingREFID = "" Then
- SAVELOG "menu_page4-Code.xml > ActOK_REFID"
- Refresh
- Else
- SAVELOG "menu_page4-Code.xml > ActOK_make"
- ;Var VendingQRCode = "ERROR"
- ;Coin STANDBY
- VendingQR OFF
-
- ;Var GIFShowProcess = "ROOT/ui/page_05_loading/pic_loading_cup.gif"
- MakeDrinkV1 SelectDrink SelectSugarID
- Var PayWithQR = 1
- Open "/media/bt/xml/menu_page4-1.xml"
-
- EndIf
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- 310
- 380
- 474
- Center
- 50
- fontType1
- 0xF0E000
- TelephoneNumber
-
-
-
-
- 450
- 595
- 185
- 185
- testservice
-
-
-
-
-
-
-
-
- Open "/media/bt/xml/security_alarm.xml"
-
-
-
-
-
-
-
diff --git a/xml/menu_page4-CodeError.xml b/xml/menu_page4-CodeError.xml
deleted file mode 100644
index 3bab661a..00000000
--- a/xml/menu_page4-CodeError.xml
+++ /dev/null
@@ -1,69 +0,0 @@
-
-
- 1080
- 1312
- "ROOT/image/BG_Enter_Code.bmp"
- SoundVolume
-
-
- ; On open
-
- Var Timeout = 0
-
-
-
-
-
- 1000
-
- ;Open "ROOT/xml/menu_board.xml"
-
- Var Timeout = Timeout + 1
- If Timeout > 5 Then
- Open "ROOT/xml/menu_board.xml"
- EndIf
-
- TimerReset
- Refresh
-
-
-
-
- 310
- 380
- 474
- Center
- 50
- fontType1
- 0xF0E000
- TelephoneNumber
-
-
-
- 310
- 550
- 474
- Center
- 50
- fontType1
- 0xF0E000
- "ไม่เจอโค้ดในระบบ"
-
-
-
-
-
-
- Open "/media/bt/xml/security_alarm.xml"
-
-
-
-
-
-
-
-
-
-
-
-
diff --git a/xml/menu_page4-CodeWaiting.xml b/xml/menu_page4-CodeWaiting.xml
deleted file mode 100644
index 64efddb7..00000000
--- a/xml/menu_page4-CodeWaiting.xml
+++ /dev/null
@@ -1,110 +0,0 @@
-
-
- 1080
- 1312
- "ROOT/image/BG_Enter_Code.bmp"
- SoundVolume
-
-
- ; On open
-
- Var Timeout = 0
- Var VendingCode = ""
- Var VendingREFID = ""
- Var VendingCampaignRI3 = ""
- Var VendingCampaign1 = ""
-
-
-
-
-
- 1000
-
- ;Open "ROOT/xml/menu_board.xml"
-
- Var Timeout = Timeout + 1
- If Timeout > 60 Then
- Open "ROOT/xml/menu_Page4-CodeError.xml"
- EndIf
-
- TimerReset
- Refresh
-
-
-
-
- 310
- 380
- 474
- Center
- 50
- fontType1
- 0xF0E000
- TelephoneNumber
-
-
-
- 310
- 550
- 474
- Center
- 50
- fontType1
- 0xF0E000
- "กรุณารอซักครู่ กำลังตรวจสอบโค้ด"
-
-
-
-
- Open "/media/bt/xml/security_alarm.xml"
-
-
-
-
-
-
- If CodeChannel = 1 Then
-
- SPLIT ECommerce "/" 5 VendingCode
- SPLIT ECommerce "/" 7 VendingCampaignRI3
- SPLIT ECommerce "/" 8 VendingCampaign1
-
- Var IntVendingCampaign = VendingCampaignRI3
- INT IntVendingCampaign
-
- Var VendingREFID = SessionID
-
- If IntVendingCampaign > 0 Then
- Var BG_Menu_Page4 = "ROOT/image/BG_Cash_Page4.bmp"
- Var PayState1 = "PressForever"
- Var PayState2 = "Enable"
- Var QRChannel = 0
- Open "ROOT/xml/menu_Page4-WithCode.xml"
- Else
-
- If VendingCode = "C13" Then
- ;Var GIFShowProcess = "ROOT/ui/page_05_loading/pic_loading_cup.gif"
- MakeDrinkV1 SelectDrink SelectSugarID
- Open "/media/bt/xml/menu_page4-1.xml"
- EndIf
-
-
- Open "/media/bt/xml/menu_page4-CodeError.xml"
-
- EndIf
-
-
- EndIf
-
-
-
-
- If CodeChannel = 1 Then
- Open "/media/bt/xml/menu_page4-CodeError.xml"
-
- EndIf
-
-
-
-
-
diff --git a/xml/menu_page4-QR.xml b/xml/menu_page4-QR.xml
deleted file mode 100644
index 472ab8b9..00000000
--- a/xml/menu_page4-QR.xml
+++ /dev/null
@@ -1,422 +0,0 @@
-
-
- 1080
- 1312
- BG_Menu_Page4
- "ROOT/sounds/QRpayment.m4a"
-
-
-
- Var CoinInFlag = 0
- Var CoinAmount = 0
- Var CancelFlag = 0
- Var CancelCounter = 0
- Var CoinInCounter = 0
-
- Var PayAmount = PriceDrink
- Var RemainAmount = PayAmount
- Var RemainAmountStr = "" + RemainAmount
- Var Timeout = 0
- Var PayOK = 0
- Var ChangeOK = 0
- Var CoinInOK = 0
-
- Var VendingREFID = ""
-
- Var TelephoneNumber = "0899999999"
- Var ServiceType = "coffee"
-
- Var ServiceCredit = SelectDrink
- Var ServiceAmount2 = PayAmount
- Var ServiceCharge = 0
- Var Donate = ""
- Var SuggestID = ""
- Var CancleState = "Enable"
-
- Var VendingDiscount = DiscountDrink
- Var VendingCampaign = 0
-
- Var QRCODE1 = "A000000677010112"
- Var QRCODE2 = "010755600066301"
- Var QRCODE3 = "VDGN"
- Var QRCODE4 = BoxID
- Var QRCODE5 = SelectSlot
- Var QRCODE6 = ServiceCredit
- Var QRCODE7 = ServiceAmount2
- Var QRCODE8 = ""
-
- Var CashTextWarning = ""
- Var QRErrorState = "Invisible"
-
- If QRChannel = 0 Then
- ;Var VendingQRCode = "ERROR"
- VendingQR OFF
- CoinVending ON
- Var QRCODE99 = ""
-
- Var TextBill = ""
- Var BillFlag = 0
-
- If Bill20 = "true" Then
- Var TextBill = TextBill + " 20 "
- Var BillFlag = BillFlag + 1
- EndIf
- If Bill50 = "true" Then
- Var TextBill = TextBill + " 50 "
- Var BillFlag = BillFlag + 1
- EndIf
- If Bill100 = "true" Then
- Var TextBill = TextBill + " 100 "
- Var BillFlag = BillFlag + 1
- EndIf
-
- If BillFlag = 3 Then
- Var CashTextWarning = ""
- Else
- If BillFlag = 0 Then
- Var TextBill = "ไม่รับแบงค์"
- Var CashTextWarning = "จำนวนเงินไม่พอทอน! กรุณาใส่เงินให้พอดี " + TextBill
- Else
- Var TextBill = "รับเฉพาะแบงค์ " + TextBill
- Var CashTextWarning = "จำนวนเงินไม่พอทอน! กรุณาใส่เงินให้พอดี " + TextBill
- EndIf
- EndIf
-
-
-
-
-
-
-
- SAVELOG "menu_page4-QR.xml > Open_QRChannel_0"
- Else
- SAVELOG "menu_page4-QR.xml > Open_QRChannel_1"
- ;Var VendingQRCode = "OK"
- VendingQR ON
- CoinVending OFF
- Var QRCODE99 = QRCODETMP
- Var RemainAmountStr = ""
- Var CashTextWarning = ""
-
-
- If QRCODE99 = "" Then
- Var CashTextWarning = "ระบบ Promtpay ไม่สามารถใช้งานได้ในขณะนี้"
- Var QRErrorState = "Enable"
- Else
- Var QRErrorState = "Invisible"
- EndIf
-
-
-
- EndIf
-
-
- Var ProcessText = "กำลังดำเนินการ..."
- ;Var GIFShowProcess = "ROOT/ui/page_05_loading/pic_loading_cup.gif"
- Var PayWithQR = 0
-
-
-
-
-
- If VendingREFID = "" Then
- SAVELOG "menu_page4-QR.xml > ActOK_REFID"
- Refresh
- Else
- SAVELOG "menu_page4-QR.xml > ActOK_make"
- ;Var VendingQRCode = "ERROR"
- ;Coin STANDBY
- VendingQR OFF
-
- ;Var GIFShowProcess = "ROOT/ui/page_05_loading/pic_loading_cup.gif"
- MakeDrinkV1 SelectDrink SelectSugarID
- Var PayWithQR = 1
- Open "/media/bt/xml/menu_page4-1.xml"
-
- EndIf
-
-
- 1000
-
-
- Var Timeout = Timeout + 1
- If Timeout > 120 Then
- If PayOK = 1 Then
-
- If ChangeOK = 1 Then
- ;Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate
- MakeDrinkV1 SelectDrink SelectSugarID
- Open "/media/bt/xml/menu_page4-1.xml"
-
- Else
- If Timeout > 180 Then
- ;Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate
- MakeDrinkV1 SelectDrink SelectSugarID
- Open "/media/bt/xml/menu_page4-1.xml"
- EndIf
- EndIf
- Else
- SAVELOG "menu_page4-QR.xml > Timeout"
- If CancelFlag = 0 Then
- VendingQR OFF
- CoinVending OFF
-
-
- If CoinAmount > 0 Then
- Var CancelFlag = 1
- Var CancelCounter = 0
- Else
- Open "ROOT/xml/menu_board.xml"
- EndIf
-
-
- EndIf
- EndIf
- EndIf
-
-
- Var CancelCounter = CancelCounter + 1
- If CancelFlag = 1 Then
- ;Var VendingQRCode = "ERROR"
- If CancelCounter = 3 Then
- ;Change CoinAmount
- If CoinAmount > 0 Then
- Change CoinAmount
- Else
- Open "ROOT/xml/menu_board.xml"
- EndIf
-
- EndIf
- EndIf
-
- If CancelFlag = 1 Then
- If ChangeOK = 1 Then
- Var ServiceType = "credit"
- Var SessionID2 = SelectDrink
- Var ServiceCredit = "coffee"
- Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate
- Open "ROOT/xml/menu_board.xml"
- EndIf
- EndIf
-
- Var CoinInCounter = CoinInCounter + 1
- If CoinInOK = 1 Then
- If CoinInCounter = 3 Then
-
- Var RemainAmount = PayAmount - CoinAmount
- If CoinAmount >= PayAmount Then
- Var Canout = CoinAmount - PayAmount
- If Canout > 0 Then
- Change Canout
- Else
- Var ChangeOK = 1
- EndIf
-
- Var Timeout = 118
- Var PayOK = 1
-
- EndIf
- EndIf
- EndIf
-
- Refresh
- TimerReset
-
-
-
- If ChangeStatus = "payout-end" Then
- Var ChangeOK = 1
- EndIf
-
-
-
- TimerReset
-
- Var CoinInFlag = 1
-
- If CoinInOK = 0 Then
-
- Var RemainAmount = PayAmount - CoinAmount
- If CoinAmount >= PayAmount Then
- ;Var VendingQRCode = "ERROR"
- CoinVending OFF
- Var Canout = CoinAmount - PayAmount
- Var RemainAmountStr = "ทอน " + Canout
-
-
- Var CancleState = "Disable"
- Var CoinInOK = 1
- Var CoinInCounter = 0
-
- Else
- Var RemainAmountStr = "" + RemainAmount
- EndIf
-
- Var Timeout = 0
-
- EndIf
-
-
- Refresh
-
-
- If CoinInOK = 0 Then
- If CancelFlag = 0 Then
- CoinVending OFF
- Var CancelFlag = 1
- Var CancelCounter = 0
- EndIf
- EndIf
- VendingQR OFF
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- 470
- 667
-155
- Center
- 40
- fontType1
- 0x000000
- RemainAmountStr
-
-
-
-
-
-
- 450
- 595
- 185
- 185
- testservice
-
-
-
-
- 120
- 555
-850
- Center
- 30
- fontType1
- 0xFF0000
- CashTextWarning
-
-
-
-
-
-
-
- Open "/media/bt/xml/security_alarm.xml"
-
-
-
-
diff --git a/xml/menu_page4-WithCode.xml b/xml/menu_page4-WithCode.xml
deleted file mode 100644
index e3febfdc..00000000
--- a/xml/menu_page4-WithCode.xml
+++ /dev/null
@@ -1,480 +0,0 @@
-
-
- 1080
- 1312
- BG_Menu_Page4
- "ROOT/sounds/selectPayment.wav"
-
-
-
-
- Var PayInfoCFlag = 0
- Var ActionOKCase = 0
- Var VendingCampaign = IntVendingCampaign
- Var CoinInFlag = 1
- Var CoinAmount = 0
- Var CancelFlag = 0
- Var CancelCounter = 0
- Var CoinInCounter = 0
-
- Var PayAmount = PriceDrink
- Var RemainAmount = PayAmount - IntVendingCampaign
- Var RemainAmountStr = "" + RemainAmount
- Var Timeout = 0
- Var PayOK = 0
- Var ChangeOK = 0
- Var CoinInOK = 0
-
- Var VendingREFID = ""
-
- Var TelephoneNumber = "0899999999"
- Var ServiceType = "coffee"
-
- Var ServiceCredit = SelectDrink
- Var ServiceAmount2 = PayAmount
- Var ServiceCharge = 0
- Var Donate = ""
- Var SuggestID = ""
- Var CancleState = "Enable"
-
- Var VendingDiscount = DiscountDrink
-
- Var QRCODE1 = "A000000677010112"
- Var QRCODE2 = "010755600066301"
- Var QRCODE3 = "VDGN"
- Var QRCODE4 = BoxID
- Var QRCODE5 = SelectSlot
- Var QRCODE6 = ServiceCredit
- Var QRCODE7 = ServiceAmount2
- Var QRCODE8 = ""
-
- Var CashTextWarning = ""
- Var QRErrorState = "Invisible"
-
- If QRChannel = 0 Then
- VendingQR OFF
- CoinVending ON
- Var QRCODE99 = ""
-
- Var TextBill = ""
- Var BillFlag = 0
-
- If Bill20 = "true" Then
- Var TextBill = TextBill + " 20 "
- Var BillFlag = BillFlag + 1
- EndIf
- If Bill50 = "true" Then
- Var TextBill = TextBill + " 50 "
- Var BillFlag = BillFlag + 1
- EndIf
- If Bill100 = "true" Then
- Var TextBill = TextBill + " 100 "
- Var BillFlag = BillFlag + 1
- EndIf
-
- If BillFlag = 3 Then
- Var CashTextWarning = ""
- Else
- If BillFlag = 0 Then
- Var TextBill = "ไม่รับแบงค์"
- Var CashTextWarning = "จำนวนเงินไม่พอทอน! กรุณาใส่เงินให้พอดี " + TextBill
- Else
- Var TextBill = "รับเฉพาะแบงค์ " + TextBill
- Var CashTextWarning = "จำนวนเงินไม่พอทอน! กรุณาใส่เงินให้พอดี " + TextBill
- EndIf
- EndIf
-
-
-
-
-
-
-
-
- Else
- VendingQR OFF
- CoinVending OFF
- Var QRCODE99 = QRCODETMP
- Var RemainAmountStr = ""
- Var CashTextWarning = ""
-
-
- If QRCODE99 = "" Then
- Var CashTextWarning = "ระบบ Promtpay ไม่สามารถใช้งานได้ในขณะนี้"
- Var QRErrorState = "Enable"
- Else
- Var QRErrorState = "Invisible"
- EndIf
-
-
-
- EndIf
-
-
- Var ProcessText = "กำลังดำเนินการ..."
- ;Var GIFShowProcess = "ROOT/ui/page_05_loading/pic_loading_cup.gif"
- Var PayWithQR = 0
-
- If IntVendingCampaign >= PayAmount Then
- CoinVending OFF
- MakeDrinkV1 SelectDrink SelectSugarID
- Open "/media/bt/xml/menu_page4-1.xml"
-
- EndIf
-
-
-
-
-
-
-
- If ActionOKCase = 1 Then
- Var PayInfoCFlag = 1
- EndIf
-
- If ActionOKCase = 2 Then
- Open "ROOT/xml/menu_board.xml"
- EndIf
-
-
- 1000
-
-
- Var Timeout = Timeout + 1
- If Timeout > 180 Then
- If ActionOKCase = 1 Then
- Var PayInfoCFlag = 1
- EndIf
-
- If ActionOKCase = 2 Then
- Open "ROOT/xml/menu_board.xml"
- EndIf
-
- EndIf
-
- If ActionOKCase = 1 Then
- If PayInfoCFlag = 1 Then
- Var SessionID2 = SelectSlot + ":"
- Var SessionID2 = SessionID2 + sugarID
- Var SessionID2 = SessionID2 + "000"
- Var CreditAmount1 = ""
- Var ServiceAmountFlow = ""
- Var TelephoneNumber = "0899999999"
- Var ServiceType = "coffee"
- Var ECommerce = ""
- Var ECommerce = ECommerce + PriceDrink
- Var ECommerce = ECommerce + "/"
- Var ECommerce = ECommerce + DiscountDrink
- Var ECommerce = ECommerce + "/"
- Var ECommerce = ECommerce + SessionID2
- Var ECommerce = ECommerce + "/"
- Var ECommerce = ECommerce + SelectDrink
- Var ECommerce = ECommerce + "/"
- Var ECommerce = ECommerce + "C00"
- Var ECommerce = ECommerce + "/"
- Var ECommerce = ECommerce + CodeNumber
- Var ECommerce = ECommerce + "/"
- Var ECommerce = ECommerce + "C"
- Var ServiceParameter = "max"
- Var ServiceCharge = 0
- Var AccountType = "new"
- Var testservice = "kbank"
- Var tc = ""
- Var GetScore = ""
- Var OperatorName = ""
- Var SessionID = ""
- GetPayInfo TelephoneNumber ECommerce ServiceType ServiceParameter SessionID OperatorName CreditAmount1 ServiceAmountFlow GetScore tc
- ;Var Timeout = 0
- Var ActionOKCase = 2
- EndIf
- EndIf
-
- If Timeout > 120 Then
- If PayOK = 1 Then
-
- If ChangeOK = 1 Then
- ;Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate
- MakeDrinkV1 SelectDrink SelectSugarID
- Open "/media/bt/xml/menu_page4-1.xml"
-
- Else
- If Timeout > 180 Then
- ;Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate
- MakeDrinkV1 SelectDrink SelectSugarID
- Open "/media/bt/xml/menu_page4-1.xml"
- EndIf
- EndIf
- Else
- If CancelFlag = 0 Then
- CoinVending OFF
-
-
- If CoinAmount > 0 Then
- Var CancelFlag = 1
- Var CancelCounter = 0
- Else
- If ActionOKCase = 0 Then
- Var PayInfoCFlag = 1
- Var ActionOKCase = 1
- EndIf
- EndIf
-
-
- EndIf
- EndIf
- EndIf
-
-
- Var CancelCounter = CancelCounter + 1
- If CancelFlag = 1 Then
-
- If CancelCounter = 3 Then
- ;Change CoinAmount
- If CoinAmount > 0 Then
- Change CoinAmount
- Else
- If ActionOKCase = 0 Then
- Var PayInfoCFlag = 1
- Var ActionOKCase = 1
- EndIf
- EndIf
-
- EndIf
- EndIf
-
- If CancelFlag = 1 Then
- If ChangeOK = 1 Then
- If ActionOKCase = 0 Then
- Var VendingDiscount = 0
- Var VendingCampaign = 0
- Var ServiceType = "credit"
- Var SessionID2 = SelectDrink
- Var ServiceCredit = "coffee"
- Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate
- ;Open "ROOT/xml/menu_board.xml"
- Var ActionOKCase = 1
- EndIf
- EndIf
- EndIf
-
- Var CoinInCounter = CoinInCounter + 1
- If CoinInOK = 1 Then
- If CoinInCounter = 3 Then
-
- Var RemainAmount = PayAmount - CoinAmount
- Var RemainAmount = RemainAmount - IntVendingCampaign
- Var SumCoinAmount = CoinAmount + IntVendingCampaign
- If SumCoinAmount >= PayAmount Then
- Var Canout = SumCoinAmount - PayAmount
- If Canout > 0 Then
- Change Canout
- Else
- Var ChangeOK = 1
- EndIf
-
- Var Timeout = 118
- Var PayOK = 1
-
- EndIf
- EndIf
- EndIf
-
- Refresh
- TimerReset
-
-
-
- If ChangeStatus = "payout-end" Then
- Var ChangeOK = 1
- EndIf
-
-
-
- TimerReset
-
- Var CoinInFlag = 1
-
- If CoinInOK = 0 Then
-
- Var RemainAmount = PayAmount - CoinAmount
- Var RemainAmount = RemainAmount - IntVendingCampaign
- Var SumCoinAmount = CoinAmount + IntVendingCampaign
- If SumCoinAmount >= PayAmount Then
- ;Var VendingQRCode = "ERROR"
- CoinVending OFF
- Var Canout = SumCoinAmount - PayAmount
- Var RemainAmountStr = "ทอน " + Canout
-
-
- Var CancleState = "Disable"
- Var CoinInOK = 1
- Var CoinInCounter = 0
-
- Else
- Var RemainAmountStr = "" + RemainAmount
- EndIf
-
- Var Timeout = 0
-
- EndIf
-
-
- Refresh
-
-
- If CoinInOK = 0 Then
- If CancelFlag = 0 Then
- CoinVending OFF
- Var CancelFlag = 1
- Var CancelCounter = 0
- EndIf
- EndIf
- VendingQR OFF
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- 470
- 667
-155
- Center
- 40
- fontType1
- 0x000000
- RemainAmountStr
-
-
-
-
-
-
-
- 450
- 595
- 185
- 185
- testservice
-
-
-
-
- 120
- 555
-850
- Center
- 30
- fontType1
- 0xFF0000
- CashTextWarning
-
-
-
-
-
-
-
- Open "/media/bt/xml/security_alarm.xml"
-
-
-
-
diff --git a/xml/menu_page4.xml b/xml/menu_page4.xml
deleted file mode 100644
index 406485e4..00000000
--- a/xml/menu_page4.xml
+++ /dev/null
@@ -1,420 +0,0 @@
-
-
- 1080
- 1312
- BG_Menu_Page4
- "ROOT/sounds/selectPayment.wav"
-
-
-
- Var CoinInFlag = 0
- Var CoinAmount = 0
- Var CancelFlag = 0
- Var CancelCounter = 0
- Var CoinInCounter = 0
-
- Var PayAmount = PriceDrink
- Var RemainAmount = PayAmount
- Var RemainAmountStr = "" + RemainAmount
- Var Timeout = 0
- Var PayOK = 0
- Var ChangeOK = 0
- Var CoinInOK = 0
-
- Var VendingREFID = ""
-
- Var TelephoneNumber = "0899999999"
- Var ServiceType = "coffee"
-
- Var ServiceCredit = SelectDrink
- Var ServiceAmount2 = PayAmount
- Var ServiceCharge = 0
- Var Donate = ""
- Var SuggestID = ""
- Var CancleState = "Enable"
-
- Var VendingDiscount = DiscountDrink
- Var VendingCampaign = 0
-
- Var QRCODE1 = "A000000677010112"
- Var QRCODE2 = "010755600066301"
- Var QRCODE3 = "VDGN"
- Var QRCODE4 = BoxID
- Var QRCODE5 = SelectSlot
- Var QRCODE6 = ServiceCredit
- Var QRCODE7 = ServiceAmount2
- Var QRCODE8 = ""
-
- Var CashTextWarning = ""
- Var QRErrorState = "Invisible"
-
- If QRChannel = 0 Then
- ;Var VendingQRCode = "ERROR"
- VendingQR ON
- CoinVending ON
- Var QRCODE99 = ""
-
- Var TextBill = ""
- Var BillFlag = 0
-
- If Bill20 = "true" Then
- Var TextBill = TextBill + " 20 "
- Var BillFlag = BillFlag + 1
- EndIf
- If Bill50 = "true" Then
- Var TextBill = TextBill + " 50 "
- Var BillFlag = BillFlag + 1
- EndIf
- If Bill100 = "true" Then
- Var TextBill = TextBill + " 100 "
- Var BillFlag = BillFlag + 1
- EndIf
-
- If BillFlag = 3 Then
- Var CashTextWarning = ""
- Else
- If BillFlag = 0 Then
- Var TextBill = "ไม่รับแบงค์"
- Var CashTextWarning = "จำนวนเงินไม่พอทอน! กรุณาใส่เงินให้พอดี " + TextBill
- Else
- Var TextBill = "รับเฉพาะแบงค์ " + TextBill
- Var CashTextWarning = "จำนวนเงินไม่พอทอน! กรุณาใส่เงินให้พอดี " + TextBill
- EndIf
- EndIf
-
-
-
-
-
-
-
-
- Else
- ;Var VendingQRCode = "OK"
- VendingQR ON
- CoinVending OFF
- Var QRCODE99 = QRCODETMP
- Var RemainAmountStr = ""
- Var CashTextWarning = ""
-
-
- If QRCODE99 = "" Then
- Var CashTextWarning = "ระบบ Promtpay ไม่สามารถใช้งานได้ในขณะนี้"
- Var QRErrorState = "Enable"
- Else
- Var QRErrorState = "Invisible"
- EndIf
-
-
-
- EndIf
-
-
- Var ProcessText = "กำลังดำเนินการ..."
- ;Var GIFShowProcess ="ROOT/ui/page_05_loading/pic_loading_cup.gif"
- Var PayWithQR = 0
-
-
-
-
-
- If VendingREFID = "" Then
- SAVELOG "menu_page4.xml > ActOK_REFID"
- Refresh
- Else
- SAVELOG "menu_page4.xml > ActOK_make"
- ;Var VendingQRCode = "ERROR"
- CoinVending OFF
- ;Coin STANDBY
-
- ;Var GIFShowProcess = "ROOT/ui/page_05_loading/pic_loading_cup.gif"
- MakeDrinkV1 SelectDrink SelectSugarID
- Var PayWithQR = 1
- Open "/media/bt/xml/menu_page4-1.xml"
-
- EndIf
-
-
- 1000
-
-
- Var Timeout = Timeout + 1
- If Timeout > 120 Then
- If PayOK = 1 Then
-
- If ChangeOK = 1 Then
- ;Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate
- MakeDrinkV1 SelectDrink SelectSugarID
- Open "/media/bt/xml/menu_page4-1.xml"
-
- Else
- If Timeout > 180 Then
- ;Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate
- MakeDrinkV1 SelectDrink SelectSugarID
- Open "/media/bt/xml/menu_page4-1.xml"
- EndIf
- EndIf
- Else
- If CancelFlag = 0 Then
- VendingQR OFF
- CoinVending OFF
-
-
-
- If CoinAmount > 0 Then
- Var CancelFlag = 1
- Var CancelCounter = 0
- Else
- Open "ROOT/xml/menu_board.xml"
- EndIf
-
-
- EndIf
- EndIf
- EndIf
-
-
- Var CancelCounter = CancelCounter + 1
- If CancelFlag = 1 Then
- ;Var VendingQRCode = "ERROR"
- If CancelCounter = 3 Then
- ;Change CoinAmount
- If CoinAmount > 0 Then
- Change CoinAmount
- Else
- Open "ROOT/xml/menu_board.xml"
- EndIf
-
- EndIf
- EndIf
-
- If CancelFlag = 1 Then
- If ChangeOK = 1 Then
- Var VendingDiscount = 0
- Var VendingCampaign = 0
- Var ServiceType = "credit"
- Var SessionID2 = SelectDrink
- Var ServiceCredit = "coffee"
- Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate
- Open "ROOT/xml/menu_board.xml"
- EndIf
- EndIf
-
- Var CoinInCounter = CoinInCounter + 1
- If CoinInOK = 1 Then
- If CoinInCounter = 3 Then
-
- Var RemainAmount = PayAmount - CoinAmount
- If CoinAmount >= PayAmount Then
- Var Canout = CoinAmount - PayAmount
- If Canout > 0 Then
- Change Canout
- Else
- Var ChangeOK = 1
- EndIf
-
- Var Timeout = 118
- Var PayOK = 1
-
- EndIf
- EndIf
- EndIf
-
- Refresh
- TimerReset
-
-
-
- If ChangeStatus = "payout-end" Then
- Var ChangeOK = 1
- EndIf
-
-
-
- TimerReset
-
- If CoinInFlag = 0 Then
- VendingQR OFF
- EndIf
-
- Var CoinInFlag = 1
-
- If CoinInOK = 0 Then
-
- Var RemainAmount = PayAmount - CoinAmount
- If CoinAmount >= PayAmount Then
- ;Var VendingQRCode = "ERROR"
- CoinVending OFF
- Var Canout = CoinAmount - PayAmount
- Var RemainAmountStr = "ทอน " + Canout
-
-
- Var CancleState = "Disable"
- Var CoinInOK = 1
- Var CoinInCounter = 0
-
- Else
- Var RemainAmountStr = "" + RemainAmount
- EndIf
-
- Var Timeout = 0
-
- EndIf
-
-
- Refresh
-
-
- If CoinInOK = 0 Then
- If CancelFlag = 0 Then
- CoinVending OFF
- Var CancelFlag = 1
- Var CancelCounter = 0
- EndIf
- EndIf
- VendingQR OFF
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- 470
- 667
-155
- Center
- 40
- fontType1
- 0x000000
- RemainAmountStr
-
-
-
-
-
-
- 450
- 595
- 185
- 185
- testservice
-
-
-
-
- 120
- 555
-850
- Center
- 30
- fontType1
- 0xFF0000
- CashTextWarning
-
-
-
-
-
- Open "/media/bt/xml/security_alarm.xml"
-
-
-
-
diff --git a/xml/menu_page4aa.xml b/xml/menu_page4aa.xml
deleted file mode 100644
index 4a8e4eed..00000000
--- a/xml/menu_page4aa.xml
+++ /dev/null
@@ -1,409 +0,0 @@
-
-
- 1080
- 1312
- BG_Menu_Page4
- "ROOT/sounds/selectPayment.wav"
-
-
-
- Var CoinInFlag = 0
- Var CoinAmount = 0
- Var CancelFlag = 0
- Var CancelCounter = 0
- Var CoinInCounter = 0
-
- Var PayAmount = PriceDrink
- Var RemainAmount = PayAmount
- Var RemainAmountStr = "" + RemainAmount
- Var Timeout = 0
- Var PayOK = 0
- Var ChangeOK = 0
- Var CoinInOK = 0
-
- Var VendingREFID = ""
-
- Var TelephoneNumber = "0899999999"
- Var ServiceType = "coffee"
-
- Var ServiceCredit = SelectDrink
- Var ServiceAmount2 = PayAmount
- Var ServiceCharge = 0
- Var Donate = ""
- Var SuggestID = ""
- Var CancleState = "Enable"
-
- Var VendingDiscount = DiscountDrink
- Var VendingCampaign = 0
-
- Var QRCODE1 = "A000000677010112"
- Var QRCODE2 = "010755600066301"
- Var QRCODE3 = "VDGN"
- Var QRCODE4 = BoxID
- Var QRCODE5 = SelectSlot
- Var QRCODE6 = ServiceCredit
- Var QRCODE7 = ServiceAmount2
- Var QRCODE8 = ""
-
- Var CashTextWarning = ""
- Var QRErrorState = "Invisible"
-
- If QRChannel = 0 Then
- Var VendingQRCode = "ERROR"
- CoinVending ON
- Var QRCODE99 = ""
-
- Var TextBill = ""
- Var BillFlag = 0
-
- If Bill20 = "true" Then
- Var TextBill = TextBill + " 20 "
- Var BillFlag = BillFlag + 1
- EndIf
- If Bill50 = "true" Then
- Var TextBill = TextBill + " 50 "
- Var BillFlag = BillFlag + 1
- EndIf
- If Bill100 = "true" Then
- Var TextBill = TextBill + " 100 "
- Var BillFlag = BillFlag + 1
- EndIf
-
- If BillFlag = 3 Then
- Var CashTextWarning = ""
- Else
- If BillFlag = 0 Then
- Var TextBill = "ไม่รับแบงค์"
- Var CashTextWarning = "จำนวนเงินไม่พอทอน! กรุณาใส่เงินให้พอดี " + TextBill
- Else
- Var TextBill = "รับเฉพาะแบงค์ " + TextBill
- Var CashTextWarning = "จำนวนเงินไม่พอทอน! กรุณาใส่เงินให้พอดี " + TextBill
- EndIf
- EndIf
-
-
-
-
-
-
-
-
- Else
- Var VendingQRCode = "OK"
- CoinVending OFF
- Var QRCODE99 = QRCODETMP
- Var RemainAmountStr = ""
- Var CashTextWarning = ""
-
-
- If QRCODE99 = "" Then
- Var CashTextWarning = "ระบบ Promtpay ไม่สามารถใช้งานได้ในขณะนี้"
- Var QRErrorState = "Enable"
- Else
- Var QRErrorState = "Invisible"
- EndIf
-
-
-
- EndIf
-
-
- Var ProcessText = "กำลังดำเนินการ..."
- Var GIFShowProcess = "ROOT/ui/page_05_loading/pic_loading_cup.gif"
- Var PayWithQR = 0
-
-
-
-
-
- If VendingREFID = "" Then
- Refresh
- Else
- Var VendingQRCode = "ERROR"
- Coin STANDBY
-
- Var GIFShowProcess = "ROOT/ui/page_05_loading/pic_loading_cup.gif"
- MakeDrinkV1 SelectDrink SelectSugarID
- Var PayWithQR = 1
- Open "/media/bt/xml/menu_page4-1.xml"
-
- EndIf
-
-
- 1000
-
-
- Var Timeout = Timeout + 1
- If Timeout > 120 Then
- If PayOK = 1 Then
-
- If ChangeOK = 1 Then
- ;Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate
- MakeDrinkV1 SelectDrink SelectSugarID
- Open "/media/bt/xml/menu_page4-1.xml"
-
- Else
- If Timeout > 180 Then
- ;Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate
- MakeDrinkV1 SelectDrink SelectSugarID
- Open "/media/bt/xml/menu_page4-1.xml"
- EndIf
- EndIf
- Else
- If CancelFlag = 0 Then
- CoinVending OFF
-
-
- If CoinAmount > 0 Then
- Var CancelFlag = 1
- Var CancelCounter = 0
- Else
- Open "ROOT/xml/menu_board.xml"
- EndIf
-
-
- EndIf
- EndIf
- EndIf
-
-
- Var CancelCounter = CancelCounter + 1
- If CancelFlag = 1 Then
- Var VendingQRCode = "ERROR"
- If CancelCounter = 3 Then
- ;Change CoinAmount
- If CoinAmount > 0 Then
- Change CoinAmount
- Else
- Open "ROOT/xml/menu_board.xml"
- EndIf
-
- EndIf
- EndIf
-
- If CancelFlag = 1 Then
- If ChangeOK = 1 Then
- Var ServiceType = "credit"
- Var SessionID2 = SelectDrink
- Var ServiceCredit = "coffee"
- Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate
- Open "ROOT/xml/menu_board.xml"
- EndIf
- EndIf
-
- Var CoinInCounter = CoinInCounter + 1
- If CoinInOK = 1 Then
- If CoinInCounter = 3 Then
-
- Var RemainAmount = PayAmount - CoinAmount
- If CoinAmount >= PayAmount Then
- Var Canout = CoinAmount - PayAmount
- If Canout > 0 Then
- Change Canout
- Else
- Var ChangeOK = 1
- EndIf
-
- Var Timeout = 118
- Var PayOK = 1
-
- EndIf
- EndIf
- EndIf
-
- Refresh
- TimerReset
-
-
-
- If ChangeStatus = "payout-end" Then
- Var ChangeOK = 1
- EndIf
-
-
-
- TimerReset
-
- Var CoinInFlag = 1
-
- If CoinInOK = 0 Then
-
- Var RemainAmount = PayAmount - CoinAmount
- If CoinAmount >= PayAmount Then
- Var VendingQRCode = "ERROR"
- CoinVending OFF
- Var Canout = CoinAmount - PayAmount
- Var RemainAmountStr = "ทอน " + Canout
-
-
- Var CancleState = "Disable"
- Var CoinInOK = 1
- Var CoinInCounter = 0
-
- Else
- Var RemainAmountStr = "" + RemainAmount
- EndIf
-
- Var Timeout = 0
-
- EndIf
-
-
- Refresh
-
-
- If CoinInOK = 0 Then
- If CancelFlag = 0 Then
- CoinVending OFF
- Var CancelFlag = 1
- Var CancelCounter = 0
- EndIf
- EndIf
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- 470
- 667
-155
- Center
- 40
- fontType1
- 0x000000
- RemainAmountStr
-
-
-
-
-
-
- 450
- 595
- 185
- 185
- testservice
-
-
-
-
- 120
- 555
-850
- Center
- 30
- fontType1
- 0xFF0000
- CashTextWarning
-
-
-
-
-
-
-
-
-
- Open "/media/bt/xml/security_alarm.xml"
-
-
-
-
diff --git a/xml/menu_page5.xml b/xml/menu_page5.xml
deleted file mode 100644
index 05f4aba9..00000000
--- a/xml/menu_page5.xml
+++ /dev/null
@@ -1,366 +0,0 @@
-
-
- 1080
- 1312
- "ROOT/image/BG_Loading_Page5.bmp"
-
-
-
- ; On open
-
- Var Timeout = 0
- Var Change3Timeout = 0
- Var ActionOKCase = 0
-
-
-
-
-
-
-
-
- If ActionOKCase = 1 Then
- If CodeChannel = 1 Then
- Var SessionID2 = SelectSlot + ":"
- Var SessionID2 = SessionID2 + sugarID
- Var SessionID2 = SessionID2 + "000"
-
- Var CreditAmount1 = ""
- Var ServiceAmountFlow = ""
- Var TelephoneNumber = "0899999999"
- Var ServiceType = "coffee"
- Var ECommerce = ""
- Var ECommerce = ECommerce + PriceDrink
- Var ECommerce = ECommerce + "/"
- Var ECommerce = ECommerce + DiscountDrink
- Var ECommerce = ECommerce + "/"
- Var ECommerce = ECommerce + SessionID2
- Var ECommerce = ECommerce + "/"
- Var ECommerce = ECommerce + SelectDrink
- Var ECommerce = ECommerce + "/"
- Var ECommerce = ECommerce + "C00"
- Var ECommerce = ECommerce + "/"
- Var ECommerce = ECommerce + CodeNumber
- Var ECommerce = ECommerce + "/"
- Var ECommerce = ECommerce + "C"
- Var ServiceParameter = "max"
- Var ServiceCharge = 0
- Var AccountType = "new"
- Var testservice = "kbank"
- Var tc = ""
- Var GetScore = ""
- Var OperatorName = ""
- Var SessionID = ""
-
- GetPayInfo TelephoneNumber ECommerce ServiceType ServiceParameter SessionID OperatorName CreditAmount1 ServiceAmountFlow GetScore tc
- ;Var Timeout = 0
- Var ActionOKCase = 2
- Else
- Open "ROOT/xml/menu_closeMaintenance.xml"
- EndIf
-
- EndIf
-
- If ActionOKCase = 2 Then
- Open "ROOT/xml/menu_closeMaintenance.xml"
- EndIf
-
-
- 1000
-
-
-
- Var Timeout = Timeout + 1
-
- If ActionOKCase > 0 Then
- If Timeout > 150 Then
- Open "ROOT/xml/menu_closeMaintenance.xml"
- EndIf
- EndIf
-
- If Timeout > 60 Then
- If ErrTimeout = 0 Then
- Var ErrTimeout = 1
- Var BrewingTextEng = ""
- Var BrewingTextThai = ""
- Var ProcessText = "ระบบขัดข้อง"
- ;Var GIFShowProcess = "ROOT/ui/page_05_loading/pic_failed.gif"
-
-
-
- If PayWithQR = 0 Then
- If CodeChannel = 0 Then
- If ChangeFlag = 0 Then
- Var ChangeFlag = 1
- Change ServiceAmount2
- EndIf
- Else
- If CoinAmount > 0 Then
- If ChangeFlag = 0 Then
- Var ChangeFlag = 1
- Var ServiceAmount2 = ServiceAmount2 - IntVendingCampaign
- Change ServiceAmount2
- EndIf
- Else
- Var ChangeOK = 4
- EndIf
- EndIf
- Else
- Var ChangeOK = 3
- EndIf
-
-
- Open "ROOT/xml/menu_page5.xml"
- EndIf
- EndIf
-
- If ChangeFlag = 1 Then
- Var ChangeTimeout = ChangeTimeout + 1
- EndIf
-
- If ChangeOK = 2 Then
- If ActionOKCase = 0 Then
- Var TelephoneNumber = "0899999999"
- Var VendingDiscount = 0
- Var VendingCampaign = 0
- Var ServiceType = "credit"
- Var SessionID2 = SelectDrink
- Var ServiceCredit = "coffee"
- Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate
- ;Open "ROOT/xml/menu_closeMaintenance.xml"
- Var ActionOKCase = 1
- EndIf
- EndIf
-
- If ChangeTimeout > 60 Then
- If ActionOKCase = 0 Then
- Var TelephoneNumber = "0899999999"
- Var VendingDiscount = 0
- Var VendingCampaign = 0
- Var ServiceType = "credit"
- Var SessionID2 = SelectDrink
- Var ServiceCredit = "coffee"
- Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate
- ;Open "ROOT/xml/menu_closeMaintenance.xml"
- Var ActionOKCase = 1
- EndIf
- EndIf
-
- If ChangeOK = 3 Then
- Var Change3Timeout = Change3Timeout + 1
- If Change3Timeout > 3 Then
- Open "ROOT/xml/menu_closeMaintenance.xml"
- EndIf
- EndIf
-
- If ChangeOK = 4 Then
- If ActionOKCase = 0 Then
- Var SessionID2 = SelectSlot + ":"
- Var SessionID2 = SessionID2 + sugarID
- Var SessionID2 = SessionID2 + "000"
- Var CreditAmount1 = ""
- Var ServiceAmountFlow = ""
- Var TelephoneNumber = "0899999999"
- Var ServiceType = "coffee"
- Var ECommerce = ""
- Var ECommerce = ECommerce + PriceDrink
- Var ECommerce = ECommerce + "/"
- Var ECommerce = ECommerce + DiscountDrink
- Var ECommerce = ECommerce + "/"
- Var ECommerce = ECommerce + SessionID2
- Var ECommerce = ECommerce + "/"
- Var ECommerce = ECommerce + SelectDrink
- Var ECommerce = ECommerce + "/"
- Var ECommerce = ECommerce + "C00"
- Var ECommerce = ECommerce + "/"
- Var ECommerce = ECommerce + CodeNumber
- Var ECommerce = ECommerce + "/"
- Var ECommerce = ECommerce + "C"
- Var ServiceParameter = "max"
- Var ServiceCharge = 0
- Var AccountType = "new"
- Var testservice = "kbank"
- Var tc = ""
- Var GetScore = ""
- Var OperatorName = ""
- Var SessionID = ""
- GetPayInfo TelephoneNumber ECommerce ServiceType ServiceParameter SessionID OperatorName CreditAmount1 ServiceAmountFlow GetScore tc
- ;Var Timeout = 0
- Var ActionOKCase = 2
- EndIf
- EndIf
-
-
- If MachineState_Result = 1 Then
- Var Timeout = 0
- Var ProcessText = ""
- ;Var GIFShowProcess = "ROOT/ui/page_05_loading/pic_ready.gif"
-
- Var TelephoneNumber = "0899999999"
- Var ServiceType = "coffee"
- Var ServiceCredit = SelectDrink
- Var SuggestID = ""
-
- If PayWithQR = 0 Then
- If CodeChannel = 1 Then
- Var SessionID2 = SessionID2 + "/"
- Var SessionID2 = SessionID2 + CodeNumber
- Var SessionID2 = SessionID2 + "/"
- Var SessionID2 = SessionID2 + VendingCode
- Var SessionID2 = SessionID2 + "/"
- Var SessionID2 = SessionID2 + SelectDrink
- Var SessionID2 = SessionID2 + "/"
- Var SessionID2 = SessionID2 + BoxID
- Var SessionID2 = SessionID2 + "/"
- Var SessionID2 = SessionID2 + "S"
- Var SessionID2 = SessionID2 + "/"
- Var SessionID2 = SessionID2 + CodeNumber
- Var SessionID2 = SessionID2 + "/"
-
- Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate
- Else
- Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate
- EndIf
- EndIf
-
- Var ServiceSuccess = "yes"
- Open "ROOT/xml/menu_page6.xml"
- EndIf
-
- If MachineState_Result = 2 Then
- If ErrTimeout = 0 Then
- Var ErrTimeout = 1
-
- Var BrewingTextEng = ""
- Var BrewingTextThai = ""
- Var ProcessText = "ระบบขัดข้อง"
- ;Var GIFShowProcess = "ROOT/ui/page_05_loading/pic_failed.gif"
-
- If PayWithQR = 0 Then
- If CodeChannel = 0 Then
- If ChangeFlag = 0 Then
- Var ChangeFlag = 1
- Change ServiceAmount2
- EndIf
- Else
- If CoinAmount > 0 Then
- If ChangeFlag = 0 Then
- Var ChangeFlag = 1
- Var ServiceAmount2 = ServiceAmount2 - IntVendingCampaign
- Change ServiceAmount2
- EndIf
- Else
- Var ChangeOK = 4
- EndIf
- EndIf
- Else
- Var ChangeOK = 3
- EndIf
-
- Open "ROOT/xml/menu_page5.xml"
- EndIf
- EndIf
-
-
- TimerReset
- Refresh
-
-
-
-
-
- If MachineStage = "make-drink" Then
- Var Timeout = 0
- Var ProcessText = ""
- ;Var GIFShowProcess = "ROOT/ui/page_05_loading/pic_loading_cup.gif"
- Open "ROOT/xml/menu_page5.xml"
- EndIf
-
- If MachineStage = "prepar-cup" Then
- Var Timeout = 0
- Var ProcessText = ""
- ;Var GIFShowProcess = "ROOT/ui/page_05_loading/pic_loading_cup.gif"
- Open "ROOT/xml/menu_page5.xml"
- EndIf
-
- If MachineStage = "ice-out" Then
- Var Timeout = 0
- Var ProcessText = ""
- ;Var GIFShowProcess = "ROOT/ui/page_05_loading/pic_loading_ice.gif"
- Open "ROOT/xml/menu_page5.xml"
- EndIf
-
- If MachineStage = "brewing" Then
- Var Timeout = 0
- Var ProcessText = ""
- Open "ROOT/xml/menu_page5.xml"
- EndIf
-
- If MachineStage = "drink-success" Then
- Var MachineState_Result = 1
- EndIf
-
- If MachineStage = "drink-failed" Then
- Var MachineState_Result = 2
- EndIf
-
-
-
- If ChangeStatus = "payout-end" Then
- Var ChangeOK = 2
- EndIf
-
-
-
-
- 183
- 350
- GIFShowProcess
-
-
-
-
-
-
-
- 420
- 250
-250
- Center
- 30
- fontType1
- 0x000000
- ProcessText
-
-
-
-
- 420
- 250
-250
- Center
- 30
- fontType1
- 0x000000
- BrewingTextEng
-
-
-
- 420
- 315
-250
- Center
- 25
- fontType1
- 0xB78F24
- BrewingTextThai
-
-
-
-
-
- Open "/media/bt/xml/security_alarm.xml"
-
-
-
-
diff --git a/xml/menu_page6.xml b/xml/menu_page6.xml
deleted file mode 100644
index 50273a8f..00000000
--- a/xml/menu_page6.xml
+++ /dev/null
@@ -1,108 +0,0 @@
-
-
- 1080
- 1312
- "ROOT/image/BG_Menu_Page6.bmp"
-
-
-
- ; On open
-
- Var Timeout = 0
- Var AckPayOK = 0
- Var GetLidOK = 0
- Var RemoveCup = 0
-
-
-
- 1000
-
- ;Open "ROOT/xml/menu_board.xml"
-
- Var Timeout = Timeout + 1
-
- If Timeout > 60 Then
- Var AckPayOK = 1
- EndIf
-
- If Timeout > 70 Then
- Var GetLidOK = 1
- EndIf
-
- If Timeout >= 5 Then
-
- If PayWithQR = 1 Then
- Var AckPayOK = 1
- EndIf
-
- If CodeChannel = 1 Then
- Var AckPayOK = 1
- EndIf
- EndIf
-
- If AckPayOK = 1 Then
- If GetLidOK = 1 Then
- Var TelephoneNumber = ""
- Var Tel_Confirm_State = "Disable"
-
- ;If CodeChannel = 1 Then
- ; Open "ROOT/xml/menu_Page7.xml"
- ;EndIf
-
- If SelectDrink = "11-01-02-0009" Then
- Open "ROOT/xml/menu_Page7.xml"
- EndIf
-
- ;Open "ROOT/xml/menu_CollectPoint_Page1.xml"
- Open "ROOT/xml/menu_Page7.xml"
-
- EndIf
-
- If RemoveCup = 1 Then
- Var ProcessText = "กรุณานำเครื่องดื่มออก"
- Open "ROOT/xml/menu_page6_Open.xml"
- EndIf
-
- EndIf
- TimerReset
- Refresh
-
-
-
-
- If MachineStage = "get-lid" Then
- Var GetLidOK = 1
-
- EndIf
-
- If MachineStage = "remove-cup" Then
- ;Var ProcessText = "กรุณานำเครื่องดื่มออก"
- ;Open "ROOT/xml/menu_page6_Open.xml"
- Var RemoveCup = 1
- EndIf
-
-
-
-
- Var AckPayOK = 1
-
-
-
-
-
- 183
- 350
- GIFShowProcess
-
-
-
-
-
-
-
-
- Open "/media/bt/xml/security_alarm.xml"
-
-
-
-
diff --git a/xml/menu_page6.xml.bak b/xml/menu_page6.xml.bak
deleted file mode 100644
index 299e4ddd..00000000
--- a/xml/menu_page6.xml.bak
+++ /dev/null
@@ -1,106 +0,0 @@
-
-
- 1080
- 1312
- "ROOT/image/BG_Menu_Page6.bmp"
-
-
-
- ; On open
-
- Var Timeout = 0
- Var AckPayOK = 0
- Var GetLidOK = 0
- Var RemoveCup = 0
-
-
-
- 1000
-
- ;Open "ROOT/xml/menu_board.xml"
-
- Var Timeout = Timeout + 1
-
- If Timeout > 60 Then
- Var AckPayOK = 1
- EndIf
-
- If Timeout > 70 Then
- Var GetLidOK = 1
- EndIf
-
- If Timeout >= 5 Then
-
- If PayWithQR = 1 Then
- Var AckPayOK = 1
- EndIf
-
- If CodeChannel = 1 Then
- Var AckPayOK = 1
- EndIf
- EndIf
-
- If AckPayOK = 1 Then
- If GetLidOK = 1 Then
- Var TelephoneNumber = ""
- Var Tel_Confirm_State = "Disable"
-
- ;If CodeChannel = 1 Then
- ; Open "ROOT/xml/menu_Page7.xml"
- ;EndIf
-
- If SelectDrink = "11-01-02-0009" Then
- Open "ROOT/xml/menu_Page7.xml"
- EndIf
-
- Open "ROOT/xml/menu_CollectPoint_Page1.xml"
-
- EndIf
-
- If RemoveCup = 1 Then
- Var ProcessText = "กรุณานำเครื่องดื่มออก"
- Open "ROOT/xml/menu_page6_Open.xml"
- EndIf
-
- EndIf
- TimerReset
- Refresh
-
-
-
-
- If MachineStage = "get-lid" Then
- Var GetLidOK = 1
-
- EndIf
-
- If MachineStage = "remove-cup" Then
- ;Var ProcessText = "กรุณานำเครื่องดื่มออก"
- ;Open "ROOT/xml/menu_page6_Open.xml"
- Var RemoveCup = 1
- EndIf
-
-
-
-
- Var AckPayOK = 1
-
-
-
-
-;
-; 183
-; 350
-; GIFShowProcess
-;
-
-
-
-
-
-
- Open "/media/bt/xml/security_alarm.xml"
-
-
-
-
diff --git a/xml/menu_page6_Open.xml b/xml/menu_page6_Open.xml
deleted file mode 100644
index e5ff12cc..00000000
--- a/xml/menu_page6_Open.xml
+++ /dev/null
@@ -1,101 +0,0 @@
-
-
- 1080
- 1312
- p6OpenBG
-
-
-
- ; On open
- TopView "show"
-
- Var Timeout = 0
- Var ProcessText = "กรุณานำเครื่องดื่มออก"
-
-
-
- 1000
-
- ;Open "ROOT/xml/menu_board.xml"
-
- Var Timeout = Timeout + 1
-
- If HaveCup = "false" Then
- If ServiceSuccess = "yes" Then
- Var ServiceSuccess = "no"
- Var TelephoneNumber = ""
- Var Tel_Confirm_State = "Disable"
-
- ;If CodeChannel = 1 Then
- ; Open "ROOT/xml/menu_Page7.xml"
- ;EndIf
-
- If SelectDrink = "11-01-02-0009" Then
- Open "ROOT/xml/menu_Page7.xml"
- EndIf
-
- ;Open "ROOT/xml/menu_CollectPoint_Page1.xml"
- Open "ROOT/xml/menu_Page7.xml"
-
- Else
- Open "ROOT/xml/menu_closeMaintenance.xml"
- EndIf
-
- EndIf
-
-
- TimerReset
-
-
-
-
-
-
-
-
-
-
-
- 250
- 460
- p6OpenGIF
-
-
-
-
-
- 395
- 250
-300
- Center
- 30
- fontType1
- 0x000000
- ProcessText
-
-
-
-
-
-
-
-
- Open "/media/bt/xml/security_alarm.xml"
-
-
-
-
diff --git a/xml/menu_page7.xml b/xml/menu_page7.xml
deleted file mode 100644
index 05e474ca..00000000
--- a/xml/menu_page7.xml
+++ /dev/null
@@ -1,97 +0,0 @@
-
-
- 1080
- 1312
- "ROOT/image2/BG_MENU_PAGE.bmp"
- "ROOT/sounds/coffee_thankyou.wav"
-
-
- ; On open
- TopView "hide"
-
- Var Timeout = 0
-
- Var WasGetLid = "Enable"
- Var WasGetStraw = "Enable"
-
-
- 1000
-
- ;Open "ROOT/xml/menu_board.xml"
-
- Var Timeout = Timeout + 1
- If Timeout > 20 Then
- Open "ROOT/xml/menu_board.xml"
- EndIf
-
- TimerReset
- Refresh
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- Open "/media/bt/xml/security_alarm.xml"
-
-
-
-
diff --git a/xml/menu_pageConsent.xml b/xml/menu_pageConsent.xml
deleted file mode 100644
index 2bb1b001..00000000
--- a/xml/menu_pageConsent.xml
+++ /dev/null
@@ -1,77 +0,0 @@
-
-
- 1080
- 1312
- "ROOT/image/BG_Consent.bmp"
-
-
-
- ; On open
-
-
- Var Timeout = 0
-
-
-
-
- 1000
-
- ;Open "ROOT/xml/menu_board.xml"
-
- Var Timeout = Timeout + 1
- If Timeout > 20 Then
- Open "ROOT/xml/menu_page5.xml"
- EndIf
-
- TimerReset
- Refresh
-
-
-
- If MachineStage = "drink-success" Then
- Var MachineState_Result = 1
- EndIf
-
- If MachineStage = "drink-failed" Then
- Var MachineState_Result = 1
- EndIf
-
-
-
-
-
-
-
-
-
-
-
-
- Open "/media/bt/xml/security_alarm.xml"
-
-
-
-
diff --git a/xml/menu_payment_cash.xml b/xml/menu_payment_cash.xml
index 40b151ac..b8fe3223 100644
--- a/xml/menu_payment_cash.xml
+++ b/xml/menu_payment_cash.xml
@@ -140,6 +140,7 @@
Var PayState1 = "PressForever"
Var PayState2 = "Enable"
Var PayState3 = "Enable"
+ Var showRemaining = charOfBaht + RemainAmountStr
EndIf
If GetPayInfoFlag = 0 Then
diff --git a/xml/menu_payment_code.xml b/xml/menu_payment_code.xml
index 55166c38..61961737 100644
--- a/xml/menu_payment_code.xml
+++ b/xml/menu_payment_code.xml
@@ -372,10 +372,10 @@
- 361
- 873
+ 213
+ 606
ShowTextNumber
- "ROOT/taobin_project/image/collectiing/text1.png"
+ "ROOT/taobin_project/image/enter_point/text3.png"
@@ -396,7 +396,7 @@
112
593
- "ROOT/taobin_project/image/enter_point/text1.png"
+ "ROOT/taobin_project/image/enter_point/text2.png"