First start TaoBin

This commit is contained in:
Wanlop 2020-09-14 15:09:29 +07:00
commit a497d17fc2
54 changed files with 27396 additions and 0 deletions

View file

@ -0,0 +1,342 @@
<Page>
<Width> 1080 </Width>
<Height> 1312 </Height>
<Background> "ROOT/image/BG_Menu_Point_Page1.bmp" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
; On open
TopView "hide"
Var Timeout = 0
Var TelephoneNumber = ""
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
Var Timeout = Timeout + 1
If Timeout > 20 Then
Open "/media/bt/xml/menu_page5.xml"
EndIf
TimerReset
Refresh
</EventTimeout>
<Button>
<X> 413 </X>
<Y> 458 </Y>
<Filename> "ROOT/image/BN_1.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_1.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var TelephoneNumber = TelephoneNumber + "1"
Trim TelephoneNumber 10
TimerReset
Refresh
StrLen TelephoneNumber TelNumLen
If TelNumLen >= 10 Then
Var Tel_Confirm_State = "Enable"
EndIf
</EventClick>
</Button>
<Button>
<X> 498 </X>
<Y> 458 </Y>
<Filename> "ROOT/image/BN_2.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_2.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var TelephoneNumber = TelephoneNumber + "2"
Trim TelephoneNumber 10
TimerReset
Refresh
StrLen TelephoneNumber TelNumLen
If TelNumLen >= 10 Then
Var Tel_Confirm_State = "Enable"
EndIf
</EventClick>
</Button>
<Button>
<X> 582 </X>
<Y> 458 </Y>
<Filename> "ROOT/image/BN_3.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_3.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var TelephoneNumber = TelephoneNumber + "3"
Trim TelephoneNumber 10
TimerReset
Refresh
StrLen TelephoneNumber TelNumLen
If TelNumLen >= 10 Then
Var Tel_Confirm_State = "Enable"
EndIf
</EventClick>
</Button>
<Button>
<X> 413 </X>
<Y> 535 </Y>
<Filename> "ROOT/image/BN_4.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_4.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var TelephoneNumber = TelephoneNumber + "4"
Trim TelephoneNumber 10
TimerReset
Refresh
StrLen TelephoneNumber TelNumLen
If TelNumLen >= 10 Then
Var Tel_Confirm_State = "Enable"
EndIf
</EventClick>
</Button>
<Button>
<X> 498 </X>
<Y> 535 </Y>
<Filename> "ROOT/image/BN_5.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_5.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var TelephoneNumber = TelephoneNumber + "5"
Trim TelephoneNumber 10
TimerReset
Refresh
StrLen TelephoneNumber TelNumLen
If TelNumLen >= 10 Then
Var Tel_Confirm_State = "Enable"
EndIf
</EventClick>
</Button>
<Button>
<X> 582 </X>
<Y> 535 </Y>
<Filename> "ROOT/image/BN_6.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_6.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var TelephoneNumber = TelephoneNumber + "6"
Trim TelephoneNumber 10
TimerReset
Refresh
StrLen TelephoneNumber TelNumLen
If TelNumLen >= 10 Then
Var Tel_Confirm_State = "Enable"
EndIf
</EventClick>
</Button>
<Button>
<X> 413 </X>
<Y> 612 </Y>
<Filename> "ROOT/image/BN_7.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_7.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var TelephoneNumber = TelephoneNumber + "7"
Trim TelephoneNumber 10
TimerReset
Refresh
StrLen TelephoneNumber TelNumLen
If TelNumLen >= 10 Then
Var Tel_Confirm_State = "Enable"
EndIf
</EventClick>
</Button>
<Button>
<X> 498 </X>
<Y> 612 </Y>
<Filename> "ROOT/image/BN_8.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_8.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var TelephoneNumber = TelephoneNumber + "8"
Trim TelephoneNumber 10
TimerReset
Refresh
StrLen TelephoneNumber TelNumLen
If TelNumLen >= 10 Then
Var Tel_Confirm_State = "Enable"
EndIf
</EventClick>
</Button>
<Button>
<X> 582 </X>
<Y> 612 </Y>
<Filename> "ROOT/image/BN_9.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_9.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var TelephoneNumber = TelephoneNumber + "9"
Trim TelephoneNumber 10
TimerReset
Refresh
StrLen TelephoneNumber TelNumLen
If TelNumLen >= 10 Then
Var Tel_Confirm_State = "Enable"
EndIf
</EventClick>
</Button>
<Button>
<X> 413 </X>
<Y> 689 </Y>
<Filename> "ROOT/image/BN_Star.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_Star.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
</EventClick>
</Button>
<Button>
<X> 498 </X>
<Y> 689 </Y>
<Filename> "ROOT/image/BN_0.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_0.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var TelephoneNumber = TelephoneNumber + "0"
Trim TelephoneNumber 10
TimerReset
Refresh
StrLen TelephoneNumber TelNumLen
If TelNumLen >= 10 Then
Var Tel_Confirm_State = "Enable"
EndIf
</EventClick>
</Button>
<Button>
<X> 582 </X>
<Y> 689 </Y>
<Filename> "ROOT/image/BN_#.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_#.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
</EventClick>
</Button>
<Button>
<X> 373 </X>
<Y> 779 </Y>
<Filename> "ROOT/image/BN_Skip.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_Skip.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Open "/media/bt/xml/menu_page5.xml"
</EventClick>
</Button>
<Button>
<X> 486 </X>
<Y> 779 </Y>
<Filename> "ROOT/image/BN_Edit.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_Edit.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Trim TelephoneNumber -1
Var Tel_Confirm_State = "Disable"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 600 </X>
<Y> 779 </Y>
<State> Tel_Confirm_State </State>
<Filename> "ROOT/image/BN_Confirm.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_Confirm.bmp" </FilenamePress>
<FilenameDisable> "ROOT/image/BD_Confirm.bmp" </FilenameDisable>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var StepGetPoint = 0
;GETACCEXT TelephoneNumber 5
Var PdpaAsk = 0
Var OperatorTemp = ""
Var CreditAmount = 0
Var OperatorStatus = ""
Var AccountType = ""
GetAccInfo TelephoneNumber OperatorTemp CreditAmount OperatorStatus AccountType GetScore tc
Open "/media/bt/xml/menu_CollectPoint_Page2.xml"
</EventClick>
</Button>
<Text>
<X> 310 </X>
<Y> 380 </Y>
<Width> 474 </Width>
<Align> Center </Align>
<Size> 50 </Size>
<Font> fontType1 </Font>
<Color> 0xF0E000 </Color>
<Value> TelephoneNumber </Value>
<Format> Telnum </Format>
</Text>
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
</EventSecurity>
<EventMachine>
If MachineStage = "drink-success" Then
Var MachineState_Result = 1
EndIf
If MachineStage = "drink-failed" Then
Var MachineState_Result = 1
EndIf
</EventMachine>
</Page>

View file

@ -0,0 +1,120 @@
<Page>
<Width> 1080 </Width>
<Height> 1312 </Height>
<Background> "ROOT/image/BG_Menu_Point_Page1.bmp" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
; On open
Var Timeout = 0
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
;Open "ROOT/xml/menu_board.xml"
Var Timeout = Timeout + 1
If Timeout > 30 Then
;Var CoffeePoint = 1
;Open "/media/bt/xml/menu_CollectPoint_Page3.xml"
If StepGetPoint = 0 Then
Open "/media/bt/xml/menu_pageConsent.xml"
Else
Var CoffeePoint = 1
Open "/media/bt/xml/menu_CollectPoint_Page3.xml"
EndIf
EndIf
TimerReset
Refresh
</EventTimeout>
<Text>
<X> 310 </X>
<Y> 380 </Y>
<Width> 474 </Width>
<Align> Center </Align>
<Size> 50 </Size>
<Font> fontType1 </Font>
<Color> 0xF0E000 </Color>
<Value> TelephoneNumber </Value>
<Format> Telnum </Format>
</Text>
<Text>
<X> 310 </X>
<Y> 550 </Y>
<Width> 474 </Width>
<Align> Center </Align>
<Size> 50 </Size>
<Font> fontType1 </Font>
<Color> 0xF0E000 </Color>
<Value> "กรุณารอซักครู่..." </Value>
</Text>
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
</EventSecurity>
<EventActionOk>
If StepGetPoint = 0 Then
If PdpaAsk = 0 Then
Open "/media/bt/xml/menu_pageConsent.xml"
Else
Var StepGetPoint = 1
GETACCEXT TelephoneNumber 5
Open "/media/bt/xml/menu_CollectPoint_Page2.xml"
EndIf
Else
If Ext1a = "" Then
Var CoffeePoint = 1
Open "/media/bt/xml/menu_CollectPoint_Page3.xml"
Else
Var CoffeePoint1 = Ext21
INT CoffeePoint1
Var CoffeePoint = 1 + CoffeePoint1
Open "/media/bt/xml/menu_CollectPoint_Page3.xml"
EndIf
EndIf
</EventActionOk>
<EventActionError>
If StepGetPoint = 0 Then
Open "/media/bt/xml/menu_pageConsent.xml"
Else
Var CoffeePoint = 1
Open "/media/bt/xml/menu_CollectPoint_Page3.xml"
EndIf
</EventActionError>
<EventMachine>
If MachineStage = "drink-success" Then
Var MachineState_Result = 1
EndIf
If MachineStage = "drink-failed" Then
Var MachineState_Result = 1
EndIf
</EventMachine>
</Page>

View file

@ -0,0 +1,265 @@
<Page>
<Width> 1080 </Width>
<Height> 1312 </Height>
<Background> "ROOT/image/BG_Menu_Point_Page2.bmp" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
; On open
Var Timeout = 0
Var Point1_State = "Disable"
Var Point2_State = "Disable"
Var Point3_State = "Disable"
Var Point4_State = "Disable"
Var Point5_State = "Disable"
Var Point6_State = "Disable"
Var Point7_State = "Disable"
Var Point8_State = "Disable"
Var Point9_State = "Disable"
Var Point10_State = "Disable"
If CoffeePoint >= 1 Then
Var Point1_State = "Enable"
EndIf
If CoffeePoint >= 2 Then
Var Point2_State = "Enable"
EndIf
If CoffeePoint >= 3 Then
Var Point3_State = "Enable"
EndIf
If CoffeePoint >= 4 Then
Var Point4_State = "Enable"
EndIf
If CoffeePoint >= 5 Then
Var Point5_State = "Enable"
EndIf
If CoffeePoint >= 6 Then
Var Point6_State = "Enable"
EndIf
If CoffeePoint >= 7 Then
Var Point7_State = "Enable"
EndIf
If CoffeePoint >= 8 Then
Var Point8_State = "Enable"
EndIf
If CoffeePoint >= 9 Then
Var Point9_State = "Enable"
EndIf
If CoffeePoint >= 10 Then
Var Point10_State = "Enable"
EndIf
Var BmiYear = "0/0/0/1/0/0"
Var PointCrm = "pdpa1"
Var GetScore = ""
AddData 4 TelephoneNumber BmiYear PointCrm GetScore
Var CoffeePointStr = CoffeePoint
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
;Open "ROOT/xml/menu_board.xml"
Var Timeout = Timeout + 1
If Timeout > 20 Then
Open "ROOT/xml/menu_page5.xml"
EndIf
TimerReset
Refresh
</EventTimeout>
<Button>
<X> 146 </X>
<Y> 490 </Y>
<State> Point1_State </State>
<Filename> "ROOT/image/BP_POINT1.bmp" </Filename>
<FilenameDisable> "ROOT/image/BD_POINT1.bmp" </FilenameDisable>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
</EventClick>
</Button>
<Button>
<X> 241 </X>
<Y> 490 </Y>
<State> Point2_State </State>
<Filename> "ROOT/image/BP_POINT2.bmp" </Filename>
<FilenameDisable> "ROOT/image/BD_POINT2.bmp" </FilenameDisable>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
</EventClick>
</Button>
<Button>
<X> 336 </X>
<Y> 490 </Y>
<State> Point3_State </State>
<Filename> "ROOT/image/BP_POINT3.bmp" </Filename>
<FilenameDisable> "ROOT/image/BD_POINT3.bmp" </FilenameDisable>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
</EventClick>
</Button>
<Button>
<X> 430 </X>
<Y> 490 </Y>
<State> Point4_State </State>
<Filename> "ROOT/image/BP_POINT4.bmp" </Filename>
<FilenameDisable> "ROOT/image/BD_POINT4.bmp" </FilenameDisable>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
</EventClick>
</Button>
<Button>
<X> 525 </X>
<Y> 490 </Y>
<State> Point5_State </State>
<Filename> "ROOT/image/BP_POINT5.bmp" </Filename>
<FilenameDisable> "ROOT/image/BD_POINT5.bmp" </FilenameDisable>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
</EventClick>
</Button>
<Button>
<X> 146 </X>
<Y> 592 </Y>
<State> Point6_State </State>
<Filename> "ROOT/image/BP_POINT6.bmp" </Filename>
<FilenameDisable> "ROOT/image/BD_POINT6.bmp" </FilenameDisable>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
</EventClick>
</Button>
<Button>
<X> 241 </X>
<Y> 592 </Y>
<State> Point7_State </State>
<Filename> "ROOT/image/BP_POINT7.bmp" </Filename>
<FilenameDisable> "ROOT/image/BD_POINT7.bmp" </FilenameDisable>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
</EventClick>
</Button>
<Button>
<X> 336 </X>
<Y> 592 </Y>
<State> Point8_State </State>
<Filename> "ROOT/image/BP_POINT8.bmp" </Filename>
<FilenameDisable> "ROOT/image/BD_POINT8.bmp" </FilenameDisable>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
</EventClick>
</Button>
<Button>
<X> 430 </X>
<Y> 592 </Y>
<State> Point9_State </State>
<Filename> "ROOT/image/BP_POINT9.bmp" </Filename>
<FilenameDisable> "ROOT/image/BD_POINT9.bmp" </FilenameDisable>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
</EventClick>
</Button>
<Button>
<X> 525 </X>
<Y> 592 </Y>
<State> Point10_State </State>
<Filename> "ROOT/image/BP_POINT10.bmp" </Filename>
<FilenameDisable> "ROOT/image/BD_POINT10.bmp" </FilenameDisable>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
</EventClick>
</Button>
<Button>
<X> 484 </X>
<Y> 813 </Y>
<Filename> "ROOT/image/BP_Close.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_Close.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Open "ROOT/xml/menu_page5.xml"
</EventClick>
</Button>
<Text>
<X> 310 </X>
<Y> 315 </Y>
<Width> 474 </Width>
<Align> Center </Align>
<Size> 50 </Size>
<Font> fontType1 </Font>
<Color> 0xF0E000 </Color>
<Value> TelephoneNumber </Value>
<Format> Telnum </Format>
</Text>
<Text>
<X> 500 </X>
<Y> 410 </Y>
<Width> 50 </Width>
<Align> Center </Align>
<Size> 35 </Size>
<Font> fontType1 </Font>
<Color> 0x000000 </Color>
<Value> CoffeePointStr </Value>
</Text>
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
</EventSecurity>
<EventMachine>
If MachineStage = "drink-success" Then
Var MachineState_Result = 1
EndIf
If MachineStage = "drink-failed" Then
Var MachineState_Result = 1
EndIf
</EventMachine>
</Page>

4
xml/menu_advert.xml Normal file
View file

@ -0,0 +1,4 @@
<Page>
<Width> HeadScreenWidth </Width>
<Height> HeadScreenHeight </Height>
</Page>

19
xml/menu_back_to_main.xml Normal file
View file

@ -0,0 +1,19 @@
<Popup>
<Width> 1080 </Width>
<Height> 1920 </Height>
<EventOpen>
OpenInst 0 "/mnt/sdcard/coffeevending/xml/menu_board_original2.xml"
OpenInst 1 "/mnt/sdcard/coffeevending/xml/test_video_loop.xml"
Open "/mnt/sdcard/coffeevending/xml/menu_list_original2.xml"
</EventOpen>
<Timeout> 60000 </Timeout>
<EventTimeout>
;Var menu_status = "stop"
</EventTimeout>
</Popup>

37
xml/menu_board.xml Normal file
View file

@ -0,0 +1,37 @@
<Page>
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1312 </Height>
<Background> "ROOT/image/BG1SLOT_TAB.bmp" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
TopView "show"
; On open
If VendingClass = "coffeeInthanin01" Then
Var subClass = "inthanin"
Open "ROOT/xml/menu_board_inthanin.xml"
Else
Var subClass = ""
Open "ROOT/xml/menu_board_original2.xml"
EndIf
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
TimerReset
Refresh
</EventTimeout>
<EventNetDown>
Open "/mnt/sdcard/coffeevending/xml/main.xml"
</EventNetDown>
<EventNetDeactive>
Open "/mnt/sdcard/coffeevending/xml/main.xml"
</EventNetDeactive>
</Page>

54
xml/menu_board2.xml Normal file
View file

@ -0,0 +1,54 @@
<Page>
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1312 </Height>
<Background> "ROOT/image/BG1SLOT_TAB.bmp" </Background>
<Sound> "ROOT/sounds/selectDrink.wav" </Sound>
<Volume> SoundVolume </Volume>
<Image>
<X>1020</X>
<Y>1250</Y>
<Width> 50 </Width>
<Height> 50 </Height>
<EventClick>
Open "ROOT/xml/vending_info.xml"
</EventClick>
</Image>
<Image>
<X>20</X>
<Y>1250</Y>
<Width> 50 </Width>
<Height> 50 </Height>
<EventClick>
Throw
</EventClick>
</Image>
<EventOpen>
TopView "show"
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
TimerReset
;Refresh
</EventTimeout>
<EventNetDown>
Open "/mnt/sdcard/coffeevending/xml/main.xml"
</EventNetDown>
<EventNetDeactive>
Open "/mnt/sdcard/coffeevending/xml/main.xml"
</EventNetDeactive>
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
</EventSecurity>
</Page>

2451
xml/menu_board_inthanin.xml Normal file

File diff suppressed because it is too large Load diff

3090
xml/menu_board_original.xml Normal file

File diff suppressed because it is too large Load diff

View file

@ -0,0 +1,135 @@
<Page>
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1312 </Height>
<Background> "ROOT/image/select_first.jpg" </Background>
<Sound> "ROOT/sounds/selectDrink.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventOpen>
TopView "show"
; On open
Var ServiceSuccess = "no"
Var p6OpenBG = "ROOT/image/BG_Menu_Page6_Open.bmp"
Var p6OpenGIF = "ROOT/image/Page6_Open.gif"
Var pCleanBG = "ROOT/image/BG_Clean.bmp"
Var pCleanGIF = "ROOT/image/CleanMachine.gif"
Var pUpgradeBG = "ROOT/image/BG_Clean.bmp"
Var pUpgradeGIF = "ROOT/image/UpgradeMachine.gif"
Var pMaintenanceBG = "ROOT/image/BG_CloseMaintenance.jpg"
Var p7LidGIF = "ROOT/image/gif_thank_lid.gif"
If MachineStage = "close-maintenance" Then
;Open "ROOT/xml/menu_closeMaintenance.xml"
EndIf
If MachineStage = "clean-machine" Then
Open "ROOT/xml/menu_cleanMachine.xml"
EndIf
If MachineStage = "mcu-upgrade" Then
Open "ROOT/xml/menu_upgradeMCU.xml"
EndIf
If NeedUpgrade = "true" Then
Open "ROOT/xml/menu_upgrading.xml"
EndIf
If HaveCup = "true" Then
Open "ROOT/xml/menu_Page6_Open.xml"
EndIf
Var DiscountDrink = 0
Var SelectSlot = "0"
Var rootMenu = "ROOT/image/"
Var Timeout = 0
Var TMenuLang = 0
Var MenuLangTH = 0
If BrewCommand = "RefreshAll" Then
SAVELOG "Brew command RefreshAll"
Var BrewCommand = ""
OpenInst 1 "/mnt/sdcard/coffeevending/xml/menu_advert.xml"
OpenInst 2 "/mnt/sdcard/coffeevending/xml/menu_list_show_all.xml"
Open "/mnt/sdcard/coffeevending/xml/menu_main_blank.xml"
EndIf
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
;Open "/mnt/sdcard/coffeevending/xml/menu_board.xml"
If BrewCommand = "RefreshAll" Then
SAVELOG "Brew command RefreshAll"
Var BrewCommand = ""
OpenInst 1 "/mnt/sdcard/coffeevending/xml/menu_advert.xml"
OpenInst 2 "/mnt/sdcard/coffeevending/xml/menu_list_show_all.xml"
Open "/mnt/sdcard/coffeevending/xml/menu_main_blank.xml"
EndIf
If MachineStage = "close-maintenance" Then
;Open "ROOT/xml/menu_closeMaintenance.xml"
EndIf
If MachineStage = "clean-machine" Then
Open "ROOT/xml/menu_cleanMachine.xml"
EndIf
If MachineStage = "mcu-upgrade" Then
Open "ROOT/xml/menu_upgradeMCU.xml"
EndIf
If NeedUpgrade = "true" Then
Open "ROOT/xml/menu_upgrading.xml"
EndIf
Refresh
TimerReset
;Refresh
</EventTimeout>
<EventNetDown>
Open "/mnt/sdcard/coffeevending/xml/main.xml"
</EventNetDown>
<EventNetDeactive>
Open "/mnt/sdcard/coffeevending/xml/main.xml"
</EventNetDeactive>
<Image>
<X> 0 </X>
<Y> 170 </Y>
<Animation> "Shake3" </Animation>
<Filename> "ROOT/image/cup_left.png" </Filename>
<EventClick>
Var MenuLangTH = 0
OpenInst 1 "/mnt/sdcard/coffeevending/xml/menu_advert.xml"
OpenInst 2 "/mnt/sdcard/coffeevending/xml/menu_list_show_less.xml"
Open "/mnt/sdcard/coffeevending/xml/menu_main_blank.xml"
</EventClick>
</Image>
<Image>
<X> 540 </X>
<Y> 100 </Y>
<Visible> False </Visible>
<EventClick> Open "/ROOT/xml/service_menu.xml" </EventClick>
</Image>
</Page>

