28 255 "ROOT/ui/bg_main_menu2.png" 1024 600 0x000000 Var AISSellSimURL = "https://10.0.16.231:30717" Var AISSellSimXBid = "X-FORTH-BID" Var AISSellSimXSignature = "X-FORTH-SIGNATURE" Var DTACSellSimURL = "https://10.0.16.231:30720" Var DTACSellSimXBid = "X-FORTH-BID" Var DTACSellSimXSignature = "X-FORTH-SIGNATURE" Var AdvWorking = "/ROOT/pictures/adv_working_00.bmp" Var AdvCoin = "/ROOT/pictures/adv_coin_00.bmp" Var AdvAmount = "/ROOT/pictures/adv_amount_00.bmp" Var AdvMobile = "/ROOT/pictures/adv_mobile_00.bmp" Var Menu_list_LN = "TH" 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" Var AdvSoundWorking = Var SaleServiceFrom = "" Var CheckServiceLoop = 0 Var ProfileSummary = 0 Var PromotionID = "" Var SuggestID = "" Var SessionID1 = "" Var CRMPoint = "01A" Var TelephoneNumber = "" Var WeightScale = 0.0 Var ServiceCredit = "" Var AisPackage = "" If AdvIndex > 6 Then Var AdvIndex = 1 EndIf SPLIT AdvertiseProfile "/" 1 AdvertiseProfile1 SPLIT AdvertiseProfile "/" 2 AdvertiseProfile2 SPLIT AdvertiseProfile "/" 3 AdvertiseProfile3 SPLIT AdvertiseProfile "/" 4 AdvertiseProfile4 SPLIT AdvertiseProfile "/" 5 AdvertiseProfile5 SPLIT AdvertiseProfile "/" 6 AdvertiseProfile6 SPLIT AdvertiseProfile "/" 7 AdvertiseProfile7 SPLIT AdvertiseProfile "/" 8 AdvertiseProfile8 SPLIT AdvertiseProfile "/" 9 AdvertiseProfile9 SPLIT AdvertiseProfile "/" 10 AdvertiseProfile10 SPLIT AdvertiseProfile "/" 11 AdvertiseProfile11 SPLIT AdvertiseProfile "/" 12 AdvertiseProfile12 SPLIT AdvertiseProfile "/" 13 AdvertiseProfile13 SPLIT AdvertiseProfile "/" 14 AdvertiseProfile14 SPLIT AdvertiseProfile "/" 15 AdvertiseProfile15 SPLIT AdvertiseProfile "/" 16 AdvertiseProfile16 SPLIT AdvertiseProfile "/" 17 AdvertiseProfile17 SPLIT AdvertiseProfile "/" 18 AdvertiseProfile18 GETVARVALUEID2 ExtSlot1 "AdvExt" AdvertiseProfile7 GETVARVALUEID2 ExtSlot2 "AdvExt" AdvertiseProfile8 GETVARVALUEID2 ExtSlot3 "AdvExt" AdvertiseProfile9 GETVARVALUEID2 ExtSlot4 "AdvExt" AdvertiseProfile10 GETVARVALUEID2 ExtSlot5 "AdvExt" AdvertiseProfile11 GETVARVALUEID2 ExtSlot6 "AdvExt" AdvertiseProfile12 GETVARVALUEID2 AdvId "AdvertiseProfile" AdvIndex If AdvId = "00" Then Var AdvIndex = 1 EndIf If WeightPlug = "CONNECTED" Then Var WeightScaleBn = "/ROOT/pictures/service_menu_bn_weight_scale.bmp" Var WeightScaleBp = "/ROOT/pictures/service_menu_bp_weight_scale.bmp" Else Var WeightScaleBn = "/ROOT/pictures/service_menu_bd_weight_scale.bmp" Var WeightScaleBp = "/ROOT/pictures/service_menu_bd_weight_scale.bmp" EndIf If WeightPlug = "ERROR" Then Var WeightScaleBn = "/ROOT/pictures/service_menu_bc_weight_scale.bmp" Var WeightScaleBp = "/ROOT/pictures/service_menu_bc_weight_scale.bmp" EndIf If Upgrading = 1 Then Open "/ROOT/xml/check_upgrade.xml" EndIf If NetworkStatus = "DOWN" Then ; Open "/ROOT/xml/outservice.xml" EndIf If NetworkStatus = "DEACTIVE" Then If SELLSTATUS = "DEACTIVE" Then Open "/ROOT/xml/offline.xml" EndIf EndIf Open "ROOT/taobin_project/xml/page_board.xml" If XMLProfile = "Tesco Lotus" Then Open "/ROOT/xml/main_tesco.xml" EndIf If XMLProfile = "Seven Eleven" Then Var ProfileSummary = 1 Open "/ROOT/xml/main_seveneleven.xml" EndIf If XMLProfile = "General_NoCharge_100Up" Then Open "/ROOT/xml/main_general.xml" EndIf If XMLProfile = "TOT" Then Open "/ROOT/xml/main_tot.xml" Else Open "/ROOT/xml/main_general.xml" EndIf Open "/ROOT/xml/security_alarm.xml"