1080 1312 SoundVolume "0x2c2928" Coin ON ; Var TestCoinLine1 = "กรุณาใส่เงิน . . ." Var TestCoinLine1 = "insert money . . ." ; Var TestCoinLine2 = "จำนวนเงินทั้งหมด 0 บาท" Var RemainAmountStr !assigned StringFmt( CoinAmount, DisplayFormat, PreScaleConvertShow ) Var TestCoinLine2 = "total amount " Var TestCoinLine2 = TestCoinLine2 + RemainAmountStr Var RemainAmountStr1 = 0 Var LastCoin = 0 Var openTextTest20bath = "Enable" Var currentStage = "test20bath" DEBUGVAR currentStage DEBUGVAR LastCoin Var LastCoin = CoinAmount - LastCoin Var RemainAmountStr1 !assigned StringFmt( LastCoin, DisplayFormat, PreScaleConvertShow ) Var RemainAmountStr !assigned StringFmt( CoinAmount, DisplayFormat, PreScaleConvertShow ) DEBUGVAR currentStage DEBUGVAR LastCoin If currentStage = "test20bath" Then If LastCoin = 20 Then Open "ROOT/taobin_project/xml/page_test_money_change.xml" EndIf EndIf ; Var TestCoinLine1 = "ท่านได้ใส่เงินจำนวน " Var TestCoinLine1 = "insert money " Var TestCoinLine1 = TestCoinLine1 + RemainAmountStr1 ; Var TestCoinLine1 = TestCoinLine1 + " บาท" ; Var TestCoinLine2 = "จำนวนเงินทั้งหมด " Var TestCoinLine2 = "total amount " Var TestCoinLine2 = TestCoinLine2 + RemainAmountStr ; Var TestCoinLine2 = TestCoinLine2 + " บาท" Var LastCoin = CoinAmount ; Var RemainAmountStr = RemainAmountStr + "###size=90" Refresh 1000 Refresh TimerReset ; header 0 0 80 1080 SoundVolume "ROOT/taobin_project/image/new_vending_info/nav-bar-mid.png" ;back 800 20 19 fontType1 0xe2e2e2 Text1_9 ;task 280 150 40 560 SoundVolume "ROOT/taobin_project/image/new_vending_info/test_bank_header_page.png" 280 220 40 560 SoundVolume "ROOT/taobin_project/image/new_vending_info/test_bank_20.png" openTextTest20bath