66
xml/menu_cleanMachine.xml Normal file
View file

@ -0,0 +1,66 @@
<Page>
<Width> 1080 </Width>
<Height> 1312 </Height>
<Background> pCleanBG </Background>
<EventOpen>
; On open
TopView "show"
Var Timeout = 0
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
;Open "ROOT/xml/menu_board.xml"
If MachineStage = "clean-finish" Then
Open "ROOT/xml/menu_board.xml"
EndIf
If MachineStage = "show-menu" Then
Open "ROOT/xml/menu_board.xml"
EndIf
TimerReset
;Refresh
</EventTimeout>
<EventMachine>
If MachineStage = "show-menu" Then
Open "ROOT/xml/menu_board.xml"
EndIf
</EventMachine>
<GIF>
<X> 183 </X>
<Y> 350 </Y>
<Filename> pCleanGIF </Filename>
</GIF>
<Text>
<X> 395 </X>
<Y> 250 </Y>
<Width>300</Width>
<Align> Center </Align>
<Size> 30 </Size>
<Font> fontType1 </Font>
<Color> 0x000000 </Color>
<Value> "กำลังล้างเครื่อง" </Value>
</Text>
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
</EventSecurity>
</Page>

View file

@ -0,0 +1,110 @@
<Page>
<Width> 1080 </Width>
<Height> 1312 </Height>
<Background> pMaintenanceBG </Background>
<EventOpen>
; On open
TopView "show"
Var Timeout = 0
;Var ProcessText = "ระบบปิดให้บริการ"
If NeedUpgrade = "true" Then
Open "ROOT/xml/menu_upgrading.xml"
EndIf
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
Var Timeout = Timeout + 1
If HaveCup = "true" Then
Open "ROOT/xml/menu_Page6_Open.xml"
EndIf
If MachineStage = "show-menu" Then
Open "ROOT/xml/menu_board.xml"
EndIf
If NeedUpgrade = "true" Then
Open "ROOT/xml/menu_upgrading.xml"
EndIf
Refresh
TimerReset
</EventTimeout>
<EventMachine>
If HaveCup = "true" Then
Open "ROOT/xml/menu_Page6_Open.xml"
EndIf
If MachineStage = "show-menu" Then
Open "ROOT/xml/menu_board.xml"
EndIf
</EventMachine>
<Text>
<X> 395 </X>
<Y> 250 </Y>
<Width>300</Width>
<Align> Center </Align>
<Size> 30 </Size>
<Font> fontType1 </Font>
<Color> 0x000000 </Color>
<Value> ProcessText </Value>
</Text>
<Image>
<X>1020</X>
<Y>1250</Y>
<Width> 50 </Width>
<Height> 50 </Height>
<EventClick>
Open "ROOT/xml/vending_info.xml"
</EventClick>
</Image>
<Image>
<X>0</X>
<Y>1262</Y>
<Filename> "ROOT/image/BG_TabRed.png" </Filename>
<EventClick>
</EventClick>
</Image>
<Text>
<X> 10 </X>
<Y> 1270 </Y>
<Width>300</Width>
<Size> 20 </Size>
<Font> fontType1 </Font>
<Color> 0x000000 </Color>
<Value> MachineErrorDetail </Value>
</Text>
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
</EventSecurity>
</Page>

30
xml/menu_confirm.xml Normal file
View file

@ -0,0 +1,30 @@
<Page>
<Width> 1080 </Width>
<Height> 1288 </Height>
<Background> "ROOT/ui/bg_main_menu.png" </Background>
<EventOpen>
; On open
Var payment = "cash"
Var showPic = "ROOT/ui/page_02_choose_an_additional/" + PictureDrink
</EventOpen>
<Timeout> 5000 </Timeout>
<EventTimeout>
Open "ROOT/xml/menu_board.xml"
</EventTimeout>
<Image>
<X> 100 </X>
<Y> 100 </Y>
<Filename> showPic </Filename>
</Image>
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
</EventSecurity>
</Page>

29
xml/menu_list.xml Normal file
View file

@ -0,0 +1,29 @@
<Popup>
<Width> 1080 </Width>
<Height> 1920 </Height>
<EventOpen>
Var menu_status = "run"
If VendingClass = "coffeeInthanin01" Then
Open "ROOT/xml/menu_list_inthanin.xml"
Else
Open "ROOT/xml/menu_list_original2.xml"
EndIf
</EventOpen>
<Timeout> 10000 </Timeout>
<EventTimeout>
;Var menu_status = "stop"
TimerReset
Refresh
</EventTimeout>
</Popup>

229
xml/menu_list_inthanin.xml Normal file
View file

@ -0,0 +1,229 @@
<Popup>
<Width> 1080 </Width>
<Height> 1920 </Height>
<EventOpen>
Var menu_status = "run"
If Menu_list_LN = "TH" Then
Var Menu1BN_FN = "ROOT/image/BN_Drink_Inthanin.bmp"
Var Menu1BP_FN = "ROOT/image/BP_Drink_Inthanin.bmp"
Var Menu2BN_FN = "ROOT/image/BN_Member_Inthanin.bmp"
Var Menu2BP_FN = "ROOT/image/BP_Member_Inthanin.bmp"
Var Menu3BN_FN = "ROOT/image/BN_Topup_Inthanin.bmp"
Var Menu3BP_FN = "ROOT/image/BP_Topup_Inthanin.bmp"
Var Menu4BN_FN = "ROOT/image/BN_Product_Inthanin.bmp"
Var Menu4BP_FN = "ROOT/image/BP_Product_Inthanin.bmp"
Var Menu5BN_FN = "ROOT/image/BN_Etc_Inthanin.bmp"
Var Menu5BP_FN = "ROOT/image/BP_Etc_Inthanin.bmp"
Var Menu6BN_FN = "ROOT/image/BN_Problem_Inthanin.bmp"
Var Menu6BP_FN = "ROOT/image/BP_Problem_Inthanin.bmp"
Else
Var Menu1BN_FN = "ROOT/image/BN_Drink_Inthanin_ENG.bmp"
Var Menu1BP_FN = "ROOT/image/BP_Drink_Inthanin_ENG.bmp"
Var Menu2BN_FN = "ROOT/image/BN_Member_Inthanin_ENG.bmp"
Var Menu2BP_FN = "ROOT/image/BP_Member_Inthanin_ENG.bmp"
Var Menu3BN_FN = "ROOT/image/BN_Topup_Inthanin_ENG.bmp"
Var Menu3BP_FN = "ROOT/image/BP_Topup_Inthanin_ENG.bmp"
Var Menu4BN_FN = "ROOT/image/BN_Product_Inthanin_ENG.bmp"
Var Menu4BP_FN = "ROOT/image/BP_Product_Inthanin_ENG.bmp"
Var Menu5BN_FN = "ROOT/image/BN_Etc_Inthanin_ENG.bmp"
Var Menu5BP_FN = "ROOT/image/BP_Etc_Inthanin_ENG.bmp"
Var Menu6BN_FN = "ROOT/image/BN_Problem_Inthanin_ENG.bmp"
Var Menu6BP_FN = "ROOT/image/BP_Problem_Inthanin_ENG.bmp"
EndIf
</EventOpen>
<Timeout> 10000 </Timeout>
<EventTimeout>
;Var menu_status = "stop"
TimerReset
Refresh
</EventTimeout>
<Button>
<X> 10 </X>
<Y> 618 </Y>
<state>buttonState1</state>
<Filename> Menu1BN_FN </Filename>
<FilenamePress> Menu1BP_FN </FilenamePress>
<FilenameDisable> Menu1BD_FN </FilenameDisable>
<Sound> "ROOT/sounds/Mainbuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
MainOpen "ROOT/xml/menu_board.xml"
</EventClick>
</Button>
<Button>
<X> 163 </X>
<Y> 618 </Y>
<state>buttonState2</state>
<Filename> Menu2BN_FN </Filename>
<FilenamePress> Menu2BP_FN </FilenamePress>
<Sound> "ROOT/sounds/Mainbuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
;Var TelephoneNumber = ""
;Var Tel_Confirm_State = "Disable"
;MainOpen "ROOT/xml/menu_CollectPoint_Page1.xml"
</EventClick>
</Button>
<Button>
<X> 317 </X>
<Y> 618 </Y>
<Filename> Menu3BN_FN </Filename>
<FilenamePress> Menu3BP_FN </FilenamePress>
<Sound> "ROOT/sounds/Mainbuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var ServiceAmountLine = ""
Var CheckTypeLine = "o/"
Var SalePackage = 0
Var ServiceGroup = ""
Var AccTeleNumber = ""
Var Donate = "L1"
Var GetScore = ""
Var AccountType = ""
Var SuggestID = ""
Var ServiceType = ""
Var SessionID = ""
Var ServiceParameter = ""
Var OperatorName = ""
Var TelephoneNumber = ""
If Menu_list_LN = "TH" Then
MainOpen "ROOT/xml/service_menu.xml"
Else
MainOpen "ROOT/xml/eng_mobile_telnum.xml"
EndIf
</EventClick>
</Button>
<Button>
<X> 470 </X>
<Y> 618 </Y>
<Filename> Menu4BN_FN </Filename>
<FilenamePress> Menu4BP_FN </FilenamePress>
<Sound> "ROOT/sounds/Mainbuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
</EventClick>
</Button>
<Button>
<X> 623 </X>
<Y> 618 </Y>
<Filename> Menu5BN_FN </Filename>
<FilenamePress> Menu5BP_FN </FilenamePress>
<Sound> "ROOT/sounds/Mainbuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
</EventClick>
</Button>
<Button>
<X> 775 </X>
<Y> 618 </Y>
<Filename> "ROOT/image/BN_Thai_Inthanin.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_Thai_Inthanin.bmp" </FilenamePress>
<Sound> "ROOT/sounds/Mainbuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Menu_list_LN = "TH"
Var Menu1BN_FN = "ROOT/image/BN_Drink_Inthanin.bmp"
Var Menu1BP_FN = "ROOT/image/BP_Drink_Inthanin.bmp"
Var Menu1BD_FN = "ROOT/image/BD_Drink_Inthanin.bmp"
Var Menu2BN_FN = "ROOT/image/BN_Member_Inthanin.bmp"
Var Menu2BP_FN = "ROOT/image/BP_Member_Inthanin.bmp"
Var Menu3BN_FN = "ROOT/image/BN_Topup_Inthanin.bmp"
Var Menu3BP_FN = "ROOT/image/BP_Topup_Inthanin.bmp"
Var Menu4BN_FN = "ROOT/image/BN_Product_Inthanin.bmp"
Var Menu4BP_FN = "ROOT/image/BP_Product_Inthanin.bmp"
Var Menu5BN_FN = "ROOT/image/BN_Etc_Inthanin.bmp"
Var Menu5BP_FN = "ROOT/image/BP_Etc_Inthanin.bmp"
Var Menu6BN_FN = "ROOT/image/BN_Problem_Inthanin.bmp"
Var Menu6BP_FN = "ROOT/image/BP_Problem_Inthanin.bmp"
Open "ROOT/xml/menu_list.xml"
</EventClick>
</Button>
<Button>
<X> 853 </X>
<Y> 618 </Y>
<Filename> "ROOT/image/BN_ENG_Inthanin.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_ENG_Inthanin.bmp" </FilenamePress>
<Sound> "ROOT/sounds/Mainbuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Menu_list_LN = "ENG"
Var Menu1BN_FN = "ROOT/image/BN_Drink_Inthanin_ENG.bmp"
Var Menu1BP_FN = "ROOT/image/BP_Drink_Inthanin_ENG.bmp"
Var Menu1BD_FN = "ROOT/image/BD_Drink_Inthanin_ENG.bmp"
Var Menu2BN_FN = "ROOT/image/BN_Member_Inthanin_ENG.bmp"
Var Menu2BP_FN = "ROOT/image/BP_Member_Inthanin_ENG.bmp"
Var Menu3BN_FN = "ROOT/image/BN_Topup_Inthanin_ENG.bmp"
Var Menu3BP_FN = "ROOT/image/BP_Topup_Inthanin_ENG.bmp"
Var Menu4BN_FN = "ROOT/image/BN_Product_Inthanin_ENG.bmp"
Var Menu4BP_FN = "ROOT/image/BP_Product_Inthanin_ENG.bmp"
Var Menu5BN_FN = "ROOT/image/BN_Etc_Inthanin_ENG.bmp"
Var Menu5BP_FN = "ROOT/image/BP_Etc_Inthanin_ENG.bmp"
Var Menu6BN_FN = "ROOT/image/BN_Problem_Inthanin_ENG.bmp"
Var Menu6BP_FN = "ROOT/image/BP_Problem_Inthanin_ENG.bmp"
Open "ROOT/xml/menu_list.xml"
</EventClick>
</Button>
<Button>
<X> 930 </X>
<Y> 618 </Y>
<Filename> Menu6BN_FN </Filename>
<FilenamePress> Menu6BP_FN </FilenamePress>
<Sound> "ROOT/sounds/Mainbuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClickLong>
;MainOpen "ROOT/xml/test_font.xml"
VendingAccess
</EventClickLong>
<EventClick>
;MainOpen "ROOT/xml/test_font.xml"
Var TelephoneNumber = ""
If Menu_list_LN = "TH" Then
MainOpen "ROOT/xml/tellproblem_telnum.xml"
Else
MainOpen "ROOT/xml/eng_tellproblem_telnum.xml"
EndIf
;MainOpen "ROOT/xml/menu_problem.xml"
</EventClick>
</Button>
</Popup>

232
xml/menu_list_original.xml Normal file
View file

@ -0,0 +1,232 @@
<Popup>
<Width> 1080 </Width>
<Height> 1920 </Height>
<EventOpen>
Var menu_status = "run"
If VendingClass = "coffeeInthanin01" Then
Open "ROOT/xml/menu_list_inthanin.xml"
EndIf
If Menu_list_LN = "TH" Then
Var Menu1BN_FN = "ROOT/image/BN_Drink.bmp"
Var Menu1BP_FN = "ROOT/image/BP_Drink.bmp"
Var Menu2BN_FN = "ROOT/image/BN_Member.bmp"
Var Menu2BP_FN = "ROOT/image/BP_Member.bmp"
Var Menu3BN_FN = "ROOT/image/BN_Topup.bmp"
Var Menu3BP_FN = "ROOT/image/BP_Topup.bmp"
Var Menu4BN_FN = "ROOT/image/BN_Product.bmp"
Var Menu4BP_FN = "ROOT/image/BP_Product.bmp"
Var Menu5BN_FN = "ROOT/image/BN_Etc.bmp"
Var Menu5BP_FN = "ROOT/image/BP_Etc.bmp"
Var Menu6BN_FN = "ROOT/image/BN_Problem.bmp"
Var Menu6BP_FN = "ROOT/image/BP_Problem.bmp"
Else
Var Menu1BN_FN = "ROOT/image/BN_Drink_ENG.bmp"
Var Menu1BP_FN = "ROOT/image/BP_Drink_ENG.bmp"
Var Menu2BN_FN = "ROOT/image/BN_Member_ENG.bmp"
Var Menu2BP_FN = "ROOT/image/BP_Member_ENG.bmp"
Var Menu3BN_FN = "ROOT/image/BN_Topup_ENG.bmp"
Var Menu3BP_FN = "ROOT/image/BP_Topup_ENG.bmp"
Var Menu4BN_FN = "ROOT/image/BN_Product_ENG.bmp"
Var Menu4BP_FN = "ROOT/image/BP_Product_ENG.bmp"
Var Menu5BN_FN = "ROOT/image/BN_Etc_ENG.bmp"
Var Menu5BP_FN = "ROOT/image/BP_Etc_ENG.bmp"
Var Menu6BN_FN = "ROOT/image/BN_Problem_ENG.bmp"
Var Menu6BP_FN = "ROOT/image/BP_Problem_ENG.bmp"
EndIf
</EventOpen>
<Timeout> 60000 </Timeout>
<EventTimeout>
;Var menu_status = "stop"
Open "/mnt/sdcard/coffeevending/xml/menu_list_original.xml"
TimerReset
Refresh
</EventTimeout>
<Button>
<X> 10 </X>
<Y> 618 </Y>
<state>buttonState1</state>
<Filename> Menu1BN_FN </Filename>
<FilenamePress> Menu1BP_FN </FilenamePress>
<FilenameDisable> Menu1BD_FN </FilenameDisable>
<Sound> "ROOT/sounds/Mainbuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
OpenInst 0 "/mnt/sdcard/coffeevending/xml/menu_main_blank.xml"
OpenInst 1 "/mnt/sdcard/coffeevending/xml/menu_advert.xml"
Open "/mnt/sdcard/coffeevending/xml/menu_list_show_less.xml"
</EventClick>
</Button>
<Button>
<X> 163 </X>
<Y> 618 </Y>
<state>buttonState2</state>
<Filename> Menu2BN_FN </Filename>
<FilenamePress> Menu2BP_FN </FilenamePress>
<Sound> "ROOT/sounds/Mainbuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
;Var TelephoneNumber = ""
;Var Tel_Confirm_State = "Disable"
;MainOpen "ROOT/xml/menu_CollectPoint_Page1.xml"
MainOpen "/var/menu_board_original.xml"
</EventClick>
</Button>
<Button>
<X> 317 </X>
<Y> 618 </Y>
<Filename> Menu3BN_FN </Filename>
<FilenamePress> Menu3BP_FN </FilenamePress>
<Sound> "ROOT/sounds/Mainbuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var ServiceAmountLine = ""
Var CheckTypeLine = "o/"
Var SalePackage = 0
Var ServiceGroup = ""
Var AccTeleNumber = ""
Var Donate = "L1"
Var GetScore = ""
Var AccountType = ""
Var SuggestID = ""
Var ServiceType = ""
Var SessionID = ""
Var ServiceParameter = ""
Var OperatorName = ""
Var TelephoneNumber = ""
If Menu_list_LN = "TH" Then
MainOpen "ROOT/xml/service_menu.xml"
Else
MainOpen "ROOT/xml/eng_mobile_telnum.xml"
EndIf
</EventClick>
</Button>
<Button>
<X> 470 </X>
<Y> 618 </Y>
<Filename> Menu4BN_FN </Filename>
<FilenamePress> Menu4BP_FN </FilenamePress>
<Sound> "ROOT/sounds/Mainbuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
</EventClick>
</Button>
<Button>
<X> 623 </X>
<Y> 618 </Y>
<Filename> Menu5BN_FN </Filename>
<FilenamePress> Menu5BP_FN </FilenamePress>
<Sound> "ROOT/sounds/Mainbuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
</EventClick>
</Button>
<Button>
<X> 775 </X>
<Y> 618 </Y>
<Filename> "ROOT/image/BN_Thai.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_Thai.bmp" </FilenamePress>
<Sound> "ROOT/sounds/Mainbuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Menu_list_LN = "TH"
Var Menu1BN_FN = "ROOT/image/BN_Drink.bmp"
Var Menu1BP_FN = "ROOT/image/BP_Drink.bmp"
Var Menu1BD_FN = "ROOT/image/BD_Drink.bmp"
Var Menu2BN_FN = "ROOT/image/BN_Member.bmp"
Var Menu2BP_FN = "ROOT/image/BP_Member.bmp"
Var Menu3BN_FN = "ROOT/image/BN_Topup.bmp"
Var Menu3BP_FN = "ROOT/image/BP_Topup.bmp"
Var Menu4BN_FN = "ROOT/image/BN_Product.bmp"
Var Menu4BP_FN = "ROOT/image/BP_Product.bmp"
Var Menu5BN_FN = "ROOT/image/BN_Etc.bmp"
Var Menu5BP_FN = "ROOT/image/BP_Etc.bmp"
Var Menu6BN_FN = "ROOT/image/BN_Problem.bmp"
Var Menu6BP_FN = "ROOT/image/BP_Problem.bmp"
Open "ROOT/xml/menu_list.xml"
</EventClick>
</Button>
<Button>
<X> 853 </X>
<Y> 618 </Y>
<Filename> "ROOT/image/BN_ENG.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_ENG.bmp" </FilenamePress>
<Sound> "ROOT/sounds/Mainbuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Menu_list_LN = "ENG"
Var Menu1BN_FN = "ROOT/image/BN_Drink_ENG.bmp"
Var Menu1BP_FN = "ROOT/image/BP_Drink_ENG.bmp"
Var Menu1BD_FN = "ROOT/image/BD_Drink_ENG.bmp"
Var Menu2BN_FN = "ROOT/image/BN_Member_ENG.bmp"
Var Menu2BP_FN = "ROOT/image/BP_Member_ENG.bmp"
Var Menu3BN_FN = "ROOT/image/BN_Topup_ENG.bmp"
Var Menu3BP_FN = "ROOT/image/BP_Topup_ENG.bmp"
Var Menu4BN_FN = "ROOT/image/BN_Product_ENG.bmp"
Var Menu4BP_FN = "ROOT/image/BP_Product_ENG.bmp"
Var Menu5BN_FN = "ROOT/image/BN_Etc_ENG.bmp"
Var Menu5BP_FN = "ROOT/image/BP_Etc_ENG.bmp"
Var Menu6BN_FN = "ROOT/image/BN_Problem_ENG.bmp"
Var Menu6BP_FN = "ROOT/image/BP_Problem_ENG.bmp"
Open "ROOT/xml/menu_list.xml"
</EventClick>
</Button>
<Button>
<X> 930 </X>
<Y> 618 </Y>
<Filename> Menu6BN_FN </Filename>
<FilenamePress> Menu6BP_FN </FilenamePress>
<Sound> "ROOT/sounds/Mainbuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClickLong>
;MainOpen "ROOT/xml/test_font.xml"
VendingAccess
</EventClickLong>
<EventClick>
;MainOpen "ROOT/xml/test_font.xml"
Var TelephoneNumber = ""
If Menu_list_LN = "TH" Then
MainOpen "ROOT/xml/tellproblem_telnum.xml"
Else
MainOpen "ROOT/xml/eng_tellproblem_telnum.xml"
EndIf
;MainOpen "ROOT/xml/menu_problem.xml"
</EventClick>
</Button>
</Popup>

