UNIVERSE: update tel nums

This commit is contained in:
Pakin 2024-05-23 15:33:30 +07:00
parent bf39bbf263
commit d5ff02ddb5
5 changed files with 96 additions and 92 deletions

View file

@ -35,8 +35,6 @@
PlayLong "/mnt/sdcard/coffeevending/taobin_project/sound_eng/Please_enter_your_mobile_to_credit_balance.mp3"
Var MinNumber = 10
Var MaxNumber = 10
</EventOpen>
@ -192,10 +190,10 @@
Var Timeout = 0
Var TelephoneNumber = TelephoneNumber + "1"
Var ShowTextNumber = "Invisible"
Trim TelephoneNumber MaxNumber
Trim TelephoneNumber MaxPhoneNumber
StrLen TelephoneNumber TelNumLen
If TelNumLen >= MinNumber Then
If TelNumLen >= MinPhoneNumber Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
@ -219,11 +217,11 @@
Var Timeout = 0
Var TelephoneNumber = TelephoneNumber + "2"
Var ShowTextNumber = "Invisible"
Trim TelephoneNumber MaxNumber
Trim TelephoneNumber MaxPhoneNumber
TimerReset
Refresh
StrLen TelephoneNumber TelNumLen
If TelNumLen >= MinNumber Then
If TelNumLen >= MinPhoneNumber Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
@ -248,11 +246,11 @@
Var Timeout = 0
Var TelephoneNumber = TelephoneNumber + "3"
Var ShowTextNumber = "Invisible"
Trim TelephoneNumber MaxNumber
Trim TelephoneNumber MaxPhoneNumber
TimerReset
Refresh
StrLen TelephoneNumber TelNumLen
If TelNumLen >= MinNumber Then
If TelNumLen >= MinPhoneNumber Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
@ -276,11 +274,11 @@
Var Timeout = 0
Var TelephoneNumber = TelephoneNumber + "4"
Var ShowTextNumber = "Invisible"
Trim TelephoneNumber MaxNumber
Trim TelephoneNumber MaxPhoneNumber
TimerReset
Refresh
StrLen TelephoneNumber TelNumLen
If TelNumLen >= MinNumber Then
If TelNumLen >= MinPhoneNumber Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
@ -305,11 +303,11 @@
Var Timeout = 0
Var TelephoneNumber = TelephoneNumber + "5"
Var ShowTextNumber = "Invisible"
Trim TelephoneNumber MaxNumber
Trim TelephoneNumber MaxPhoneNumber
TimerReset
Refresh
StrLen TelephoneNumber TelNumLen
If TelNumLen >= MinNumber Then
If TelNumLen >= MinPhoneNumber Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
@ -334,11 +332,11 @@
Var Timeout = 0
Var TelephoneNumber = TelephoneNumber + "6"
Var ShowTextNumber = "Invisible"
Trim TelephoneNumber MaxNumber
Trim TelephoneNumber MaxPhoneNumber
TimerReset
Refresh
StrLen TelephoneNumber TelNumLen
If TelNumLen >= MinNumber Then
If TelNumLen >= MinPhoneNumber Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
@ -363,11 +361,11 @@
Var Timeout = 0
Var TelephoneNumber = TelephoneNumber + "7"
Var ShowTextNumber = "Invisible"
Trim TelephoneNumber MaxNumber
Trim TelephoneNumber MaxPhoneNumber
TimerReset
Refresh
StrLen TelephoneNumber TelNumLen
If TelNumLen >= MinNumber Then
If TelNumLen >= MinPhoneNumber Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
@ -392,11 +390,11 @@
Var Timeout = 0
Var TelephoneNumber = TelephoneNumber + "8"
Var ShowTextNumber = "Invisible"
Trim TelephoneNumber MaxNumber
Trim TelephoneNumber MaxPhoneNumber
TimerReset
Refresh
StrLen TelephoneNumber TelNumLen
If TelNumLen >= MinNumber Then
If TelNumLen >= MinPhoneNumber Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
@ -420,11 +418,11 @@
Var Timeout = 0
Var TelephoneNumber = TelephoneNumber + "9"
Var ShowTextNumber = "Invisible"
Trim TelephoneNumber MaxNumber
Trim TelephoneNumber MaxPhoneNumber
TimerReset
Refresh
StrLen TelephoneNumber TelNumLen
If TelNumLen >= MinNumber Then
If TelNumLen >= MinPhoneNumber Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
@ -447,9 +445,9 @@
<EventClick>
Var Timeout = 0
Var TelephoneNumber = TelephoneNumber + "0"
Trim TelephoneNumber MaxNumber
Trim TelephoneNumber MaxPhoneNumber
StrLen TelephoneNumber TelNumLen
If TelNumLen >= MinNumber Then
If TelNumLen >= MinPhoneNumber Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowTextNumber = "Invisible"
@ -482,7 +480,7 @@
StrLen TelephoneNumber TelNumLen
If TelNumLen < MinNumber Then
If TelNumLen < MinPhoneNumber Then
Var Tel_Confirm_State = "Invisible"
EndIf