236
xml/menu_list_original2.xml Normal file
View file

@ -0,0 +1,236 @@
<Popup>
<Width> 1080 </Width>
<Height> 1920 </Height>
<EventOpen>
Var menu_status = "run"
If VendingClass = "coffeeInthanin01" Then
Open "ROOT/xml/menu_list_inthanin.xml"
EndIf
If Menu_list_LN = "TH" Then
Var Menu1BN_FN = "ROOT/image/BN_Drink.bmp"
Var Menu1BP_FN = "ROOT/image/BP_Drink.bmp"
Var Menu2BN_FN = "ROOT/image/BN_Member.bmp"
Var Menu2BP_FN = "ROOT/image/BP_Member.bmp"
Var Menu3BN_FN = "ROOT/image/BN_Topup.bmp"
Var Menu3BP_FN = "ROOT/image/BP_Topup.bmp"
Var Menu4BN_FN = "ROOT/image/BN_Product.bmp"
Var Menu4BP_FN = "ROOT/image/BP_Product.bmp"
Var Menu5BN_FN = "ROOT/image/BN_Etc.bmp"
Var Menu5BP_FN = "ROOT/image/BP_Etc.bmp"
Var Menu6BN_FN = "ROOT/image/BN_Problem.bmp"
Var Menu6BP_FN = "ROOT/image/BP_Problem.bmp"
Else
Var Menu1BN_FN = "ROOT/image/BN_Drink_ENG.bmp"
Var Menu1BP_FN = "ROOT/image/BP_Drink_ENG.bmp"
Var Menu2BN_FN = "ROOT/image/BN_Member_ENG.bmp"
Var Menu2BP_FN = "ROOT/image/BP_Member_ENG.bmp"
Var Menu3BN_FN = "ROOT/image/BN_Topup_ENG.bmp"
Var Menu3BP_FN = "ROOT/image/BP_Topup_ENG.bmp"
Var Menu4BN_FN = "ROOT/image/BN_Product_ENG.bmp"
Var Menu4BP_FN = "ROOT/image/BP_Product_ENG.bmp"
Var Menu5BN_FN = "ROOT/image/BN_Etc_ENG.bmp"
Var Menu5BP_FN = "ROOT/image/BP_Etc_ENG.bmp"
Var Menu6BN_FN = "ROOT/image/BN_Problem_ENG.bmp"
Var Menu6BP_FN = "ROOT/image/BP_Problem_ENG.bmp"
EndIf
</EventOpen>
<Timeout> 60000 </Timeout>
<EventTimeout>
;Var menu_status = "stop"
Open "/mnt/sdcard/coffeevending/xml/menu_list_original.xml"
TimerReset
Refresh
</EventTimeout>
<Button>
<X> 10 </X>
<Y> 618 </Y>
<state>buttonState1</state>
<Filename> Menu1BN_FN </Filename>
<FilenamePress> Menu1BP_FN </FilenamePress>
<FilenameDisable> Menu1BD_FN </FilenameDisable>
<Sound> "ROOT/sounds/Mainbuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
;MainOpen "ROOT/xml/menu_board.xml"
Var MenuLangTH = 0
OpenInst 0 "/mnt/sdcard/coffeevending/xml/menu_main_blank.xml"
OpenInst 1 "/mnt/sdcard/coffeevending/xml/menu_advert.xml"
Open "/mnt/sdcard/coffeevending/xml/menu_list_show_less.xml"
</EventClick>
</Button>
<Button>
<X> 163 </X>
<Y> 618 </Y>
<state>buttonState2</state>
<Filename> Menu2BN_FN </Filename>
<FilenamePress> Menu2BP_FN </FilenamePress>
<Sound> "ROOT/sounds/Mainbuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
;Var TelephoneNumber = ""
;Var Tel_Confirm_State = "Disable"
;MainOpen "ROOT/xml/menu_CollectPoint_Page1.xml"
MainOpen "/var/menu_board_original.xml"
</EventClick>
</Button>
<Button>
<X> 317 </X>
<Y> 618 </Y>
<Filename> Menu3BN_FN </Filename>
<FilenamePress> Menu3BP_FN </FilenamePress>
<Sound> "ROOT/sounds/Mainbuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var ServiceAmountLine = ""
Var CheckTypeLine = "o/"
Var SalePackage = 0
Var ServiceGroup = ""
Var AccTeleNumber = ""
Var Donate = "L1"
Var GetScore = ""
Var AccountType = ""
Var SuggestID = ""
Var ServiceType = ""
Var SessionID = ""
Var ServiceParameter = ""
Var OperatorName = ""
Var TelephoneNumber = ""
If Menu_list_LN = "TH" Then
MainOpen "ROOT/xml/service_menu.xml"
Else
MainOpen "ROOT/xml/eng_mobile_telnum.xml"
EndIf
</EventClick>
</Button>
<Button>
<X> 470 </X>
<Y> 618 </Y>
<Filename> Menu4BN_FN </Filename>
<FilenamePress> Menu4BP_FN </FilenamePress>
<Sound> "ROOT/sounds/Mainbuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
</EventClick>
</Button>
<Button>
<X> 623 </X>
<Y> 618 </Y>
<Filename> Menu5BN_FN </Filename>
<FilenamePress> Menu5BP_FN </FilenamePress>
<Sound> "ROOT/sounds/Mainbuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
</EventClick>
</Button>
<Button>
<X> 775 </X>
<Y> 618 </Y>
<Filename> "ROOT/image/BN_Thai.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_Thai.bmp" </FilenamePress>
<Sound> "ROOT/sounds/Mainbuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Menu_list_LN = "TH"
Var Menu1BN_FN = "ROOT/image/BN_Drink.bmp"
Var Menu1BP_FN = "ROOT/image/BP_Drink.bmp"
Var Menu1BD_FN = "ROOT/image/BD_Drink.bmp"
Var Menu2BN_FN = "ROOT/image/BN_Member.bmp"
Var Menu2BP_FN = "ROOT/image/BP_Member.bmp"
Var Menu3BN_FN = "ROOT/image/BN_Topup.bmp"
Var Menu3BP_FN = "ROOT/image/BP_Topup.bmp"
Var Menu4BN_FN = "ROOT/image/BN_Product.bmp"
Var Menu4BP_FN = "ROOT/image/BP_Product.bmp"
Var Menu5BN_FN = "ROOT/image/BN_Etc.bmp"
Var Menu5BP_FN = "ROOT/image/BP_Etc.bmp"
Var Menu6BN_FN = "ROOT/image/BN_Problem.bmp"
Var Menu6BP_FN = "ROOT/image/BP_Problem.bmp"
Open "ROOT/xml/menu_list.xml"
</EventClick>
</Button>
<Button>
<X> 853 </X>
<Y> 618 </Y>
<Filename> "ROOT/image/BN_ENG.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_ENG.bmp" </FilenamePress>
<Sound> "ROOT/sounds/Mainbuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Menu_list_LN = "ENG"
Var Menu1BN_FN = "ROOT/image/BN_Drink_ENG.bmp"
Var Menu1BP_FN = "ROOT/image/BP_Drink_ENG.bmp"
Var Menu1BD_FN = "ROOT/image/BD_Drink_ENG.bmp"
Var Menu2BN_FN = "ROOT/image/BN_Member_ENG.bmp"
Var Menu2BP_FN = "ROOT/image/BP_Member_ENG.bmp"
Var Menu3BN_FN = "ROOT/image/BN_Topup_ENG.bmp"
Var Menu3BP_FN = "ROOT/image/BP_Topup_ENG.bmp"
Var Menu4BN_FN = "ROOT/image/BN_Product_ENG.bmp"
Var Menu4BP_FN = "ROOT/image/BP_Product_ENG.bmp"
Var Menu5BN_FN = "ROOT/image/BN_Etc_ENG.bmp"
Var Menu5BP_FN = "ROOT/image/BP_Etc_ENG.bmp"
Var Menu6BN_FN = "ROOT/image/BN_Problem_ENG.bmp"
Var Menu6BP_FN = "ROOT/image/BP_Problem_ENG.bmp"
Open "ROOT/xml/menu_list.xml"
</EventClick>
</Button>
<Button>
<X> 930 </X>
<Y> 618 </Y>
<Filename> Menu6BN_FN </Filename>
<FilenamePress> Menu6BP_FN </FilenamePress>
<Sound> "ROOT/sounds/Mainbuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClickLong>
;MainOpen "ROOT/xml/test_font.xml"
VendingAccess
</EventClickLong>
<EventClick>
;MainOpen "ROOT/xml/test_font.xml"
Var TelephoneNumber = ""
If Menu_list_LN = "TH" Then
MainOpen "ROOT/xml/tellproblem_telnum.xml"
Else
MainOpen "ROOT/xml/eng_tellproblem_telnum.xml"
EndIf
;MainOpen "ROOT/xml/menu_problem.xml"
</EventClick>
</Button>
</Popup>

1041
xml/menu_list_show_all.pml Normal file

File diff suppressed because it is too large Load diff

4430
xml/menu_list_show_all.xml Normal file

File diff suppressed because it is too large Load diff

File diff suppressed because it is too large Load diff

File diff suppressed because it is too large Load diff

1021
xml/menu_list_show_less.pml Normal file

File diff suppressed because it is too large Load diff

2446
xml/menu_list_show_less.xml Normal file

File diff suppressed because it is too large Load diff

4
xml/menu_main_blank.xml Normal file
View file

@ -0,0 +1,4 @@
<Page>
<Width> 1080 </Width>
<Height> 1312 </Height>
</Page>

199
xml/menu_page3.xml Normal file
View file

@ -0,0 +1,199 @@
<Page>
<Width> 1080 </Width>
<Height> 1312 </Height>
<Background> "ROOT/image/BG_Menu_Page3.bmp" </Background>
<Sound> "ROOT/sounds/selectConfirm.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventOpen>
; On open
Var Timeout = 0
Var QRCODE99 = ""
Var QRCODETMP = ""
Var QRChannel = 0
Var CodeChannel = 0
Var GetPayInfoFlag = 0
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
;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
</EventTimeout>
<EventActionOk>
Var CreditAmount = 0
Var QRCODE99 = SessionID
Var QRCODE99 = QRCODE99 + Ext1a
Var QRCODE99 = QRCODE99 + Ext21
Var QRCODETMP = QRCODE99
Open "ROOT/xml/menu_page4.xml"
</EventActionOk>
<EventActionError>
Var QRCODE99 = ""
Var CreditAmount = 0
Open "ROOT/xml/menu_page4.xml"
</EventActionError>
<Button>
<X> 431 </X>
<Y> 805 </Y>
<Filename> "ROOT/image/BN_Cancle.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_Cancle.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
;Open "ROOT/xml/menu_board.xml"
OpenInst 2 "/mnt/sdcard/coffeevending/xml/menu_list_show_all.xml"
OpenInst 1 "/mnt/sdcard/coffeevending/xml/menu_advert.xml"
Open "/mnt/sdcard/coffeevending/xml/menu_main_blank.xml"
</EventClick>
</Button>
<Button>
<X> 566 </X>
<Y> 805 </Y>
<Filename> "ROOT/image/BN_Confirm2.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_Confirm2.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
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
;Open "ROOT/xml/menu_page4.xml"
</EventClick>
</Button>
<Image>
<X> 450 </X>
<Y> 218 </Y>
<Filename> PictureDrink </Filename>
</Image>
<Text>
<X> 505 </X>
<Y> 492 </Y>
<Width>310</Width>
<Align> Center </Align>
<Size> 30 </Size>
<Font> fontType1 </Font>
<Color> 0x000000 </Color>
<Value> NameDrink </Value>
</Text>
<Text>
<X> 505 </X>
<Y> 580 </Y>
<Width>310</Width>
<Align> Center </Align>
<Size> 30 </Size>
<Font> fontType1 </Font>
<Color> 0x000000 </Color>
<Value> SweetChoosed </Value>
</Text>
<Text>
<X> 505 </X>
<Y> 670 </Y>
<Width>310</Width>
<Align> Center </Align>
<Size> 25 </Size>
<Font> fontType1 </Font>
<Color> 0x000000 </Color>
<Value> PriceDrink </Value>
</Text>
<Text>
<X> 505 </X>
<Y> 1000 </Y>
<Width>310</Width>
<Align> Center </Align>
<Size> 25 </Size>
<Font> fontType1 </Font>
<Color> 0x000000 </Color>
<Value> NHaveDrink </Value>
</Text>
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
</EventSecurity>
</Page>

167
xml/menu_page3_alter.xml Normal file
View file

@ -0,0 +1,167 @@
<Page>
<Width> 1080 </Width>
<Height> 1312 </Height>
<Background> "ROOT/image/BG_Menu_Page3.bmp" </Background>
<Sound> "ROOT/sounds/selectConfirm.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventOpen>
; 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
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
;Open "ROOT/xml/menu_board.xml"
Var Timeout = Timeout + 1
If Timeout > 30 Then
Open "ROOT/xml/menu_page4.xml"
EndIf
TimerReset
Refresh
</EventTimeout>
<EventActionOk>
Var CreditAmount = 0
Var QRCODE99 = SessionID
Var QRCODE99 = QRCODE99 + Ext1a
Var QRCODE99 = QRCODE99 + Ext21
Var QRCODETMP = QRCODE99
Open "ROOT/xml/menu_page4.xml"
</EventActionOk>
<EventActionError>
Var QRCODE99 = ""
Var CreditAmount = 0
Open "ROOT/xml/menu_page4.xml"
</EventActionError>
<Image>
<X> 450 </X>
<Y> 218 </Y>
<Filename> PictureDrink </Filename>
</Image>
<Text>
<X> 505 </X>
<Y> 492 </Y>
<Width>310</Width>
<Align> Center </Align>
<Size> 30 </Size>
<Font> fontType1 </Font>
<Color> 0x000000 </Color>
<Value> NameDrink </Value>
</Text>
<Text>
<X> 505 </X>
<Y> 580 </Y>
<Width>310</Width>
<Align> Center </Align>
<Size> 30 </Size>
<Font> fontType1 </Font>
<Color> 0x000000 </Color>
<Value> SweetChoosed </Value>
</Text>
<Text>
<X> 505 </X>
<Y> 670 </Y>
<Width>310</Width>
<Align> Center </Align>
<Size> 25 </Size>
<Font> fontType1 </Font>
<Color> 0x000000 </Color>
<Value> PriceDrink </Value>
</Text>
<Text>
<X> 505 </X>
<Y> 1000 </Y>
<Width>310</Width>
<Align> Center </Align>
<Size> 25 </Size>
<Font> fontType1 </Font>
<Color> 0x000000 </Color>
<Value> NHaveDrink </Value>
</Text>
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
</EventSecurity>
</Page>

65
xml/menu_page4-1.xml Normal file
View file

@ -0,0 +1,65 @@
<Page>
<Width> 1080 </Width>
<Height> 1312 </Height>
<Background> "ROOT/image/BG_Loading_Page5.bmp" </Background>
<Sound> "ROOT/sounds/pleaseWait.wav" </Sound>
<EventOpen>
; On open
Var Timeout = 0
Var ErrTimeout = 0
Var ChangeTimeout = 0
Var ChangeFlag = 0
Var MachineState_Result = 0
</EventOpen>
<Timeout> 2000 </Timeout>
<EventTimeout>
Var ProcessText = ""
Open "ROOT/xml/menu_CollectPoint_Page1.xml"
TimerReset
Refresh
</EventTimeout>
<EventMachine>
</EventMachine>
<GIF>
<X> 183 </X>
<Y> 350 </Y>
<Filename> GIFShowProcess </Filename>
</GIF>
<Text>
<X> 420 </X>
<Y> 250 </Y>
<Width>250</Width>
<Align> Center </Align>
<Size> 30 </Size>
<Font> fontType1 </Font>
<Color> 0x000000 </Color>
<Value> ProcessText </Value>
</Text>
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
</EventSecurity>
</Page>

414
xml/menu_page4-Code.xml Normal file
View file

@ -0,0 +1,414 @@
<Page>
<Width> 1080 </Width>
<Height> 1312 </Height>
<Background> "ROOT/image/BG_Enter_Code.bmp" </Background>
<Sound> "ROOT/sounds/Code8digit.m4a" </Sound>
<Volume> SoundVolume </Volume>
<EventOpen>
; On open
Var Timeout = 0
Var GetPayInfoFlag = 0
Var CodeChannel = 0
;Var VendingQRCode = "ERROR"
VendingQR ON
Var QRCODE99 = ""
CoinVending OFF
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
;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
</EventTimeout>
<EventActionOk>
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
</EventActionOk>
<Button>
<X> 413 </X>
<Y> 458 </Y>
<Filename> "ROOT/image/BN_1.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_1.bmp" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var TelephoneNumber = TelephoneNumber + "1"
Trim TelephoneNumber 8
TimerReset
Refresh
StrLen TelephoneNumber TelNumLen
If TelNumLen >= 8 Then
Var Tel_Confirm_State = "Enable"
EndIf
</EventClick>
</Button>
<Button>
<X> 498 </X>
<Y> 458 </Y>
<Filename> "ROOT/image/BN_2.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_2.bmp" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var TelephoneNumber = TelephoneNumber + "2"
Trim TelephoneNumber 8
TimerReset
Refresh
StrLen TelephoneNumber TelNumLen
If TelNumLen >= 8 Then
Var Tel_Confirm_State = "Enable"
EndIf
</EventClick>
</Button>
<Button>
<X> 582 </X>
<Y> 458 </Y>
<Filename> "ROOT/image/BN_3.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_3.bmp" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var TelephoneNumber = TelephoneNumber + "3"
Trim TelephoneNumber 8
TimerReset
Refresh
StrLen TelephoneNumber TelNumLen
If TelNumLen >= 8 Then
Var Tel_Confirm_State = "Enable"
EndIf
</EventClick>
</Button>
<Button>
<X> 413 </X>
<Y> 535 </Y>
<Filename> "ROOT/image/BN_4.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_4.bmp" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var TelephoneNumber = TelephoneNumber + "4"
Trim TelephoneNumber 8
TimerReset
Refresh
StrLen TelephoneNumber TelNumLen
If TelNumLen >= 8 Then
Var Tel_Confirm_State = "Enable"
EndIf
</EventClick>
</Button>
<Button>
<X> 498 </X>
<Y> 535 </Y>
<Filename> "ROOT/image/BN_5.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_5.bmp" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var TelephoneNumber = TelephoneNumber + "5"
Trim TelephoneNumber 8
TimerReset
Refresh
StrLen TelephoneNumber TelNumLen
If TelNumLen >= 8 Then
Var Tel_Confirm_State = "Enable"
EndIf
</EventClick>
</Button>
<Button>
<X> 582 </X>
<Y> 535 </Y>
<Filename> "ROOT/image/BN_6.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_6.bmp" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var TelephoneNumber = TelephoneNumber + "6"
Trim TelephoneNumber 8
TimerReset
Refresh
StrLen TelephoneNumber TelNumLen
If TelNumLen >= 8 Then
Var Tel_Confirm_State = "Enable"
EndIf
</EventClick>
</Button>
<Button>
<X> 413 </X>
<Y> 612 </Y>
<Filename> "ROOT/image/BN_7.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_7.bmp" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var TelephoneNumber = TelephoneNumber + "7"
Trim TelephoneNumber 8
TimerReset
Refresh
StrLen TelephoneNumber TelNumLen
If TelNumLen >= 8 Then
Var Tel_Confirm_State = "Enable"
EndIf
</EventClick>
</Button>
<Button>
<X> 498 </X>
<Y> 612 </Y>
<Filename> "ROOT/image/BN_8.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_8.bmp" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var TelephoneNumber = TelephoneNumber + "8"
Trim TelephoneNumber 8
TimerReset
Refresh
StrLen TelephoneNumber TelNumLen
If TelNumLen >= 8 Then
Var Tel_Confirm_State = "Enable"
EndIf
</EventClick>
</Button>
<Button>
<X> 582 </X>
<Y> 612 </Y>
<Filename> "ROOT/image/BN_9.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_9.bmp" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var TelephoneNumber = TelephoneNumber + "9"
Trim TelephoneNumber 8
TimerReset
Refresh
StrLen TelephoneNumber TelNumLen
If TelNumLen >= 8 Then
Var Tel_Confirm_State = "Enable"
EndIf
</EventClick>
</Button>
<Button>
<X> 413 </X>
<Y> 689 </Y>
<Filename> "ROOT/image/BN_Star.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_Star.bmp" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
</EventClick>
</Button>
<Button>
<X> 498 </X>
<Y> 689 </Y>
<Filename> "ROOT/image/BN_0.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_0.bmp" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var TelephoneNumber = TelephoneNumber + "0"
Trim TelephoneNumber 8
TimerReset
Refresh
StrLen TelephoneNumber TelNumLen
If TelNumLen >= 8 Then
Var Tel_Confirm_State = "Enable"
EndIf
</EventClick>
</Button>
<Button>
<X> 582 </X>
<Y> 689 </Y>
<Filename> "ROOT/image/BN_#.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_#.bmp" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
</EventClick>
</Button>
<Button>
<X> 373 </X>
<Y> 779 </Y>
<Filename> "ROOT/image/BN_Skip.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_Skip.bmp" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var BG_Menu_Page4 = "ROOT/image/BG_Cash_Page4.bmp"
Var PayState1 = "PressForever"
Var PayState2 = "Enable"
Var QRChannel = 0
Open "ROOT/xml/menu_Page4.xml"
</EventClick>
</Button>
<Button>
<X> 486 </X>
<Y> 779 </Y>
<Filename> "ROOT/image/BN_Edit.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_Edit.bmp" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Trim TelephoneNumber -1
Var Tel_Confirm_State = "Disable"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 600 </X>
<Y> 779 </Y>
<State> Tel_Confirm_State </State>
<Filename> "ROOT/image/BN_Confirm.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_Confirm.bmp" </FilenamePress>
<FilenameDisable> "ROOT/image/BD_Confirm.bmp" </FilenameDisable>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
If GetPayInfoFlag = 0 Then
VendingQR OFF
Var CodeNumber = TelephoneNumber
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 + "C00"
Var ECommerce = ECommerce + "/"
Var ECommerce = ECommerce + CodeNumber
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
Var TelephoneNumber = CodeNumber
Var CodeChannel = 1
Open "/media/bt/xml/menu_page4-CodeWaiting.xml"
EndIf
Refresh
</EventClick>
</Button>
<Text>
<X> 310 </X>
<Y> 380 </Y>
<Width> 474 </Width>
<Align> Center </Align>
<Size> 50 </Size>
<Font> fontType1 </Font>
<Color> 0xF0E000 </Color>
<Value> TelephoneNumber </Value>
</Text>
<QRCode>
<X> 450 </X>
<Y> 595 </Y>
<Width> 185 </Width>
<Height> 185 </Height>
<Service> testservice </Service>
</QRCode>
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
</EventSecurity>
</Page>

View file

@ -0,0 +1,69 @@
<Page>
<Width> 1080 </Width>
<Height> 1312 </Height>
<Background> "ROOT/image/BG_Enter_Code.bmp" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
; On open
Var Timeout = 0
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
;Open "ROOT/xml/menu_board.xml"
Var Timeout = Timeout + 1
If Timeout > 5 Then
Open "ROOT/xml/menu_board.xml"
EndIf
TimerReset
Refresh
</EventTimeout>
<Text>
<X> 310 </X>
<Y> 380 </Y>
<Width> 474 </Width>
<Align> Center </Align>
<Size> 50 </Size>
<Font> fontType1 </Font>
<Color> 0xF0E000 </Color>
<Value> TelephoneNumber </Value>
</Text>
<Text>
<X> 310 </X>
<Y> 550 </Y>
<Width> 474 </Width>
<Align> Center </Align>
<Size> 50 </Size>
<Font> fontType1 </Font>
<Color> 0xF0E000 </Color>
<Value> "ไม่เจอโค้ดในระบบ" </Value>
</Text>
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
</EventSecurity>
<EventActionOk>
</EventActionOk>
<EventActionError>
</EventActionError>
</Page>

View file

@ -0,0 +1,110 @@
<Page>
<Width> 1080 </Width>
<Height> 1312 </Height>
<Background> "ROOT/image/BG_Enter_Code.bmp" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
; On open
Var Timeout = 0
Var VendingCode = ""
Var VendingREFID = ""
Var VendingCampaignRI3 = ""
Var VendingCampaign1 = ""
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
;Open "ROOT/xml/menu_board.xml"
Var Timeout = Timeout + 1
If Timeout > 60 Then
Open "ROOT/xml/menu_Page4-CodeError.xml"
EndIf
TimerReset
Refresh
</EventTimeout>
<Text>
<X> 310 </X>
<Y> 380 </Y>
<Width> 474 </Width>
<Align> Center </Align>
<Size> 50 </Size>
<Font> fontType1 </Font>
<Color> 0xF0E000 </Color>
<Value> TelephoneNumber </Value>
</Text>
<Text>
<X> 310 </X>
<Y> 550 </Y>
<Width> 474 </Width>
<Align> Center </Align>
<Size> 50 </Size>
<Font> fontType1 </Font>
<Color> 0xF0E000 </Color>
<Value> "กรุณารอซักครู่ กำลังตรวจสอบโค้ด" </Value>
</Text>
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
</EventSecurity>
<EventActionOk>
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
</EventActionOk>
<EventActionError>
If CodeChannel = 1 Then
Open "/media/bt/xml/menu_page4-CodeError.xml"
EndIf
</EventActionError>
</Page>

422
xml/menu_page4-QR.xml Normal file
View file

@ -0,0 +1,422 @@
<Page>
<Width> 1080 </Width>
<Height> 1312 </Height>
<Background> BG_Menu_Page4 </Background>
<Sound> "ROOT/sounds/QRpayment.m4a" </Sound>
<EventOpen>
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
</EventOpen>
<EventActionOk>
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
</EventActionOk>
<Timeout> 1000 </Timeout>
<EventTimeout>
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
</EventTimeout>
<EventChangeStatus>
If ChangeStatus = "payout-end" Then
Var ChangeOK = 1
EndIf
</EventChangeStatus>
<EventCoin>
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
</EventCoin>
<EventVDCancle>
If CoinInOK = 0 Then
If CancelFlag = 0 Then
CoinVending OFF
Var CancelFlag = 1
Var CancelCounter = 0
EndIf
EndIf
VendingQR OFF
</EventVDCancle>
<Button>
<X> 336 </X>
<Y> 317 </Y>
<State>PayState1</State>
<Filename> "ROOT/image/BN_PayWithCash.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_PayWithCash.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var BG_Menu_Page4 = "ROOT/image/BG_Cash_Page4.bmp"
Var PayState1 = "PressForever"
Var PayState2 = "Enable"
Var QRChannel = 0
SAVELOG "menu_page4-QR.xml > Cash"
Open "ROOT/xml/menu_page4.xml"
</EventClick>
</Button>
<Button>
<X> 336 </X>
<Y> 399 </Y>
<State>PayState2</State>
<Filename> "ROOT/image/BN_PayPromtpay.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_PayPromtpay.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
If CoinInFlag = 0 Then
Var BG_Menu_Page4 = "ROOT/image/BG_PromptPay_Page4.bmp"
Var PayState1 = "Enable"
Var PayState2 = "PressForever"
Var QRChannel = 1
SAVELOG "menu_page4-QR.xml > QR"
Open "ROOT/xml/menu_page4.xml"
EndIf
</EventClick>
</Button>
<Button>
<X> 336 </X>
<Y> 482 </Y>
<State>PayState3</State>
<Filename> "ROOT/image/BN_PayWithCode.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_PayWithCode.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
If CoinInFlag = 0 Then
;Var BG_Menu_Page4 = "ROOT/image/BG_PromptPay_Page4.bmp"
;Var PayState1 = "Enable"
;Var PayState2 = "PressForever"
;Var QRChannel = 1
Var TelephoneNumber = ""
Var Tel_Confirm_State = "Disable"
SAVELOG "menu_page4-QR.xml > Code"
Open "ROOT/xml/menu_page4-Code.xml"
EndIf
</EventClick>
</Button>
<Button>
<X> 494 </X>
<Y> 805 </Y>
<State>CancleState</State>
<Filename> "ROOT/image/BN_Cancle.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_Cancle.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
If CoinInOK = 0 Then
If CancelFlag = 0 Then
CoinVending OFF
Var CancelFlag = 1
Var CancelCounter = 0
EndIf
EndIf
VendingQR OFF
SAVELOG "menu_page4-QR.xml > Cancel"
</EventClick>
</Button>
<Button>
<X> 495 </X>
<Y> 640 </Y>
<State>QRErrorState</State>
<Filename> "ROOT/image/QRError.png" </Filename>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
</EventClick>
</Button>
<Text>
<X> 470 </X>
<Y> 667 </Y>
<Width>155</Width>
<Align> Center </Align>
<Size> 40 </Size>
<Font> fontType1 </Font>
<Color> 0x000000 </Color>
<Value> RemainAmountStr </Value>
</Text>
<QRCode>
<X> 450 </X>
<Y> 595 </Y>
<Width> 185 </Width>
<Height> 185 </Height>
<Service> testservice </Service>
</QRCode>
<Text>
<X> 120 </X>
<Y> 555 </Y>
<Width>850</Width>
<Align> Center </Align>
<Size> 30 </Size>
<Font> fontType1 </Font>
<Color> 0xFF0000 </Color>
<Value> CashTextWarning </Value>
</Text>
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
</EventSecurity>
</Page>

480
xml/menu_page4-WithCode.xml Normal file
View file

@ -0,0 +1,480 @@
<Page>
<Width> 1080 </Width>
<Height> 1312 </Height>
<Background> BG_Menu_Page4 </Background>
<Sound> "ROOT/sounds/selectPayment.wav" </Sound>
<EventOpen>
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
</EventOpen>
<EventActionOk>
If ActionOKCase = 1 Then
Var PayInfoCFlag = 1
EndIf
If ActionOKCase = 2 Then
Open "ROOT/xml/menu_board.xml"
EndIf
</EventActionOk>
<Timeout> 1000 </Timeout>
<EventTimeout>
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
</EventTimeout>
<EventChangeStatus>
If ChangeStatus = "payout-end" Then
Var ChangeOK = 1
EndIf
</EventChangeStatus>
<EventCoin>
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
</EventCoin>
<EventVDCancle>
If CoinInOK = 0 Then
If CancelFlag = 0 Then
CoinVending OFF
Var CancelFlag = 1
Var CancelCounter = 0
EndIf
EndIf
VendingQR OFF
</EventVDCancle>
<Button>
<X> 336 </X>
<Y> 317 </Y>
<State>PayState1</State>
<Filename> "ROOT/image/BN_PayWithCash.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_PayWithCash.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var BG_Menu_Page4 = "ROOT/image/BG_Cash_Page4.bmp"
Var PayState1 = "PressForever"
Var PayState2 = "Enable"
Var QRChannel = 0
Open "ROOT/xml/menu_page4.xml"
</EventClick>
</Button>
<Button>
<X> 336 </X>
<Y> 399 </Y>
<State>PayState2</State>
<Filename> "ROOT/image/BN_PayPromtpay.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_PayPromtpay.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
If CoinInFlag = 0 Then
Var BG_Menu_Page4 = "ROOT/image/BG_PromptPay_Page4.bmp"
Var PayState1 = "Enable"
Var PayState2 = "PressForever"
Var QRChannel = 1
Open "ROOT/xml/menu_page4-QR.xml"
EndIf
</EventClick>
</Button>
<Button>
<X> 336 </X>
<Y> 482 </Y>
<State>PayState3</State>
<Filename> "ROOT/image/BN_PayWithCode.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_PayWithCode.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
If CoinInFlag = 0 Then
;Var BG_Menu_Page4 = "ROOT/image/BG_PromptPay_Page4.bmp"
;Var PayState1 = "Enable"
;Var PayState2 = "PressForever"
;Var QRChannel = 1
Var TelephoneNumber = ""
Var Tel_Confirm_State = "Disable"
Open "ROOT/xml/menu_page4-Code.xml"
EndIf
</EventClick>
</Button>
<Button>
<X> 494 </X>
<Y> 805 </Y>
<State>CancleState</State>
<Filename> "ROOT/image/BN_Cancle.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_Cancle.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
If CoinInOK = 0 Then
If CancelFlag = 0 Then
CoinVending OFF
Var CancelFlag = 1
Var CancelCounter = 0
EndIf
EndIf
VendingQR OFF
</EventClick>
</Button>
<Button>
<X> 495 </X>
<Y> 640 </Y>
<State>QRErrorState</State>
<Filename> "ROOT/image/QRError.png" </Filename>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
</EventClick>
</Button>
<Text>
<X> 470 </X>
<Y> 667 </Y>
<Width>155</Width>
<Align> Center </Align>
<Size> 40 </Size>
<Font> fontType1 </Font>
<Color> 0x000000 </Color>
<Value> RemainAmountStr </Value>
</Text>
<QRCode>
<X> 450 </X>
<Y> 595 </Y>
<Width> 185 </Width>
<Height> 185 </Height>
<Service> testservice </Service>
</QRCode>
<Text>
<X> 120 </X>
<Y> 555 </Y>
<Width>850</Width>
<Align> Center </Align>
<Size> 30 </Size>
<Font> fontType1 </Font>
<Color> 0xFF0000 </Color>
<Value> CashTextWarning </Value>
</Text>
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
</EventSecurity>
</Page>

420
xml/menu_page4.xml Normal file
View file

@ -0,0 +1,420 @@
<Page>
<Width> 1080 </Width>
<Height> 1312 </Height>
<Background> BG_Menu_Page4 </Background>
<Sound> "ROOT/sounds/selectPayment.wav" </Sound>
<EventOpen>
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
</EventOpen>
<EventActionOk>
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
</EventActionOk>
<Timeout> 1000 </Timeout>
<EventTimeout>
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
</EventTimeout>
<EventChangeStatus>
If ChangeStatus = "payout-end" Then
Var ChangeOK = 1
EndIf
</EventChangeStatus>
<EventCoin>
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
</EventCoin>
<EventVDCancle>
If CoinInOK = 0 Then
If CancelFlag = 0 Then
CoinVending OFF
Var CancelFlag = 1
Var CancelCounter = 0
EndIf
EndIf
VendingQR OFF
</EventVDCancle>
<Button>
<X> 336 </X>
<Y> 317 </Y>
<State>PayState1</State>
<Filename> "ROOT/image/BN_PayWithCash.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_PayWithCash.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var BG_Menu_Page4 = "ROOT/image/BG_Cash_Page4.bmp"
Var PayState1 = "PressForever"
Var PayState2 = "Enable"
Var QRChannel = 0
Open "ROOT/xml/menu_page4.xml"
</EventClick>
</Button>
<Button>
<X> 336 </X>
<Y> 399 </Y>
<State>PayState2</State>
<Filename> "ROOT/image/BN_PayPromtpay.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_PayPromtpay.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
If CoinInFlag = 0 Then
Var BG_Menu_Page4 = "ROOT/image/BG_PromptPay_Page4.bmp"
Var PayState1 = "Enable"
Var PayState2 = "PressForever"
Var QRChannel = 1
Open "ROOT/xml/menu_page4-QR.xml"
EndIf
</EventClick>
</Button>
<Button>
<X> 336 </X>
<Y> 482 </Y>
<State>PayState3</State>
<Filename> "ROOT/image/BN_PayWithCode.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_PayWithCode.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
If CoinInFlag = 0 Then
;Var BG_Menu_Page4 = "ROOT/image/BG_PromptPay_Page4.bmp"
;Var PayState1 = "Enable"
;Var PayState2 = "PressForever"
;Var QRChannel = 1
Var TelephoneNumber = ""
Var Tel_Confirm_State = "Disable"
Open "ROOT/xml/menu_page4-Code.xml"
EndIf
</EventClick>
</Button>
<Button>
<X> 494 </X>
<Y> 805 </Y>
<State>CancleState</State>
<Filename> "ROOT/image/BN_Cancle.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_Cancle.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
If CoinInOK = 0 Then
If CancelFlag = 0 Then
CoinVending OFF
Var CancelFlag = 1
Var CancelCounter = 0
EndIf
EndIf
VendingQR OFF
</EventClick>
</Button>
<Button>
<X> 495 </X>
<Y> 640 </Y>
<State>QRErrorState</State>
<Filename> "ROOT/image/QRError.png" </Filename>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
</EventClick>
</Button>
<Text>
<X> 470 </X>
<Y> 667 </Y>
<Width>155</Width>
<Align> Center </Align>
<Size> 40 </Size>
<Font> fontType1 </Font>
<Color> 0x000000 </Color>
<Value> RemainAmountStr </Value>
</Text>
<QRCode>
<X> 450 </X>
<Y> 595 </Y>
<Width> 185 </Width>
<Height> 185 </Height>
<Service> testservice </Service>
</QRCode>
<Text>
<X> 120 </X>
<Y> 555 </Y>
<Width>850</Width>
<Align> Center </Align>
<Size> 30 </Size>
<Font> fontType1 </Font>
<Color> 0xFF0000 </Color>
<Value> CashTextWarning </Value>
</Text>
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
</EventSecurity>
</Page>

409
xml/menu_page4aa.xml Normal file
View file

@ -0,0 +1,409 @@
<Page>
<Width> 1080 </Width>
<Height> 1312 </Height>
<Background> BG_Menu_Page4 </Background>
<Sound> "ROOT/sounds/selectPayment.wav" </Sound>
<EventOpen>
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
</EventOpen>
<EventActionOk>
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
</EventActionOk>
<Timeout> 1000 </Timeout>
<EventTimeout>
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
</EventTimeout>
<EventChangeStatus>
If ChangeStatus = "payout-end" Then
Var ChangeOK = 1
EndIf
</EventChangeStatus>
<EventCoin>
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
</EventCoin>
<EventVDCancle>
If CoinInOK = 0 Then
If CancelFlag = 0 Then
CoinVending OFF
Var CancelFlag = 1
Var CancelCounter = 0
EndIf
EndIf
</EventVDCancle>
<Button>
<X> 336 </X>
<Y> 317 </Y>
<State>PayState1</State>
<Filename> "ROOT/image/BN_PayWithCash.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_PayWithCash.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var BG_Menu_Page4 = "ROOT/image/BG_Cash_Page4.bmp"
Var PayState1 = "PressForever"
Var PayState2 = "Enable"
Var QRChannel = 0
Open "ROOT/xml/menu_page4.xml"
</EventClick>
</Button>
<Button>
<X> 336 </X>
<Y> 399 </Y>
<State>PayState2</State>
<Filename> "ROOT/image/BN_PayPromtpay.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_PayPromtpay.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
If CoinInFlag = 0 Then
Var BG_Menu_Page4 = "ROOT/image/BG_PromptPay_Page4.bmp"
Var PayState1 = "Enable"
Var PayState2 = "PressForever"
Var QRChannel = 1
Open "ROOT/xml/menu_page4-QR.xml"
EndIf
</EventClick>
</Button>
<Button>
<X> 336 </X>
<Y> 482 </Y>
<State>PayState3</State>
<Filename> "ROOT/image/BN_PayWithCode.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_PayWithCode.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
If CoinInFlag = 0 Then
;Var BG_Menu_Page4 = "ROOT/image/BG_PromptPay_Page4.bmp"
;Var PayState1 = "Enable"
;Var PayState2 = "PressForever"
;Var QRChannel = 1
Var TelephoneNumber = ""
Var Tel_Confirm_State = "Disable"
Open "ROOT/xml/menu_page4-Code.xml"
EndIf
</EventClick>
</Button>
<Button>
<X> 494 </X>
<Y> 805 </Y>
<State>CancleState</State>
<Filename> "ROOT/image/BN_Cancle.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_Cancle.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
If CoinInOK = 0 Then
If CancelFlag = 0 Then
CoinVending OFF
Var CancelFlag = 1
Var CancelCounter = 0
EndIf
EndIf
</EventClick>
</Button>
<Button>
<X> 495 </X>
<Y> 640 </Y>
<State>QRErrorState</State>
<Filename> "ROOT/image/QRError.png" </Filename>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
</EventClick>
</Button>
<Text>
<X> 470 </X>
<Y> 667 </Y>
<Width>155</Width>
<Align> Center </Align>
<Size> 40 </Size>
<Font> fontType1 </Font>
<Color> 0x000000 </Color>
<Value> RemainAmountStr </Value>
</Text>
<QRCode>
<X> 450 </X>
<Y> 595 </Y>
<Width> 185 </Width>
<Height> 185 </Height>
<Service> testservice </Service>
</QRCode>
<Text>
<X> 120 </X>
<Y> 555 </Y>
<Width>850</Width>
<Align> Center </Align>
<Size> 30 </Size>
<Font> fontType1 </Font>
<Color> 0xFF0000 </Color>
<Value> CashTextWarning </Value>
</Text>
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
</EventSecurity>
</Page>

366
xml/menu_page5.xml Normal file
View file

@ -0,0 +1,366 @@
<Page>
<Width> 1080 </Width>
<Height> 1312 </Height>
<Background> "ROOT/image/BG_Loading_Page5.bmp" </Background>
<EventOpen>
; On open
Var Timeout = 0
Var Change3Timeout = 0
Var ActionOKCase = 0
</EventOpen>
<EventActionOk>
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
</EventActionOk>
<Timeout> 1000 </Timeout>
<EventTimeout>
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
</EventTimeout>
<EventMachine>
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
</EventMachine>
<EventChangeStatus>
If ChangeStatus = "payout-end" Then
Var ChangeOK = 2
EndIf
</EventChangeStatus>
<GIF>
<X> 183 </X>
<Y> 350 </Y>
<Filename> GIFShowProcess </Filename>
</GIF>
<Text>
<X> 420 </X>
<Y> 250 </Y>
<Width>250</Width>
<Align> Center </Align>
<Size> 30 </Size>
<Font> fontType1 </Font>
<Color> 0x000000 </Color>
<Value> ProcessText </Value>
</Text>
<Text>
<X> 420 </X>
<Y> 250 </Y>
<Width>250</Width>
<Align> Center </Align>
<Size> 30 </Size>
<Font> fontType1 </Font>
<Color> 0x000000 </Color>
<Value> BrewingTextEng </Value>
</Text>
<Text>
<X> 420 </X>
<Y> 315 </Y>
<Width>250</Width>
<Align> Center </Align>
<Size> 25 </Size>
<Font> fontType1 </Font>
<Color> 0xB78F24 </Color>
<Value> BrewingTextThai </Value>
</Text>
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
</EventSecurity>
</Page>

108
xml/menu_page6.xml Normal file
View file

@ -0,0 +1,108 @@
<Page>
<Width> 1080 </Width>
<Height> 1312 </Height>
<Background> "ROOT/image/BG_Menu_Page6.bmp" </Background>
<EventOpen>
; On open
Var Timeout = 0
Var AckPayOK = 0
Var GetLidOK = 0
Var RemoveCup = 0
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
;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
</EventTimeout>
<EventMachine>
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
</EventMachine>
<EventActionOk>
Var AckPayOK = 1
</EventActionOk>
<GIF>
<X> 183 </X>
<Y> 350 </Y>
<Filename> GIFShowProcess </Filename>
</GIF>
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
</EventSecurity>
</Page>

106
xml/menu_page6.xml.bak Normal file
View file

@ -0,0 +1,106 @@
<Page>
<Width> 1080 </Width>
<Height> 1312 </Height>
<Background> "ROOT/image/BG_Menu_Page6.bmp" </Background>
<EventOpen>
; On open
Var Timeout = 0
Var AckPayOK = 0
Var GetLidOK = 0
Var RemoveCup = 0
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
;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
</EventTimeout>
<EventMachine>
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
</EventMachine>
<EventActionOk>
Var AckPayOK = 1
</EventActionOk>
;<GIF>
;<X> 183 </X>
;<Y> 350 </Y>
;<Filename> GIFShowProcess </Filename>
;</GIF>
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
</EventSecurity>
</Page>

101
xml/menu_page6_Open.xml Normal file
View file

@ -0,0 +1,101 @@
<Page>
<Width> 1080 </Width>
<Height> 1312 </Height>
<Background> p6OpenBG </Background>
<EventOpen>
; On open
TopView "show"
Var Timeout = 0
Var ProcessText = "กรุณานำเครื่องดื่มออก"
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
;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
</EventTimeout>
<EventMachine>
</EventMachine>
<GIF>
<X> 250 </X>
<Y> 460 </Y>
<Filename> p6OpenGIF </Filename>
</GIF>
<Text>
<X> 395 </X>
<Y> 250 </Y>
<Width>300</Width>
<Align> Center </Align>
<Size> 30 </Size>
<Font> fontType1 </Font>
<Color> 0x000000 </Color>
<Value> ProcessText </Value>
</Text>
<Button>
<X> 488 </X>
<Y> 804 </Y>
<Filename> "ROOT/image/BN_OPEN.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_OPEN.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Machine DoorOpen
</EventClick>
</Button>
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
</EventSecurity>
</Page>

97
xml/menu_page7.xml Normal file
View file

@ -0,0 +1,97 @@
<Page>
<Width> 1080 </Width>
<Height> 1312 </Height>
<Background> "ROOT/image2/BG_MENU_PAGE.bmp" </Background>
<Sound> "ROOT/sounds/coffee_thankyou.wav" </Sound>
<EventOpen>
; On open
TopView "hide"
Var Timeout = 0
Var WasGetLid = "Enable"
Var WasGetStraw = "Enable"
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
;Open "ROOT/xml/menu_board.xml"
Var Timeout = Timeout + 1
If Timeout > 20 Then
Open "ROOT/xml/menu_board.xml"
EndIf
TimerReset
Refresh
</EventTimeout>
<EventMachine>
</EventMachine>
<Button>
<X> 342 </X>
<Y> 772 </Y>
<State> Lid1Status </State>
<Filename> "ROOT/image2/button_lid/BN_get_lid.bmp" </Filename>
<FilenameDisable> "ROOT/image2/button_lid/BP_get_lid.bmp" </FilenameDisable>
<FilenamePress> "ROOT/image2/button_lid/BP_get_lid.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var WasGetLid = "PressForever"
Machine Lid
Refresh
If WasGetStraw = "PressForever" Then
Open "ROOT/xml/menu_board.xml"
EndIf
</EventClick>
</Button>
<Button>
<X> 490 </X>
<Y> 772 </Y>
<State>"Enable"</State>
<Filename> "ROOT/image2/button_no/BN_not_acc.bmp" </Filename>
<FilenamePress> "ROOT/image2/button_no/BP_not_acc.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Open "ROOT/xml/menu_board.xml"
</EventClick>
</Button>
<Button>
<X> 633 </X>
<Y> 772 </Y>
<State>WasGetStraw</State>
<Filename> "ROOT/image2/button_straw/BN_get_straw.bmp" </Filename>
<FilenamePress> "ROOT/image2/button_straw/BP_get_straw.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var WasGetStraw = "PressForever"
Machine Straw
Refresh
If WasGetLid = "PressForever" Then
Open "ROOT/xml/menu_board.xml"
EndIf
</EventClick>
</Button>
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
</EventSecurity>
</Page>

77
xml/menu_pageConsent.xml Normal file
View file

@ -0,0 +1,77 @@
<Page>
<Width> 1080 </Width>
<Height> 1312 </Height>
<Background> "ROOT/image/BG_Consent.bmp" </Background>
<EventOpen>
; On open
Var Timeout = 0
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
;Open "ROOT/xml/menu_board.xml"
Var Timeout = Timeout + 1
If Timeout > 20 Then
Open "ROOT/xml/menu_page5.xml"
EndIf
TimerReset
Refresh
</EventTimeout>
<EventMachine>
If MachineStage = "drink-success" Then
Var MachineState_Result = 1
EndIf
If MachineStage = "drink-failed" Then
Var MachineState_Result = 1
EndIf
</EventMachine>
<Button>
<X> 397 </X>
<Y> 802 </Y>
<Filename> "ROOT/image/BN_accept.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_accept.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var StepGetPoint = 1
GETACCEXT TelephoneNumber 5
Open "/media/bt/xml/menu_CollectPoint_Page2.xml"
</EventClick>
</Button>
<Button>
<X> 576 </X>
<Y> 802 </Y>
<Filename> "ROOT/image/BN_decline.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_decline.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Open "ROOT/xml/menu_page5.xml"
</EventClick>
</Button>
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
</EventSecurity>
</Page>

51
xml/menu_payment.xml Normal file
View file

@ -0,0 +1,51 @@
<Page>
<Width> 1080 </Width>
<Height> 1288 </Height>
<Background> "ROOT/ui/bg_main_menu.png" </Background>
<EventOpen>
; On open
Var payment = "cash"
</EventOpen>
<Timeout> 10000 </Timeout>
<EventTimeout>
Open "ROOT/xml/menu_board.xml"
</EventTimeout>
<Button>
<X> 265 </X>
<Y> 110 </Y>
<Filename> nMenuBar </Filename>
<FilenamePress> pMenuBar </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Open "ROOT/xml/menu_payment_qr.xml"
</EventClick>
</Button>
<Text>
<X> 265 </X>
<Y> 130 </Y>
<Width> 550 </Width>
<Align> Center </Align>
<Size> 40 </Size>
<Color> 0xFFFFFF </Color>
<Value> "Payment QR" </Value>
</Text>
<GIF>
<X> 405 </X>
<Y> 200 </Y>
<Filename> "ROOT/ui/page_04_make_a_payment/make_payment.gif" </Filename>
</GIF>
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
</EventSecurity>
</Page>

52
xml/menu_payment_qr.xml Normal file
View file

@ -0,0 +1,52 @@
<Page>
<Width> 1080 </Width>
<Height> 1288 </Height>
<Background> "ROOT/ui/bg_main_menu.png" </Background>
<EventOpen>
; On open
Var payment = "QR"
</EventOpen>
<Timeout> 10000 </Timeout>
<EventTimeout>
Open "ROOT/xml/menu_board.xml"
</EventTimeout>
<Button>
<X> 265 </X>
<Y> 110 </Y>
<Filename> nMenuBar </Filename>
<FilenamePress> pMenuBar </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Open "ROOT/xml/menu_payment.xml"
</EventClick>
</Button>
<Text>
<X> 265 </X>
<Y> 130 </Y>
<Width> 550 </Width>
<Align> Center </Align>
<Size> 40 </Size>
<Color> 0xFFFFFF </Color>
<Value> "Payment Cash" </Value>
</Text>
<GIF>
<X> 405 </X>
<Y> 200 </Y>
<Filename> "ROOT/ui/page_04_make_a_payment/pic_payment_loading.gif" </Filename>
</GIF>
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
</EventSecurity>
</Page>

91
xml/menu_problem.xml Normal file
View file

@ -0,0 +1,91 @@
<Page>
<Width> 1080 </Width>
<Height> 1312 </Height>
<Background> "ROOT/image/BG_Main_Menu.bmp" </Background>
<EventOpen>
Var ChooseProblem = ""
Var TextProblem = ""
Var Timeout = 0
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
Var Timeout = Timeout + 1
If Timeout = 10 Then
Open "/mnt/sdcard/coffeevending/xml/menu_board.xml"
EndIf
TimerReset
;Refresh
</EventTimeout>
<EventNetDown>
Open "/mnt/sdcard/coffeevending/xml/main.xml"
</EventNetDown>
<Button>
<X> 106 </X>
<Y> 183 </Y>
<Filename> "ROOT/image/BN_ProblemCoinChange.png" </Filename>
<FilenamePress> "ROOT/image/BP_ProblemCoinChange.png" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var ChooseProblem = "not receiving changes or unable to pay"
PROBLEM TelephoneNumber ChooseProblem
Open "/ROOT/xml/tellproblem_working.xml"
</EventClick>
</Button>
<Button>
<X> 604 </X>
<Y> 183 </Y>
<Filename> "ROOT/image/BN_ProblemTelNum.png" </Filename>
<FilenamePress> "ROOT/image/BP_ProblemTelNum.png" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var ChooseProblem = "incorrect number"
PROBLEM TelephoneNumber ChooseProblem
Open "/ROOT/xml/tellproblem_working.xml"
</EventClick>
</Button>
<Button>
<X> 106 </X>
<Y> 473 </Y>
<Filename> "ROOT/image/BN_ProblemProduct.png" </Filename>
<FilenamePress> "ROOT/image/BP_ProblemProduct.png" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var ChooseProblem = "product purchasing problems"
PROBLEM TelephoneNumber ChooseProblem
Open "/ROOT/xml/tellproblem_working.xml"
</EventClick>
</Button>
<Button>
<X> 604 </X>
<Y> 473 </Y>
<Filename> "ROOT/image/BN_ProblemTopupFailed.png" </Filename>
<FilenamePress> "ROOT/image/BP_ProblemTopupFailed.png" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var ChooseProblem = "transaction incomplete"
PROBLEM TelephoneNumber ChooseProblem
Open "/ROOT/xml/tellproblem_working.xml"
</EventClick>
</Button>
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
</EventSecurity>
</Page>

92
xml/menu_problem.xml.bak Normal file
View file

@ -0,0 +1,92 @@
<Page>
<Width> 1080 </Width>
<Height> 1312 </Height>
<Background> "ROOT/image/BG_Main_Menu.bmp" </Background>
<EventOpen>
Var ChooseProblem = ""
Var TextProblem = ""
Var Timeout = 0
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
Var Timeout = Timeout + 1
If Timeout = 10 Then
Open "/mnt/sdcard/coffeevending/xml/menu_board.xml"
EndIf
TimerReset
;Refresh
</EventTimeout>
<EventNetDown>
Open "/mnt/sdcard/coffeevending/xml/main.xml"
</EventNetDown>
<Button>
<X> 106 </X>
<Y> 183 </Y>
<Filename> "ROOT/image/BN_ปัญหาเงินทอน.png" </Filename>
<FilenamePress> "ROOT/image/BP_ปัญหาเงินทอน.png" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var ChooseProblem = "product purchasing problems"
PROBLEM TelephoneNumber ChooseProblem
Open "/ROOT/xml/tellproblem_working.xml"
</EventClick>
</Button>
<Button>
<X> 604 </X>
<Y> 183 </Y>
<Filename> "ROOT/image/BN_ปัญหาเติมผิดเบอร์.png" </Filename>
<FilenamePress> "ROOT/image/BP_ปัญหาเติมผิดเบอร์.png" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var ChooseProblem = "incorrect number"
PROBLEM TelephoneNumber ChooseProblem
Open "/ROOT/xml/tellproblem_working.xml"
</EventClick>
</Button>
<Button>
<X> 106 </X>
<Y> 473 </Y>
<Filename> "ROOT/image/BN_ปัญหาสินค้า.png" </Filename>
<FilenamePress> "ROOT/image/BP_ปัญหาสินค้า.png" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var ChooseProblem = "product purchasing problems"
PROBLEM TelephoneNumber ChooseProblem
Open "/ROOT/xml/tellproblem_working.xml"
</EventClick>
</Button>
<Button>
<X> 604 </X>
<Y> 473 </Y>
<Filename> "ROOT/image/BN_ปัญหาเติมไม่สำเร็จ.png" </Filename>
<FilenamePress> "ROOT/image/BP_ปัญหาเติมไม่สำเร็จ.png" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var ChooseProblem = "transaction incomplete"
PROBLEM TelephoneNumber ChooseProblem
Open "/ROOT/xml/tellproblem_working.xml"
</EventClick>
</Button>
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
</EventSecurity>
</Page>

34
xml/menu_test.xml Normal file
View file

@ -0,0 +1,34 @@
<Page>
<Width> 1080 </Width>
<Height> 1312 </Height>
<Background> "ROOT/image/BG1SLOT_TAB3_1.jpg" </Background>
<EventOpen>
; On open
TopView "show"
Var Timeout = 0
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
</EventTimeout>
<EventMachine>
</EventMachine>
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
</EventSecurity>
</Page>

322
xml/menu_topping.xml Normal file
View file

@ -0,0 +1,322 @@
<Page>
<Width> 1080 </Width>
<Height> 1312 </Height>
<Background> "ROOT/image/BG_Menu_Page2.bmp" </Background>
<Sound> "ROOT/sounds/selectSugar.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventOpen>
; On open
TopView "hide"
Machine NozzlePrepar
Var Timeout = 0
Var SweetState1 = "PressForever"
Var SweetState2 = "Enable"
Var SweetState3 = "Enable"
Var SweetState4 = "Enable"
Var SweetState5 = "Enable"
Var SweetState6 = "Enable"
Var SweetChoosed = "ไม่หวาน"
Var SelectSugarID = 1
If NHaveDrink = "false" Then
Var SweetChoosed = ""
Open "ROOT/xml/menu_page3.xml"
EndIf
SAVELOG SelectOnTop1
If SelectOnTop1 = 1 Then
Var SweetState1 = "Enable"
Var SweetState2 = "PressForever"
Var SweetState3 = "Enable"
Var SweetState4 = "Enable"
Var SweetState5 = "Enable"
Var SweetState6 = "Enable"
Var Timeout = 0
Var SweetChoosed = "หวานน้อย"
Var SelectSugarID = 2
EndIf
If SelectOnTop1 = 2 Then
Var SweetState1 = "Enable"
Var SweetState2 = "Enable"
Var SweetState3 = "PressForever"
Var SweetState4 = "Enable"
Var SweetState5 = "Enable"
Var SweetState6 = "Enable"
Var Timeout = 0
Var SweetChoosed = "หวานพอดี"
Var SelectSugarID = 3
EndIf
If SelectOnTop1 = 3 Then
Var SweetState1 = "Enable"
Var SweetState2 = "Enable"
Var SweetState3 = "Enable"
Var SweetState4 = "PressForever"
Var SweetState5 = "Enable"
Var SweetState6 = "Enable"
Var Timeout = 0
Var SweetChoosed = "หวานมาก"
Var SelectSugarID = 4
EndIf
If SelectOnTop1 = 4 Then
Var SweetState1 = "Enable"
Var SweetState2 = "Enable"
Var SweetState3 = "Enable"
Var SweetState4 = "Enable"
Var SweetState5 = "PressForever"
Var SweetState6 = "Enable"
Var Timeout = 0
Var SweetChoosed = "หวานเว่อร์"
Var SelectSugarID = 5
EndIf
If SugarPreMixSel = 1 Then
Open "ROOT/xml/menu_topping_mode2.xml"
EndIf
If SugarPreMixSel = 2 Then
Open "ROOT/xml/menu_topping_mode2.xml"
EndIf
If SugarPreMixSel = 3 Then
Open "ROOT/xml/menu_topping_mode2.xml"
EndIf
</EventOpen>
<Timeout> 2000 </Timeout>
<EventTimeout>
;Open "ROOT/xml/menu_board.xml"
Var Timeout = Timeout + 1
If Timeout > 5 Then
Open "ROOT/xml/menu_board.xml"
EndIf
TimerReset
Refresh
</EventTimeout>
<Button>
<X> 369 </X>
<Y> 502 </Y>
<State> SweetState1 </State>
<Filename> "ROOT/image/BN_0%.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_0%.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var SweetState1 = "PressForever"
Var SweetState2 = "Enable"
Var SweetState3 = "Enable"
Var SweetState4 = "Enable"
Var SweetState5 = "Enable"
Var SweetState6 = "Enable"
Var Timeout = 0
Var SweetChoosed = "ไม่หวาน"
Var SelectSugarID = 1
Refresh
</EventClick>
</Button>
<Button>
<X> 474 </X>
<Y> 502 </Y>
<State> SweetState2 </State>
<Filename> "ROOT/image/BN_25%.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_25%.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var SweetState1 = "Enable"
Var SweetState2 = "PressForever"
Var SweetState3 = "Enable"
Var SweetState4 = "Enable"
Var SweetState5 = "Enable"
Var SweetState6 = "Enable"
Var Timeout = 0
Var SweetChoosed = "หวานน้อย"
Var SelectSugarID = 2
Refresh
</EventClick>
</Button>
<Button>
<X> 581 </X>
<Y> 502 </Y>
<State> SweetState3 </State>
<Filename> "ROOT/image/BN_50%.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_50%.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var SweetState1 = "Enable"
Var SweetState2 = "Enable"
Var SweetState3 = "PressForever"
Var SweetState4 = "Enable"
Var SweetState5 = "Enable"
Var SweetState6 = "Enable"
Var Timeout = 0
Var SweetChoosed = "หวานพอดี"
Var SelectSugarID = 3
Refresh
</EventClick>
</Button>
<Button>
<X> 686 </X>
<Y> 502 </Y>
<State> SweetState4 </State>
<Filename> "ROOT/image/BN_75%.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_75%.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var SweetState1 = "Enable"
Var SweetState2 = "Enable"
Var SweetState3 = "Enable"
Var SweetState4 = "PressForever"
Var SweetState5 = "Enable"
Var SweetState6 = "Enable"
Var Timeout = 0
Var SweetChoosed = "หวานมาก"
Var SelectSugarID = 4
Refresh
</EventClick>
</Button>
<Button>
<X> 792 </X>
<Y> 502 </Y>
<State> SweetState5 </State>
<Filename> "ROOT/image/BN_100%.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_100%.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var SweetState1 = "Enable"
Var SweetState2 = "Enable"
Var SweetState3 = "Enable"
Var SweetState4 = "Enable"
Var SweetState5 = "PressForever"
Var SweetState6 = "Enable"
Var Timeout = 0
Var SweetChoosed = "หวานเว่อร์"
Var SelectSugarID = 5
Refresh
</EventClick>
</Button>
<Button>
<X> 896 </X>
<Y> 502 </Y>
<State> SweetState6 </State>
<Filename> "ROOT/image/BN_150%.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_150%.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var SweetState1 = "Enable"
Var SweetState2 = "Enable"
Var SweetState3 = "Enable"
Var SweetState4 = "Enable"
Var SweetState5 = "Enable"
Var SweetState6 = "PressForever"
Var Timeout = 0
Var SweetChoosed = "หวานสามโลก"
Var SelectSugarID = 6
Refresh
</EventClick>
</Button>
<Button>
<X> 431 </X>
<Y> 805 </Y>
<Filename> "ROOT/image/BN_Cancle.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_Cancle.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Open "ROOT/xml/menu_board.xml"
</EventClick>
</Button>
<Button>
<X> 566 </X>
<Y> 805 </Y>
<Filename> "ROOT/image/BN_Confirm2.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_Confirm2.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Open "ROOT/xml/menu_page3.xml"
</EventClick>
</Button>
<Image>
<X> 90 </X>
<Y> 285 </Y>
<Filename> PictureDrink </Filename>
</Image>
<Text>
<X> 375 </X>
<Y> 320</Y>
<Size> 30 </Size>
<Font> fontType1 </Font>
<Color> 0x000000 </Color>
<Value> NameDrink </Value>
</Text>
<Text>
<X> 375 </X>
<Y> 355 </Y>
<Size> 20 </Size>
<Font> fontType1 </Font>
<Color> 0xB78F24 </Color>
<Value> NameDrinkTH </Value>
</Text>
<Text>
<X> 530 </X>
<Y> 678 </Y>
<Width>200</Width>
<Align> Center </Align>
<Size> 25 </Size>
<Font> fontType1 </Font>
<Color> 0xFFFFFF </Color>
<Value> PriceDrink </Value>
</Text>
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
</EventSecurity>
</Page>

251
xml/menu_topping_alter.xml Normal file
View file

@ -0,0 +1,251 @@
<Page>
<Width> 1080 </Width>
<Height> 1312 </Height>
<Background> "ROOT/image3/background2.png" </Background>
<EventOpen>
; On open
TopView "hide"
</EventOpen>
<Timeout> 2000 </Timeout>
<EventTimeout>
;Open "ROOT/xml/menu_board.xml"
Open "ROOT/xml/menu_topping_alter2.xml"
</EventTimeout>
<EventMachine>
SAVELOG TOPPING1
SAVELOG TOPPING2
If TOPPING1 = "Powder Sugar" Then
If TOPPING2 = "Hot water 3 step" Then
If SubMenuProductCode1 = "-" Then
Open "ROOT/xml/menu_topping_hot_menu.xml"
Else
Open "ROOT/xml/menu_topping_hot_menu_coffee.xml"
EndIf
Else
Open "ROOT/xml/menu_topping_sugar_only.xml"
EndIf
EndIf
Open "ROOT/xml/menu_page3_alter.xml"
</EventMachine>
;<Button>
;<X> 369 </X>
;<Y> 502 </Y>
;<State> SweetState1 </State>
;<Filename> "ROOT/image/BN_0%.bmp" </Filename>
;<FilenamePress> "ROOT/image/BP_0%.bmp" </FilenamePress>
;<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
;<Volume> SoundVolume </Volume>
;<EventClick>
; Var SweetState1 = "PressForever"
; Var SweetState2 = "Enable"
; Var SweetState3 = "Enable"
; Var SweetState4 = "Enable"
; Var SweetState5 = "Enable"
; Var SweetState6 = "Enable"
; Var Timeout = 0
; Var SweetChoosed = "ไม่หวาน"
; Var SelectSugarID = 1
; Refresh
;</EventClick>
;</Button>
;
;<Button>
;<X> 474 </X>
;<Y> 502 </Y>
;<State> SweetState2 </State>
;<Filename> "ROOT/image/BN_25%.bmp" </Filename>
;<FilenamePress> "ROOT/image/BP_25%.bmp" </FilenamePress>
;<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
;<Volume> SoundVolume </Volume>
;<EventClick>
; Var SweetState1 = "Enable"
; Var SweetState2 = "PressForever"
; Var SweetState3 = "Enable"
; Var SweetState4 = "Enable"
; Var SweetState5 = "Enable"
; Var SweetState6 = "Enable"
; Var Timeout = 0
; Var SweetChoosed = "หวานน้อย"
; Var SelectSugarID = 2
; Refresh
;</EventClick>
;</Button>
;
;<Button>
;<X> 581 </X>
;<Y> 502 </Y>
;<State> SweetState3 </State>
;<Filename> "ROOT/image/BN_50%.bmp" </Filename>
;<FilenamePress> "ROOT/image/BP_50%.bmp" </FilenamePress>
;<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
;<Volume> SoundVolume </Volume>
;<EventClick>
; Var SweetState1 = "Enable"
; Var SweetState2 = "Enable"
; Var SweetState3 = "PressForever"
; Var SweetState4 = "Enable"
; Var SweetState5 = "Enable"
; Var SweetState6 = "Enable"
; Var Timeout = 0
; Var SweetChoosed = "หวานพอดี"
; Var SelectSugarID = 3
; Refresh
;</EventClick>
;</Button>
;
;<Button>
;<X> 686 </X>
;<Y> 502 </Y>
;<State> SweetState4 </State>
;<Filename> "ROOT/image/BN_75%.bmp" </Filename>
;<FilenamePress> "ROOT/image/BP_75%.bmp" </FilenamePress>
;<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
;<Volume> SoundVolume </Volume>
;<EventClick>
; Var SweetState1 = "Enable"
; Var SweetState2 = "Enable"
; Var SweetState3 = "Enable"
; Var SweetState4 = "PressForever"
; Var SweetState5 = "Enable"
; Var SweetState6 = "Enable"
; Var Timeout = 0
; Var SweetChoosed = "หวานมาก"
; Var SelectSugarID = 4
; Refresh
;</EventClick>
;</Button>
;
;<Button>
;<X> 792 </X>
;<Y> 502 </Y>
;<State> SweetState5 </State>
;<Filename> "ROOT/image/BN_100%.bmp" </Filename>
;<FilenamePress> "ROOT/image/BP_100%.bmp" </FilenamePress>
;<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
;<Volume> SoundVolume </Volume>
;<EventClick>
; Var SweetState1 = "Enable"
; Var SweetState2 = "Enable"
; Var SweetState3 = "Enable"
; Var SweetState4 = "Enable"
; Var SweetState5 = "PressForever"
; Var SweetState6 = "Enable"
; Var Timeout = 0
; Var SweetChoosed = "หวานเว่อร์"
; Var SelectSugarID = 5
; Refresh
;</EventClick>
;</Button>
;
;<Button>
;<X> 896 </X>
;<Y> 502 </Y>
;<State> SweetState6 </State>
;<Filename> "ROOT/image/BN_150%.bmp" </Filename>
;<FilenamePress> "ROOT/image/BP_150%.bmp" </FilenamePress>
;<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
;<Volume> SoundVolume </Volume>
;<EventClick>
; Var SweetState1 = "Enable"
; Var SweetState2 = "Enable"
; Var SweetState3 = "Enable"
; Var SweetState4 = "Enable"
; Var SweetState5 = "Enable"
; Var SweetState6 = "PressForever"
; Var Timeout = 0
; Var SweetChoosed = "หวานสามโลก"
; Var SelectSugarID = 6
; Refresh
;</EventClick>
;</Button>
;
;
;
;
;<Button>
;<X> 431 </X>
;<Y> 805 </Y>
;<Filename> "ROOT/image/BN_Cancle.bmp" </Filename>
;<FilenamePress> "ROOT/image/BP_Cancle.bmp" </FilenamePress>
;<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
;<Volume> SoundVolume </Volume>
;<EventClick>
; ;Open "ROOT/xml/menu_board.xml"
; OpenInst 2 "/mnt/sdcard/coffeevending/xml/menu_list_show_all.xml"
; OpenInst 1 "/mnt/sdcard/coffeevending/xml/menu_advert.xml"
; Open "/mnt/sdcard/coffeevending/xml/menu_main_blank.xml"
;</EventClick>
;</Button>
;
;<Button>
;<X> 566 </X>
;<Y> 805 </Y>
;<Filename> "ROOT/image/BN_Confirm2.bmp" </Filename>
;<FilenamePress> "ROOT/image/BP_Confirm2.bmp" </FilenamePress>
;<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
;<Volume> SoundVolume </Volume>
;<EventClick>
; Open "ROOT/xml/menu_page3.xml"
;</EventClick>
;</Button>
<Image>
<X> 90 </X>
<Y> 285 </Y>
<Filename> PictureDrink </Filename>
</Image>
<Text>
<X> 375 </X>
<Y> 320</Y>
<Size> 30 </Size>
<Font> fontType1 </Font>
<Color> 0x000000 </Color>
<Value> NameDrink </Value>
</Text>
<Text>
<X> 375 </X>
<Y> 355 </Y>
<Size> 20 </Size>
<Font> fontType1 </Font>
<Color> 0xB78F24 </Color>
<Value> NameDrinkTH </Value>
</Text>
<Text>
<X> 530 </X>
<Y> 678 </Y>
<Width>200</Width>
<Align> Center </Align>
<Size> 25 </Size>
<Font> fontType1 </Font>
<Color> 0xFFFFFF </Color>
<Value> PriceDrink </Value>
</Text>
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
</EventSecurity>
</Page>

325
xml/menu_topping_alter2.xml Normal file
View file

@ -0,0 +1,325 @@
<Page>
<Width> 1080 </Width>
<Height> 1312 </Height>
<Background> "ROOT/image/BG_Menu_Page2.bmp" </Background>
<Sound> "ROOT/sounds/selectSugar.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventOpen>
; On open
TopView "hide"
Machine NozzlePrepar
Var Timeout = 0
Var SweetState1 = "PressForever"
Var SweetState2 = "Enable"
Var SweetState3 = "Enable"
Var SweetState4 = "Enable"
Var SweetState5 = "Enable"
Var SweetState6 = "Enable"
Var SweetChoosed = "ไม่หวาน"
Var SelectSugarID = 1
If NHaveDrink = "false" Then
Var SweetChoosed = ""
Open "ROOT/xml/menu_page3.xml"
EndIf
SAVELOG SelectOnTop1
If SelectOnTop1 = 1 Then
Var SweetState1 = "Enable"
Var SweetState2 = "PressForever"
Var SweetState3 = "Enable"
Var SweetState4 = "Enable"
Var SweetState5 = "Enable"
Var SweetState6 = "Enable"
Var Timeout = 0
Var SweetChoosed = "หวานน้อย"
Var SelectSugarID = 2
EndIf
If SelectOnTop1 = 2 Then
Var SweetState1 = "Enable"
Var SweetState2 = "Enable"
Var SweetState3 = "PressForever"
Var SweetState4 = "Enable"
Var SweetState5 = "Enable"
Var SweetState6 = "Enable"
Var Timeout = 0
Var SweetChoosed = "หวานพอดี"
Var SelectSugarID = 3
EndIf
If SelectOnTop1 = 3 Then
Var SweetState1 = "Enable"
Var SweetState2 = "Enable"
Var SweetState3 = "Enable"
Var SweetState4 = "PressForever"
Var SweetState5 = "Enable"
Var SweetState6 = "Enable"
Var Timeout = 0
Var SweetChoosed = "หวานมาก"
Var SelectSugarID = 4
EndIf
If SelectOnTop1 = 4 Then
Var SweetState1 = "Enable"
Var SweetState2 = "Enable"
Var SweetState3 = "Enable"
Var SweetState4 = "Enable"
Var SweetState5 = "PressForever"
Var SweetState6 = "Enable"
Var Timeout = 0
Var SweetChoosed = "หวานเว่อร์"
Var SelectSugarID = 5
EndIf
If SugarPreMixSel = 1 Then
Open "ROOT/xml/menu_topping_mode2.xml"
EndIf
If SugarPreMixSel = 2 Then
Open "ROOT/xml/menu_topping_mode2.xml"
EndIf
If SugarPreMixSel = 3 Then
Open "ROOT/xml/menu_topping_mode2.xml"
EndIf
</EventOpen>
<Timeout> 2000 </Timeout>
<EventTimeout>
;Open "ROOT/xml/menu_board.xml"
Var Timeout = Timeout + 1
If Timeout > 5 Then
Open "ROOT/xml/menu_board.xml"
EndIf
TimerReset
Refresh
</EventTimeout>
<Button>
<X> 369 </X>
<Y> 502 </Y>
<State> SweetState1 </State>
<Filename> "ROOT/image/BN_0%.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_0%.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var SweetState1 = "PressForever"
Var SweetState2 = "Enable"
Var SweetState3 = "Enable"
Var SweetState4 = "Enable"
Var SweetState5 = "Enable"
Var SweetState6 = "Enable"
Var Timeout = 0
Var SweetChoosed = "ไม่หวาน"
Var SelectSugarID = 1
Refresh
</EventClick>
</Button>
<Button>
<X> 474 </X>
<Y> 502 </Y>
<State> SweetState2 </State>
<Filename> "ROOT/image/BN_25%.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_25%.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var SweetState1 = "Enable"
Var SweetState2 = "PressForever"
Var SweetState3 = "Enable"
Var SweetState4 = "Enable"
Var SweetState5 = "Enable"
Var SweetState6 = "Enable"
Var Timeout = 0
Var SweetChoosed = "หวานน้อย"
Var SelectSugarID = 2
Refresh
</EventClick>
</Button>
<Button>
<X> 581 </X>
<Y> 502 </Y>
<State> SweetState3 </State>
<Filename> "ROOT/image/BN_50%.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_50%.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var SweetState1 = "Enable"
Var SweetState2 = "Enable"
Var SweetState3 = "PressForever"
Var SweetState4 = "Enable"
Var SweetState5 = "Enable"
Var SweetState6 = "Enable"
Var Timeout = 0
Var SweetChoosed = "หวานพอดี"
Var SelectSugarID = 3
Refresh
</EventClick>
</Button>
<Button>
<X> 686 </X>
<Y> 502 </Y>
<State> SweetState4 </State>
<Filename> "ROOT/image/BN_75%.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_75%.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var SweetState1 = "Enable"
Var SweetState2 = "Enable"
Var SweetState3 = "Enable"
Var SweetState4 = "PressForever"
Var SweetState5 = "Enable"
Var SweetState6 = "Enable"
Var Timeout = 0
Var SweetChoosed = "หวานมาก"
Var SelectSugarID = 4
Refresh
</EventClick>
</Button>
<Button>
<X> 792 </X>
<Y> 502 </Y>
<State> SweetState5 </State>
<Filename> "ROOT/image/BN_100%.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_100%.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var SweetState1 = "Enable"
Var SweetState2 = "Enable"
Var SweetState3 = "Enable"
Var SweetState4 = "Enable"
Var SweetState5 = "PressForever"
Var SweetState6 = "Enable"
Var Timeout = 0
Var SweetChoosed = "หวานเว่อร์"
Var SelectSugarID = 5
Refresh
</EventClick>
</Button>
<Button>
<X> 896 </X>
<Y> 502 </Y>
<State> SweetState6 </State>
<Filename> "ROOT/image/BN_150%.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_150%.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var SweetState1 = "Enable"
Var SweetState2 = "Enable"
Var SweetState3 = "Enable"
Var SweetState4 = "Enable"
Var SweetState5 = "Enable"
Var SweetState6 = "PressForever"
Var Timeout = 0
Var SweetChoosed = "หวานสามโลก"
Var SelectSugarID = 6
Refresh
</EventClick>
</Button>
<Button>
<X> 431 </X>
<Y> 805 </Y>
<Filename> "ROOT/image/BN_Cancle.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_Cancle.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
;Open "ROOT/xml/menu_board.xml"
OpenInst 2 "/mnt/sdcard/coffeevending/xml/menu_list_show_less.xml"
OpenInst 1 "/mnt/sdcard/coffeevending/xml/menu_advert.xml"
Open "/mnt/sdcard/coffeevending/xml/menu_main_blank.xml"
</EventClick>
</Button>
<Button>
<X> 566 </X>
<Y> 805 </Y>
<Filename> "ROOT/image/BN_Confirm2.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_Confirm2.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Open "ROOT/xml/menu_page3.xml"
</EventClick>
</Button>
<Image>
<X> 90 </X>
<Y> 285 </Y>
<Filename> PictureDrink </Filename>
</Image>
<Text>
<X> 375 </X>
<Y> 320</Y>
<Size> 30 </Size>
<Font> fontType1 </Font>
<Color> 0x000000 </Color>
<Value> NameDrink </Value>
</Text>
<Text>
<X> 375 </X>
<Y> 355 </Y>
<Size> 20 </Size>
<Font> fontType1 </Font>
<Color> 0xB78F24 </Color>
<Value> NameDrinkTH </Value>
</Text>
<Text>
<X> 530 </X>
<Y> 678 </Y>
<Width>200</Width>
<Align> Center </Align>
<Size> 25 </Size>
<Font> fontType1 </Font>
<Color> 0xFFFFFF </Color>
<Value> PriceDrink </Value>
</Text>
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
</EventSecurity>
</Page>

View file

@ -0,0 +1,390 @@
<Page>
<Width> 1080 </Width>
<Height> 1312 </Height>
<Background> "ROOT/image3/background2.png" </Background>
<Sound> "ROOT/sounds/selectSugar.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventOpen>
; On open
TopView "hide"
Var Timeout = 0
Var SweetState1 = "PressForever"
Var SweetState2 = "Enable"
Var SweetState3 = "Enable"
Var SweetState4 = "Enable"
Var SweetState5 = "Enable"
Var SweetState6 = "Enable"
Var SweetChoosed = "ไม่หวาน"
SAVELOG toppingID1Default
SAVELOG toppingID2Default
If NHaveDrink = "false" Then
Var SweetChoosed = ""
Open "ROOT/xml/menu_page3.xml"
EndIf
Var topping1 = toppingID1Default
Var topping2 = toppingID2Default
If toppingID1Default = "2" Then
Var SweetState1 = "Enable"
Var SweetState2 = "PressForever"
Var SweetState3 = "Enable"
Var SweetState4 = "Enable"
Var SweetState5 = "Enable"
Var SweetState6 = "Enable"
Var Timeout = 0
Var SweetChoosed = "หวานน้อย"
Var SelectSugarID = 2
EndIf
If toppingID1Default = "3" Then
Var SweetState1 = "Enable"
Var SweetState2 = "Enable"
Var SweetState3 = "PressForever"
Var SweetState4 = "Enable"
Var SweetState5 = "Enable"
Var SweetState6 = "Enable"
Var Timeout = 0
Var SweetChoosed = "หวานพอดี"
Var SelectSugarID = 3
EndIf
If toppingID1Default = "4" Then
Var SweetState1 = "Enable"
Var SweetState2 = "Enable"
Var SweetState3 = "Enable"
Var SweetState4 = "PressForever"
Var SweetState5 = "Enable"
Var SweetState6 = "Enable"
Var Timeout = 0
Var SweetChoosed = "หวานมาก"
Var SelectSugarID = 4
EndIf
If toppingID2Default = "29" Then
Var hotStatelevel1 = "Enable"
Var hotStatelevel2 = "Enable"
Var hotStatelevel3 = "PressForever"
EndIf
If toppingID2Default = "28" Then
Var hotStatelevel1 = "Enable"
Var hotStatelevel2 = "PressForever"
Var hotStatelevel3 = "Enable"
EndIf
If toppingID2Default = "27" Then
Var hotStatelevel1 = "PressForever"
Var hotStatelevel2 = "Enable"
Var hotStatelevel3 = "Enable"
EndIf
Var sugar_y_posi = 402
Var hot_y_posi = 552
</EventOpen>
<Timeout> 2000 </Timeout>
<EventTimeout>
;Open "ROOT/xml/menu_board.xml"
Var Timeout = Timeout + 1
If Timeout > 5 Then
Open "ROOT/xml/menu_board.xml"
EndIf
TimerReset
Refresh
</EventTimeout>
<Button>
<X> 369 </X>
<Y> sugar_y_posi </Y>
<State> SweetState1 </State>
<Filename> "ROOT/image/BN_0%.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_0%.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var SweetState1 = "PressForever"
Var SweetState2 = "Enable"
Var SweetState3 = "Enable"
Var SweetState4 = "Enable"
Var SweetState5 = "Enable"
Var SweetState6 = "Enable"
Var Timeout = 0
Var SweetChoosed = "ไม่หวาน"
Var topping1 = "1"
Refresh
</EventClick>
</Button>
<Button>
<X> 474 </X>
<Y> sugar_y_posi </Y>
<State> SweetState2 </State>
<Filename> "ROOT/image/BN_25%.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_25%.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var SweetState1 = "Enable"
Var SweetState2 = "PressForever"
Var SweetState3 = "Enable"
Var SweetState4 = "Enable"
Var SweetState5 = "Enable"
Var SweetState6 = "Enable"
Var Timeout = 0
Var SweetChoosed = "หวานน้อย"
Var topping1 = "2"
Refresh
</EventClick>
</Button>
<Button>
<X> 581 </X>
<Y> sugar_y_posi </Y>
<State> SweetState3 </State>
<Filename> "ROOT/image/BN_50%.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_50%.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var SweetState1 = "Enable"
Var SweetState2 = "Enable"
Var SweetState3 = "PressForever"
Var SweetState4 = "Enable"
Var SweetState5 = "Enable"
Var SweetState6 = "Enable"
Var Timeout = 0
Var SweetChoosed = "หวานพอดี"
Var topping1 = "3"
Refresh
</EventClick>
</Button>
<Button>
<X> 686 </X>
<Y> sugar_y_posi </Y>
<State> SweetState4 </State>
<Filename> "ROOT/image/BN_75%.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_75%.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var SweetState1 = "Enable"
Var SweetState2 = "Enable"
Var SweetState3 = "Enable"
Var SweetState4 = "PressForever"
Var SweetState5 = "Enable"
Var SweetState6 = "Enable"
Var Timeout = 0
Var SweetChoosed = "หวานมาก"
Var topping1 = "4"
Refresh
</EventClick>
</Button>
<Button>
<X> 792 </X>
<Y> sugar_y_posi </Y>
<State> SweetState5 </State>
<Filename> "ROOT/image/BN_100%.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_100%.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var SweetState1 = "Enable"
Var SweetState2 = "Enable"
Var SweetState3 = "Enable"
Var SweetState4 = "Enable"
Var SweetState5 = "PressForever"
Var SweetState6 = "Enable"
Var Timeout = 0
Var SweetChoosed = "หวานเว่อร์"
Var topping1 = "5"
Refresh
</EventClick>
</Button>
<Button>
<X> 896 </X>
<Y> sugar_y_posi </Y>
<State> SweetState6 </State>
<Filename> "ROOT/image/BN_150%.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_150%.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var SweetState1 = "Enable"
Var SweetState2 = "Enable"
Var SweetState3 = "Enable"
Var SweetState4 = "Enable"
Var SweetState5 = "Enable"
Var SweetState6 = "PressForever"
Var Timeout = 0
Var SweetChoosed = "หวานสามโลก"
Var topping1 = "6"
Refresh
</EventClick>
</Button>
;
;
;
;
<Button>
<X> 369 </X>
<Y> hot_y_posi </Y>
<State> hotStatelevel1 </State>
<Filename> "ROOT/image/BN_hot1.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_hot1.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var hotStatelevel1 = "PressForever"
Var hotStatelevel2 = "Enable"
Var hotStatelevel3 = "Enable"
Var hotShowLevel = "ร้อนน้อย"
Var topping2 = "27"
Var Timeout = 0
Refresh
</EventClick>
</Button>
<Button>
<X> 474 </X>
<Y> hot_y_posi </Y>
<State> hotStatelevel2 </State>
<Filename> "ROOT/image/BN_hot2.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_hot2.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var hotStatelevel1 = "Enable"
Var hotStatelevel2 = "PressForever"
Var hotStatelevel3 = "Enable"
Var hotShowLevel = "ร้อนพอดี"
Var Timeout = 0
Var topping2 = "28"
Refresh
</EventClick>
</Button>
<Button>
<X> 581 </X>
<Y> hot_y_posi </Y>
<State> hotStatelevel3 </State>
<Filename> "ROOT/image/BN_hot3.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_hot3.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var hotStatelevel1 = "Enable"
Var hotStatelevel2 = "Enable"
Var hotStatelevel3 = "PressForever"
Var hotShowLevel = "ร้อนมาก"
Var Timeout = 0
Var topping2 = "29"
Refresh
</EventClick>
</Button>
<Button>
<X> 431 </X>
<Y> 1050 </Y>
<Filename> "ROOT/image/BN_Cancle.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_Cancle.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
;Open "ROOT/xml/menu_board.xml"
OpenInst 2 "/mnt/sdcard/coffeevending/xml/menu_list_show_less.xml"
OpenInst 1 "/mnt/sdcard/coffeevending/xml/menu_advert.xml"
Open "/mnt/sdcard/coffeevending/xml/menu_main_blank.xml"
</EventClick>
</Button>
<Button>
<X> 566 </X>
<Y> 1050 </Y>
<Filename> "ROOT/image/BN_Confirm2.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_Confirm2.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Open "ROOT/xml/menu_page3_alter.xml"
</EventClick>
</Button>
<Image>
<X> 90 </X>
<Y> 285 </Y>
<Filename> PictureDrink </Filename>
</Image>
<Text>
<X> 375 </X>
<Y> 320</Y>
<Size> 30 </Size>
<Font> fontType1 </Font>
<Color> 0x000000 </Color>
<Value> NameDrink </Value>
</Text>
<Text>
<X> 375 </X>
<Y> 355 </Y>
<Size> 20 </Size>
<Font> fontType1 </Font>
<Color> 0xB78F24 </Color>
<Value> NameDrinkTH </Value>
</Text>
<Text>
<X> 530 </X>
<Y> 678 </Y>
<Width>200</Width>
<Align> Center </Align>
<Size> 25 </Size>
<Font> fontType1 </Font>
<Color> 0xFFFFFF </Color>
<Value> PriceDrink </Value>
</Text>
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
</EventSecurity>
</Page>

View file

@ -0,0 +1,478 @@
<Page>
<Width> 1080 </Width>
<Height> 1312 </Height>
<Background> "ROOT/image3/background2.png" </Background>
<Sound> "ROOT/sounds/selectSugar.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventOpen>
; On open
TopView "hide"
Var Timeout = 0
Var SweetState1 = "PressForever"
Var SweetState2 = "Enable"
Var SweetState3 = "Enable"
Var SweetState4 = "Enable"
Var SweetState5 = "Enable"
Var SweetState6 = "Enable"
Var SweetChoosed = "ไม่หวาน"
SAVELOG toppingID1Default
SAVELOG toppingID2Default
If NHaveDrink = "false" Then
Var SweetChoosed = ""
Open "ROOT/xml/menu_page3.xml"
EndIf
Var topping1 = toppingID1Default
Var topping2 = toppingID2Default
If toppingID1Default = "2" Then
Var SweetState1 = "Enable"
Var SweetState2 = "PressForever"
Var SweetState3 = "Enable"
Var SweetState4 = "Enable"
Var SweetState5 = "Enable"
Var SweetState6 = "Enable"
Var Timeout = 0
Var SweetChoosed = "หวานน้อย"
Var SelectSugarID = 2
EndIf
If toppingID1Default = "3" Then
Var SweetState1 = "Enable"
Var SweetState2 = "Enable"
Var SweetState3 = "PressForever"
Var SweetState4 = "Enable"
Var SweetState5 = "Enable"
Var SweetState6 = "Enable"
Var Timeout = 0
Var SweetChoosed = "หวานพอดี"
Var SelectSugarID = 3
EndIf
If toppingID1Default = "4" Then
Var SweetState1 = "Enable"
Var SweetState2 = "Enable"
Var SweetState3 = "Enable"
Var SweetState4 = "PressForever"
Var SweetState5 = "Enable"
Var SweetState6 = "Enable"
Var Timeout = 0
Var SweetChoosed = "หวานมาก"
Var SelectSugarID = 4
EndIf
If toppingID2Default = "29" Then
Var hotStatelevel1 = "Enable"
Var hotStatelevel2 = "Enable"
Var hotStatelevel3 = "PressForever"
EndIf
If toppingID2Default = "28" Then
Var hotStatelevel1 = "Enable"
Var hotStatelevel2 = "PressForever"
Var hotStatelevel3 = "Enable"
EndIf
If toppingID2Default = "27" Then
Var hotStatelevel1 = "PressForever"
Var hotStatelevel2 = "Enable"
Var hotStatelevel3 = "Enable"
EndIf
Var sugar_y_posi = 702
Var hot_y_posi = 852
Var blend_y_posi0 = 402
Var blend_y_posi1 = blend_y_posi0 + 100
Var blend_y_posi2 = blend_y_posi1 + 100
Var BNSub0 = "ROOT/image3/BN_" + SelectDrink
Var BNSub0 = BNSub0 + ".png"
Var BPSub0 = "ROOT/image3/BP_" + SelectDrink
Var BPSub0 = BPSub0 + ".png"
If SubMenuProductCode1 = "-" Then
Var BNSub1 = ""
Var BPSub1 = ""
Else
Var BNSub1 = "ROOT/image3/BN_" + SubMenuProductCode1
Var BNSub1 = BNSub1 + ".png"
Var BPSub1 = "ROOT/image3/BP_" + SubMenuProductCode1
Var BPSub1 = BPSub1 + ".png"
EndIf
If SubMenuProductCode2 = "-" Then
Var BNSub2 = ""
Var BPSub2 = ""
Else
Var BNSub2 = "ROOT/image3/BN_" + SubMenuProductCode2
Var BNSub2 = BNSub2 + ".png"
Var BPSub2 = "ROOT/image3/BP_" + SubMenuProductCode2
Var BPSub2 = BPSub2 + ".png"
EndIf
Var SubSelectStg0 = "PressForever"
Var SubSelectStg1 = "Enable"
Var SubSelectStg2 = "Enable"
Var SubSelectStg3 = "Enable"
</EventOpen>
<Timeout> 2000 </Timeout>
<EventTimeout>
;Open "ROOT/xml/menu_board.xml"
Var Timeout = Timeout + 1
If Timeout > 5 Then
Open "ROOT/xml/menu_board.xml"
EndIf
TimerReset
Refresh
</EventTimeout>
<Button>
<X> 369 </X>
<Y> blend_y_posi0 </Y>
<State> SubSelectStg0 </State>
<Filename> BNSub0 </Filename>
<FilenamePress> BPSub0 </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var SubSelectStg0 = "PressForever"
Var SubSelectStg1 = "Enable"
Var SubSelectStg2 = "Enable"
Var SubSelectStg3 = "Enable"
Refresh
</EventClick>
<Button>
<X> 369 </X>
<Y> blend_y_posi1 </Y>
<State> SubSelectStg1 </State>
<Filename> BNSub1 </Filename>
<FilenamePress> BPSub1 </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var SubSelectStg0 = "Enable"
Var SubSelectStg1 = "PressForever"
Var SubSelectStg2 = "Enable"
Var SubSelectStg3 = "Enable"
Refresh
</EventClick>
</Button>
<Button>
<X> 369 </X>
<Y> blend_y_posi2 </Y>
<State> SubSelectStg2 </State>
<Filename> BNSub2 </Filename>
<FilenamePress> BPSub2 </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var SubSelectStg0 = "Enable"
Var SubSelectStg1 = "Enable"
Var SubSelectStg2 = "PressForever"
Var SubSelectStg3 = "Enable"
Refresh
</EventClick>
</Button>
<Button>
<X> 369 </X>
<Y> sugar_y_posi </Y>
<State> SweetState1 </State>
<Filename> "ROOT/image/BN_0%.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_0%.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var SweetState1 = "PressForever"
Var SweetState2 = "Enable"
Var SweetState3 = "Enable"
Var SweetState4 = "Enable"
Var SweetState5 = "Enable"
Var SweetState6 = "Enable"
Var Timeout = 0
Var SweetChoosed = "ไม่หวาน"
Var topping1 = "1"
Refresh
</EventClick>
</Button>
<Button>
<X> 474 </X>
<Y> sugar_y_posi </Y>
<State> SweetState2 </State>
<Filename> "ROOT/image/BN_25%.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_25%.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var SweetState1 = "Enable"
Var SweetState2 = "PressForever"
Var SweetState3 = "Enable"
Var SweetState4 = "Enable"
Var SweetState5 = "Enable"
Var SweetState6 = "Enable"
Var Timeout = 0
Var SweetChoosed = "หวานน้อย"
Var topping1 = "2"
Refresh
</EventClick>
</Button>
<Button>
<X> 581 </X>
<Y> sugar_y_posi </Y>
<State> SweetState3 </State>
<Filename> "ROOT/image/BN_50%.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_50%.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var SweetState1 = "Enable"
Var SweetState2 = "Enable"
Var SweetState3 = "PressForever"
Var SweetState4 = "Enable"
Var SweetState5 = "Enable"
Var SweetState6 = "Enable"
Var Timeout = 0
Var SweetChoosed = "หวานพอดี"
Var topping1 = "3"
Refresh
</EventClick>
</Button>
<Button>
<X> 686 </X>
<Y> sugar_y_posi </Y>
<State> SweetState4 </State>
<Filename> "ROOT/image/BN_75%.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_75%.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var SweetState1 = "Enable"
Var SweetState2 = "Enable"
Var SweetState3 = "Enable"
Var SweetState4 = "PressForever"
Var SweetState5 = "Enable"
Var SweetState6 = "Enable"
Var Timeout = 0
Var SweetChoosed = "หวานมาก"
Var topping1 = "4"
Refresh
</EventClick>
</Button>
<Button>
<X> 792 </X>
<Y> sugar_y_posi </Y>
<State> SweetState5 </State>
<Filename> "ROOT/image/BN_100%.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_100%.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var SweetState1 = "Enable"
Var SweetState2 = "Enable"
Var SweetState3 = "Enable"
Var SweetState4 = "Enable"
Var SweetState5 = "PressForever"
Var SweetState6 = "Enable"
Var Timeout = 0
Var SweetChoosed = "หวานเว่อร์"
Var topping1 = "5"
Refresh
</EventClick>
</Button>
<Button>
<X> 896 </X>
<Y> sugar_y_posi </Y>
<State> SweetState6 </State>
<Filename> "ROOT/image/BN_150%.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_150%.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var SweetState1 = "Enable"
Var SweetState2 = "Enable"
Var SweetState3 = "Enable"
Var SweetState4 = "Enable"
Var SweetState5 = "Enable"
Var SweetState6 = "PressForever"
Var Timeout = 0
Var SweetChoosed = "หวานสามโลก"
Var topping1 = "6"
Refresh
</EventClick>
</Button>
;
;
;
;
<Button>
<X> 369 </X>
<Y> hot_y_posi </Y>
<State> hotStatelevel1 </State>
<Filename> "ROOT/image/BN_hot1.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_hot1.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var hotStatelevel1 = "PressForever"
Var hotStatelevel2 = "Enable"
Var hotStatelevel3 = "Enable"
Var hotShowLevel = "ร้อนน้อย"
Var topping2 = "27"
Var Timeout = 0
Refresh
</EventClick>
</Button>
<Button>
<X> 474 </X>
<Y> hot_y_posi </Y>
<State> hotStatelevel2 </State>
<Filename> "ROOT/image/BN_hot2.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_hot2.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var hotStatelevel1 = "Enable"
Var hotStatelevel2 = "PressForever"
Var hotStatelevel3 = "Enable"
Var hotShowLevel = "ร้อนพอดี"
Var Timeout = 0
Var topping2 = "28"
Refresh
</EventClick>
</Button>
<Button>
<X> 581 </X>
<Y> hot_y_posi </Y>
<State> hotStatelevel3 </State>
<Filename> "ROOT/image/BN_hot3.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_hot3.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var hotStatelevel1 = "Enable"
Var hotStatelevel2 = "Enable"
Var hotStatelevel3 = "PressForever"
Var hotShowLevel = "ร้อนมาก"
Var Timeout = 0
Var topping2 = "29"
Refresh
</EventClick>
</Button>
<Button>
<X> 431 </X>
<Y> 1050 </Y>
<Filename> "ROOT/image/BN_Cancle.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_Cancle.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
;Open "ROOT/xml/menu_board.xml"
OpenInst 2 "/mnt/sdcard/coffeevending/xml/menu_list_show_less.xml"
OpenInst 1 "/mnt/sdcard/coffeevending/xml/menu_advert.xml"
Open "/mnt/sdcard/coffeevending/xml/menu_main_blank.xml"
</EventClick>
</Button>
<Button>
<X> 566 </X>
<Y> 1050 </Y>
<Filename> "ROOT/image/BN_Confirm2.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_Confirm2.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Open "ROOT/xml/menu_page3_alter.xml"
</EventClick>
</Button>
<Image>
<X> 90 </X>
<Y> 285 </Y>
<Filename> PictureDrink </Filename>
</Image>
<Text>
<X> 375 </X>
<Y> 320</Y>
<Size> 30 </Size>
<Font> fontType1 </Font>
<Color> 0x000000 </Color>
<Value> NameDrink </Value>
</Text>
<Text>
<X> 375 </X>
<Y> 355 </Y>
<Size> 20 </Size>
<Font> fontType1 </Font>
<Color> 0xB78F24 </Color>
<Value> NameDrinkTH </Value>
</Text>
<Text>
<X> 530 </X>
<Y> 678 </Y>
<Width>200</Width>
<Align> Center </Align>
<Size> 25 </Size>
<Font> fontType1 </Font>
<Color> 0xFFFFFF </Color>
<Value> PriceDrink </Value>
</Text>
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
</EventSecurity>
</Page>

360
xml/menu_topping_mode2.xml Normal file
View file

@ -0,0 +1,360 @@
<Page>
<Width> 1080 </Width>
<Height> 1312 </Height>
<Background> "ROOT/image/BG_Menu_Page2.bmp" </Background>
<Sound> "ROOT/sounds/selectSugar.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventOpen>
; On open
If SugarPreMixSel = 1 Then
Var SweetState1 = "Disable"
Var SweetState2 = "PressForever"
Var SweetState3 = "Enable"
Var SweetState4 = "Enable"
Var SweetState5 = "Enable"
Var SweetState6 = "Enable"
Var SelectSugarID = 0
Var SweetChoosed = "หวานน้อย"
EndIf
If SugarPreMixSel = 2 Then
Var SweetState1 = "Disable"
Var SweetState2 = "Disable"
Var SweetState3 = "PressForever"
Var SweetState4 = "Enable"
Var SweetState5 = "Enable"
Var SweetState6 = "Enable"
Var SelectSugarID = 0
Var SweetChoosed = "หวานพอดี"
EndIf
If SugarPreMixSel = 3 Then
Var SweetState1 = "Disable"
Var SweetState2 = "Disable"
Var SweetState3 = "Disable"
Var SweetState4 = "PressForever"
Var SweetState5 = "Enable"
Var SweetState6 = "Enable"
Var SelectSugarID = 0
Var SweetChoosed = "หวานมาก"
EndIf
</EventOpen>
<Timeout> 2000 </Timeout>
<EventTimeout>
;Open "ROOT/xml/menu_board.xml"
Var Timeout = Timeout + 1
If Timeout > 5 Then
Open "ROOT/xml/menu_board.xml"
EndIf
TimerReset
Refresh
</EventTimeout>
<Button>
<X> 369 </X>
<Y> 502 </Y>
<State> SweetState1 </State>
<Filename> "ROOT/image/BN_0%.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_0%.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var SweetChoosed = "ไม่หวาน"
Var SelectSugarID = 1
Refresh
</EventClick>
</Button>
<Button>
<X> 474 </X>
<Y> 502 </Y>
<State> SweetState2 </State>
<Filename> "ROOT/image/BN_25%.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_25%.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
If SugarPreMixSel = 1 Then
Var SweetState1 = "Disable"
Var SweetState2 = "PressForever"
Var SweetState3 = "Enable"
Var SweetState4 = "Enable"
Var SweetState5 = "Enable"
Var SweetState6 = "Enable"
Var SelectSugarID = 1
EndIf
Var Timeout = 0
Var SweetChoosed = "หวานน้อย"
Refresh
</EventClick>
</Button>
<Button>
<X> 581 </X>
<Y> 502 </Y>
<State> SweetState3 </State>
<Filename> "ROOT/image/BN_50%.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_50%.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
If SugarPreMixSel = 1 Then
Var SweetState1 = "Disable"
Var SweetState2 = "Enable"
Var SweetState3 = "PressForever"
Var SweetState4 = "Enable"
Var SweetState5 = "Enable"
Var SweetState6 = "Enable"
Var SelectSugarID = 2
EndIf
If SugarPreMixSel = 2 Then
Var SweetState1 = "Disable"
Var SweetState2 = "Disable"
Var SweetState3 = "PressForever"
Var SweetState4 = "Enable"
Var SweetState5 = "Enable"
Var SweetState6 = "Enable"
Var SelectSugarID = 1
EndIf
Var Timeout = 0
Var SweetChoosed = "หวานพอดี"
Refresh
</EventClick>
</Button>
<Button>
<X> 686 </X>
<Y> 502 </Y>
<State> SweetState4 </State>
<Filename> "ROOT/image/BN_75%.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_75%.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
If SugarPreMixSel = 1 Then
Var SweetState1 = "Disable"
Var SweetState2 = "Enable"
Var SweetState3 = "Enable"
Var SweetState4 = "PressForever"
Var SweetState5 = "Enable"
Var SweetState6 = "Enable"
Var SelectSugarID = 3
EndIf
If SugarPreMixSel = 2 Then
Var SweetState1 = "Disable"
Var SweetState2 = "Disable"
Var SweetState3 = "Enable"
Var SweetState4 = "PressForever"
Var SweetState5 = "Enable"
Var SweetState6 = "Enable"
Var SelectSugarID = 2
EndIf
If SugarPreMixSel = 3 Then
Var SweetState1 = "Disable"
Var SweetState2 = "Disable"
Var SweetState3 = "Disable"
Var SweetState4 = "PressForever"
Var SweetState5 = "Enable"
Var SweetState6 = "Enable"
Var SelectSugarID = 1
EndIf
Var Timeout = 0
Var SweetChoosed = "หวานมาก"
Refresh
</EventClick>
</Button>
<Button>
<X> 792 </X>
<Y> 502 </Y>
<State> SweetState5 </State>
<Filename> "ROOT/image/BN_100%.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_100%.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
If SugarPreMixSel = 1 Then
Var SweetState1 = "Disable"
Var SweetState2 = "Enable"
Var SweetState3 = "Enable"
Var SweetState4 = "Enable"
Var SweetState5 = "PressForever"
Var SweetState6 = "Enable"
Var SelectSugarID = 4
EndIf
If SugarPreMixSel = 2 Then
Var SweetState1 = "Disable"
Var SweetState2 = "Disable"
Var SweetState3 = "Enable"
Var SweetState4 = "Enable"
Var SweetState5 = "PressForever"
Var SweetState6 = "Enable"
Var SelectSugarID = 3
EndIf
If SugarPreMixSel = 3 Then
Var SweetState1 = "Disable"
Var SweetState2 = "Disable"
Var SweetState3 = "Disable"
Var SweetState4 = "Enable"
Var SweetState5 = "PressForever"
Var SweetState6 = "Enable"
Var SelectSugarID = 2
EndIf
Var Timeout = 0
Var SweetChoosed = "หวานเว่อร์"
Refresh
</EventClick>
</Button>
<Button>
<X> 896 </X>
<Y> 502 </Y>
<State> SweetState6 </State>
<Filename> "ROOT/image/BN_150%.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_150%.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
If SugarPreMixSel = 1 Then
Var SweetState1 = "Disable"
Var SweetState2 = "Enable"
Var SweetState3 = "Enable"
Var SweetState4 = "Enable"
Var SweetState5 = "Enable"
Var SweetState6 = "PressForever"
Var SelectSugarID = 5
EndIf
If SugarPreMixSel = 2 Then
Var SweetState1 = "Disable"
Var SweetState2 = "Disable"
Var SweetState3 = "Enable"
Var SweetState4 = "Enable"
Var SweetState5 = "Enable"
Var SweetState6 = "PressForever"
Var SelectSugarID = 4
EndIf
If SugarPreMixSel = 3 Then
Var SweetState1 = "Disable"
Var SweetState2 = "Disable"
Var SweetState3 = "Disable"
Var SweetState4 = "Enable"
Var SweetState5 = "Enable"
Var SweetState6 = "PressForever"
Var SelectSugarID = 3
EndIf
Var Timeout = 0
Var SweetChoosed = "หวานสามโลก"
Refresh
</EventClick>
</Button>
<Button>
<X> 431 </X>
<Y> 805 </Y>
<Filename> "ROOT/image/BN_Cancle.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_Cancle.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
;'Open "ROOT/xml/menu_board.xml"
OpenInst 2 "/mnt/sdcard/coffeevending/xml/menu_list_show_less.xml"
OpenInst 1 "/mnt/sdcard/coffeevending/xml/menu_advert.xml"
Open "/mnt/sdcard/coffeevending/xml/menu_main_blank.xml"
</EventClick>
</Button>
<Button>
<X> 566 </X>
<Y> 805 </Y>
<Filename> "ROOT/image/BN_Confirm2.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_Confirm2.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Open "ROOT/xml/menu_page3.xml"
</EventClick>
</Button>
<Image>
<X> 90 </X>
<Y> 285 </Y>
<Filename> PictureDrink </Filename>
</Image>
<Text>
<X> 375 </X>
<Y> 320</Y>
<Size> 30 </Size>
<Font> fontType1 </Font>
<Color> 0x000000 </Color>
<Value> NameDrink </Value>
</Text>
<Text>
<X> 375 </X>
<Y> 355 </Y>
<Size> 20 </Size>
<Font> fontType1 </Font>
<Color> 0xB78F24 </Color>
<Value> NameDrinkTH </Value>
</Text>
<Text>
<X> 530 </X>
<Y> 678 </Y>
<Width>200</Width>
<Align> Center </Align>
<Size> 25 </Size>
<Font> fontType1 </Font>
<Color> 0xFFFFFF </Color>
<Value> PriceDrink </Value>
</Text>
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
</EventSecurity>
</Page>

View file

@ -0,0 +1,316 @@
<Page>
<Width> 1080 </Width>
<Height> 1312 </Height>
<Background> "ROOT/image/BG_Menu_Page2.bmp" </Background>
<Sound> "ROOT/sounds/selectSugar.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventOpen>
; On open
TopView "hide"
Var Timeout = 0
Var SweetState1 = "PressForever"
Var SweetState2 = "Enable"
Var SweetState3 = "Enable"
Var SweetState4 = "Enable"
Var SweetState5 = "Enable"
Var SweetState6 = "Enable"
Var SweetChoosed = "ไม่หวาน"
Var SelectSugarID = 1
If NHaveDrink = "false" Then
Var SweetChoosed = ""
Open "ROOT/xml/menu_page3.xml"
EndIf
SAVELOG toppingID1Default
If toppingID1Default = "2" Then
Var SweetState1 = "Enable"
Var SweetState2 = "PressForever"
Var SweetState3 = "Enable"
Var SweetState4 = "Enable"
Var SweetState5 = "Enable"
Var SweetState6 = "Enable"
Var Timeout = 0
Var SweetChoosed = "หวานน้อย"
Var SelectSugarID = 2
EndIf
If toppingID1Default = "3" Then
Var SweetState1 = "Enable"
Var SweetState2 = "Enable"
Var SweetState3 = "PressForever"
Var SweetState4 = "Enable"
Var SweetState5 = "Enable"
Var SweetState6 = "Enable"
Var Timeout = 0
Var SweetChoosed = "หวานพอดี"
Var SelectSugarID = 3
EndIf
IftoppingID1Default = "4" Then
Var SweetState1 = "Enable"
Var SweetState2 = "Enable"
Var SweetState3 = "Enable"
Var SweetState4 = "PressForever"
Var SweetState5 = "Enable"
Var SweetState6 = "Enable"
Var Timeout = 0
Var SweetChoosed = "หวานมาก"
Var SelectSugarID = 4
EndIf
If toppingID2Default = "29" Then
Var hotStatelevel1 = "Enable"
Var hotStatelevel2 = "Enable"
Var hotStatelevel3 = "PressForever"
EndIf
If toppingID2Default = "28" Then
Var hotStatelevel1 = "Enable"
Var hotStatelevel2 = "PressForever"
Var hotStatelevel3 = "Enable"
EndIf
If toppingID2Default = "27" Then
Var hotStatelevel1 = "PressForever"
Var hotStatelevel2 = "Enable"
Var hotStatelevel3 = "Enable"
EndIf
</EventOpen>
<Timeout> 2000 </Timeout>
<EventTimeout>
;Open "ROOT/xml/menu_board.xml"
Var Timeout = Timeout + 1
If Timeout > 5 Then
Open "ROOT/xml/menu_board.xml"
EndIf
TimerReset
Refresh
</EventTimeout>
<Button>
<X> 369 </X>
<Y> 502 </Y>
<State> SweetState1 </State>
<Filename> "ROOT/image/BN_0%.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_0%.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var SweetState1 = "PressForever"
Var SweetState2 = "Enable"
Var SweetState3 = "Enable"
Var SweetState4 = "Enable"
Var SweetState5 = "Enable"
Var SweetState6 = "Enable"
Var Timeout = 0
Var SweetChoosed = "ไม่หวาน"
Var SelectSugarID = 1
Refresh
</EventClick>
</Button>
<Button>
<X> 474 </X>
<Y> 502 </Y>
<State> SweetState2 </State>
<Filename> "ROOT/image/BN_25%.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_25%.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var SweetState1 = "Enable"
Var SweetState2 = "PressForever"
Var SweetState3 = "Enable"
Var SweetState4 = "Enable"
Var SweetState5 = "Enable"
Var SweetState6 = "Enable"
Var Timeout = 0
Var SweetChoosed = "หวานน้อย"
Var SelectSugarID = 2
Refresh
</EventClick>
</Button>
<Button>
<X> 581 </X>
<Y> 502 </Y>
<State> SweetState3 </State>
<Filename> "ROOT/image/BN_50%.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_50%.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var SweetState1 = "Enable"
Var SweetState2 = "Enable"
Var SweetState3 = "PressForever"
Var SweetState4 = "Enable"
Var SweetState5 = "Enable"
Var SweetState6 = "Enable"
Var Timeout = 0
Var SweetChoosed = "หวานพอดี"
Var SelectSugarID = 3
Refresh
</EventClick>
</Button>
<Button>
<X> 686 </X>
<Y> 502 </Y>
<State> SweetState4 </State>
<Filename> "ROOT/image/BN_75%.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_75%.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var SweetState1 = "Enable"
Var SweetState2 = "Enable"
Var SweetState3 = "Enable"
Var SweetState4 = "PressForever"
Var SweetState5 = "Enable"
Var SweetState6 = "Enable"
Var Timeout = 0
Var SweetChoosed = "หวานมาก"
Var SelectSugarID = 4
Refresh
</EventClick>
</Button>
<Button>
<X> 792 </X>
<Y> 502 </Y>
<State> SweetState5 </State>
<Filename> "ROOT/image/BN_100%.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_100%.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var SweetState1 = "Enable"
Var SweetState2 = "Enable"
Var SweetState3 = "Enable"
Var SweetState4 = "Enable"
Var SweetState5 = "PressForever"
Var SweetState6 = "Enable"
Var Timeout = 0
Var SweetChoosed = "หวานเว่อร์"
Var SelectSugarID = 5
Refresh
</EventClick>
</Button>
<Button>
<X> 896 </X>
<Y> 502 </Y>
<State> SweetState6 </State>
<Filename> "ROOT/image/BN_150%.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_150%.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var SweetState1 = "Enable"
Var SweetState2 = "Enable"
Var SweetState3 = "Enable"
Var SweetState4 = "Enable"
Var SweetState5 = "Enable"
Var SweetState6 = "PressForever"
Var Timeout = 0
Var SweetChoosed = "หวานสามโลก"
Var SelectSugarID = 6
Refresh
</EventClick>
</Button>
<Button>
<X> 431 </X>
<Y> 805 </Y>
<Filename> "ROOT/image/BN_Cancle.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_Cancle.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Open "ROOT/xml/menu_board.xml"
</EventClick>
</Button>
<Button>
<X> 566 </X>
<Y> 805 </Y>
<Filename> "ROOT/image/BN_Confirm2.bmp" </Filename>
<FilenamePress> "ROOT/image/BP_Confirm2.bmp" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Open "ROOT/xml/menu_page3_alter.xml"
</EventClick>
</Button>
<Image>
<X> 90 </X>
<Y> 285 </Y>
<Filename> PictureDrink </Filename>
</Image>
<Text>
<X> 375 </X>
<Y> 320</Y>
<Size> 30 </Size>
<Font> fontType1 </Font>
<Color> 0x000000 </Color>
<Value> NameDrink </Value>
</Text>
<Text>
<X> 375 </X>
<Y> 355 </Y>
<Size> 20 </Size>
<Font> fontType1 </Font>
<Color> 0xB78F24 </Color>
<Value> NameDrinkTH </Value>
</Text>
<Text>
<X> 530 </X>
<Y> 678 </Y>
<Width>200</Width>
<Align> Center </Align>
<Size> 25 </Size>
<Font> fontType1 </Font>
<Color> 0xFFFFFF </Color>
<Value> PriceDrink </Value>
</Text>
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
</EventSecurity>
</Page>

52
xml/menu_upgradeMCU.xml Normal file
View file

@ -0,0 +1,52 @@
<Page>
<Width> 1080 </Width>
<Height> 1312 </Height>
<Background> pUpgradeBG </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
Var Timeout = 0
TopView "hide"
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
Var Timeout = Timeout + 1
If MachineStage = "mcu-upgrade" Then
Else
Open "ROOT/xml/menu_board.xml"
EndIf
If Timeout > 300 Then
Open "ROOT/xml/menu_board.xml"
EndIf
Refresh
TimerReset
</EventTimeout>
<GIF>
<X> 183 </X>
<Y> 350 </Y>
<Filename> pUpgradeGIF </Filename>
</GIF>
<Text>
<X> 395 </X>
<Y> 250 </Y>
<Width>300</Width>
<Align> Center </Align>
<Size> 30 </Size>
<Font> fontType1 </Font>
<Color> 0x000000 </Color>
<Value> "กำลังอัพเกรดMCU" </Value>
</Text>
</Page>

52
xml/menu_upgrading.xml Normal file
View file

@ -0,0 +1,52 @@
<Page>
<Width> 1080 </Width>
<Height> 1312 </Height>
<Background> pUpgradeBG </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
Var Timeout = 0
TopView "hide"
UpgradeNow
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
Var Timeout = Timeout + 1
If UpgradeStatus = "finish" Then
Open "ROOT/xml/menu_board.xml"
EndIf
If Timeout > 300 Then
Open "ROOT/xml/menu_board.xml"
EndIf
Refresh
TimerReset
</EventTimeout>
<GIF>
<X> 183 </X>
<Y> 350 </Y>
<Filename> pUpgradeGIF </Filename>
</GIF>
<Text>
<X> 395 </X>
<Y> 250 </Y>
<Width>300</Width>
<Align> Center </Align>
<Size> 30 </Size>
<Font> fontType1 </Font>
<Color> 0x000000 </Color>
<Value> "กำลังอัพเกรดตู้" </Value>
</Text>
</Page>