HK: Initialize Hong Kong

This commit is contained in:
Kenta420 2024-08-09 13:05:20 +07:00
parent e12d844dd5
commit 178c71b745
2416 changed files with 182201 additions and 1 deletions

File diff suppressed because it is too large Load diff

View file

View file

@ -0,0 +1,575 @@
from pathlib import Path
import json
print("params=" + param)
print( "dir= " + directory_to_process + "/page_catalog_group_recommend.lxml");
file_xml = open(directory_to_process + "/page_catalog_group_recommend.lxml", 'r')
file_content_main = file_xml.read()
#print(file_xml.read())
# ; include-file=dummy_layout.inc
file_inc = open(directory_to_process + "/dummy_layout.inc", 'r')
file_inc_content = file_inc.read()
file_xml.close()
if "template1" in param:
file_inc2 = open(directory_to_process + "/event/promotion_template1.inc", 'r')
file_inc2_content = file_inc2.read()
file_inc_img = open(directory_to_process + "/../image/event/image_template1", 'r')
file_inc2_img_content = file_inc_img.read()
# replace key.
sp_key = file_inc2_img_content.split("\n")
print("sp_key = " + str(len( sp_key)))
for sp_line in sp_key:
sp_line = sp_line.strip()
key_val = sp_line.split("=")
if len( key_val) == 2:
print("k = " + key_val[0] + " val=" + key_val[1])
file_inc2_content = file_inc2_content.replace( "###" + key_val[0], '"' + key_val[1].strip() + '"')
file_inc_event_click = open(directory_to_process + "/event/promotion_onclick1.inc", 'r')
file_inc_event_click_content = file_inc_event_click.read()
file_inc2_content = file_inc2_content.replace("###EventOnClick", file_inc_event_click_content)
print(file_inc2_content)
#print( file_inc_content)
content_data_was_repack = file_content_main.replace(";dummy_layout.inc", file_inc_content)
content_data = content_data_was_repack.replace(";BigLogoLayout", file_inc2_content)
begin_text = content_data.index(";TAGESP")
end_text = content_data.index(";TAGESP", begin_text + 7)
print("TAGESP sub text = " + str(begin_text) + " end = " + str(end_text))
tmp1 = content_data[: begin_text - 7]
tmp2 = content_data[ end_text:-1]
#print("tmp1=" + tmp1)
#print("tmp2=" + tmp2)
content_data = tmp1 + tmp2
file_xml3_out = open(directory_to_process + "/event/out_put_file1.txt", 'r')
file_xml3_out_content = file_xml3_out.read()
file_xml3_out_content = file_xml3_out_content.strip()
file_xml3_out_content = file_xml3_out_content.replace("\r", "")
file_xml3_out_content = file_xml3_out_content.replace("\n", "")
file_xml3 = open(directory_to_process + file_xml3_out_content, 'w')
file_xml3.write( content_data)
file_xml3.close()
if "template2" in param:
file_inc2 = open(directory_to_process + "/event/promotion_template2.inc", 'r')
file_inc2_content = file_inc2.read()
file_inc_img = open(directory_to_process + "/../image/event/image_template2", 'r')
file_inc2_img_content = file_inc_img.read()
# replace key.
sp_key = file_inc2_img_content.split("\n")
print("sp_key = " + str(len( sp_key)))
for sp_line in sp_key:
sp_line = sp_line.strip()
key_val = sp_line.split("=")
if len( key_val) == 2:
print("k = " + key_val[0] + " val=" + key_val[1])
file_inc2_content = file_inc2_content.replace( "###" + key_val[0], '"' + key_val[1].strip() + '"')
file_inc_event_click = open(directory_to_process + "/event/promotion_onclick2.inc", 'r')
file_inc_event_click_content = file_inc_event_click.read()
file_inc2_content = file_inc2_content.replace("###EventOnClick", file_inc_event_click_content)
print(file_inc2_content)
#print( file_inc_content)
content_data_was_repack = file_content_main.replace(";dummy_layout.inc", file_inc_content)
content_data = content_data_was_repack.replace(";BigLogoLayout", file_inc2_content)
begin_text = content_data.index(";TAGESP")
end_text = content_data.index(";TAGESP", begin_text + 7)
#print("sub text = " + str(begin_text) + " end = " + str(end_text))
tmp1 = content_data[: begin_text - 7]
tmp2 = content_data[ end_text:-1]
#print("tmp1=" + tmp1)
#print("tmp2=" + tmp2)
content_data = tmp1 + tmp2
file_xml3_out = open(directory_to_process + "/event/out_put_file2.txt", 'r')
file_xml3_out_content = file_xml3_out.read()
file_xml3_out_content = file_xml3_out_content.strip()
file_xml3_out_content = file_xml3_out_content.replace("\r", "")
file_xml3_out_content = file_xml3_out_content.replace("\n", "")
file_xml3 = open(directory_to_process + file_xml3_out_content, 'w')
file_xml3.write( content_data)
file_xml3.close()
if "template3" in param:
file_inc3 = open(directory_to_process + "/event/promotion_template3.inc", 'r')
file_inc3_content = file_inc3.read()
file_inc_img = open(directory_to_process + "/../image/event/image_template3", 'r')
file_inc3_img_content = file_inc_img.read()
# replace key.
sp_key = file_inc3_img_content.split("\n")
print("sp_key = " + str(len( sp_key)))
for sp_line in sp_key:
sp_line = sp_line.strip()
key_val = sp_line.split("=")
print("Kenta420:", key_val)
if len( key_val) == 2:
print("k = " + key_val[0] + " val=" + key_val[1])
file_inc3_content = file_inc3_content.replace( "###" + key_val[0], '"' + key_val[1].strip() + '"')
file_inc_event_click = open(directory_to_process + "/event/promotion_onclick3.inc", 'r')
file_inc_event_click_content = file_inc_event_click.read()
file_inc3_content = file_inc3_content.replace("###EventOnClick", file_inc_event_click_content)
print(file_inc3_content)
#print( file_inc_content)
content_data_was_repack = file_content_main.replace(";dummy_layout.inc", file_inc_content)
content_data = content_data_was_repack.replace(";BigLogoLayout", file_inc3_content)
begin_text = content_data.index(";TAGESP")
end_text = content_data.index(";TAGESP", begin_text + 7)
#print("sub text = " + str(begin_text) + " end = " + str(end_text))
tmp1 = content_data[: begin_text - 7]
tmp3 = content_data[ end_text:-1]
#print("tmp1=" + tmp1)
#print("tmp3=" + tmp3)
content_data = tmp1 + tmp3
file_xml3_out = open(directory_to_process + "/event/out_put_file3.txt", 'r')
file_xml3_out_content = file_xml3_out.read()
file_xml3_out_content = file_xml3_out_content.strip()
file_xml3_out_content = file_xml3_out_content.replace("\r", "")
file_xml3_out_content = file_xml3_out_content.replace("\n", "")
file_xml3 = open(directory_to_process + file_xml3_out_content, 'w')
file_xml3.write( content_data)
file_xml3.close()
if "template4" in param:
# NOTE: promotion_template4.inc, image_template4, promotion_onclick4.inc, out_put_file4.txt
# promotion 4
file_inc3 = open(directory_to_process + "/event/promotion_template4.inc", 'r')
file_inc3_content = file_inc3.read()
file_inc_img = open(directory_to_process + "/../image/event/image_template4", 'r')
file_inc3_img_content = file_inc_img.read()
# replace key.
sp_key = file_inc3_img_content.split("\n")
print("sp_key = " + str(len( sp_key)))
for sp_line in sp_key:
sp_line = sp_line.strip()
key_val = sp_line.split("=")
print("Kenta420:", key_val)
if len( key_val) == 2:
print("k = " + key_val[0] + " val=" + key_val[1])
file_inc3_content = file_inc3_content.replace( "###" + key_val[0], '"' + key_val[1].strip() + '"')
file_inc_event_click = open(directory_to_process + "/event/promotion_onclick4.inc", 'r')
file_inc_event_click_content = file_inc_event_click.read()
file_inc3_content = file_inc3_content.replace("###EventOnClick", file_inc_event_click_content)
print(file_inc3_content)
#print( file_inc_content)
content_data_was_repack = file_content_main.replace(";dummy_layout.inc", file_inc_content)
content_data = content_data_was_repack.replace(";BigLogoLayout", file_inc3_content)
begin_text = content_data.index(";TAGESP")
end_text = content_data.index(";TAGESP", begin_text + 7)
#print("sub text = " + str(begin_text) + " end = " + str(end_text))
tmp1 = content_data[: begin_text - 7]
tmp3 = content_data[ end_text:-1]
#print("tmp1=" + tmp1)
#print("tmp3=" + tmp3)
content_data = tmp1 + tmp3
file_xml3_out = open(directory_to_process + "/event/out_put_file4.txt", 'r')
file_xml3_out_content = file_xml3_out.read()
file_xml3_out_content = file_xml3_out_content.strip()
file_xml3_out_content = file_xml3_out_content.replace("\r", "")
file_xml3_out_content = file_xml3_out_content.replace("\n", "")
file_xml3 = open(directory_to_process + file_xml3_out_content, 'w')
file_xml3.write( content_data)
file_xml3.close()
if "template5" in param:
# promotion thai tea
file_inc3 = open(directory_to_process + "/event/promotion_template5.inc", 'r')
file_inc3_content = file_inc3.read()
file_inc_img = open(directory_to_process + "/../image/event/image_template5", 'r')
file_inc3_img_content = file_inc_img.read()
# replace key.
sp_key = file_inc3_img_content.split("\n")
print("sp_key = " + str(len( sp_key)))
for sp_line in sp_key:
sp_line = sp_line.strip()
key_val = sp_line.split("=")
print("Kenta420:", key_val)
if len( key_val) == 2:
print("k = " + key_val[0] + " val=" + key_val[1])
file_inc3_content = file_inc3_content.replace( "###" + key_val[0], '"' + key_val[1].strip() + '"')
file_inc_event_click = open(directory_to_process + "/event/promotion_onclick5.inc", 'r')
file_inc_event_click_content = file_inc_event_click.read()
file_inc3_content = file_inc3_content.replace("###EventOnClick", file_inc_event_click_content)
print(file_inc3_content)
#print( file_inc_content)
content_data_was_repack = file_content_main.replace(";dummy_layout.inc", file_inc_content)
content_data = content_data_was_repack.replace(";BigLogoLayout", file_inc3_content)
begin_text = content_data.index(";TAGESP")
end_text = content_data.index(";TAGESP", begin_text + 7)
#print("sub text = " + str(begin_text) + " end = " + str(end_text))
tmp1 = content_data[: begin_text - 7]
tmp3 = content_data[ end_text:-1]
#print("tmp1=" + tmp1)
#print("tmp3=" + tmp3)
content_data = tmp1 + tmp3
file_xml3_out = open(directory_to_process + "/event/out_put_file5.txt", 'r')
file_xml3_out_content = file_xml3_out.read()
file_xml3_out_content = file_xml3_out_content.strip()
file_xml3_out_content = file_xml3_out_content.replace("\r", "")
file_xml3_out_content = file_xml3_out_content.replace("\n", "")
file_xml3 = open(directory_to_process + file_xml3_out_content, 'w')
file_xml3.write( content_data)
file_xml3.close()
###############################################################
# MULTI PRO
###############################################################
print("dummy.current_file_name=", current_file_name)
if "multi_promotion" in param:
print("Should gen multi")
files = os.listdir(directory_to_process + "/event/")
files = [f for f in files if f.startswith("multi_promotion_config")]
for filename in files:
recommend_multi_pro_buff = Path(directory_to_process + "/page_catalog_group_recommend_multi_pro.lxml").read_text()
# print("pre-regex multi pro buff = ", recommend_multi_pro_buff)
# print("test split", json.dumps(recommend_multi_pro_buff.splitlines(), indent=2))
temp = []
for buffer in recommend_multi_pro_buff.splitlines():
# print("buffer:"+buffer)
if "\\n" in buffer:
# print("found")
buffer = buffer.replace("\\n", "\\\\n")
temp.append(buffer)
recommend_multi_pro_buff = "\n".join(temp)
# print("after-splitlines multi pro buff = ", recommend_multi_pro_buff)
# recommend_multi_pro_buff = recommend_multi_pro.read()
# recommend_multi_pro.close()
#read config
multi_pro_config_file = open(directory_to_process + "/event/"+ filename)
multi_pro_config = json.load(multi_pro_config_file)
# if has any 'reorder'
order_list: list = []
index = 0
promotion_name = []
while index < len(multi_pro_config):
promotion_config = multi_pro_config[index]
index += 1
# add promotion name for create filename later
promotion_name.append(promotion_config["name"])
#load template
template_file = open(directory_to_process + promotion_config["template"])
template = template_file.read()
template_file.close()
# TODO: get script and replace ###event_on_click
if gen_season_pass and promotion_config["name"].startswith("s") and "product_code_key" in promotion_config.keys():
product_code = promotion_config["product_code_key"]
script = None
print("try find script for ", product_code)
try:
script = season_pass_menu_script[product_code]
if "\\n" in script:
script = script.replace("\\n", "\\\\n")
except:
pass
# print("script=", script)
if script != None:
template = template.replace("###on_click_script", script.strip())
# replace state
product_code_state = "$Sum" + ''.join(product_code.split('.')[1:]).replace("-","").replace("#","")
product_code_list = product_code.split('.')[1:]
pd_dot_btn = [pd +".Button" for pd in product_code_list if "#" not in pd]
print("gen state", product_code_state)
# template = template.replace("BigButtonEnable", f"Flag( {','.join(pd_dot_btn)},Disable=Invisible,{product_code_state})")
if "dev" in param:
template = template.replace("BigButtonEnable", f"\"Enable\"")
else:
template = template.replace("BigButtonEnable", f"{product_code_state}")
template = template.replace("###on_click_script", "")
for key, value in promotion_config["config"].items():
template = template.replace("###"+key, '"' + value.strip() + '"')
promotion_block_str = '\r\n<Block>\r\n\t<State> PromotionState{0} </State>\r\n\t<MarginLeft> 33 </MarginLeft>\r\n\t<MarginTop> 22 </MarginTop>\r\n\t<Width> 484 </Width>\r\n\t<Height> 602 </Height>\r\n'.format(index)
if gen_season_pass and promotion_config["name"].startswith("s") and "product_code_key" in promotion_config.keys():
promotion_block_str = f"\r\n<Block>\r\n\t<State> Flag( {','.join(pd_dot_btn)},Disable=Invisible,{product_code_state}) </State>\r\n\t<MarginLeft> 33 </MarginLeft>\r\n\t<MarginTop> 22 </MarginTop>\r\n\t<Width> 484 </Width>\r\n\t<Height> 602 </Height>\r\n"
# insert overlay tag
# promotion_block_str += season_pass_menu_big_btn_ui[f"{product_code}.overlay"].replace("menu_overlay_set", "event/menu_overlay_set")
try:
template = template.replace(";#Overlay", season_pass_menu_big_btn_ui[f"{product_code}.overlay"].replace("menu_overlay_set", "event/menu_overlay_set"))
except:
print("Overlay not found for "+product_code)
pass
if "dev" in param:
promotion_block_str = f"\r\n<Block>\r\n\t<State> \"Enable\" </State>\r\n\t<MarginLeft> 33 </MarginLeft>\r\n\t<MarginTop> 22 </MarginTop>\r\n\t<Width> 484 </Width>\r\n\t<Height> 602 </Height>\r\n"
# Add text for price and name
# season_pass_menu_big_btn_ui
if gen_season_pass and promotion_config["name"].startswith("s") and "product_code_key" in promotion_config.keys():
price_name_ui = season_pass_menu_big_btn_ui[product_code]
if price_name_ui != None:
print("get cloned ui OK")
# print("preview\n", price_name_ui)
template += "\r\n" + price_name_ui.replace("\\n", "\\\\n")
# <Image>
# <X> 10 </X>
# <Y> 10 </Y>
# <Filename> "ROOT/taobin_project/inter/sgp/image/event/menu_overlay_set/gradeB/button_overlay_catalog_3_posi1.png" </Filename>
# </Image>
# print("after replace\n", template)
# try:
# # get overlay
# overlay_original_tag = season_pass_menu_big_btn_ui[f"{product_code}.overlay"]
# # print(f"[OverlayClone] {product_code} --- "+overlay_original_tag+".")
# overlay_new_path = " ".join(overlay_original_tag.split(' ')[3:-1]).replace("menu_overlay_set", "event/menu_overlay_set").replace(")","")
# template += f"\t<Image>\r\n\t<X> 10 </X>\r\n\t<Y> 10 </Y>\r\n\t<Filename> {overlay_new_path} </Filename>\r\n\t</Image>\r\n"
# except:
# print("\t\t> Overlay not found for "+product_code+"\n")
promotion_block_str += template
promotion_block_str += '\r\n</Block>\r\n'
recommend_multi_pro_buff = re.sub(r'(?is)(;block{0}).*(;endblock{0})'.format(index), r'\1{0}\2'.format(promotion_block_str), recommend_multi_pro_buff)
# print("before idx cond check", recommend_multi_pro_buff)
# Path("./before_idx_cond_check."+str(index)).write_text(recommend_multi_pro_buff, encoding="utf-8")
if gen_season_pass and promotion_config["name"].startswith("s") and "product_code_key" in promotion_config.keys():
current_season = int([ s for s in product_code.split('.')[0]][1])
print("[REPL] season ", current_season)
filter_sm = [ pd for pd in season_pass_menu[current_season] if pd.endswith("sm")]
print("[SM] expect at least 4, ", len(filter_sm))
has_reorder = "reorder" in promotion_config.keys()
# interact_idx = (-1, -1)
# do load list
if has_reorder:
print("reorder mode")
order_list = promotion_config["reorder"]
print(json.dumps(order_list, indent=2), " while ", json.dumps(filter_sm, indent=2))
# buffer_key = ""
# new_sorted_list = [
# "",
# "",
# "",
# ""
# ]
filter_sm = order_list
# sort by has_order
# for filtered in filter_sm:
# print("try reorder", filtered, order_list)
# # get index from order
# expect_index = order_list.index(filtered)
# # interact_idx[0] = expect_index
# print("get expect = ", expect_index)
# current_index = filter_sm.index(filtered)
# # interact_idx[1] = current_index
# print("get current = ", current_index)
# is_matched_index = expect_index != -1 and expect_index == current_index
# print(f"check match {filtered}: ", not is_matched_index)
# # apply to new list
# new_sorted_list[expect_index] = filtered
# if not is_matched_index:
# print(f"swap current={filtered}@{current_index} to position@{expect_index} was {filter_sm[expect_index]}")
# buffer_key = filter_sm[expect_index]
# filter_sm[expect_index] = filtered
# filter_sm[current_index] = buffer_key
# buffer_key = ""
# print("final reorder \n\n",filter_sm,order_list,"\n\n", new_sorted_list ,"\n\n")
# try get block
generated_block_buffer = ""
for sm_menu in filter_sm:
if ";season-sm-block" not in recommend_multi_pro_buff:
print("expect already generated")
break
try:
sm_menu = ".".join(sm_menu.split(".")[:-1])
print("sm_menu", sm_menu)
curr_sm_block = store_block_list[sm_menu]
curr_sm_block = curr_sm_block.replace(",$Sum", ",Disable=Invisible,$Sum").replace("\\n", "\\\\n")
generated_block_buffer += curr_sm_block
# if "52-05-02-0076" in sm_menu:
# print("52-05-02-0076", generated_block_buffer)
except:
print("Cannot find store block for ", sm_menu)
pass
# replace by set of season menus
if generated_block_buffer != "" and ";season-sm-block" in recommend_multi_pro_buff:
print("init replace block")
recommend_multi_pro_buff = re.sub(r'(?is);season-sm-block.*?;end-season-sm-block', generated_block_buffer, recommend_multi_pro_buff)
# print(recommend_multi_pro_buff)
# recommend_multi_pro_buff = recommend_multi_pro_buff.replace("\\n", "\\n")
# Path("./generated_buffer_sm."+str(index)).write_text(recommend_multi_pro_buff, encoding="utf-8")
if index == 2:
# expend block3 to full width bottom
inner_block = re.search(r'(?is);block{0}(.*);endblock{0}'.format(index+1), recommend_multi_pro_buff).group(1)
inner_block = inner_block.replace("<Width> 516 </Width>", "<Width> 1032 </Width>", 2)
inner_block = inner_block.replace("<Max> 4 </Max>", "<Max> 8 </Max>", 1)
inner_block = inner_block.replace("<Column> 2 </Column>", "<Column> 4 </Column>", 1)
recommend_multi_pro_buff = re.sub(r'(?is)(;block{0}).*(;endblock{0})'.format(index+1), r'\1{0}\2'.format(inner_block), recommend_multi_pro_buff)
# remove block4
recommend_multi_pro_buff = re.sub(r'(?is)(;block{0}).*(;endblock{0})'.format(index+2), r'\1\2', recommend_multi_pro_buff)
# print("after idx 2 cond check", recommend_multi_pro_buff)
if index == 3:
# create expand block
# print("inner block2. Is buffer contain ;block?", ";block" in recommend_multi_pro_buff, re.search(r'(?is)(;block{0}.*;endblock{0})'.format(index+1), recommend_multi_pro_buff))
inner_block2 = re.search(r'(?is)(;block{0}.*;endblock{0})'.format(index+1), recommend_multi_pro_buff).group(1)
# print("inner_block2 = ", inner_block2)
# Path("./inner_block2."+str(index)).write_text(inner_block2, encoding="utf-8")
# Path("./inner_block2_buffer."+str(index)).write_text(recommend_multi_pro_buff, encoding="utf-8")
inner_block2 = inner_block2.replace(";block{0}".format(index+1), ";block{0}-expand".format(index+1))
# print("inner_block2_1 = ", inner_block2)
# Path("./inner_block2_1."+str(index)).write_text(inner_block2, encoding="utf-8")
# Path("./inner_block2_1_buffer."+str(index)).write_text(recommend_multi_pro_buff, encoding="utf-8")
inner_block2 = inner_block2.replace(";endblock{0}".format(index+1), ";endblock{0}-expand".format(index+1))
# print("inner_block2_2 = ", inner_block2)
# Path("./inner_block2_2."+str(index)).write_text(inner_block2, encoding="utf-8")
# Path("./inner_block2_2_buffer."+str(index)).write_text(recommend_multi_pro_buff, encoding="utf-8")
# print(f"inner_block2_2.buffer {index} = ", recommend_multi_pro_buff)
inner_block2 = inner_block2.replace("<Width> 516 </Width>", "<Width> 1032 </Width>", 2)
# inner_block2 = inner_block2.replace("<State> \"Enable\" </State> ", "<State>\r\n\teval(\r\n\tIf PromotionState{0} = \"Enable\" Then\r\n\t\tVar block_expend_show = \"Invisible\"\r\n\tElse\r\n\t\tVar block_expend_show = \"Enable\"\r\n\tEndIf\r\n\tVar return = block_expend_show\r\n\t)\r\n</State>".format(index), 1)
inner_block2 = inner_block2.replace("<Max> 4 </Max>", "<Max>\r\neval(\r\n\tIf CountEnablePromotion > 2 Then\r\n\t\tVar max_count = 4\r\n\tElse\r\n\t\tVar max_count = 8\r\n\tEndIf\r\n\tVar return = max_count\r\n)\r\n</Max>", 1)
inner_block2 = inner_block2.replace("<Column> 2 </Column>", "<Column>\r\neval(\r\n\tIf CountEnablePromotion > 2 Then\r\n\t\tVar column_count = 2\r\n\tElse\r\n\t\tVar column_count = 4\r\n\tEndIf\r\n\tVar return = column_count\r\n)\r\n</Column>", 1)
# print("inner_block2_3 = ", inner_block2)
if "\\n" in inner_block2:
inner_block2 = inner_block2.replace("\\n", "\\\\n")
recommend_multi_pro_buff = re.sub(r'(?is);block{0}.*;endblock{0}'.format(index+1), inner_block2, recommend_multi_pro_buff)
# print("after idx 3 cond check", recommend_multi_pro_buff)
# print("index = ", index)
# create promotion file
count_name_dict = {
2: "double_",
3: "triple_"
}
# print("write buffer encode: ", str(recommend_multi_pro_buff))
# test
# print("test pathlib", Path(directory_to_process + "/page_catalog_group_recommend_multi_pro.lxml").read_text())
# promo_file = open(directory_to_process + "/event/" + count_name_dict[len(multi_pro_config)]+ "promotion_" + "_and_".join(promotion_name) + ".lxml", "w")
Path(directory_to_process + "/event/" + count_name_dict[len(multi_pro_config)]+ "promotion_" + "_and_".join(promotion_name) + ".lxml").write_text(recommend_multi_pro_buff, encoding="utf-8")
# promo_file.write(recommend_multi_pro_buff)
# # promo_file.writelines(recommend_multi_pro_buff.split("\r\n"))
# promo_file.close()

View file

@ -0,0 +1,50 @@
[
{
"name": "s1topleft",
"template": "/event/promotion_template.inc",
"product_code_key": "s1.52-21-01-0007.52-21-02-0004.52-21-03-0004",
"config": {
"normal_eng": "ROOT/taobin_project/inter/sgp/image/event/season_pass/bn_hot_caramel_latte.png",
"normal_thai": "ROOT/taobin_project/inter/sgp/image/event/season_pass/bn_hot_caramel_latte.png",
"press_eng": "ROOT/taobin_project/inter/sgp/image/event/season_pass/bp_hot_caramel_latte.png",
"press_thai": "ROOT/taobin_project/inter/sgp/image/event/season_pass/bp_hot_caramel_latte.png",
"disable_eng": "ROOT/taobin_project/inter/sgp/image/event/season_pass/bd_hot_caramel_latte.png",
"disable_thai": "ROOT/taobin_project/inter/sgp/image/event/season_pass/bd_hot_caramel_latte.png",
"event_on_click": "ROOT/taobin_project/xml/page_topping_select6.lxml"
},
"reorder": [
"-.52-05-02-0076.-.sm",
"52-21-01-0004.52-21-02-0002.52-21-03-0002.sm",
"52-02-01-0039.52-02-02-0039.52-02-03-0039.sm",
"-.52-05-02-0025.52-05-03-0025.sm"
]
},
{
"name": "s1topright",
"template": "/event/promotion_template.inc",
"product_code_key": "s1.##-##-##-####.##-##-##-####.52-03-03-0009",
"config": {
"normal_eng": "ROOT/taobin_project/inter/sgp/image/event/season_pass/bn_smoothie_oreo.png",
"normal_thai": "ROOT/taobin_project/inter/sgp/image/event/season_pass/bn_smoothie_oreo.png",
"press_eng": "ROOT/taobin_project/inter/sgp/image/event/season_pass/bp_smoothie_oreo.png",
"press_thai": "ROOT/taobin_project/inter/sgp/image/event/season_pass/bp_smoothie_oreo.png",
"disable_eng": "ROOT/taobin_project/inter/sgp/image/event/season_pass/bd_smoothie_oreo.png",
"disable_thai": "ROOT/taobin_project/inter/sgp/image/event/season_pass/bd_smoothie_oreo.png",
"event_on_click": "ROOT/taobin_project/xml/page_topping_select6.lxml"
}
},
{
"name": "s1botleft",
"template": "/event/promotion_template.inc",
"product_code_key": "s1.52-02-01-0026.52-02-02-0026.52-02-03-0026",
"config": {
"normal_eng": "ROOT/taobin_project/inter/sgp/image/event/season_pass/bn_hot_matcha_milk_tea.png",
"normal_thai": "ROOT/taobin_project/inter/sgp/image/event/season_pass/bn_hot_matcha_milk_tea.png",
"press_eng": "ROOT/taobin_project/inter/sgp/image/event/season_pass/bp_hot_matcha_milk_tea.png",
"press_thai": "ROOT/taobin_project/inter/sgp/image/event/season_pass/bp_hot_matcha_milk_tea.png",
"disable_eng": "ROOT/taobin_project/inter/sgp/image/event/season_pass/bd_hot_matcha_milk_tea.png",
"disable_thai": "ROOT/taobin_project/inter/sgp/image/event/season_pass/bd_hot_matcha_milk_tea.png",
"event_on_click": "ROOT/taobin_project/xml/page_topping_select6.lxml"
}
}
]

View file

@ -0,0 +1,50 @@
[
{
"name": "s2topleft",
"template": "/event/promotion_template.inc",
"product_code_key": "s2.52-21-01-0006.52-21-02-0003.52-21-03-0003",
"config": {
"normal_eng": "ROOT/taobin_project/inter/sgp/image/event/season_pass/bn_hot_mocha.png",
"normal_thai": "ROOT/taobin_project/inter/sgp/image/event/season_pass/bn_hot_mocha.png",
"press_eng": "ROOT/taobin_project/inter/sgp/image/event/season_pass/bn_hot_mocha.png",
"press_thai": "ROOT/taobin_project/inter/sgp/image/event/season_pass/bn_hot_mocha.png",
"disable_eng": "ROOT/taobin_project/inter/sgp/image/event/season_pass/bn_hot_mocha.png",
"disable_thai": "ROOT/taobin_project/inter/sgp/image/event/season_pass/bn_hot_mocha.png",
"event_on_click": "ROOT/taobin_project/xml/page_topping_select6.lxml"
},
"reorder": [
"-.52-05-02-0045.-.sm",
"52-21-01-0005.52-31-02-0002.52-31-03-0002.sm",
"52-02-01-0026.52-02-02-0026.52-02-03-0026.sm",
"-.52-05-02-0074.52-05-03-0074.sm"
]
},
{
"name": "s2topright",
"template": "/event/promotion_template.inc",
"product_code_key": "s2.##-##-##-####.##-##-##-####.52-03-03-0049",
"config": {
"normal_eng": "ROOT/taobin_project/inter/sgp/image/event/season_pass/bn_iced_Milovalcocoa_smoothie.png",
"normal_thai": "ROOT/taobin_project/inter/sgp/image/event/season_pass/bn_iced_Milovalcocoa_smoothie.png",
"press_eng": "ROOT/taobin_project/inter/sgp/image/event/season_pass/bp_iced_Milovalcocoa_smoothie.png",
"press_thai": "ROOT/taobin_project/inter/sgp/image/event/season_pass/bp_iced_Milovalcocoa_smoothie.png",
"disable_eng": "ROOT/taobin_project/inter/sgp/image/event/season_pass/bn_iced_Milovalcocoa_smoothie.png",
"disable_thai": "ROOT/taobin_project/inter/sgp/image/event/season_pass/bn_iced_Milovalcocoa_smoothie.png",
"event_on_click": "ROOT/taobin_project/xml/page_topping_select6.lxml"
}
},
{
"name": "s2botleft",
"template": "/event/promotion_template.inc",
"product_code_key": "s2.52-02-01-0039.52-02-02-0039.52-02-03-0039",
"config": {
"normal_eng": "ROOT/taobin_project/inter/sgp/image/event/season_pass/bn_thai_milk_tea_SingPark.png",
"normal_thai": "ROOT/taobin_project/inter/sgp/image/event/season_pass/bn_thai_milk_tea_SingPark.png",
"press_eng": "ROOT/taobin_project/inter/sgp/image/event/season_pass/bp_thai_milk_tea_SingPark.png",
"press_thai": "ROOT/taobin_project/inter/sgp/image/event/season_pass/bp_thai_milk_tea_SingPark.png",
"disable_eng": "ROOT/taobin_project/inter/sgp/image/event/season_pass/bn_thai_milk_tea_SingPark.png",
"disable_thai": "ROOT/taobin_project/inter/sgp/image/event/season_pass/bn_thai_milk_tea_SingPark.png",
"event_on_click": "ROOT/taobin_project/xml/page_topping_select6.lxml"
}
}
]

View file

@ -0,0 +1,50 @@
[
{
"name": "s3topleft",
"template": "/event/promotion_template.inc",
"product_code_key": "s3.52-21-01-0005.52-31-02-0002.52-31-03-0002",
"config": {
"normal_eng": "ROOT/taobin_project/inter/sgp/image/event/season_pass/bn_hot_cappuccino.png",
"normal_thai": "ROOT/taobin_project/inter/sgp/image/event/season_pass/bn_hot_cappuccino.png",
"press_eng": "ROOT/taobin_project/inter/sgp/image/event/season_pass/bp_hot_cappuccino.png",
"press_thai": "ROOT/taobin_project/inter/sgp/image/event/season_pass/bp_hot_cappuccino.png",
"disable_eng": "ROOT/taobin_project/inter/sgp/image/event/season_pass/bn_hot_cappuccino.png",
"disable_thai": "ROOT/taobin_project/inter/sgp/image/event/season_pass/bn_hot_cappuccino.png",
"event_on_click": "ROOT/taobin_project/xml/page_topping_select6.lxml"
},
"reorder": [
"-.52-05-02-0117.-.sm",
"52-21-01-0003.52-21-02-0001.-.sm",
"52-02-01-0039.52-02-02-0039.52-02-03-0039.sm",
"-.52-05-02-0033.52-05-03-0033.sm"
]
},
{
"name": "s3topright",
"template": "/event/promotion_template.inc",
"product_code_key": "s3.##-##-##-####.52-04-02-0002.##-##-##-####",
"config": {
"normal_eng": "ROOT/taobin_project/inter/sgp/image/event/season_pass/bn_protein_Chocolate.png",
"normal_thai": "ROOT/taobin_project/inter/sgp/image/event/season_pass/bn_protein_Chocolate.png",
"press_eng": "ROOT/taobin_project/inter/sgp/image/event/season_pass/bp_protein_Chocolate.png",
"press_thai": "ROOT/taobin_project/inter/sgp/image/event/season_pass/bp_protein_Chocolate.png",
"disable_eng": "ROOT/taobin_project/inter/sgp/image/event/season_pass/bn_protein_Chocolate.png",
"disable_thai": "ROOT/taobin_project/inter/sgp/image/event/season_pass/bn_protein_Chocolate.png",
"event_on_click": "ROOT/taobin_project/xml/page_topping_select6.lxml"
}
},
{
"name": "s3botleft",
"template": "/event/promotion_template.inc",
"product_code_key": "s3.##-##-##-####.##-##-##-####.52-03-03-0027",
"config": {
"normal_eng": "ROOT/taobin_project/inter/sgp/image/event/season_pass/bn_StrawberrOreo_smoothie.png",
"normal_thai": "ROOT/taobin_project/inter/sgp/image/event/season_pass/bn_StrawberrOreo_smoothie.png",
"press_eng": "ROOT/taobin_project/inter/sgp/image/event/season_pass/bp_StrawberrOreo_smoothie.png",
"press_thai": "ROOT/taobin_project/inter/sgp/image/event/season_pass/bp_StrawberrOreo_smoothie.png",
"disable_eng": "ROOT/taobin_project/inter/sgp/image/event/season_pass/bn_StrawberrOreo_smoothie.png",
"disable_thai": "ROOT/taobin_project/inter/sgp/image/event/season_pass/bn_StrawberrOreo_smoothie.png",
"event_on_click": "ROOT/taobin_project/xml/page_topping_select6.lxml"
}
}
]

View file

@ -0,0 +1 @@
/event/promotion_pepsi_099.lxml

View file

@ -0,0 +1 @@
/event/promotion_2.xml

View file

@ -0,0 +1 @@
/event/promotion_3.xml

File diff suppressed because it is too large Load diff

File diff suppressed because it is too large Load diff

View file

@ -0,0 +1,48 @@
{
"recommendPath": "/sdcard/coffeevending/taobin_project/xml/page_catalog_group_recommend.xml",
"dummyLayoutPath": "/sdcard/coffeevending/taobin_project/xml/dummy_layout.inc",
"trickerYamlPath": "/sdcard/coffeevending/taobin_project/xml/event/tricker.yaml",
"outDir": "/sdcard/coffeevending/taobin_project/xml/event/",
"templates": [
{
"name": "promotion_pepsi",
"path": "/sdcard/coffeevending/taobin_project/xml/event/promotion_template1.inc",
"onclickFile": "/sdcard/coffeevending/taobin_project/xml/event/promotion_onclick1.inc",
"imagesTemplate": {
"normal_eng": "ROOT/taobin_project/image/event/welcomedrink_en.png",
"normal_thai": "ROOT/taobin_project/image/event/welcomedrink.png",
"press_eng": "ROOT/taobin_project/image/event/welcomedrink_en.png",
"press_thai": "ROOT/taobin_project/image/event/welcomedrink.png",
"disable_eng": "ROOT/taobin_project/image/event/welcomedrink_en.png",
"disable_thai": "ROOT/taobin_project/image/event/welcomedrink.png"
}
},
{
"name": "promotion_pepsi_end",
"path": "/sdcard/coffeevending/taobin_project/xml/event/promotion_template2.inc",
"onclickFile": "/sdcard/coffeevending/taobin_project/xml/event/promotion_onclick2.inc",
"imagesTemplate": {
"normal_eng": "ROOT/taobin_project/image/event/bn_pepsi_buy2_save_move_end_en.png",
"normal_thai": "ROOT/taobin_project/image/event/bn_pepsi_buy2_save_move_end_th.png",
"press_eng": "ROOT/taobin_project/image/event/bn_pepsi_buy2_save_move_end_en.png",
"press_thai": "ROOT/taobin_project/image/event/bn_pepsi_buy2_save_move_end_th.png",
"disable_eng": "ROOT/taobin_project/image/event/bn_pepsi_buy2_save_move_end_en.png",
"disable_thai": "ROOT/taobin_project/image/event/bn_pepsi_buy2_save_move_end_th.png"
}
},
{
"name": "promotion_mystery_cup_35",
"path": "/sdcard/coffeevending/taobin_project/xml/event/promotion_template3.inc",
"onclickFile": "/sdcard/coffeevending/taobin_project/xml/event/promotion_onclick3.inc",
"imagesTemplate": {
"normal_eng": "ROOT/taobin_project/image/event/pro_mystery_cup_en.png",
"normal_thai": "ROOT/taobin_project/image/event/pro_mystery_cup_th.png",
"press_eng": "ROOT/taobin_project/image/event/pro_mystery_cup_en.png",
"press_thai": "ROOT/taobin_project/image/event/pro_mystery_cup_th.png",
"disable_eng": "ROOT/taobin_project/image/event/pro_mystery_cup_en.png",
"disable_thai": "ROOT/taobin_project/image/event/pro_mystery_cup_th.png"
}
}
]
}

View file

@ -0,0 +1,84 @@
Var PictureDrink = "ROOT/taobin_project/image/page_drink_picture2_n/" + "bn_iced_pepsi.png"
Var OpenFromXML = CurrentXMLFileName2
Var PriceD1 = $-.Price
Var PriceD2 = 99
Var PriceD3 = $12-05-03-0007.Price
Var PD_CODE1 = "##-##-##-####"
Var PD_CODE2 = "12-05-02-0007"
Var PD_CODE3 = "12-05-03-0007"
; begin lang
Var aliasName[0] = "PEPSI"
Var aliasDesc[0] = "Pepsi & Ice"
Var aliasName[1] = "เป๊ปซี่น้ำแข็ง"
Var aliasDesc[1] = "เป๊ปซี่"
Var aliasName[2] = "-"
Var aliasDesc[2] = "-"
Var aliasName[3] = "-"
Var aliasDesc[3] = "-"
Var aliasName[4] = "PEPSI"
Var aliasDesc[4] = "Pepsi, Ais"
Var NameLang[0][0] = ""
Var NameLang[0][1] = ""
Var NameLang[0][2] = ""
Var NameLang[0][3] = ""
Var NameLang[0][4] = ""
Var DescLang[0][0] = ""
Var DescLang[0][1] = ""
Var DescLang[0][2] = ""
Var DescLang[0][3] = ""
Var DescLang[0][4] = ""
Var NameLang[1][0] = "PEPSI"
Var NameLang[1][1] = "เป๊ปซี่น้ำแข็ง"
Var NameLang[1][2] = ""
Var NameLang[1][3] = ""
Var NameLang[1][4] = "PEPSI"
Var DescLang[1][0] = "Pepsi, Ice"
Var DescLang[1][1] = "เป๊ปซี่ และน้ำแข็ง"
Var DescLang[1][2] = ""
Var DescLang[1][3] = ""
Var DescLang[1][4] = "Pepsi, Ais"
Var NameLang[2][0] = "TAO SLUSHIE"
Var NameLang[2][1] = "เต่าสลัชชี่"
Var NameLang[2][2] = ""
Var NameLang[2][3] = ""
Var NameLang[2][4] = "TAO SLUSHIE"
Var DescLang[2][0] = "Pepsi, Ice"
Var DescLang[2][1] = "เป๊ปซี่ และน้ำแข็ง"
Var DescLang[2][2] = ""
Var DescLang[2][3] = ""
Var DescLang[2][4] = "Pepsi, Ais"
; end lang
Var PD_STAGE_1 = "Disable2"
Var PD_STAGE_2 = $12-05-02-0007.Button
Var PD_STAGE_3 = $12-05-03-0007.Button
Var SelectCountDrinkType = 0
Var DefaultDrinkType = 0
If PD_STAGE_1 = "Enable" Then
Var SelectCountDrinkType = SelectCountDrinkType + 1
Var DefaultDrinkType = 1
EndIf
If PD_STAGE_2 = "Enable" Then
Var SelectCountDrinkType = SelectCountDrinkType + 1
Var DefaultDrinkType = 2
EndIf
If PD_STAGE_3 = "Enable" Then
Var SelectCountDrinkType = SelectCountDrinkType + 1
Var DefaultDrinkType = 3
EndIf
If PD_STAGE_2 = "Enable" Then
Topping "Load" "12-05-02-0007"
Else
If PD_STAGE_1 = "Enable" Then
Topping "Load" "-"
Else
Topping "Load" "12-05-03-0007"
EndIf
EndIf
DEBUGVAR PD_STAGE_1
DEBUGVAR PD_STAGE_2
DEBUGVAR PD_STAGE_3
Var SelectDrinkType = 0
Open "ROOT/taobin_project/xml/page_topping_select6.lxml"

View file

@ -0,0 +1 @@
Open "ROOT/taobin_project/xml/page_catalog_momday.xml"

View file

@ -0,0 +1,320 @@
Var BigButtonEnable = "Invisible"
DEBUGVAR BigButtonEnable
DEBUGVAR OreoGuarantee
; Enable all 4 buttons
Var SubRandMilkButtonEnable = "Enable"
DEBUGVAR SubRandMilkButtonEnable
Var SubRandTeaButtonEnable = "Enable"
DEBUGVAR SubRandTeaButtonEnable
Var SubRandCoffButtonEnable = "Enable"
DEBUGVAR SubRandCoffButtonEnable
Var SubRandAllButtonEnable = "Enable"
DEBUGVAR SubRandAllButtonEnable
; For real, yeah for real
; All random cup
Var IndexOfAllRandom = 0
Var IndexOfMilk = 0
Var IndexOfTea = 0
Var IndexOfCoffee = 0
Var IndexOfRateupOreoAll = 0
Var IndexOfRateupOreoMilk = 0
Var IndexOfRateupOreoTea = 0
Var IndexOfRateupOreoCoffee = 0
; Oreo smoothie volcano
If $12-99-03-0020.Button = "Enable" Then
Var ListOfAllRandom[IndexOfAllRandom] = "12-99-03-0020"
Var ListOfMilk[IndexOfMilk] = "12-99-03-0020"
Var ListOfOreoAll[IndexOfRateupOreoAll] = "12-99-03-0020"
Var ListOfOreoMilk[IndexOfRateupOreoMilk] = "12-99-03-0020"
Var IndexOfAllRandom = IndexOfAllRandom + 1
Var IndexOfMilk = IndexOfMilk + 1
Var IndexOfRateupOreoAll = IndexOfRateupOreoAll + 1
Var IndexOfRateupOreoMilk = IndexOfRateupOreoMilk + 1
EndIf
; Pink milk oreo volcano
If $12-99-03-0021.Button = "Enable" Then
Var ListOfAllRandom[IndexOfAllRandom] = "12-99-03-0021"
Var ListOfMilk[IndexOfMilk] = "12-99-03-0021"
Var ListOfOreoAll[IndexOfRateupOreoAll] = "12-99-03-0021"
Var ListOfOreoMilk[IndexOfRateupOreoMilk] = "12-99-03-0021"
Var IndexOfAllRandom = IndexOfAllRandom + 1
Var IndexOfMilk = IndexOfMilk + 1
Var IndexOfRateupOreoAll = IndexOfRateupOreoAll + 1
Var IndexOfRateupOreoMilk = IndexOfRateupOreoMilk + 1
EndIf
; Choco oreo volcano
If $12-99-03-0022.Button = "Enable" Then
Var ListOfAllRandom[IndexOfAllRandom] = "12-99-03-0022"
Var ListOfMilk[IndexOfMilk] = "12-99-03-0022"
Var ListOfOreoAll[IndexOfRateupOreoAll] = "12-99-03-0022"
Var ListOfOreoMilk[IndexOfRateupOreoMilk] = "12-99-03-0022"
Var IndexOfAllRandom = IndexOfAllRandom + 1
Var IndexOfMilk = IndexOfMilk + 1
Var IndexOfRateupOreoAll = IndexOfRateupOreoAll + 1
Var IndexOfRateupOreoMilk = IndexOfRateupOreoMilk + 1
EndIf
; Caramel milk oreo volcano
If $12-99-03-0023.Button = "Enable" Then
Var ListOfAllRandom[IndexOfAllRandom] = "12-99-03-0023"
Var ListOfMilk[IndexOfMilk] = "12-99-03-0023"
Var IndexOfAllRandom = IndexOfAllRandom + 1
Var IndexOfMilk = IndexOfMilk + 1
Var ListOfOreoAll[IndexOfRateupOreoAll] = "12-99-03-0023"
Var ListOfOreoMilk[IndexOfRateupOreoMilk] = "12-99-03-0023"
Var IndexOfRateupOreoAll = IndexOfRateupOreoAll + 1
Var IndexOfRateupOreoMilk = IndexOfRateupOreoMilk + 1
EndIf
; Thai milk tea oreo smoothie
If $12-99-03-0024.Button = "Enable" Then
Var ListOfAllRandom[IndexOfAllRandom] = "12-99-03-0024"
Var ListOfTea[IndexOfTea] = "12-99-03-0024"
Var IndexOfAllRandom = IndexOfAllRandom + 1
Var IndexOfTea = IndexOfTea + 1
Var ListOfOreoAll[IndexOfRateupOreoAll] = "12-99-03-0024"
Var ListOfOreoTea[IndexOfRateupOreoTea] = "12-99-03-0024"
Var IndexOfRateupOreoAll = IndexOfRateupOreoAll + 1
Var IndexOfRateupOreoTea = IndexOfRateupOreoTea + 1
EndIf
; Cafe late oreo smoothie
If $12-99-03-0025.Button = "Enable" Then
Var ListOfAllRandom[IndexOfAllRandom] = "12-99-03-0025"
Var ListOfCoffee[IndexOfCoffee] = "12-99-03-0025"
Var IndexOfAllRandom = IndexOfAllRandom + 1
Var IndexOfCoffee = IndexOfCoffee + 1
Var ListOfOreoAll[IndexOfRateupOreoAll] = "12-99-03-0025"
Var ListOfOreoCoffee[IndexOfRateupOreoCoffee] = "12-99-03-0025"
Var IndexOfRateupOreoAll = IndexOfRateupOreoAll + 1
Var IndexOfRateupOreoCoffee = IndexOfRateupOreoCoffee + 1
EndIf
; Strawberry milk oreo volcano
If $12-99-03-0026.Button = "Enable" Then
Var ListOfAllRandom[IndexOfAllRandom] = "12-99-03-0026"
Var ListOfMilk[IndexOfMilk] = "12-99-03-0026"
Var IndexOfAllRandom = IndexOfAllRandom + 1
Var IndexOfMilk = IndexOfMilk + 1
Var ListOfOreoAll[IndexOfRateupOreoAll] = "12-99-03-0026"
Var ListOfOreoMilk[IndexOfRateupOreoMilk] = "12-99-03-0026"
Var IndexOfRateupOreoAll = IndexOfRateupOreoAll + 1
Var IndexOfRateupOreoMilk = IndexOfRateupOreoMilk + 1
EndIf
; Melon milk oreo volcano
If $12-99-03-0027.Button = "Enable" Then
Var ListOfAllRandom[IndexOfAllRandom] = "12-99-03-0027"
Var ListOfMilk[IndexOfMilk] = "12-99-03-0027"
Var IndexOfAllRandom = IndexOfAllRandom + 1
Var IndexOfMilk = IndexOfMilk + 1
Var ListOfOreoAll[IndexOfRateupOreoAll] = "12-99-03-0027"
Var ListOfOreoMilk[IndexOfRateupOreoMilk] = "12-99-03-0027"
Var IndexOfRateupOreoAll = IndexOfRateupOreoAll + 1
Var IndexOfRateupOreoMilk = IndexOfRateupOreoMilk + 1
EndIf
; Bana^2 milk oreo volcano
If $12-99-03-0028.Button = "Enable" Then
Var ListOfAllRandom[IndexOfAllRandom] = "12-99-03-0028"
Var ListOfMilk[IndexOfMilk] = "12-99-03-0028"
Var IndexOfAllRandom = IndexOfAllRandom + 1
Var IndexOfMilk = IndexOfMilk + 1
Var ListOfOreoAll[IndexOfRateupOreoAll] = "12-99-03-0028"
Var ListOfOreoMilk[IndexOfRateupOreoMilk] = "12-99-03-0028"
Var IndexOfRateupOreoAll = IndexOfRateupOreoAll + 1
Var IndexOfRateupOreoMilk = IndexOfRateupOreoMilk + 1
EndIf
; Hojicha oreo volcano
If $12-99-03-0028.Button = "Enable" Then
Var ListOfAllRandom[IndexOfAllRandom] = "12-99-03-0029"
Var ListOfTea[IndexOfTea] = "12-99-03-0029"
Var IndexOfAllRandom = IndexOfAllRandom + 1
Var IndexOfTea = IndexOfTea + 1
Var ListOfOreoAll[IndexOfRateupOreoAll] = "12-99-03-0029"
Var ListOfOreoTea[IndexOfRateupOreoTea] = "12-99-03-0029"
Var IndexOfRateupOreoAll = IndexOfRateupOreoAll + 1
Var IndexOfRateupOreoMilk = IndexOfRateupOreoMilk + 1
EndIf
; Thai milk tea smoothie
If $12-99-03-0030.Button = "Enable" Then
Var ListOfAllRandom[IndexOfAllRandom] = "12-99-03-0030"
Var ListOfTea[IndexOfTea] = "12-99-03-0030"
Var IndexOfAllRandom = IndexOfAllRandom + 1
Var IndexOfTea = IndexOfTea + 1
EndIf
; Melon milk smoothie
If $12-99-03-0031.Button = "Enable" Then
Var ListOfAllRandom[IndexOfAllRandom] = "12-99-03-0031"
Var ListOfMilk[IndexOfMilk] = "12-99-03-0031"
Var IndexOfAllRandom = IndexOfAllRandom + 1
Var IndexOfMilk = IndexOfMilk + 1
EndIf
; Taiwanese tea smoothie
If $12-99-03-0032.Button = "Enable" Then
Var ListOfAllRandom[IndexOfAllRandom] = "12-99-03-0032"
Var ListOfTea[IndexOfTea] = "12-99-03-0032"
Var IndexOfAllRandom = IndexOfAllRandom + 1
Var IndexOfTea = IndexOfTea + 1
EndIf
; THAI MILK TEA OREO SMOOTHIE
If $12-99-03-0040.Button = "Enable" Then
Var ListOfAllRandom[IndexOfAllRandom] = "12-99-03-0040"
Var ListOfTea[IndexOfTea] = "12-99-03-0040"
Var IndexOfAllRandom = IndexOfAllRandom + 1
Var IndexOfTea = IndexOfTea + 1
Var ListOfOreoAll[IndexOfRateupOreoAll] = "12-99-03-0040"
Var ListOfOreoTea[IndexOfRateupOreoTea] = "12-99-03-0040"
Var IndexOfRateupOreoAll = IndexOfRateupOreoAll + 1
Var IndexOfRateupOreoTea = IndexOfRateupOreoTea + 1
EndIf
; THAI MILK TEA SMOOTHIE
If $12-99-03-0041.Button = "Enable" Then
Var ListOfAllRandom[IndexOfAllRandom] = "12-99-03-0041"
Var ListOfTea[IndexOfTea] = "12-99-03-0041"
Var IndexOfAllRandom = IndexOfAllRandom + 1
Var IndexOfTea = IndexOfTea + 1
EndIf
; Tokyo bana^2 milk smoothie
If $12-99-03-0033.Button = "Enable" Then
Var ListOfAllRandom[IndexOfAllRandom] = "12-99-03-0033"
Var ListOfMilk[IndexOfMilk] = "12-99-03-0033"
Var IndexOfAllRandom = IndexOfAllRandom + 1
Var IndexOfMilk = IndexOfMilk + 1
EndIf
; Hojicha smoothie
If $12-99-03-0034.Button = "Enable" Then
Var ListOfAllRandom[IndexOfAllRandom] = "12-99-03-0034"
Var ListOfTea[IndexOfTea] = "12-99-03-0034"
Var IndexOfAllRandom = IndexOfAllRandom + 1
Var IndexOfTea = IndexOfTea + 1
EndIf
; Cocoa bana^2 smoothie
If $12-99-03-0035.Button = "Enable" Then
Var ListOfAllRandom[IndexOfAllRandom] = "12-99-03-0035"
Var ListOfMilk[IndexOfMilk] = "12-99-03-0035"
Var IndexOfAllRandom = IndexOfAllRandom + 1
Var IndexOfMilk = IndexOfMilk + 1
EndIf
; Taiwanese tea cafe latte smoothie
If $12-99-03-0036.Button = "Enable" Then
Var ListOfAllRandom[IndexOfAllRandom] = "12-99-03-0036"
Var ListOfCoffee[IndexOfCoffee] = "12-99-03-0036"
Var IndexOfAllRandom = IndexOfAllRandom + 1
Var IndexOfCoffee = IndexOfCoffee + 1
EndIf
; Melon cafe latte smoothie
If $12-99-03-0037.Button = "Enable" Then
Var ListOfAllRandom[IndexOfAllRandom] = "12-99-03-0037"
Var ListOfCoffee[IndexOfCoffee] = "12-99-03-0037"
Var IndexOfAllRandom = IndexOfAllRandom + 1
Var IndexOfCoffee = IndexOfCoffee + 1
EndIf
; Taiwanese tea cafe latte smoothie v2
If $12-99-03-0038.Button = "Enable" Then
Var ListOfAllRandom[IndexOfAllRandom] = "12-99-03-0038"
Var ListOfCoffee[IndexOfCoffee] = "12-99-03-0038"
Var IndexOfAllRandom = IndexOfAllRandom + 1
Var IndexOfCoffee = IndexOfCoffee + 1
EndIf
; Melon cafe latte smoothie v2
If $12-99-03-0039.Button = "Enable" Then
Var ListOfAllRandom[IndexOfAllRandom] = "12-99-03-0039"
Var ListOfCoffee[IndexOfCoffee] = "12-99-03-0039"
Var IndexOfAllRandom = IndexOfAllRandom + 1
Var IndexOfCoffee = IndexOfCoffee + 1
EndIf
DEBUGVAR IndexOfAllRandom
DEBUGVAR IndexOfCoffee
DEBUGVAR IndexOfMilk
DEBUGVAR IndexOfTea
DEBUGVAR IndexOfRateupOreoAll
DEBUGVAR IndexOfRateupOreoCoffee
DEBUGVAR IndexOfRateupOreoMilk
DEBUGVAR IndexOfRateupOreoTea
If IndexOfAllRandom = 0 Then
Var SubRandAllButtonEnable = "Disable"
EndIf
If IndexOfCoffee = 0 Then
Var SubRandCoffButtonEnable = "Disable"
EndIf
If IndexOfMilk = 0 Then
Var SubRandMilkButtonEnable = "Disable"
EndIf
If IndexOfTea = 0 Then
Var SubRandTeaButtonEnable = "Disable"
EndIf
If IndexOfRateupOreoAll = 0 Then
Var SubRandAllButtonEnable = "Disable"
EndIf
If IndexOfRateupOreoCoffee = 0 Then
Var SubRandCoffButtonEnable = "Disable"
EndIf
If IndexOfRateupOreoMilk = 0 Then
Var SubRandMilkButtonEnable = "Disable"
EndIf
If IndexOfRateupOreoTea = 0 Then
Var SubRandTeaButtonEnable = "Disable"
EndIf
Var ResultRandomIndex = 0
Refresh

File diff suppressed because it is too large Load diff

View file

@ -0,0 +1,40 @@
<Button>
;#Overlay
<State> BigButtonEnable </State>
<Filename>
eval(
If show_eng = "true" Then
Var return = ###normal_eng
Else
Var return = ###normal_thai
EndIf
)
</Filename>
<FilenamePress>
eval(
If show_eng = "true" Then
Var return = ###press_eng
Else
Var return = ###press_thai
EndIf
)
</FilenamePress>
<FilenameDisable>
eval(
If show_eng = "true" Then
Var return = ###disable_eng
Else
Var return = ###disable_thai
EndIf
)
</FilenameDisable>
<EventOnClick>
###on_click_script
Open ###event_on_click
</EventOnClick>
</Button>

View file

@ -0,0 +1,48 @@
<Button>
<X> 42 </X>
<Y> 520 </Y>
<State> BigButtonEnable </State>
<Filename>
eval(
If show_eng = "true" Then
Var return = ###normal_eng
Else
Var return = ###normal_thai
EndIf
)
</Filename>
<FilenamePress>
eval(
If show_eng = "true" Then
Var return = ###press_eng
Else
Var return = ###press_thai
EndIf
)
</FilenamePress>
<FilenameDisable>
eval(
If show_eng = "true" Then
Var return = ###disable_eng
Else
Var return = ###disable_thai
EndIf
)
</FilenameDisable>
<EventOnClick>
###EventOnClick
</EventOnClick>
</Button>
<EventUnitTest1>
Var BigButtonEnable = "Enable"
Refresh
</EventUnitTest1>
<EventUnitTest2>
Var BigButtonEnable = "Invisible"
Refresh
</EventUnitTest2>

View file

@ -0,0 +1,47 @@
<Button>
<X> 42 </X>
<Y> 520 </Y>
<State> BigButtonEnable </State>
<Filename>
eval(
If show_eng = "true" Then
Var return = ###normal_eng
Else
Var return = ###normal_thai
EndIf
)
</Filename>
<FilenamePress>
eval(
If show_eng = "true" Then
Var return = ###press_eng
Else
Var return = ###press_thai
EndIf
)
</FilenamePress>
<FilenameDisable>
eval(
If show_eng = "true" Then
Var return = ###disable_eng
Else
Var return = ###disable_thai
EndIf
)
</FilenameDisable>
<EventOnClick>
###EventOnClick
</EventOnClick>
</Button>
<EventUnitTest1>
Var BigButtonEnable = "Enable"
Refresh
</EventUnitTest1>
<EventUnitTest2>
Var BigButtonEnable = "Invisible"
Refresh
</EventUnitTest2>

View file

@ -0,0 +1,305 @@
;
;
;
; Sub-button for 4 random menu
;
;
;
<Button>
<X> 43 </X>
<Y> 519 </Y>
<State> SubRandMilkButtonEnable </State>
<Filename>
eval(
Var return = "ROOT/taobin_project/image/event/bn_random_milk.png"
)
</Filename>
<FilenamePress>
eval(
Var return = "ROOT/taobin_project/image/event/bn_random_milk.png"
)
</FilenamePress>
<FilenameDisable>
eval(
Var return = "ROOT/taobin_project/image/event/bd_random_milk.png"
)
</FilenameDisable>
<EventClick>
Var OreoGuarantee = OreoGuarantee + 1
Var ResultRandomIndex = 0
DEBUGVAR OreoGuarantee
If OreoGuarantee > 4 Then
Var IndexOfMilk = IndexOfMilk - 1
Random2 0 IndexOfMilk ResultRandomIndex
Var ProductCodeRandom = ListOfMilk[ResultRandomIndex]
DEBUGVAR ListOfMilk[ResultRandomIndex]
Var OreoGuarantee = 0
Else
Var IndexOfRateupOreoMilk = IndexOfRateupOreoMilk - 1
Random2 0 IndexOfRateupOreoMilk ResultRandomIndex
Var ProductCodeRandom = ListOfOreoMilk[ResultRandomIndex]
DEBUGVAR ListOfOreoMilk[ResultRandomIndex]
EndIf
DEBUGVAR ResultRandomIndex
Topping "Load" ProductCodeRandom
Var OpenFromXML = CurrentXMLFileName2
Open "ROOT/taobin_project/xml/page_topping_select_35.xml"
</EventClick>
</Button>
<Text>
<X> 91</X>
<Y> 635 </Y>
<Size> 32 </Size>
<Width>128</Width>
<Height>64</Height>
<Font> MITRegularTTF </Font>
<Color> 0x5A5A5A </Color>
<Mode> "disable-show" </Mode>
<State> SubRandMilkButtonEnable </State>
<Value> text_unavailable </Value>
<Align> center-vertical-horizontal </Align>
</Text>
<Button>
<X> 301 </X>
<Y> 519 </Y>
<State> SubRandTeaButtonEnable </State>
<Filename>
eval(
Var return = "ROOT/taobin_project/image/event/bn_random_tea.png"
)
</Filename>
<FilenamePress>
eval(
Var return = "ROOT/taobin_project/image/event/bn_random_tea.png"
)
</FilenamePress>
<FilenameDisable>
eval(
Var return = "ROOT/taobin_project/image/event/bd_random_tea.png"
)
</FilenameDisable>
<EventClick>
Var OreoGuarantee = OreoGuarantee + 1
Var ResultRandomIndex = 0
DEBUGVAR OreoGuarantee
DEBUGVAR IndexOfTea
DEBUGVAR IndexOfRateupOreoTea
If OreoGuarantee > 4 Then
Var IndexOfTea = IndexOfTea - 1
Random2 0 IndexOfTea ResultRandomIndex
Var ProductCodeRandom = ListOfTea[ResultRandomIndex]
DEBUGVAR ListOfTea[ResultRandomIndex]
Var OreoGuarantee = 0
Else
Var IndexOfRateupOreoTea = IndexOfRateupOreoTea - 1
Random2 0 IndexOfRateupOreoTea ResultRandomIndex
Var ProductCodeRandom = ListOfOreoTea[ResultRandomIndex]
DEBUGVAR ListOfOreoTea[ResultRandomIndex]
EndIf
DEBUGVAR ResultRandomIndex
Topping "Load" ProductCodeRandom
Var OpenFromXML = CurrentXMLFileName2
Open "ROOT/taobin_project/xml/page_topping_select_35.xml"
</EventClick>
</Button>
<Text>
<X> 349 </X>
<Y> 635 </Y>
<Size> 32 </Size>
<Width>128</Width>
<Height>64</Height>
<Font> MITRegularTTF </Font>
<Color> 0x5A5A5A </Color>
<Mode> "disable-show" </Mode>
<State> SubRandTeaButtonEnable </State>
<Value> text_unavailable </Value>
<Align> center-vertical-horizontal </Align>
</Text>
<Button>
<X> 43 </X>
<Y> 837 </Y>
<State> SubRandCoffButtonEnable </State>
<Filename>
eval(
Var return = "ROOT/taobin_project/image/event/bn_random_coffee.png"
)
</Filename>
<FilenamePress>
eval(
Var return = "ROOT/taobin_project/image/event/bn_random_coffee.png"
)
</FilenamePress>
<FilenameDisable>
eval(
Var return = "ROOT/taobin_project/image/event/bd_random_coffee.png"
)
</FilenameDisable>
<EventClick>
Var OreoGuarantee = OreoGuarantee + 1
Var ResultRandomIndex = 0
DEBUGVAR OreoGuarantee
DEBUGVAR IndexOfCoffee
DEBUGVAR IndexOfRateupOreoCoffee
If OreoGuarantee > 4 Then
Var IndexOfCoffee = IndexOfCoffee - 1
Random2 0 IndexOfCoffee ResultRandomIndex
Var ProductCodeRandom = ListOfCoffee[ResultRandomIndex]
DEBUGVAR ListOfCoffee[ResultRandomIndex]
Var OreoGuarantee = 0
Else
Var IndexOfRateupOreoCoffee = IndexOfRateupOreoCoffee - 1
Random2 0 IndexOfRateupOreoCoffee ResultRandomIndex
Var ProductCodeRandom = ListOfOreoCoffee[ResultRandomIndex]
DEBUGVAR ListOfOreoCoffee[ResultRandomIndex]
EndIf
DEBUGVAR ResultRandomIndex
Topping "Load" ProductCodeRandom
Var OpenFromXML = CurrentXMLFileName2
Open "ROOT/taobin_project/xml/page_topping_select_35.xml"
</EventClick>
</Button>
<Text>
<X> 91</X>
<Y> 953 </Y>
<Size> 32 </Size>
<Width>128</Width>
<Height>64</Height>
<Font> MITRegularTTF </Font>
<Color> 0x5A5A5A </Color>
<Mode> "disable-show" </Mode>
<State> SubRandCoffButtonEnable </State>
<Value> text_unavailable </Value>
<Align> center-vertical-horizontal </Align>
</Text>
<Button>
<X> 301 </X>
<Y> 837 </Y>
<State> SubRandAllButtonEnable </State>
<Filename>
eval(
Var return = "ROOT/taobin_project/image/event/bn_random_all.png"
)
</Filename>
<FilenamePress>
eval(
Var return = "ROOT/taobin_project/image/event/bn_random_all.png"
)
</FilenamePress>
<FilenameDisable>
eval(
Var return = "ROOT/taobin_project/image/event/bd_random_all.png"
)
</FilenameDisable>
<EventClick>
Var OreoGuarantee = OreoGuarantee + 1
Var ResultRandomIndex = 0
DEBUGVAR OreoGuarantee
If OreoGuarantee > 4 Then
Var IndexOfAllRandom = IndexOfAllRandom - 1
Random2 0 IndexOfAllRandom ResultRandomIndex
Var ProductCodeRandom = ListOfAllRandom[ResultRandomIndex]
DEBUGVAR ListOfAllRandom[ResultRandomIndex]
Var OreoGuarantee = 0
Else
Var IndexOfRateupOreoAll = IndexOfRateupOreoAll - 1
Random2 0 IndexOfRateupOreoAll ResultRandomIndex
Var ProductCodeRandom = ListOfOreoAll[ResultRandomIndex]
DEBUGVAR ListOfOreoAll[ResultRandomIndex]
EndIf
DEBUGVAR ResultRandomIndex
Topping "Load" ProductCodeRandom
Var OpenFromXML = CurrentXMLFileName2
Open "ROOT/taobin_project/xml/page_topping_select_35.xml"
</EventClick>
</Button>
<Text>
<X> 349</X>
<Y> 953 </Y>
<Size> 32 </Size>
<Width>128</Width>
<Height>64</Height>
<Font> MITRegularTTF </Font>
<Color> 0x5A5A5A </Color>
<Mode> "disable-show" </Mode>
<State> SubRandAllButtonEnable </State>
<Value> text_unavailable </Value>
<Align> center-vertical-horizontal </Align>
</Text>
;
;
;
;
; Big button for mys event
;
;
;
<Button>
<X> 42 </X>
<Y> 518 </Y>
<State> BigButtonEnable </State>
<Filename>
eval(
If show_eng = "true" Then
Var return = "ROOT/taobin_project/image/event/pro_mystery_cup_en.png"
Else
Var return = "ROOT/taobin_project/image/event/pro_mystery_cup_th.png"
EndIf
)
</Filename>
<FilenamePress>
eval(
If show_eng = "true" Then
Var return = "ROOT/taobin_project/image/event/pro_mystery_cup_en.png"
Else
Var return = "ROOT/taobin_project/image/event/pro_mystery_cup_th.png"
EndIf
)
</FilenamePress>
<FilenameDisable>
eval(
If show_eng = "true" Then
Var return = "ROOT/taobin_project/image/event/pro_mystery_cup_en.png"
Else
Var return = "ROOT/taobin_project/image/event/pro_mystery_cup_th.png"
EndIf
)
</FilenameDisable>
<EventOnClick>
###EventOnClick
</EventOnClick>
</Button>
<EventUnitTest1>
Var BigButtonEnable = "Enable"
Refresh
</EventUnitTest1>
<EventUnitTest2>
Var BigButtonEnable = "Invisible"
Refresh
</EventUnitTest2>

View file

@ -0,0 +1,56 @@
; HongKong
; Var CountEnablePromotion = 0
; ensure
Var CountSecureOpenPro = 0
If SeasonPassMode = 1 Then
If Season1 = "false" Then
Var CountSecureOpenPro = CountSecureOpenPro + 1
EndIf
If Season2 = "false" Then
Var CountSecureOpenPro = CountSecureOpenPro + 1
EndIf
If Season3 = "false" Then
Var CountSecureOpenPro = CountSecureOpenPro + 1
EndIf
If CountSecureOpenPro = 3 Then
Var SeasonPassMode = 0
EndIf
Var SeasonPassFile = CountryRootPath + "xml/event/season_pass/season_pass.ev"
TRY SeasonPassFile
EndIf
; zone promote
If OpenFromPageBoard = 1 Then
If SeasonPassMode = 1 Then
Var PromotionState1 = "Enable"
Var PromotionState2 = "Enable"
Var PromotionState3 = "Enable"
OpenInst 2 SeasonFile
Else
OpenInst 2 "ROOT/taobin_project/inter/hk/xml/page_catalog_group_recommend.lxml"
EndIf
Else
If SeasonPassMode = 1 Then
Var PromotionState1 = "Enable"
Var PromotionState2 = "Enable"
Var PromotionState3 = "Enable"
Open SeasonFile
Else
Open "ROOT/taobin_project/inter/hk/xml/page_catalog_group_recommend.lxml"
EndIf
EndIf
Var OpenFromPageBoard = 0

View file

@ -0,0 +1,72 @@
Var Season1 = "false"
Var Season2 = "false"
Var Season3 = "false"
Var BigButtonEnable = "Enable"
Var SeasonTrick = CountryRootPath + "xml/event/season_pass/"
If SystemDateMonthInt = 7 Then
If SystemDateDayInt >= 29 Then
Var Season1 = "true"
Else
Var Season1 = "false"
EndIf
EndIf
If SystemDateMonthInt = 8 Then
If SystemDateDayInt <= 11 Then
Var Season1 = "true"
Else
Var Season1 = "false"
EndIf
If SystemDateDayInt > 11 Then
If SystemDateDayInt < 26 Then
Var Season2 = "true"
Else
Var Season2 = "false"
Var Season3 = "true"
EndIf
EndIf
EndIf
If SystemDateMonthInt = 9 Then
If SystemDateDayInt < 9 Then
Var Season3 = "true"
EndIf
EndIf
If BoxID = "177746" Then
Var Season1 = "false"
Var Season2 = "false"
Var Season3 = "false"
EndIf
DEBUGVAR Season1
DEBUGVAR Season2
DEBUGVAR Season3
DEBUGVAR SeasonTrick
If Season1 = "true" Then
Var SeasonTrick = SeasonTrick + "set1.ev"
TRY SeasonTrick
Else
If Season2 = "true" Then
Var SeasonTrick = SeasonTrick + "set2.ev"
TRY SeasonTrick
Else
If Season3 = "true" Then
Var SeasonTrick = SeasonTrick + "set3.ev"
TRY SeasonTrick
EndIf
EndIf
EndIf

View file

@ -0,0 +1,24 @@
; Define
Var SeasonPass = 1
Var SeasonFile = CountryRootPath + "xml/event/triple_promotion_s1topleft_and_s1topright_and_s1botleft.lxml"
DEBUGVAR SeasonPass
DEBUGVAR SeasonFile
Var CountEnablePromotion = 0
If $Sum522101000752210200045221030004 = "Enable" Then
Var CountEnablePromotion = CountEnablePromotion + 1
EndIf
If $Sum5203030009 = "Enable" Then
Var CountEnablePromotion = CountEnablePromotion + 1
EndIf
If $Sum520201002652020200265202030026 = "Enable" Then
Var CountEnablePromotion = CountEnablePromotion + 1
EndIf
DEBUGVAR CountEnablePromotion

View file

@ -0,0 +1,24 @@
; Define
Var SeasonPass = 2
Var SeasonFile = CountryRootPath + "xml/event/triple_promotion_s2topleft_and_s2topright_and_s2botleft.lxml"
DEBUGVAR SeasonPass
DEBUGVAR SeasonFile
Var CountEnablePromotion = 0
If $Sum522101000652210200035221030003 = "Enable" Then
Var CountEnablePromotion = CountEnablePromotion + 1
EndIf
If $Sum5203030049 = "Enable" Then
Var CountEnablePromotion = CountEnablePromotion + 1
EndIf
If $Sum520201003952020200395202030039 = "Enable" Then
Var CountEnablePromotion = CountEnablePromotion + 1
EndIf
DEBUGVAR CountEnablePromotion

View file

@ -0,0 +1,24 @@
; Define
Var SeasonPass = 3
Var SeasonFile = CountryRootPath + "xml/event/triple_promotion_s3topleft_and_s3topright_and_s3botleft.lxml"
DEBUGVAR SeasonPass
DEBUGVAR SeasonFile
Var CountEnablePromotion = 0
If $Sum522101000552310200025231030002 = "Enable" Then
Var CountEnablePromotion = CountEnablePromotion + 1
EndIf
If $Sum5204020002 = "Enable" Then
Var CountEnablePromotion = CountEnablePromotion + 1
EndIf
If $Sum5203030027 = "Enable" Then
Var CountEnablePromotion = CountEnablePromotion + 1
EndIf
DEBUGVAR CountEnablePromotion

View file

@ -0,0 +1,39 @@
; HongKong
;DEBUGVAR SystemDateMonthInt
;DEBUGVAR SystemDateDayInt
; Reset flag away.
Var SeasonPassMode = 0
If SystemDateMonthInt = 7 Then
If SystemDateDayInt > 28 Then
Var SeasonPassMode = 1
Else
Var SeasonPassMode = 0
EndIf
EndIf
If SystemDateMonthInt = 8 Then
Var SeasonPassMode = 1
EndIf
If SystemDateMonthInt = 9 Then
Var SeasonPassMode = 1
If SystemDateDayInt > 8 Then
Var SeasonPassMode = 0
EndIf
EndIf
If BoxID = "177746" Then
Var SeasonPassMode = 1
EndIf
If SeasonPassMode = 1 Then
Var SeasonPassFile = CountryRootPath + "xml/event/season_pass/season_pass.ev"
TRY SeasonPassFile
EndIf

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

View file

@ -0,0 +1,137 @@
Var NextPage = "-"
DEBUGVAR ICE_PROCESS_STATUS
DEBUGVAR ICE_PROCESS_TXT
DEBUGVAR LanguageShow
DEBUGVAR CountryName
If LanguageShow = "ENG" Then
Var DirImage2 = "ROOT/taobin_project/image/drink_option_en/"
Var DirImageAlter = "ROOT/taobin_project/image/page3_2_en/"
Var DirImage = "ROOT/taobin_project/image/page3_en"
Var ice_tab_text = "Ice will be ready at "
EndIf
If LanguageShow = "THAI" Then
Var DirImage2 = "ROOT/taobin_project/image/drink_option/"
Var DirImageAlter = "ROOT/taobin_project/image/page3_2/"
Var ice_tab_text = "น้ำแข็งจะพร้อมเวลา "
Var DirImage = "ROOT/taobin_project/image/page3"
EndIf
;inter-image
If CountryName = "Malaysia" Then
Var DirImage2 = "ROOT/taobin_project/image/drink_option_myr/"
Var DirImageAlter = "ROOT/taobin_project/image/page3_2_en/"
Var DirImage = "ROOT/taobin_project/image/page3_en"
Var ice_tab_text = "Ice will be ready at "
EndIf
;inter-image
If CountryName = "Australia" Then
Var DirImage2 = "ROOT/taobin_project/image/drink_option_myr/"
Var DirImageAlter = "ROOT/taobin_project/image/page3_2_en/"
Var DirImage = "ROOT/taobin_project/image/page3_en"
Var ice_tab_text = "Ice will be ready at "
EndIf
If UsePepsiTheme = 1 Then
Var DirImage2 = "ROOT/taobin_project/inter/whatthecup/" + CountryShortName
Var DirImage2 = DirImage2 + "/image/drink_option_en/"
DEBUGVAR DirImage2
Var DirImageAlter = "ROOT/taobin_project/inter/whatthecup/" + CountryShortName
Var DirImageAlter = DirImageAlter + "/image/page3_2_en/"
DEBUGVAR DirImageAlter
Var DirImage = "ROOT/taobin_project/inter/whatthecup/" + CountryShortName
Var DirImage = DirImage + "/image/page3_en/"
DEBUGVAR DirImage
Var ice_tab_text = "Ice will be ready at "
EndIf
If ICE_PROCESS_STATUS = 2 Then
Var ice_tab_process_show = "Enable"
Var ice_show_open = ice_tab_text + ICE_PROCESS_TXT
Else
Var ice_tab_process_show = "Invisible"
EndIf
; SpiralOnline
Var MenuVSelected2 = "Invisible"
Var Menu1Selected2 = "Invisible"
Var Menu2Selected2 = "Invisible"
Var Menu3Selected2 = "Invisible"
Var Menu4Selected2 = "Invisible"
Var Menu6Selected2 = "Invisible"
Var Menu7Selected2 = "Invisible"
Var MenuVSelected2 = "Invisible"
Var Menu11Selected2 = "Invisible"
Var Menu21Selected2 = "Invisible"
Var MenuVSelected2 = "Invisible"
If SpiralOnline = "true" Then
If Seeker = "curr" Then
Var MenuVSelected2 = "Enable"
EndIf
EndIf
; init default
Var Menu1Selected = "Enable"
Var Menu2Selected = "Enable"
Var Menu3Selected = "Enable"
Var Menu4Selected = "Enable"
; 5 fruit
Var Menu5Selected = "Invisible"
Var Menu6Selected = "Enable"
Var Menu7Selected = "Enable"
; 8 cocktail
Var Menu8Selected = "Invisible"
If CocktailShow = "true" Then
Var Menu7Selected = "Invisible"
Var Menu8Selected = "Enable"
EndIf
If AppFastEnable = "true" Then
Var Menu11Selected = "Enable"
Var Menu21Selected = "Invisible"
Var Menu7Selected = "Invisible"
Else
If MenuKidEnable = "true" Then
Var Menu11Selected = "Invisible"
Var Menu21Selected = "Enable"
Var Menu7Selected = "Invisible"
Else
Var Menu11Selected = "Invisible"
Var Menu21Selected = "Invisible"
Var Menu7Selected = "Enable"
EndIf
EndIf
If CocktailShow = "true" Then
Var Menu7Selected = "Invisible"
EndIf
If RecipeTag1 = "HealthTurnOn" Then
Var Menu22Selected = "Enable"
Else
Var Menu22Selected = "Invisible"
EndIf
;

View file

@ -0,0 +1,12 @@
if "v2" in param:
print("new menu_catalog_default_init catalog ============================> inter.")
f = open( directory_to_process + "/menu_catalog_default_init.lxml", "r")
#print(f.read())
out_xml(f.read())
f.close()
else:
print("new menu_catalog_default_init catalog enable.")
f = open( directory_to_process + "/menu_catalog_default_init.xml", "r")
#print(f.read())
out_xml(f.read())
f.close()

View file

@ -0,0 +1,106 @@
Var NextPage = "-"
DEBUGVAR ICE_PROCESS_STATUS
DEBUGVAR ICE_PROCESS_TXT
If show_eng = "true" Then
Var showthaiText = "Invisible"
Var showengText = "Enable"
Var DirImage = "ROOT/taobin_project/image/page3_en"
Var show_btp = "ROOT/taobin_project/image/page2/bn_thai_lang_press_2.png"
Var show_btn = "ROOT/taobin_project/image/page2/bn_thai_lang_2.png"
Var ice_tab_text = "Ice will be ready at "
Var text_unavailable = "UNAVAILABLE###size=16"
Else
Var showengText = "Invisible"
Var showthaiText = "Enable"
Var DirImage = "ROOT/taobin_project/image/page3"
Var show_btp = "ROOT/taobin_project/image/page2/bn_eng_lang_2.png"
Var show_btn = "ROOT/taobin_project/image/page2/bn_eng_lang_2.png"
Var ice_tab_text = "น้ำแข็งจะพร้อมเวลา "
Var text_unavailable = "หมด###size=32"
EndIf
If ICE_PROCESS_STATUS = 2 Then
Var ice_tab_process_show = "Enable"
Var ice_show_open = ice_tab_text + ICE_PROCESS_TXT
Else
Var ice_tab_process_show = "Invisible"
EndIf
; SpiralOnline
Var MenuVSelected2 = "Invisible"
Var Menu1Selected2 = "Invisible"
Var Menu2Selected2 = "Invisible"
Var Menu3Selected2 = "Invisible"
Var Menu4Selected2 = "Invisible"
Var Menu6Selected2 = "Invisible"
Var Menu7Selected2 = "Invisible"
Var MenuVSelected2 = "Invisible"
Var Menu11Selected2 = "Invisible"
Var Menu21Selected2 = "Invisible"
Var MenuVSelected2 = "Invisible"
If SpiralOnline = "true" Then
If Seeker = "curr" Then
Var MenuVSelected2 = "Enable"
EndIf
EndIf
; init default
Var Menu1Selected = "Enable"
Var Menu2Selected = "Enable"
Var Menu3Selected = "Enable"
Var Menu4Selected = "Enable"
; 5 fruit
Var Menu5Selected = "Invisible"
Var Menu6Selected = "Enable"
Var Menu7Selected = "Enable"
; 8 cocktail
Var Menu8Selected = "Invisible"
If CocktailShow = "true" Then
Var Menu7Selected = "Invisible"
Var Menu8Selected = "Enable"
EndIf
If AppFastEnable = "true" Then
Var Menu11Selected = "Enable"
Var Menu21Selected = "Invisible"
Var Menu7Selected = "Invisible"
Else
If MenuKidEnable = "true" Then
Var Menu11Selected = "Invisible"
Var Menu21Selected = "Enable"
Var Menu7Selected = "Invisible"
Else
Var Menu11Selected = "Invisible"
Var Menu21Selected = "Invisible"
Var Menu7Selected = "Enable"
EndIf
EndIf
If CocktailShow = "true" Then
Var Menu7Selected = "Invisible"
EndIf
If RecipeTag1 = "HealthTurnOn" Then
Var Menu22Selected = "Enable"
Else
Var Menu22Selected = "Invisible"
EndIf
;

View file

@ -0,0 +1,485 @@
; notice enable heathy menu
<Image>
<X> 0 </X>
<Y> 380 </Y>
<Width> 1080 </Width>
<Height> 1540 </Height>
<Color> WTCLightBlueColor </Color>
</Image>
<Timeout> 1000 </Timeout>
<EventTimeout>
;DEBUGVAR ICE_PROCESS_STATUS
If ICE_PROCESS_STATUS = 2 Then
Var ice_tab_process_show = "Enable"
Var ice_show_open = ice_tab_text + ICE_PROCESS_TXT
Else
Var ice_tab_process_show = "Invisible"
EndIf
If NextPage = "-" Then
Else
If CupOnArm = "true" Then
If Timeout > 9 Then
SAVELOG "COA9"
Open NextPage
EndIf
Else
If Timeout > 30 Then
SAVELOG "COA30"
Open NextPage
EndIf
EndIf
EndIf
If Timeout > 60 Then
SAVELOG "Timeout"
If Seeker = "next" Then
Open "ROOT/taobin_project/xml/page_brewing3Conti.xml"
Else
SAVELOG "Back"
Open "ROOT/taobin_project/xml/page_back_to_main.xml"
EndIf
EndIf
If BrewCommand = "RefreshAll" Then
Var BrewCommand = "-"
Open CurrentXMLFileName2
EndIf
If Seeker = "curr" Then
If DoorCupPosition = "bottom" Then
; It normal
Var EmergencyStop = "false"
Else
Var EmergencyStop = "true"
;Open "ROOT/taobin_project/xml/page_back_to_error.xml"
EndIf
EndIf
If IgnoreNetCore = "true" Then
Else
;stop_now
If NETCORE_LOST_CNT > 120 Then
Var stop_now = "true"
Var MachineErrorDetailAll = "???"
SAVELOG "NETCORE_LOST_CNT"
Open "ROOT/taobin_project/xml/page_back_to_error.xml"
EndIf
EndIf
Var Timeout = Timeout + 1
TimerReset
</EventTimeout>
<EventLanguageOnChange>
DEBUGVAR LanguageShow
If LanguageShow = "ENG" Then
Var DirImage2 = "ROOT/taobin_project/image/drink_option_en/"
Var DirImageAlter = "ROOT/taobin_project/image/page3_2_en/"
Var ice_tab_text = "Ice will be ready at "
EndIf
If LanguageShow = "THAI" Then
Var DirImage2 = "ROOT/taobin_project/image/drink_option/"
Var DirImageAlter = "ROOT/taobin_project/image/page3_2/"
EndIf
;inter-image
If CountryName = "Malaysia" Then
Var DirImage2 = "ROOT/taobin_project/image/drink_option_myr/"
Var DirImageAlter = "ROOT/taobin_project/image/page3_2_en/"
Var DirImage = "ROOT/taobin_project/image/page3_en"
Var ice_tab_text = "Ice will be ready at "
EndIf
If UsePepsiTheme = 1 Then
Var DirImage2 = "ROOT/taobin_project/inter/whatthecup/" + CountryShortName
Var DirImage2 = DirImage2 + "/image/drink_option_en/"
Var DirImageAlter = "ROOT/taobin_project/inter/whatthecup/" + CountryShortName
Var DirImageAlter = DirImageAlter + "/image/page3_2_en/"
Var DirImage = "ROOT/taobin_project/inter/whatthecup/" + CountryShortName
Var DirImage = DirImage + "/image/page3_en/"
Var ice_tab_text = "Ice will be ready at "
EndIf
SAVELOG "EventLanguageOnChange menu -list"
Refresh
Var LanguageButtonEnable = "Enable"
Var ButtonLanguageCurrentXPosition = 990
Var ButtonLanguageCurrentYPosition = 438 - 38
Var ButtonLanguageListXPosition = 970
Var ButtonLanguageListYPosition = 430 - 38
OpenInst 3 "ROOT/taobin_project/xml/topview2.xml"
</EventLanguageOnChange>
; under line
<Image>
<X> 0 </X>
<Y> 494 </Y>
<Filename> "ROOT/taobin_project/inter/whatthecup/hk/image/page3_2_en/tab_line_bottom.png" </Filename>
</Image>
; under line
<Image>
<X> 0 </X>
<Y> 358 </Y>
<Filename> "ROOT/taobin_project/image/page3/bg1.png" </Filename>
</Image>
; back
<Button>
<X> 19 </X>
<Y> 381 </Y>
<Filename> "ROOT/taobin_project/inter/whatthecup/hk/image/page2_en/bn_back_arrow_2.png" </Filename>
<FilenamePress> "ROOT/taobin_project/inter/whatthecup/hk/image/page2_en/bn_back_arrow_2.png" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
If SpiralOnline = "true" Then
If Seeker = "curr" Then
Open "ROOT/taobin_project/xml/page_catalog_with_vending.xml"
Else
Open "ROOT/taobin_project/xml/page_catalog.lxml"
EndIf
Else
Open "ROOT/taobin_project/xml/page_catalog.lxml"
EndIf
</EventClick>
</Button>
<ListView1>
<Width> 1080 </Width>
<Height> "auto" </Height>
<X> 0 </X>
<Y> 395 </Y>
<Row2>
<State>"Enable"</State>
<Width> 896 </Width>
<Height> 102 </Height>
<Button>
<Layout> "linear" </Layout>
<State> Menu1Selected </State>
<Filename> Var( DirImageAlter + "/bn_recommend3.png" )</Filename>
<FilenamePress> Var( DirImageAlter + "/bp_recommend3.png") </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
SAVELOG "Click rec"
Var NextPage = "-"
;Open "ROOT/taobin_project/xml/page_catalog_group_recommend.lxml"
Var OpenFileXML = CountryRootPath + "xml/event/script_common_for_open_promotion_xml.ev"
;inter-xml-open
If CountryName = "HongKong" Then
; zone promote
TRY OpenFileXML
EndIf
If CountryName = "Thailand" Then
TRY "/mnt/sdcard/coffeevending/taobin_project/xml/event/script_common_for_open_promotion_xml.ev"
EndIf
</EventClick>
</Button>
<Button>
<Layout> "linear" </Layout>
<State> Menu2Selected </State>
<Filename> Var( DirImageAlter + "/bn_coffee2.png") </Filename>
<FilenamePress> Var( DirImageAlter + "/bp_coffee2.png") </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var NextPage = "-"
;Open "ROOT/taobin_project/xml/page_catalog_group_coffee.lxml"
Var OpenFileXML = CountryRootPath + "xml/page_catalog_group_coffee.lxml"
DEBUGVAR CountryRootPath
DEBUGVAR OpenFileXML
If CountryName = "Thailand" Then
Open "ROOT/taobin_project/xml/page_catalog_group_coffee.lxml"
Else
Open OpenFileXML
EndIf
</EventClick>
</Button>
<Button>
<Layout> "linear" </Layout>
<State> Menu3Selected </State>
<Filename> Var( DirImageAlter + "/bn_tea2.png") </Filename>
<FilenamePress> Var( DirImageAlter + "/bp_tea2.png") </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var NextPage = "-"
;Open "ROOT/taobin_project/xml/page_catalog_group_tea.lxml"
Var OpenFileXML = CountryRootPath + "xml/page_catalog_group_tea.lxml"
DEBUGVAR CountryRootPath
DEBUGVAR OpenFileXML
If CountryName = "Thailand" Then
Open "ROOT/taobin_project/xml/page_catalog_group_tea.lxml"
Else
Open OpenFileXML
EndIf
</EventClick>
</Button>
<Button>
<Layout> "linear" </Layout>
<State> Menu4Selected </State>
<Filename> Var( DirImageAlter + "/bn_cho_ca2.png") </Filename>
<FilenamePress> Var( DirImageAlter + "/bp_cho_ca2.png") </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var NextPage = "-"
;Open "ROOT/taobin_project/xml/page_catalog_group_milk.lxml"
Var OpenFileXML = CountryRootPath + "xml/page_catalog_group_milk.lxml"
DEBUGVAR CountryRootPath
DEBUGVAR OpenFileXML
If CountryName = "Thailand" Then
Open "ROOT/taobin_project/xml/page_catalog_group_milk.lxml"
Else
Open OpenFileXML
EndIf
</EventClick>
</Button>
<Button>
<Layout> "linear" </Layout>
<State> Menu7Selected </State>
<Filename> Var( DirImageAlter + "/bn_protein2.png") </Filename>
<FilenamePress> Var( DirImageAlter + "/bp_protein2.png") </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var NextPage = "-"
;Open "ROOT/taobin_project/xml/page_catalog_group_whey.lxml"
Var OpenFileXML = CountryRootPath + "xml/page_catalog_group_whey.lxml"
DEBUGVAR CountryRootPath
DEBUGVAR OpenFileXML
If CountryName = "Thailand" Then
Open "ROOT/taobin_project/xml/page_catalog_group_whey.lxml"
Else
Open OpenFileXML
EndIf
</EventClick>
</Button>
<Button>
<Layout> "linear" </Layout>
<State> Menu11Selected </State>
<Filename> Var( DirImageAlter + "/bn_appfast2.png") </Filename>
<FilenamePress> Var( DirImageAlter + "/bp_appfast2.png") </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var NextPage = "-"
;Open "ROOT/taobin_project/xml/page_catalog_group_appfast.lxml"
Var OpenFileXML = CountryRootPath + "xml/page_catalog_group_appfast.lxml"
DEBUGVAR CountryRootPath
DEBUGVAR OpenFileXML
If CountryName = "Thailand" Then
Open "ROOT/taobin_project/xml/page_catalog_group_appfast.lxml"
Else
Open OpenFileXML
EndIf
</EventClick>
</Button>
<Button>
<Layout> "linear" </Layout>
<State> Menu21Selected </State>
<Filename> Var( DirImageAlter + "/bn_forkid2.png") </Filename>
<FilenamePress> Var( DirImageAlter + "/bp_forkid2.png") </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var NextPage = "-"
;Open "ROOT/taobin_project/xml/page_catalog_group_forkid.lxml"
Var OpenFileXML = CountryRootPath + "xml/page_catalog_group_forkid.lxml"
DEBUGVAR CountryRootPath
DEBUGVAR OpenFileXML
If CountryName = "Thailand" Then
Open "ROOT/taobin_project/xml/page_catalog_group_forkid.lxml"
Else
Open OpenFileXML
EndIf
</EventClick>
</Button>
<Button>
<Layout> "linear" </Layout>
<State> Menu22Selected </State>
<Filename> Var( DirImageAlter + "/bn_health.png") </Filename>
<FilenamePress> Var( DirImageAlter + "/bp_health.png") </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var NextPage = "-"
;Open "ROOT/taobin_project/xml/page_catalog_group_health.lxml"
Var OpenFileXML = CountryRootPath + "xml/page_catalog_group_health.lxml"
DEBUGVAR CountryRootPath
DEBUGVAR OpenFileXML
If CountryName = "Thailand" Then
Open "ROOT/taobin_project/xml/page_catalog_group_health.lxml"
Else
Open OpenFileXML
EndIf
</EventClick>
</Button>
<Button>
<Layout> "linear" </Layout>
<State> Menu8Selected </State>
<Filename> Var( DirImageAlter + "/bn_cocktail.png") </Filename>
<FilenamePress> Var( DirImageAlter + "/bp_cocktail.png") </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var NextPage = "-"
;Open "ROOT/taobin_project/xml/page_catalog_group_cocktail.lxml"
Var OpenFileXML = CountryRootPath + "xml/page_catalog_group_cocktail.lxml"
DEBUGVAR CountryRootPath
DEBUGVAR OpenFileXML
If CountryName = "Thailand" Then
Open "ROOT/taobin_project/xml/page_catalog_group_cocktail.lxml"
Else
Open OpenFileXML
EndIf
</EventClick>
</Button>
<Button>
<Layout> "linear" </Layout>
<State> Menu6Selected </State>
<Filename> Var( DirImageAlter + "/bn_sodada2.png") </Filename>
<FilenamePress> Var( DirImageAlter + "/bp_sodada2.png") </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var NextPage = "-"
;Open "ROOT/taobin_project/xml/page_catalog_group_other.lxml"
Var OpenFileXML = CountryRootPath + "xml/page_catalog_group_other.lxml"
DEBUGVAR CountryRootPath
DEBUGVAR OpenFileXML
If CountryName = "Thailand" Then
Open "ROOT/taobin_project/xml/page_catalog_group_other.lxml"
Else
Open OpenFileXML
EndIf
</EventClick>
</Button>
<Button>
<Layout> "linear" </Layout>
<State> MenuVSelected2 </State>
<Filename> Var( DirImageAlter + "/bn_vending2.png") </Filename>
<FilenamePress> Var( DirImageAlter + "/bp_vending2.png") </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var NextPage = "-"
Open "ROOT/taobin_project/spiral/xml/page_catalog_vending_machine.xml"
</EventClick>
</Button>
</Row2>
</ListView1>
<Text>
<X> 940 </X>
<Y> 462 </Y>
<Size> 22 </Size>
<Width> 170 </Width>
<Height> 30 </Height>
<Font> KanitMediumTTF </Font>
<Color> WTCBlueColor </Color>
<Value> PriceUnitText </Value>
</Text>
<EventWebApp>
DEBUGVAR web_ready
If web_ready = "true" Then
If web_ref = QRCODE99x Then
Var web_readyOK = web_ready
Var web_telnumOK = web_telnum
Var web_app_prepar = "true"
Open "/mnt/sdcard/coffeevending/taobin_project/xml/page_payment.xml"
EndIf
Else
EndIf
</EventWebApp>

View file

@ -0,0 +1,22 @@
print("directory_to_process =" + directory_to_process)
if param == "old":
print("old layout catalog enable.")
f = open( directory_to_process + "/menu_catalog.xml", "r")
#print(f.read())
out_xml(f.read())
f.close()
else:
if "v2" in param:
print("new layout catalog ============================> inter.")
f = open( directory_to_process + "/menu_catalog_new.lxml", "r")
#print(f.read())
out_xml(f.read())
f.close()
else:
print("new layout catalog enable.")
f = open( directory_to_process + "/menu_catalog_new.lxml", "r")
#print(f.read())
out_xml(f.read())
f.close()

View file

@ -0,0 +1,27 @@
If show_eng = "true" Then
Var DirImage2 = "ROOT/taobin_project/image/drink_option_en/"
Var DirImageAlter = "ROOT/taobin_project/image/page3_2_en/"
If UsePepsiTheme = 1 Then
Var DirImage2 = "ROOT/taobin_project/inter/whatthecup/" + CountryShortName
Var DirImage2 = DirImage2 + "/image/drink_option_en/"
Var DirImageAlter = "ROOT/taobin_project/inter/whatthecup/" + CountryShortName
Var DirImageAlter = DirImageAlter + "/image/page3_2_en/"
Var DirImage = "ROOT/taobin_project/inter/whatthecup/" + CountryShortName
Var DirImage = DirImage + "/image/page3_en/"
Var ice_tab_text = "Ice will be ready at "
EndIf
Else
Var DirImage2 = "ROOT/taobin_project/image/drink_option/"
Var DirImageAlter = "ROOT/taobin_project/image/page3_2/"
EndIf

View file

@ -0,0 +1,12 @@
if "v2" in param:
print("new menu_catalog_new_menu catalog ============================> inter.")
f = open( directory_to_process + "/menu_catalog_new_menu.lxml", "r")
#print(f.read())
out_xml(f.read())
f.close()
else:
print("new menu_catalog_new_menu catalog enable.")
f = open( directory_to_process + "/menu_catalog_new_menu.xml", "r")
#print(f.read())
out_xml(f.read())
f.close()

View file

@ -0,0 +1,9 @@
If show_eng = "true" Then
Var DirImage2 = "ROOT/taobin_project/image/drink_option_en/"
Var DirImageAlter = "ROOT/taobin_project/image/page3_2_en/"
Else
Var DirImage2 = "ROOT/taobin_project/image/drink_option/"
Var DirImageAlter = "ROOT/taobin_project/image/page3_2/"
EndIf

149
inter/hk/xml/menu_gen.py Normal file
View file

@ -0,0 +1,149 @@
out_xml('<FrameScroll> \r\n')
out_xml('<X> 10 </X>\r\n')
out_xml('<Y> 497 </Y>\r\n')
out_xml('<Width> 1080 </Width>\r\n')
out_xml('<ScrollHeight> "auto" </ScrollHeight>\r\n')
out_xml('<Scroll> "Vertical" </Scroll>\r\n')
out_xml('<Column> 4 </Column>\r\n')
for i in range( menu_count):
i_str = str(i + 1)
out_xml( '\t; button i='+ i_str + ' ' + product_code[i]+ ' \r\n')
out_xml( '<Block>\r\n')
out_xml('\t<MarginLeft> 33 </MarginLeft>\r\n')
out_xml('\t<MarginTop> 22 </MarginTop>\r\n')
out_xml('\t<Width> 225 </Width>\r\n')
out_xml('\t<Height> 296 </Height>\r\n')
out_xml( '\t<State> $' + product_code[i] + '.Button </State> \r\n')
out_xml( '\t<Button>\r\n')
out_xml( '\t<State> $' + product_code[i] + '.Button </State> \r\n')
out_xml( '\t<Filename> Var( "' + default_dir + '" + $'+ product_code[i] +'.image ) </Filename>\r\n')
out_xml( '\t<FilenamePress> Var( "' + default_dir_press + '" + $'+ product_code[i] +'.image ) " </FilenamePress>\r\n')
out_xml( '\t<FilenameDisable> Var( "' + default_dir_disable + '" + $'+ product_code[i] +'.image ) " </FilenameDisable>\r\n')
out_xml( '\t<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>\r\n')
out_xml( '\t<Volume> SoundVolume </Volume>\r\n')
out_xml( '\t<EventOnClick> \r\n')
out_xml( '\t\tVar SelectDrink = $'+ product_code[i] +'.Self\r\n')
out_xml( '\t\tVar NameDrink = $' + product_code[i] + '.NameE\r\n')
out_xml( '\t\tVar NameDrinkTH = $' + product_code[i] + '.Name\r\n')
out_xml( '\t\tVar DrinkDescriptionTH = $' + product_code[i] + '.description\r\n')
out_xml( '\t\tVar DrinkDescription = $' + product_code[i] + '.descriptionE\r\n')
out_xml( '\t\tVar PriceDrink = $' + product_code[i] + '.Price\r\n')
out_xml( '\t\tVar PictureDrink = "' + default_dir2 + '" + $'+ product_code[i] +'.image\r\n')
out_xml( '\t\tTopping "Load" SelectDrink\r\n')
out_xml( '\t\tSAVELOG NameDrink\r\n')
out_xml( '\t\tVar PriceShowValue = charOfBaht + PriceDrink\r\n')
#out_xml( '\t\tVar PriceShowValue = "Free"\r\n')
out_xml( '\t\tVar OpenFromXML = CurrentXMLFileName2\r\n')
out_xml( '\t\tSTRCONTAIN "Smoothie" $' + product_code[i] + '.Button IsSmoRet\r\n')
out_xml( '\t\tOpen "ROOT/taobin_project/xml/page_topping_select.xml"\r\n')
out_xml( '\t</EventOnClick>\r\n')
out_xml( '\t</Button>\r\n')
out_xml( '\t<Text>\r\n')
out_xml( '\t<X> 182 </X>\r\n')
out_xml( '\t<Y> 12 </Y>\r\n')
out_xml( '\t<State> ShowPrice </State>\r\n')
out_xml( '\t<Align> "Hurr" </Align>\r\n')
out_xml( '\t<Width>150</Width>\r\n')
out_xml( '\t<Size> 27 </Size>\r\n')
out_xml( '\t<Font> KanitTTF </Font>\r\n')
out_xml( '\t<Color> 0xB78F24 </Color>\r\n')
out_xml( '\t<Value> $' + product_code[i] + '.Price </Value>\r\n')
#out_xml( '\t<Value> eval( STRCONTAIN "Smoothie" $' + product_code[i] + '.Button SmoRet \n If SmoRet = "true" Then\n Var return = "Enable"\n Else\n Var return = "Invisible"\n EndIf\n) </Value> \r\n')
out_xml( '\t</Text>\r\n')
out_xml( '\t<Text>\r\n')
out_xml( '\t<X> 164 </X>\r\n')
out_xml( '\t<Y> 12 </Y>\r\n')
out_xml( '\t<State> ShowPrice </State>\r\n')
out_xml( '\t<Width>20</Width>\r\n')
out_xml( '\t<Size> 27 </Size>\r\n')
out_xml( '\t<Font> KanitTTF </Font>\r\n')
out_xml( '\t<Color> 0xB78F24 </Color>\r\n')
out_xml( '\t<Value> "฿"" </Value>\r\n')
out_xml( '\t</Text>\r\n')
out_xml( '\t<Text>\r\n')
out_xml( '\t<X> 16 </X>\r\n')
out_xml( '\t<Y> 190 </Y>\r\n')
out_xml( '\t<Size> 24 </Size>\r\n')
out_xml( '\t<Width>220</Width>\r\n')
out_xml( '\t<Mode> "multi2" </Mode>\r\n')
out_xml( '\t<Font> KanitMediumTTF </Font>\r\n')
out_xml( '\t<Color> 0x322B26 </Color>\r\n')
out_xml( '\t<State> showthaiText </State>\r\n')
out_xml( '\t<Value> $' + product_code[i] + '.Name </Value>\r\n')
out_xml( '\t</Text>\r\n')
out_xml( '\t<Text>\r\n')
out_xml( '\t<X> 16 </X>\r\n')
out_xml( '\t<Y> 246 </Y>\r\n')
out_xml( '\t<Size> 14 </Size>\r\n')
out_xml( '\t<Width>220</Width>\r\n')
out_xml( '\t<Font> KanitMediumTTF </Font>\r\n')
out_xml( '\t<Color> 0x6F5F51 </Color>\r\n')
out_xml( '\t<State> showthaiText </State>\r\n')
out_xml( '\t<Value> $' + product_code[i] + '.description </Value>\r\n')
out_xml( '\t</Text>\r\n')
out_xml( '\t<Text>\r\n')
out_xml( '\t<X> 16 </X>\r\n')
out_xml( '\t<Y> 190 </Y>\r\n')
out_xml( '\t<Size> 22 </Size>\r\n')
out_xml( '\t<Width>220</Width>\r\n')
out_xml( '\t<Mode> "multi2" </Mode>\r\n')
out_xml( '\t<Font> KanitMediumTTF </Font>\r\n')
out_xml( '\t<Color> 0x322B26 </Color>\r\n')
out_xml( '\t<State> showengText </State>\r\n')
out_xml( '\t<Value> $' + product_code[i] + '.NameE </Value>\r\n')
out_xml( '\t</Text>\r\n')
out_xml( '\t<Text>\r\n')
out_xml( '\t<X> 16 </X>\r\n')
out_xml( '\t<Y> 246 </Y>\r\n')
out_xml( '\t<Size> 14 </Size>\r\n')
out_xml( '\t<Width>220</Width>\r\n')
out_xml( '\t<Font> KanitMediumTTF </Font>\r\n')
out_xml( '\t<Color> 0x6F5F51 </Color>\r\n')
out_xml( '\t<State> showengText </State>\r\n')
out_xml( '\t<Value> $' + product_code[i] + '.descriptionE </Value>\r\n')
out_xml( '\t</Text>\r\n')
out_xml( '\t<Image>\r\n')
out_xml( '\t<X> 2 </X>\r\n')
out_xml( '\t<Y> 2 </Y>\r\n')
out_xml( '\t<State> eval( STRCONTAIN "Smoothie" $' + product_code[i] + '.Button SmoRet \n If SmoRet = "true" Then\n Var return = "Enable"\n Else\n Var return = "Invisible"\n EndIf\n) </State> \r\n')
out_xml( '\t<Filename> "ROOT/taobin_project/image/topping2/blender_icon.png" </Filename>\r\n')
out_xml( '\t</Image>\r\n')
out_xml( '</Block>\r\n')
out_xml('</FrameScroll>\r\n')
out_xml('; Cart\r\n')
out_xml('<Button>\r\n')
out_xml('<X> 915 </X>\r\n')
out_xml('<Y> 1769 </Y>\r\n')
out_xml('<State> showCart </State>\r\n')
out_xml('<Filename> cart_image_bn </Filename>\r\n')
out_xml('<FilenamePress> cart_image_bp </FilenamePress>\r\n')
out_xml('<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>\r\n')
out_xml('<Volume> SoundVolume </Volume>\r\n')
out_xml('<EventClick> \r\n')
out_xml('\tOpen "ROOT/taobin_project/xml/page_payment_multi.xml"\r\n')
out_xml('</EventClick>\r\n')
out_xml('</Button>\r\n')

View file

@ -0,0 +1,118 @@
out_xml('<FrameScroll> \r\n')
out_xml('<X> 10 </X>\r\n')
out_xml('<Y> 497 </Y>\r\n')
out_xml('<Width> 1080 </Width>\r\n')
out_xml('<ScrollHeight> "auto" </ScrollHeight>\r\n')
out_xml('<Scroll> "Vertical" </Scroll>\r\n')
out_xml('<Column> 4 </Column>\r\n')
for i in range( menu_count):
i_str = str(i + 1)
out_xml( '\t; button i='+ i_str + ' ' + product_code[i]+ ' \r\n')
out_xml( '<Block>\r\n')
out_xml('\t<MarginLeft> 33 </MarginLeft>\r\n')
out_xml('\t<MarginTop> 22 </MarginTop>\r\n')
out_xml('\t<Width> 225 </Width>\r\n')
out_xml('\t<Height> 296 </Height>\r\n')
out_xml( '\t<State> $' + product_code[i] + '.Button </State> \r\n')
out_xml( '\t<Button>\r\n')
out_xml( '\t<Filename> Var( "' + default_dir + '" + $'+ product_code[i] +'.image ) </Filename>\r\n')
out_xml( '\t<FilenamePress> Var( "' + default_dir_press + '" + $'+ product_code[i] +'.image ) " </FilenamePress>\r\n')
out_xml( '\t<FilenameDisable> Var( "' + default_dir_disable + '" + $'+ product_code[i] +'.image ) " </FilenameDisable>\r\n')
out_xml( '\t<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>\r\n')
out_xml( '\t<Volume> SoundVolume </Volume>\r\n')
out_xml( '\t<EventOnClick> \r\n')
out_xml( '\t\tVar SelectDrink = "'+ product_code[i] +'"\r\n')
out_xml( '\t\tVar NameDrink = $' + product_code[i] + '.NameE\r\n')
out_xml( '\t\tVar NameDrinkTH = $' + product_code[i] + '.Name\r\n')
out_xml( '\t\tVar DrinkDescriptionTH = $' + product_code[i] + '.description\r\n')
out_xml( '\t\tVar DrinkDescription = $' + product_code[i] + '.descriptionE\r\n')
out_xml( '\t\tVar PriceDrink = $' + product_code[i] + '.Price\r\n')
out_xml( '\t\tVar PictureDrink = "' + default_dir2 + '" + $'+ product_code[i] +'.image\r\n')
out_xml( '\t\tTopping "Load" SelectDrink\r\n')
out_xml( '\t\tSAVELOG NameDrink\r\n')
out_xml( '\t\tVar PriceShowValue = charOfBaht + PriceDrink\r\n')
#out_xml( '\t\tVar PriceShowValue = "Free"\r\n')
out_xml( '\t\tOpen "ROOT/taobin_project/xml/page_topping_alter.xml"\r\n')
out_xml( '\t</EventOnClick>\r\n')
out_xml( '\t</Button>\r\n')
out_xml( '\t<Text>\r\n')
out_xml( '\t<X> 182 </X>\r\n')
out_xml( '\t<Y> 12 </Y>\r\n')
out_xml( '\t<State> ShowPrice </State>\r\n')
out_xml( '\t<Align> "Hurr" </Align>\r\n')
out_xml( '\t<Width>150</Width>\r\n')
out_xml( '\t<Size> 27 </Size>\r\n')
out_xml( '\t<Font> KanitTTF </Font>\r\n')
out_xml( '\t<Color> 0xB78F24 </Color>\r\n')
out_xml( '\t<Value> $' + product_code[i] + '.Price </Value>\r\n')
out_xml( '\t</Text>\r\n')
out_xml( '\t<Text>\r\n')
out_xml( '\t<X> 164 </X>\r\n')
out_xml( '\t<Y> 12 </Y>\r\n')
out_xml( '\t<State> ShowPrice </State>\r\n')
out_xml( '\t<Width>20</Width>\r\n')
out_xml( '\t<Size> 27 </Size>\r\n')
out_xml( '\t<Font> KanitTTF </Font>\r\n')
out_xml( '\t<Color> 0xB78F24 </Color>\r\n')
out_xml( '\t<Value> "฿"" </Value>\r\n')
out_xml( '\t</Text>\r\n')
out_xml( '\t<Text>\r\n')
out_xml( '\t<X> 16 </X>\r\n')
out_xml( '\t<Y> 190 </Y>\r\n')
out_xml( '\t<Size> 24 </Size>\r\n')
out_xml( '\t<Width>220</Width>\r\n')
out_xml( '\t<Mode> "multi2" </Mode>\r\n')
out_xml( '\t<Font> KanitMediumTTF </Font>\r\n')
out_xml( '\t<Color> 0x322B26 </Color>\r\n')
out_xml( '\t<State> showthaiText </State>\r\n')
out_xml( '\t<Value> $' + product_code[i] + '.Name </Value>\r\n')
out_xml( '\t</Text>\r\n')
out_xml( '\t<Text>\r\n')
out_xml( '\t<X> 16 </X>\r\n')
out_xml( '\t<Y> 246 </Y>\r\n')
out_xml( '\t<Size> 14 </Size>\r\n')
out_xml( '\t<Width>220</Width>\r\n')
out_xml( '\t<Font> KanitMediumTTF </Font>\r\n')
out_xml( '\t<Color> 0x6F5F51 </Color>\r\n')
out_xml( '\t<State> showthaiText </State>\r\n')
out_xml( '\t<Value> $' + product_code[i] + '.description </Value>\r\n')
out_xml( '\t</Text>\r\n')
out_xml( '\t<Text>\r\n')
out_xml( '\t<X> 16 </X>\r\n')
out_xml( '\t<Y> 190 </Y>\r\n')
out_xml( '\t<Size> 22 </Size>\r\n')
out_xml( '\t<Width>220</Width>\r\n')
out_xml( '\t<Mode> "multi2" </Mode>\r\n')
out_xml( '\t<Font> KanitMediumTTF </Font>\r\n')
out_xml( '\t<Color> 0x322B26 </Color>\r\n')
out_xml( '\t<State> showengText </State>\r\n')
out_xml( '\t<Value> $' + product_code[i] + '.NameE </Value>\r\n')
out_xml( '\t</Text>\r\n')
out_xml( '\t<Text>\r\n')
out_xml( '\t<X> 16 </X>\r\n')
out_xml( '\t<Y> 246 </Y>\r\n')
out_xml( '\t<Size> 14 </Size>\r\n')
out_xml( '\t<Width>220</Width>\r\n')
out_xml( '\t<Font> KanitMediumTTF </Font>\r\n')
out_xml( '\t<Color> 0x6F5F51 </Color>\r\n')
out_xml( '\t<State> showengText </State>\r\n')
out_xml( '\t<Value> $' + product_code[i] + '.descriptionE </Value>\r\n')
out_xml( '\t</Text>\r\n')
out_xml( '</Block>\r\n')
out_xml('</FrameScroll>\r\n')

View file

@ -0,0 +1,132 @@
if menu_count >= 16:
scroll_height = 1670
else:
scroll_height = 1400
out_xml('<FrameScroll> \r\n')
out_xml('<X> 0 </X>\r\n')
out_xml('<Y> 497 </Y>\r\n')
out_xml('<Width> 1080 </Width>\r\n')
out_xml('<Height> 1500 </Height>\r\n')
out_xml('<ScrollHeight> ' + str(scroll_height) + ' </ScrollHeight>\r\n')
out_xml('<Scroll> "Vertical" </Scroll>\r\n')
for i in range( menu_count):
i_str = str(i + 1)
out_xml( '\t; button i='+ i_str + ' ' + product_code[i]+ ' \r\n')
out_xml( '\t<Button>\r\n')
out_xml( '\t<X> ' + str(x_button[i]) + ' </X> \r\n')
out_xml( '\t<Y> ' + str(y_button[i]) + ' </Y> \r\n')
out_xml( '\t<State> $' + product_code[i] + '.Button </State> \r\n')
out_xml( '\t<Filename> Var( "' + default_dir + '" + $'+ product_code[i] +'.image ) </Filename>\r\n')
out_xml( '\t<FilenamePress> Var( "' + default_dir_press + '" + $'+ product_code[i] +'.image ) " </FilenamePress>\r\n')
out_xml( '\t<FilenameDisable> Var( "' + default_dir_disable + '" + $'+ product_code[i] +'.image ) " </FilenameDisable>\r\n')
out_xml( '\t<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>\r\n')
out_xml( '\t<Volume> SoundVolume </Volume>\r\n')
out_xml( '\t<EventOnClick> \r\n')
out_xml( '\t\tVar SelectDrink = "'+ product_code[i] +'"\r\n')
out_xml( '\t\tVar NameDrink = $' + product_code[i] + '.NameE\r\n')
out_xml( '\t\tVar NameDrinkTH = $' + product_code[i] + '.Name\r\n')
out_xml( '\t\tVar DrinkDescriptionTH = $' + product_code[i] + '.description\r\n')
out_xml( '\t\tVar DrinkDescription = $' + product_code[i] + '.descriptionE\r\n')
out_xml( '\t\tVar PriceDrink = $' + product_code[i] + '.Price\r\n')
out_xml( '\t\tVar PictureDrink = "' + default_dir2 + '" + $'+ product_code[i] +'.image\r\n')
out_xml( '\t\tTopping "Load" SelectDrink\r\n')
#out_xml( '\t\tSAVELOG NameDrink\r\n')
out_xml( '\t\tVar PriceShowValue = charOfBaht + PriceDrink\r\n')
#out_xml( '\t\tVar PriceShowValue = "Free"\r\n')
out_xml( '\t\tOpen "ROOT/taobin_project/xml/page_topping_alter.xml"\r\n')
out_xml( '\t</EventOnClick>\r\n')
out_xml( '\t</Button>\r\n')
for i in range( menu_count):
if RoadShow :
out_xml( '\t<Text>\r\n')
out_xml( '\t<X> ' + str(x_button[i] + 164) + ' </X>\r\n')
out_xml( '\t<Y> ' + str(y_button[i] + 12) + ' </Y>\r\n')
out_xml( '\t<Width>200</Width>\r\n')
out_xml( '\t<Size> 27 </Size>\r\n')
out_xml( '\t<Font> KanitTTF </Font>\r\n')
out_xml( '\t<Color> 0xB78F24 </Color>\r\n')
out_xml( '\t<Value> "Free!" </Value>\r\n')
out_xml( '\t</Text>\r\n')
out_xml( '\t<Text>\r\n')
else:
out_xml( '\t<Text>\r\n')
out_xml( '\t<X> ' + str(x_button[i] + 182) + ' </X>\r\n')
out_xml( '\t<Y> ' + str(y_button[i] + 12) + ' </Y>\r\n')
out_xml( '\t<State> ShowPrice </State>\r\n')
out_xml( '\t<Align> "Hurr" </Align>\r\n')
out_xml( '\t<Width>150</Width>\r\n')
out_xml( '\t<Size> 27 </Size>\r\n')
out_xml( '\t<Font> KanitTTF </Font>\r\n')
out_xml( '\t<Color> 0xB78F24 </Color>\r\n')
out_xml( '\t<Value> $' + product_code[i] + '.Price </Value>\r\n')
out_xml( '\t</Text>\r\n')
out_xml( '\t<Text>\r\n')
out_xml( '\t<X> ' + str(x_button[i] + 164) + ' </X>\r\n')
out_xml( '\t<Y> ' + str(y_button[i] + 12) + ' </Y>\r\n')
out_xml( '\t<State> ShowPrice </State>\r\n')
out_xml( '\t<Width>20</Width>\r\n')
out_xml( '\t<Size> 27 </Size>\r\n')
out_xml( '\t<Font> KanitTTF </Font>\r\n')
out_xml( '\t<Color> 0xB78F24 </Color>\r\n')
out_xml( '\t<Value> "฿"" </Value>\r\n')
out_xml( '\t</Text>\r\n')
out_xml( '\t<Text>\r\n')
out_xml( '\t<X> ' + str(x_button[i] + 16) + ' </X>\r\n')
out_xml( '\t<Y> ' + str(y_button[i] + 190) + ' </Y>\r\n')
out_xml( '\t<Size> 24 </Size>\r\n')
out_xml( '\t<Width>220</Width>\r\n')
out_xml( '\t<Mode> "multi2" </Mode>\r\n')
out_xml( '\t<Font> KanitMediumTTF </Font>\r\n')
out_xml( '\t<Color> 0x322B26 </Color>\r\n')
out_xml( '\t<State> showthaiText </State>\r\n')
out_xml( '\t<Value> $' + product_code[i] + '.Name </Value>\r\n')
out_xml( '\t</Text>\r\n')
out_xml( '\t<Text>\r\n')
out_xml( '\t<X> ' + str(x_button[i] + 16) + ' </X>\r\n')
out_xml( '\t<Y> ' + str(y_button[i] + 246) + ' </Y>\r\n')
out_xml( '\t<Size> 14 </Size>\r\n')
out_xml( '\t<Width>220</Width>\r\n')
out_xml( '\t<Font> KanitMediumTTF </Font>\r\n')
out_xml( '\t<Color> 0x6F5F51 </Color>\r\n')
out_xml( '\t<State> showthaiText </State>\r\n')
out_xml( '\t<Value> $' + product_code[i] + '.description </Value>\r\n')
out_xml( '\t</Text>\r\n')
out_xml( '\t<Text>\r\n')
out_xml( '\t<X> ' + str(x_button[i] + 16) + ' </X>\r\n')
out_xml( '\t<Y> ' + str(y_button[i] + 190) + ' </Y>\r\n')
out_xml( '\t<Size> 22 </Size>\r\n')
out_xml( '\t<Width>220</Width>\r\n')
out_xml( '\t<Mode> "multi2" </Mode>\r\n')
out_xml( '\t<Font> KanitMediumTTF </Font>\r\n')
out_xml( '\t<Color> 0x322B26 </Color>\r\n')
out_xml( '\t<State> showengText </State>\r\n')
out_xml( '\t<Value> $' + product_code[i] + '.NameE </Value>\r\n')
out_xml( '\t</Text>\r\n')
out_xml( '\t<Text>\r\n')
out_xml( '\t<X> ' + str(x_button[i] + 16) + ' </X>\r\n')
out_xml( '\t<Y> ' + str(y_button[i] + 246) + ' </Y>\r\n')
out_xml( '\t<Size> 14 </Size>\r\n')
out_xml( '\t<Width>220</Width>\r\n')
out_xml( '\t<Font> KanitMediumTTF </Font>\r\n')
out_xml( '\t<Color> 0x6F5F51 </Color>\r\n')
out_xml( '\t<State> showengText </State>\r\n')
out_xml( '\t<Value> $' + product_code[i] + '.descriptionE </Value>\r\n')
out_xml( '\t</Text>\r\n')
out_xml('</FrameScroll>\r\n')

106
inter/hk/xml/menu_head.py Normal file
View file

@ -0,0 +1,106 @@
RoadShow = False
default_dir = 'ROOT/taobin_project/image/page_drink/'
default_dir2 = 'ROOT/taobin_project/image/page_drink_select/'
default_dir_press = 'ROOT/taobin_project/image/page_drink_press/'
default_dir_disable = 'ROOT/taobin_project/image/page_drink_disable/'
new_default_dir = 'ROOT/taobin_project/inter/sgp/image/page_drink_n/'
new_default_dir2 = 'ROOT/taobin_project/inter/sgp/image/page_drink_picture2_n/'
new_default_dir_press = 'ROOT/taobin_project/inter/sgp/image/page_drink_press_n/'
new_default_dir_disable = 'ROOT/taobin_project/inter/sgp/image/page_drink_disable_n2/'
menu_count = 0
x1 = 44
x2 = 301
x3 = 558
x4 = 815
ystep = 899 - 571
y1 = 20
y2 = y1 + ystep*1
y3 = y1 + ystep*2
y4 = y1 + ystep*3
y5 = y1 + ystep*4
y6 = y1 + ystep*5
y7 = y1 + ystep*6
x_button = [
x1,
x2,
x3,
x4,
x1,
x2,
x3,
x4,
x1,
x2,
x3,
x4,
x1,
x2,
x3,
x4,
x1,
x2,
x3,
x4,
x1,
x2,
x3,
x4,
x1,
x2,
x3,
x4
]
y_button = [
y1,
y1,
y1,
y1,
y2,
y2,
y2,
y2,
y3,
y3,
y3,
y3,
y4,
y4,
y4,
y4,
y5,
y5,
y5,
y5,
y6,
y6,
y6,
y6,
y7,
y7,
y7,
y7
]

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

75
inter/hk/xml/menu_tab.py Normal file
View file

@ -0,0 +1,75 @@
out_xml(' ; bn_bestseller
<Button>
<X> 92 </X>
<Y> 418 </Y>
<State> "PressForever" </State>
<Filename> Var( DirName + "/bn_bestseller.png" )</Filename>
<FilenamePress> Var( DirName + "/bp_bestseller.png") </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Open "ROOT/taobin_project/xml/page_catalog_choose_drink1.xml"
</EventClick>
</Button>
<Button>
<X> 243 </X>
<Y> 418 </Y>
<Filename> Var( DirName + "/bn_coffee.png") </Filename>
<FilenamePress> Var( DirName + "/bp_coffee.png") </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Open "ROOT/taobin_project/xml/page_catalog_choose_drink2.xml"
</EventClick>
</Button>
<Button>
<X> 397 </X>
<Y> 418 </Y>
<Filename> Var( DirName + "/bn_tea.png") </Filename>
<FilenamePress> Var( DirName + "/bp_tea.png") </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Open "ROOT/taobin_project/xml/page_catalog_choose_drink3.xml"
</EventClick>
</Button>
<Button>
<X> 545 </X>
<Y> 418 </Y>
<Filename> Var( DirName + "/bn_cho_ca.png") </Filename>
<FilenamePress> Var( DirName + "/bp_cho_ca.png") </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Open "ROOT/taobin_project/xml/page_catalog_choose_drink4.xml"
</EventClick>
</Button>
<Button>
<X> 696 </X>
<Y> 418 </Y>
<Filename> Var( DirName + "/bn_fruit.png") </Filename>
<FilenamePress> Var( DirName + "/bp_fruit.png") </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Open "ROOT/taobin_project/xml/page_catalog_choose_drink5.xml"
</EventClick>
</Button>
<Button>
<X> 847 </X>
<Y> 418 </Y>
<Filename> Var( DirName + "/bn_sodada.png") </Filename>
<FilenamePress> Var( DirName + "/bp_sodada.png") </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Open "ROOT/taobin_project/xml/page_catalog_choose_drink6.xml"
</EventClick>
</Button>

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

View file

@ -0,0 +1,60 @@
<?hurr
#include=menu_head.py
echo param
?>
<Popup>
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
;<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
; On open
<?hurr
#include=menu_catalog_default_init.py
?>
If AppFastEnable = "true" Then
Var Menu11Selected = "PressForever"
Var Menu7Selected = "Invisible"
Else
Var Menu11Selected = "Invisible"
Var Menu7Selected = "PressForever"
EndIf
SAVELOG PreviseXMLFileName2
Var Timeout = 0
<?hurr
#include=menu_catalog_new_menu.py
?>
</EventOpen>
<?hurr
#include=menu_catalog_new.py
?>
<?hurr
#include=menu_new_layout_gen_v2.py
?>
<?hurr
#include=menu_new_layout_gen.py
?>
</Popup>

File diff suppressed because it is too large Load diff

View file

@ -0,0 +1,50 @@
<?hurr
#include=menu_head.py
?>
<Popup>
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
;<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
; On open
<?hurr
#include=menu_catalog_default_init.xml
?>
Var Menu8Selected = "PressForever"
SAVELOG PreviseXMLFileName2
Var Timeout = 0
<?hurr
#include=menu_catalog_new_menu.xml
?>
</EventOpen>
<?hurr
#include=menu_catalog_new.py
?>
<?hurr
#include=menu_new_layout_gen_v2.py
?>
<?hurr
#include=menu_new_layout_gen.py
?>
</Popup>

File diff suppressed because it is too large Load diff

View file

@ -0,0 +1,51 @@
<?hurr
#include=menu_head.py
?>
<Popup>
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
;<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
; On open
<?hurr
#include=menu_catalog_default_init.py
?>
Var Menu2Selected = "PressForever"
SAVELOG PreviseXMLFileName2
Var Timeout = 0
<?hurr
#include=menu_catalog_new_menu.py
?>
</EventOpen>
<?hurr
#include=menu_catalog_new.py
?>
<?hurr
#include=menu_new_layout_gen_v2.py
?>
<?hurr
#include=menu_new_layout_gen.py
?>
</Popup>

File diff suppressed because it is too large Load diff

View file

@ -0,0 +1,60 @@
<?hurr
#include=menu_head.py
touch_less_gen = False
?>
<Popup>
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
;<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
; On open
<?hurr
#include=menu_catalog_default_init.py
?>
; protein
If AppFastEnable = "true" Then
Var Menu11Selected = "PressForever"
Var Menu7Selected = "Invisible"
Var Menu21Selected = "Invisible"
Else
Var Menu11Selected = "Invisible"
Var Menu7Selected = "Invisible"
Var Menu21Selected = "PressForever"
EndIf
SAVELOG PreviseXMLFileName2
Var Timeout = 0
<?hurr
#include=menu_catalog_new_menu.py
?>
</EventOpen>
<?hurr
#include=menu_catalog_new.py
?>
<?hurr
#include=menu_new_layout_gen_v2.py
?>
<?hurr
#include=menu_new_layout_gen.py
?>
</Popup>

File diff suppressed because it is too large Load diff

View file

@ -0,0 +1,50 @@
<?hurr
#include=menu_head.py
touch_less_gen = False
?>
<Popup>
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
;<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
; On open
<?hurr
#include=menu_catalog_default_init.py
?>
Var Menu22Selected = "PressForever"
SAVELOG PreviseXMLFileName2
Var Timeout = 0
<?hurr
#include=menu_catalog_new_menu.py
?>
</EventOpen>
<?hurr
#include=menu_catalog_new.py
?>
<?hurr
#include=menu_new_layout_gen_v2.py
?>
<?hurr
#include=menu_new_layout_gen.py
?>
<?hurr
#include=./event/dummy_layout_promotion.py
?>
</Popup>

File diff suppressed because it is too large Load diff

File diff suppressed because it is too large Load diff

View file

@ -0,0 +1,51 @@
<?hurr
#include=menu_head.py
?>
<Popup>
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
;<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
; On open
<?hurr
#include=menu_catalog_default_init.py
?>
Var Menu4Selected = "PressForever"
SAVELOG PreviseXMLFileName2
Var Timeout = 0
<?hurr
#include=menu_catalog_new_menu.py
?>
</EventOpen>
<?hurr
#include=menu_catalog_new.py
?>
<?hurr
#include=menu_new_layout_gen_v2.py
?>
<?hurr
#include=menu_new_layout_gen.py
?>
<EventUnitTest4>
RefreshAll
</EventUnitTest4>
</Popup>

View file

@ -0,0 +1,509 @@
<Popup>
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
;<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
; On open
Var NextPage = "-"
DEBUGVAR ICE_PROCESS_STATUS
DEBUGVAR ICE_PROCESS_TXT
If show_eng = "true" Then
Var showthaiText = "Invisible"
Var showengText = "Enable"
Var DirImage = "ROOT/taobin_project/image/page3_en"
Var show_btp = "ROOT/taobin_project/image/page2/bn_thai_lang_press_2.png"
Var show_btn = "ROOT/taobin_project/image/page2/bn_thai_lang_2.png"
Var ice_tab_text = "Ice will be ready at "
Var text_unavailable = "UNAVAILABLE###size=16"
Else
Var showengText = "Invisible"
Var showthaiText = "Enable"
Var DirImage = "ROOT/taobin_project/image/page3"
Var show_btp = "ROOT/taobin_project/image/page2/bn_eng_lang_2.png"
Var show_btn = "ROOT/taobin_project/image/page2/bn_eng_lang_2.png"
Var ice_tab_text = "น้ำแข็งจะพร้อมเวลา "
Var text_unavailable = "หมด###size=32"
EndIf
If ICE_PROCESS_STATUS = 2 Then
Var ice_tab_process_show = "Enable"
Var ice_show_open = ice_tab_text + ICE_PROCESS_TXT
Else
Var ice_tab_process_show = "Invisible"
EndIf
; SpiralOnline
Var MenuVSelected2 = "Invisible"
Var Menu1Selected2 = "Invisible"
Var Menu2Selected2 = "Invisible"
Var Menu3Selected2 = "Invisible"
Var Menu4Selected2 = "Invisible"
Var Menu6Selected2 = "Invisible"
Var Menu7Selected2 = "Invisible"
Var MenuVSelected2 = "Invisible"
Var Menu11Selected2 = "Invisible"
Var Menu21Selected2 = "Invisible"
Var MenuVSelected2 = "Invisible"
If SpiralOnline = "true" Then
If Seeker = "curr" Then
Var MenuVSelected2 = "Enable"
EndIf
EndIf
; init default
Var Menu1Selected = "Enable"
Var Menu2Selected = "Enable"
Var Menu3Selected = "Enable"
Var Menu4Selected = "Enable"
; 5 fruit
Var Menu5Selected = "Invisible"
Var Menu6Selected = "Enable"
Var Menu7Selected = "Enable"
; 8 cocktail
Var Menu8Selected = "Invisible"
If CocktailShow = "true" Then
Var Menu7Selected = "Invisible"
Var Menu8Selected = "Enable"
EndIf
If AppFastEnable = "true" Then
Var Menu11Selected = "Enable"
Var Menu21Selected = "Invisible"
Var Menu7Selected = "Invisible"
Else
If MenuKidEnable = "true" Then
Var Menu11Selected = "Invisible"
Var Menu21Selected = "Enable"
Var Menu7Selected = "Invisible"
Else
Var Menu11Selected = "Invisible"
Var Menu21Selected = "Invisible"
Var Menu7Selected = "Enable"
EndIf
EndIf
If CocktailShow = "true" Then
Var Menu7Selected = "Invisible"
EndIf
If RecipeTag1 = "HealthTurnOn" Then
Var Menu22Selected = "Enable"
Else
Var Menu22Selected = "Invisible"
EndIf
;
Var Timeout = 0
If show_eng = "true" Then
Var DirImage2 = "ROOT/taobin_project/image/drink_option_en/"
Var DirImageAlter = "ROOT/taobin_project/image/page3_2_en/"
Else
Var DirImage2 = "ROOT/taobin_project/image/drink_option/"
Var DirImageAlter = "ROOT/taobin_project/image/page3_2/"
EndIf
</EventOpen>
; notice enable heathy menu
<Image>
<X> 0 </X>
<Y> 380 </Y>
<Width> 1080 </Width>
<Height> 1540 </Height>
<Color> "0xeae6e1" </Color>
</Image>
<Timeout> 1000 </Timeout>
<EventTimeout>
;DEBUGVAR ICE_PROCESS_STATUS
If ICE_PROCESS_STATUS = 2 Then
Var ice_tab_process_show = "Enable"
Var ice_show_open = ice_tab_text + ICE_PROCESS_TXT
Else
Var ice_tab_process_show = "Invisible"
EndIf
If NextPage = "-" Then
Else
If CupOnArm = "true" Then
If Timeout > 9 Then
SAVELOG "COA9"
Open NextPage
EndIf
Else
If Timeout > 30 Then
SAVELOG "COA30"
Open NextPage
EndIf
EndIf
EndIf
If Timeout > 60 Then
SAVELOG "Timeout"
If Seeker = "next" Then
Open "ROOT/taobin_project/xml/page_brewing3Conti.xml"
Else
SAVELOG "Back"
Open "ROOT/taobin_project/xml/page_back_to_main.xml"
EndIf
EndIf
If BrewCommand = "RefreshAll" Then
Var BrewCommand = "-"
Open CurrentXMLFileName2
EndIf
If Seeker = "curr" Then
If DoorCupPosition = "bottom" Then
; It normal
Var EmergencyStop = "false"
Else
Var EmergencyStop = "true"
;Open "ROOT/taobin_project/xml/page_back_to_error.xml"
EndIf
EndIf
If IgnoreNetCore = "true" Then
Else
;stop_now
If NETCORE_LOST_CNT > 120 Then
Var stop_now = "true"
Var MachineErrorDetailAll = "???"
SAVELOG "NETCORE_LOST_CNT"
Open "ROOT/taobin_project/xml/page_back_to_error.xml"
EndIf
EndIf
Var Timeout = Timeout + 1
TimerReset
</EventTimeout>
<EventLanguageOnChange>
DEBUGVAR LanguageShow
If LanguageShow = "ENG" Then
Var DirImage2 = "ROOT/taobin_project/image/drink_option_en/"
Var DirImageAlter = "ROOT/taobin_project/image/page3_2_en/"
EndIf
If LanguageShow = "THAI" Then
Var DirImage2 = "ROOT/taobin_project/image/drink_option/"
Var DirImageAlter = "ROOT/taobin_project/image/page3_2/"
EndIf
RefreshAll
</EventLanguageOnChange>
; under line
<Image>
<X> 0 </X>
<Y> 494 </Y>
<Filename> "ROOT/taobin_project/image/page3/tab_line_bottom.png" </Filename>
</Image>
; under line
<Image>
<X> 0 </X>
<Y> 358 </Y>
<Filename> "ROOT/taobin_project/image/page3/bg1.png" </Filename>
</Image>
; back
<Button>
<X> 19 </X>
<Y> 381 </Y>
<Filename> "ROOT/taobin_project/image/page2/bn_back_arrow_2.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/page2/bn_back_arrow_2.png" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
If SpiralOnline = "true" Then
If Seeker = "curr" Then
Open "ROOT/taobin_project/xml/page_catalog_with_vending.xml"
Else
Open "ROOT/taobin_project/xml/page_catalog.lxml"
EndIf
Else
Open "ROOT/taobin_project/xml/page_catalog.lxml"
EndIf
</EventClick>
</Button>
<LangSwitch>
<X> 1000 </X>
<Y> 381 </Y>
<Filename> show_btn </Filename>
<FilenamePress> show_btp </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
;
</EventClick>
</LangSwitch>
<ListView1>
<Width> 1080 </Width>
<Height> "auto" </Height>
<X> 0 </X>
<Y> 395 </Y>
<Row2>
<State>"Enable"</State>
<Width> 896 </Width>
<Height> 102 </Height>
<Button>
<Layout> "linear" </Layout>
<State> Menu1Selected </State>
<Filename> Var( DirImageAlter + "/bn_recommend2.png" )</Filename>
<FilenamePress> Var( DirImageAlter + "/bp_recommend2.png") </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
SAVELOG "Click rec"
Var NextPage = "-"
Open "ROOT/taobin_project/xml/page_catalog_group_recommend.lxml"
</EventClick>
</Button>
<Button>
<Layout> "linear" </Layout>
<State> Menu2Selected </State>
<Filename> Var( DirImageAlter + "/bn_coffee2.png") </Filename>
<FilenamePress> Var( DirImageAlter + "/bp_coffee2.png") </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var NextPage = "-"
Open "ROOT/taobin_project/xml/page_catalog_group_coffee.lxml"
</EventClick>
</Button>
<Button>
<Layout> "linear" </Layout>
<State> Menu3Selected </State>
<Filename> Var( DirImageAlter + "/bn_tea2.png") </Filename>
<FilenamePress> Var( DirImageAlter + "/bp_tea2.png") </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var NextPage = "-"
Open "ROOT/taobin_project/xml/page_catalog_group_tea.lxml"
</EventClick>
</Button>
<Button>
<Layout> "linear" </Layout>
<State> Menu4Selected </State>
<Filename> Var( DirImageAlter + "/bn_cho_ca2.png") </Filename>
<FilenamePress> Var( DirImageAlter + "/bp_cho_ca2.png") </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var NextPage = "-"
Open "ROOT/taobin_project/xml/page_catalog_group_milk.lxml"
</EventClick>
</Button>
<Button>
<Layout> "linear" </Layout>
<State> Menu7Selected </State>
<Filename> Var( DirImageAlter + "/bn_protein2.png") </Filename>
<FilenamePress> Var( DirImageAlter + "/bp_protein2.png") </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var NextPage = "-"
Open "ROOT/taobin_project/xml/page_catalog_group_whey.lxml"
</EventClick>
</Button>
<Button>
<Layout> "linear" </Layout>
<State> Menu11Selected </State>
<Filename> Var( DirImageAlter + "/bn_appfast2.png") </Filename>
<FilenamePress> Var( DirImageAlter + "/bp_appfast2.png") </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var NextPage = "-"
Open "ROOT/taobin_project/xml/page_catalog_group_appfast.lxml"
</EventClick>
</Button>
<Button>
<Layout> "linear" </Layout>
<State> Menu21Selected </State>
<Filename> Var( DirImageAlter + "/bn_forkid2.png") </Filename>
<FilenamePress> Var( DirImageAlter + "/bp_forkid2.png") </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var NextPage = "-"
Open "ROOT/taobin_project/xml/page_catalog_group_forkid.lxml"
</EventClick>
</Button>
<Button>
<Layout> "linear" </Layout>
<State> Menu22Selected </State>
<Filename> Var( DirImageAlter + "/bn_health.png") </Filename>
<FilenamePress> Var( DirImageAlter + "/bp_health.png") </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var NextPage = "-"
Open "ROOT/taobin_project/xml/page_catalog_group_health.lxml"
</EventClick>
</Button>
<Button>
<Layout> "linear" </Layout>
<State> Menu8Selected </State>
<Filename> Var( DirImageAlter + "/bn_cocktail.png") </Filename>
<FilenamePress> Var( DirImageAlter + "/bp_cocktail.png") </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var NextPage = "-"
Open "ROOT/taobin_project/xml/page_catalog_group_cocktail.lxml"
</EventClick>
</Button>
<Button>
<Layout> "linear" </Layout>
<State> Menu6Selected </State>
<Filename> Var( DirImageAlter + "/bn_sodada2.png") </Filename>
<FilenamePress> Var( DirImageAlter + "/bp_sodada2.png") </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var NextPage = "-"
Open "ROOT/taobin_project/xml/page_catalog_group_other.lxml"
</EventClick>
</Button>
<Button>
<Layout> "linear" </Layout>
<State> MenuVSelected2 </State>
<Filename> Var( DirImageAlter + "/bn_vending2.png") </Filename>
<FilenamePress> Var( DirImageAlter + "/bp_vending2.png") </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var NextPage = "-"
Open "ROOT/taobin_project/spiral/xml/page_catalog_vending_machine.xml"
</EventClick>
</Button>
</Row2>
</ListView1>
<EventWebApp>
DEBUGVAR web_ready
If web_ready = "true" Then
If web_ref = QRCODE99x Then
Var web_readyOK = web_ready
Var web_telnumOK = web_telnum
Var web_app_prepar = "true"
Open "/mnt/sdcard/coffeevending/taobin_project/xml/page_payment.xml"
EndIf
Else
EndIf
</EventWebApp>
<FrameScroll>
<X> 10 </X>
<Y> 497 </Y>
<Width> 1080 </Width>
<ScrollHeight> "auto" </ScrollHeight>
<Scroll> "Vertical" </Scroll>
<Column> 4 </Column>
<Script>
Var block_index_override = 0
Var block_index_move = 0
</Script>
</FrameScroll>
; Cart
<Button>
<X> 915 </X>
<Y> 1769 </Y>
<State> showCart </State>
<Filename> cart_image_bn </Filename>
<FilenamePress> cart_image_bp </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Open "ROOT/taobin_project/xml/page_payment_multi.xml"
</EventClick>
</Button>
</Popup>

View file

@ -0,0 +1,45 @@
<?hurr
#include=menu_head.py
?>
<Popup>
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
;<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
; On open
<?hurr
#include=menu_catalog_default_init.py
?>
Var Timeout = 0
<?hurr
#include=menu_catalog_new_menu.py
?>
</EventOpen>
<?hurr
#include=menu_catalog_new.py
?>
<?hurr
#include=menu_new_layout_gen_v2.py
?>
<?hurr
#include=menu_new_layout_gen.py
?>
</Popup>

File diff suppressed because it is too large Load diff

View file

@ -0,0 +1,49 @@
<?hurr
#include=menu_head.py
echo param
?>
<Popup>
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
;<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
; On open
<?hurr
#include=menu_catalog_default_init.py
?>
; soda and other
Var Menu6Selected = "PressForever"
SAVELOG PreviseXMLFileName2
Var Timeout = 0
<?hurr
#include=menu_catalog_new_menu.py
?>
</EventOpen>
<?hurr
#include=menu_catalog_new.py
?>
<?hurr
#include=menu_new_layout_gen_v2.py
?>
<?hurr
#include=menu_new_layout_gen.py
?>
</Popup>

View file

@ -0,0 +1,45 @@
<?hurr
#include=menu_head.py
?>
<Popup>
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
;<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
; On open
<?hurr
#include=menu_catalog_default_init.py
?>
Var Timeout = 0
<?hurr
#include=menu_catalog_new_menu.py
?>
</EventOpen>
<?hurr
#include=menu_catalog_new.py
?>
<?hurr
#include=menu_new_layout_gen_v2.py
?>
<?hurr
#include=menu_new_layout_gen.py
?>
</Popup>

File diff suppressed because it is too large Load diff

View file

@ -0,0 +1,83 @@
<?hurr
#include=menu_head.py
?>
<Popup>
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
;<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
; On open
<?hurr
#include=menu_catalog_default_init.py
?>
Var Menu1Selected = "PressForever"
Var OreoBigButtonEnable = "Enable"
If $12-01-01-0001.Button = "Invisible" Then
Var esp102101001Enable = "Invisible"
Var esp122101001Enable = "Enable"
Else
Var esp102101001Enable = "Enable"
Var esp122101001Enable = "Invisible"
EndIf
SAVELOG PreviseXMLFileName2
Var Timeout = 0
If show_eng = "true" Then
Var text_unavailable = "UNAVAILABLE###size=16"
Else
Var text_unavailable = "หมด###size=32"
EndIf
<?hurr
#include=menu_catalog_new_menu.py
?>
</EventOpen>
<?hurr
#include=menu_catalog_new.py
?>
<?hurr
#include=menu_new_layout_gen_v2.py
?>
<?hurr
#include=menu_new_layout_gen.py
?>
<Button>
<X> 780 </X>
<Y> 500 </Y>
<State> buttonRemoveCup </State>
;<Color> "0x00BDFF" </Color>
<Interval> 500 </Interval>
<Filename> Var(RootPath + "image/main_page/bn_remove_cup.png") </Filename>
<Filename> Var(RootPath + "image/main_page/bp_remove_cup.png") </Filename>
<EventClick>
Machine RemoveCup
Machine DoorLidOpen
Var buttonRemoveCup = "Invisible"
</EventClick>
</Button>
;BigLogoLayout
</Popup>

File diff suppressed because it is too large Load diff

View file

@ -0,0 +1,80 @@
<?hurr
#include=menu_head.py
?>
<Popup>
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
;<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
; On open
<?hurr
#include=menu_catalog_default_init.py
?>
Var Menu1Selected = "PressForever"
Var OreoBigButtonEnable = "Enable"
If $52-01-01-0001.Button = "Invisible" Then
Var esp102101001Enable = "Invisible"
Var esp122101001Enable = "Enable"
Else
Var esp102101001Enable = "Enable"
Var esp122101001Enable = "Invisible"
EndIf
SAVELOG PreviseXMLFileName2
Var Timeout = 0
If show_eng = "true" Then
Var text_unavailable = "UNAVAILABLE###size=16"
Else
Var text_unavailable = "หมด###size=32"
EndIf
<?hurr
#include=menu_catalog_new_menu.py
?>
</EventOpen>
;include="ROOT/taobin_project/inter/sgp/xml/menu_catalog_new.lxml"
<?hurr
#include=menu_new_layout_gen_v2.py
?>
<?hurr
#include=menu_new_layout_gen.py
?>
;BigLogoLayout
<Button>
<X> 780 </X>
<Y> 500 </Y>
<State> buttonRemoveCup </State>
;<Color> "0x00BDFF" </Color>
<Interval> 500 </Interval>
<Filename> Var(RootPath + "image/main_page/bn_remove_cup.png") </Filename>
<Filename> Var(RootPath + "image/main_page/bp_remove_cup.png") </Filename>
<EventClick>
Machine RemoveCup
Machine DoorLidOpen
Var buttonRemoveCup = "Invisible"
</EventClick>
</Button>
</Popup>

File diff suppressed because it is too large Load diff

View file

@ -0,0 +1,52 @@
<?hurr
#include=menu_head.py
touch_less_gen = False
?>
<Popup>
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
;<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
; On open
<?hurr
#include=menu_catalog_default_init.py
?>
Var Menu3Selected = "PressForever"
SAVELOG PreviseXMLFileName2
Var Timeout = 0
<?hurr
#include=menu_catalog_new_menu.py
?>
</EventOpen>
<?hurr
#include=menu_catalog_new.py
?>
<?hurr
#include=menu_new_layout_gen_v2.py
?>
<?hurr
#include=menu_new_layout_gen.py
?>
</Popup>

File diff suppressed because it is too large Load diff

View file

@ -0,0 +1,55 @@
<?hurr
#include=menu_head.py
touch_less_gen = False
?>
<Popup>
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
;<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
; On open
<?hurr
#include=menu_catalog_default_init.py
?>
If AppFastEnable = "true" Then
Var Menu11Selected = "PressForever"
Var Menu7Selected = "Invisible"
Else
Var Menu11Selected = "Invisible"
Var Menu7Selected = "PressForever"
EndIf
SAVELOG PreviseXMLFileName2
Var Timeout = 0
<?hurr
#include=menu_catalog_new_menu.py
?>
</EventOpen>
<?hurr
#include=menu_catalog_new.py
?>
<?hurr
#include=menu_new_layout_gen_v2.py
?>
<?hurr
#include=menu_new_layout_gen.py
?>
</Popup>

View file

@ -0,0 +1,667 @@
<Popup>
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
<Background> "0xEFEDEA" </Background>
<Volume> SoundVolume </Volume>
<Refresh> "Partial" </Refresh>
<EventOpen>
; On open
DEBUGVAR "Open page_check_member HongKong"
Var Timeout = 0
Var TelephoneNumber = ""
Var ShowTextNumber = "Enable"
Var ShowErrorText = "Invisible"
Var ShowErrorText2 = "Invisible"
Var Tel_Confirm_State = "Invisible"
Var GetCreditFlag = 0
Var DirImage = "ROOT/taobin_project/image/collectiing_en"
Var Xtext19 = 154
Var show_btp = "ROOT/taobin_project/image/bn_thai_lang_press.png"
Var show_btn = "ROOT/taobin_project/image/bn_thai_lang.png"
Var StepX = 2
Var TaobinCredit = 0
PlayLong "/mnt/sdcard/coffeevending/taobin_project/sound_eng/Please_enter_your_mobile_to_credit_balance.mp3"
</EventOpen>
<EventLanguageOnChange>
DEBUGVAR LanguageShow
If LanguageShow = "ENG" Then
EndIf
If LanguageShow = "THAI" Then
EndIf
Refresh
</EventLanguageOnChange>
<Timeout> 1000 </Timeout>
<EventTimeout>
Var Timeout = Timeout + 1
If Timeout > 30 Then
Open "ROOT/taobin_project/xml/page_catalog.lxml"
EndIf
TimerReset
</EventTimeout>
<EventIDCard>
</EventIDCard>
<EventActionOk>
If StepX = 0 Then
If Ext1a = "ok" Then
Var TaobinName = Ext1d
Var TaobinCoupons = Ext1g
Var TaobinExpire = Ext1f
Var TaobinLevel = Ext1e
Var TNumberTaobinMemberXXX = TelephoneNumber
Var CoffeePointRank = Ext1b
INT CoffeePointRank
Var CoffeePointRankTmp = CoffeePointRank
GETACCEXT TelephoneNumber 15
Var StepX = 1
Else
Var ShowErrorText = "Enable"
EndIf
Else
If StepX = 1 Then
Var PolygonST1 = "Invisible"
Var PolygonST2 = "Invisible"
Var CouponSTA = "Invisible"
Var CouponSTB = "Invisible"
Var CouponPage = 1
Var MakeDrinkState = 0
Var CouponInfo1 = Ext1a
Var CouponInfo2 = Ext1b
Var CouponInfo3 = Ext1c
Var CouponInfo4 = Ext1d
Var CouponInfo5 = Ext1e
Var CouponInfo6 = Ext1f
Var CouponInfo7 = Ext1g
Var CouponInfo8 = Ext1h
Var CouponInfo9 = Ext1i
Var CouponInfo10 = Ext1j
Var CheckMemberPage2 = CountryRootPath + "xml/page_check_member2.lxml"
Open CheckMemberPage2
;GETACCEXT TelephoneNumber 13
;Var StepX = 2
Else
Var CouponPage = 1
Var MakeDrinkState = 0
;Var TaobinCredit = Ext1b
;GETACCEXT TelephoneNumber 14
;Var StepX = 0
;Open "ROOT/taobin_project/xml/page_check_member1.xml"
If Ext1a = "ok" Then
Var CheckMemberPage1 = CountryRootPath + "xml/page_check_member1.lxml"
Open CheckMemberPage1
Else
If Ext1a = "new customer" Then
Var CheckNewMember1 = CountryRootPath + "xml/page_check_newmember1.lxml"
Open CheckNewMember1
EndIf
EndIf
EndIf
EndIf
Refresh
</EventActionOk>
<EventActionError>
Var ShowErrorText = "Enable"
Refresh
</EventActionError>
<Button>
<X> 333 </X>
<Y> 1004 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_1.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_1.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var TelephoneNumber = TelephoneNumber + "1"
Var ShowTextNumber = "Invisible"
Trim TelephoneNumber MaxPhoneNumber
StrLen TelephoneNumber TelNumLen
If TelNumLen >= MinPhoneNumber Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
Var ShowErrorText2 = "Invisible"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 477 </X>
<Y> 1004 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_2.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_2.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var TelephoneNumber = TelephoneNumber + "2"
Var ShowTextNumber = "Invisible"
Trim TelephoneNumber MaxPhoneNumber
TimerReset
Refresh
StrLen TelephoneNumber TelNumLen
If TelNumLen >= MinPhoneNumber Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
Var ShowErrorText2 = "Invisible"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 620 </X>
<Y> 1004 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_3.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_3.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var TelephoneNumber = TelephoneNumber + "3"
Var ShowTextNumber = "Invisible"
Trim TelephoneNumber MaxPhoneNumber
TimerReset
Refresh
StrLen TelephoneNumber TelNumLen
If TelNumLen >= MinPhoneNumber Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
Var ShowErrorText2 = "Invisible"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 333 </X>
<Y> 1148 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_4.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_4.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var TelephoneNumber = TelephoneNumber + "4"
Var ShowTextNumber = "Invisible"
Trim TelephoneNumber MaxPhoneNumber
TimerReset
Refresh
StrLen TelephoneNumber TelNumLen
If TelNumLen >= MinPhoneNumber Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
Var ShowErrorText2 = "Invisible"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 477 </X>
<Y> 1148 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_5.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_5.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var TelephoneNumber = TelephoneNumber + "5"
Var ShowTextNumber = "Invisible"
Trim TelephoneNumber MaxPhoneNumber
TimerReset
Refresh
StrLen TelephoneNumber TelNumLen
If TelNumLen >= MinPhoneNumber Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
Var ShowErrorText2 = "Invisible"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 620 </X>
<Y> 1148 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_6.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_6.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var TelephoneNumber = TelephoneNumber + "6"
Var ShowTextNumber = "Invisible"
Trim TelephoneNumber MaxPhoneNumber
TimerReset
Refresh
StrLen TelephoneNumber TelNumLen
If TelNumLen >= MinPhoneNumber Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
Var ShowErrorText2 = "Invisible"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 333 </X>
<Y> 1292 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_7.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_7.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var TelephoneNumber = TelephoneNumber + "7"
Var ShowTextNumber = "Invisible"
Trim TelephoneNumber MaxPhoneNumber
TimerReset
Refresh
StrLen TelephoneNumber TelNumLen
If TelNumLen >= MinPhoneNumber Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
Var ShowErrorText2 = "Invisible"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 477 </X>
<Y> 1292 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_8.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_8.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var TelephoneNumber = TelephoneNumber + "8"
Var ShowTextNumber = "Invisible"
Trim TelephoneNumber MaxPhoneNumber
TimerReset
Refresh
StrLen TelephoneNumber TelNumLen
If TelNumLen >= MinPhoneNumber Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
Var ShowErrorText2 = "Invisible"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 620 </X>
<Y> 1292 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_9.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_9.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var TelephoneNumber = TelephoneNumber + "9"
Var ShowTextNumber = "Invisible"
Trim TelephoneNumber MaxPhoneNumber
TimerReset
Refresh
StrLen TelephoneNumber TelNumLen
If TelNumLen >= MinPhoneNumber Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
Var ShowErrorText2 = "Invisible"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 477 </X>
<Y> 1432 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_0.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_0.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var TelephoneNumber = TelephoneNumber + "0"
Trim TelephoneNumber MaxPhoneNumber
StrLen TelephoneNumber TelNumLen
If TelNumLen >= MinPhoneNumber Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowTextNumber = "Invisible"
TimerReset
Refresh
Var ShowErrorText = "Invisible"
Var ShowErrorText2 = "Invisible"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 620 </X>
<Y> 1432 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_back-1.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_back-1.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Trim TelephoneNumber -1
StrLen TelephoneNumber TelNumLen
If TelNumLen < MinPhoneNumber Then
Var Tel_Confirm_State = "Invisible"
EndIf
If TelNumLen = 0 Then
Var ShowTextNumber = "Enable"
EndIf
;Var ShowErrorText = "Invisible"
Var ShowErrorText2 = "Invisible"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 44 </X>
<Y> 1783 </Y>
<Filename> Var( DirImage + "/bn_back.png" )</Filename>
<FilenamePress> Var( DirImage + "/bp_back.png" )</FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Open "ROOT/taobin_project/xml/page_catalog.xml"
</EventClick>
</Button>
<Button>
<X> 750 </X>
<Y> 1783 </Y>
<Refresh> "Enable" </Refresh>
<State> Tel_Confirm_State </State>
<Filename> Var( DirImage + "/bn_confirm.png" ) </Filename>
<FilenamePress> Var( DirImage + "/bp_confirm.png" )</FilenamePress>
<FilenameDisable> Var( DirImage + "/bn_confirm.png" )</FilenameDisable>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Tel2DFlag = 0
Var Tel2D = TelephoneNumber
Trim Tel2D 1
If Tel2D = "0" Then
Var Tel2DFlag = 1
Else
; inter-accept-no-zero
If CountryName = "HongKong" Then
Var Tel2DFlag = 1
EndIf
EndIf
If Tel2DFlag = 1 Then
GETACCEXT TelephoneNumber 19
Else
Var ShowErrorText2 = "Enable"
;Var TelephoneNumber = ""
Var Tel_Confirm_State = "Invisible"
Refresh
EndIf
</EventClick>
</Button>
<Image>
<X> 217 </X>
<Y> 784 </Y>
<Filename> Var( DirImage + "/img3.png" ) </Filename>
</Image>
<Image>
<X> 349 </X>
<Y> 825 </Y>
<State> ShowTextNumber </State>
<Refresh> "Enable" </Refresh>
<Filename> Var( DirImage + "/text15.png" )</Filename>
</Image>
<Image>
<X> 248 </X>
<Y> 800 </Y>
<State> ShowTextNumber </State>
<Refresh> "Enable" </Refresh>
<Filename> Var( DirImage + "/Group.png" )</Filename>
</Image>
<Text>
<X> 0 </X>
<Y> 797 </Y>
<Width> 1080 </Width>
<Align> Center </Align>
<Size> 62 </Size>
<Font> RobotoBlack </Font>
<Color> 0x513C2F </Color>
<Refresh> "Enable" </Refresh>
<Value> TelephoneNumber </Value>
<Format> Telnum-mask-3 </Format>
</Text>
<Image>
<X> Xtext19 </X>
<Y> 521 </Y>
<Filename> Var( DirImage + "/text_19.png" )</Filename>
</Image>
<Image>
<X> 430 </X>
<Y> 942 </Y>
<State> ShowErrorText </State>
<Refresh> "Enable" </Refresh>
<Filename> Var( DirImage + "/text_show_notfound.png") </Filename>
</Image>
<Image>
<X> 152 </X>
<Y> 910 </Y>
<State> ShowErrorText2 </State>
<Refresh> "Enable" </Refresh>
<Filename> Var( DirImage + "/text_show_error5.png") </Filename>
</Image>
<Video>
<X> 0 </X>
<Y> 0 </Y>
<Width> 1080</Width>
<Height> 380 </Height>
<Loop> "true" </Loop>
<Filename> video_menu_0 </Filename>
</Video>
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
</EventSecurity>
<EventMachine>
</EventMachine>
<EventUnitTest1>
Var CheckNewMemberPage1 = CountryRootPath + "xml/page_check_newmember1.lxml"
Open CheckNewMemberPage1
</EventUnitTest1>
<EventUnitTest2>
Var DebugStayInPage = 1
DEBUGVAR DebugStayInPage
Open "ROOT/taobin_project/inter/hk/xml/page_collect_point_3.lxml"
</EventUnitTest2>
<EventUnitTest4>
Var CheckMemberPage1 = CountryRootPath + "xml/page_check_member1.lxml"
Open CheckMemberPage1
</EventUnitTest4>
</Popup>

View file

@ -0,0 +1,853 @@
<Popup>
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<Refresh> "Partial" </Refresh>
<EventOpen>
; On open
Var Timeout = 0
Var TimeoutSMS = 0
Var StateBGetSMS = "Enable"
Var ShowSentSmsText = "Invisible"
Var ShowTextNumber1 = "Invisible"
Var ShowTextNumber2 = "Invisible"
Var ShowTextNumber3 = "Invisible"
Var ShowTextNumber4 = "Invisible"
Var ShowText = "Enable"
Var ShowErrorText = "Invisible"
Var Tel_Confirm_State = "Invisible"
Var PinNumber = ""
Var ReqFlag = 0
Var DirImage = "ROOT/taobin_project/image/collectiing_en"
Var Xtext = 246
Var Ext1a = ""
Var GetAccFlag = 0
Var StepX = 0
PlayLong "/mnt/sdcard/coffeevending/taobin_project/sound_eng/Please_enter_your_4_digits_pin.mp3"
Var UseHKCollectFlag = 1
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
Var Timeout = Timeout + 1
If Timeout > 30 Then
Var CheckMemberPage = CountryRootPath + "xml/page_check_member.lxml"
Open CheckMemberPage
EndIf
TimerReset
Refresh
</EventTimeout>
<EventActionOk>
If StepX = 1 Then
If Ext1a = "ok" Then
Var TaobinName = Ext1d
Var TaobinCoupons = Ext1g
Var TaobinExpire = Ext1f
Var TaobinLevel = Ext1e
Var TNumberTaobinMemberXXX = TelephoneNumber
Var CoffeePointRank = Ext1b
INT CoffeePointRank
Var CoffeePointRankTmp = CoffeePointRank
GETACCEXT TelephoneNumber 15
Var StepX = 2
Var Ext1a = ""
Else
Var ShowErrorText = "Enable"
Var ShowText = "Invisible"
EndIf
Else
If StepX = 2 Then
Var PolygonST1 = "Invisible"
Var PolygonST2 = "Invisible"
Var CouponSTA = "Invisible"
Var CouponSTB = "Invisible"
Var CouponPage = 1
Var MakeDrinkState = 0
Var CouponInfo1 = Ext1a
Var CouponInfo2 = Ext1b
Var CouponInfo3 = Ext1c
Var CouponInfo4 = Ext1d
Var CouponInfo5 = Ext1e
Var CouponInfo6 = Ext1f
Var CouponInfo7 = Ext1g
Var CouponInfo8 = Ext1h
Var CouponInfo9 = Ext1i
Var CouponInfo10 = Ext1j
Var CheckMemberPage2 = CountryRootPath + "xml/page_check_member2.lxml"
Open CheckMemberPage2
EndIf
EndIf
If GetAccFlag = 1 Then
Var GetAccFlag = 0
If Ext1a = "ok" Then
Var TaobinCredit = Ext1b
If UseHKCollectFlag = 1 Then
Var param1 = "HK/" + TelephoneNumber
Var param1 = param1 + "/-"
Var param1 = param1 + "/-"
Var param1 = param1 + "/-"
Var param1 = param1 + "/-"
DEBUGVAR param1
GETACCEXT param1 35
Else
GETACCEXT TelephoneNumber 14
EndIf
Var StepX = 1
Var Ext1a = ""
;Open "ROOT/taobin_project/xml/page_check_member2.xml"
Else
Var ShowErrorText = "Enable"
Var ShowText = "Invisible"
Var ShowTextNumber1 = "Invisible"
Var ShowTextNumber2 = "Invisible"
Var ShowTextNumber3 = "Invisible"
Var ShowTextNumber4 = "Invisible"
Var PinNumber = ""
Var Tel_Confirm_State = "Invisible"
EndIf
EndIf
Refresh
</EventActionOk>
<EventActionError>
If GetAccFlag = 1 Then
Var ShowErrorText = "Enable"
Var ShowText = "Invisible"
Var GetAccFlag = 0
Var ShowTextNumber1 = "Invisible"
Var ShowTextNumber2 = "Invisible"
Var ShowTextNumber3 = "Invisible"
Var ShowTextNumber4 = "Invisible"
Var PinNumber = ""
Var Tel_Confirm_State = "Invisible"
EndIf
If StepX = 1 Then
Var ShowErrorText = "Enable"
Var ShowText = "Invisible"
EndIf
If StepX = 2 Then
Var ShowErrorText = "Enable"
Var ShowText = "Invisible"
EndIf
Refresh
</EventActionError>
<Image>
<X> 0 </X>
<Y> 380 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/alpha.png" </Filename>
</Image>
<Image>
<X> 158 </X>
<Y> 601 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/img_popup1.png" </Filename>
</Image>
<Button>
<X> 333 </X>
<Y> 1004 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_1.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_1.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var PinNumber = PinNumber + "1"
Var ShowTextNumber = "Invisible"
Trim PinNumber 4
StrLen PinNumber TelNumLen
If TelNumLen >= 4 Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
Var ShowText = "Enable"
If TelNumLen > 0 Then
Var ShowTextNumber1 = "Enable"
EndIf
If TelNumLen > 1 Then
Var ShowTextNumber2= "Enable"
EndIf
If TelNumLen > 2 Then
Var ShowTextNumber3= "Enable"
EndIf
If TelNumLen > 3 Then
Var ShowTextNumber4= "Enable"
EndIf
Var ShowSentSmsText = "Invisible"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 477 </X>
<Y> 1004 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_2.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_2.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var PinNumber = PinNumber + "2"
Var ShowTextNumber = "Invisible"
Trim PinNumber 4
StrLen PinNumber TelNumLen
If TelNumLen >= 4 Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
Var ShowText = "Enable"
If TelNumLen > 0 Then
Var ShowTextNumber1 = "Enable"
EndIf
If TelNumLen > 1 Then
Var ShowTextNumber2= "Enable"
EndIf
If TelNumLen > 2 Then
Var ShowTextNumber3= "Enable"
EndIf
If TelNumLen > 3 Then
Var ShowTextNumber4= "Enable"
EndIf
Var ShowSentSmsText = "Invisible"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 620 </X>
<Y> 1004 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_3.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_3.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var PinNumber = PinNumber + "3"
Var ShowTextNumber = "Invisible"
Trim PinNumber 4
StrLen PinNumber TelNumLen
If TelNumLen >= 4 Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
Var ShowText = "Enable"
If TelNumLen > 0 Then
Var ShowTextNumber1 = "Enable"
EndIf
If TelNumLen > 1 Then
Var ShowTextNumber2= "Enable"
EndIf
If TelNumLen > 2 Then
Var ShowTextNumber3= "Enable"
EndIf
If TelNumLen > 3 Then
Var ShowTextNumber4= "Enable"
EndIf
Var ShowSentSmsText = "Invisible"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 333 </X>
<Y> 1148 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_4.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_4.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var PinNumber = PinNumber + "4"
Var ShowTextNumber = "Invisible"
Trim PinNumber 4
StrLen PinNumber TelNumLen
If TelNumLen >= 4 Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
Var ShowText = "Enable"
If TelNumLen > 0 Then
Var ShowTextNumber1 = "Enable"
EndIf
If TelNumLen > 1 Then
Var ShowTextNumber2= "Enable"
EndIf
If TelNumLen > 2 Then
Var ShowTextNumber3= "Enable"
EndIf
If TelNumLen > 3 Then
Var ShowTextNumber4= "Enable"
EndIf
Var ShowSentSmsText = "Invisible"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 477 </X>
<Y> 1148 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_5.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_5.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var PinNumber = PinNumber + "5"
Var ShowTextNumber = "Invisible"
Trim PinNumber 4
StrLen PinNumber TelNumLen
If TelNumLen >= 4 Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
Var ShowText = "Enable"
If TelNumLen > 0 Then
Var ShowTextNumber1 = "Enable"
EndIf
If TelNumLen > 1 Then
Var ShowTextNumber2= "Enable"
EndIf
If TelNumLen > 2 Then
Var ShowTextNumber3= "Enable"
EndIf
If TelNumLen > 3 Then
Var ShowTextNumber4= "Enable"
EndIf
Var ShowSentSmsText = "Invisible"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 620 </X>
<Y> 1148 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_6.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_6.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var PinNumber = PinNumber + "6"
Var ShowTextNumber = "Invisible"
Trim PinNumber 4
StrLen PinNumber TelNumLen
If TelNumLen >= 4 Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
Var ShowText = "Enable"
If TelNumLen > 0 Then
Var ShowTextNumber1 = "Enable"
EndIf
If TelNumLen > 1 Then
Var ShowTextNumber2= "Enable"
EndIf
If TelNumLen > 2 Then
Var ShowTextNumber3= "Enable"
EndIf
If TelNumLen > 3 Then
Var ShowTextNumber4= "Enable"
EndIf
Var ShowSentSmsText = "Invisible"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 333 </X>
<Y> 1292 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_7.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_7.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var PinNumber = PinNumber + "7"
Var ShowTextNumber = "Invisible"
Trim PinNumber 4
StrLen PinNumber TelNumLen
If TelNumLen >= 4 Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
Var ShowText = "Enable"
If TelNumLen > 0 Then
Var ShowTextNumber1 = "Enable"
EndIf
If TelNumLen > 1 Then
Var ShowTextNumber2= "Enable"
EndIf
If TelNumLen > 2 Then
Var ShowTextNumber3= "Enable"
EndIf
If TelNumLen > 3 Then
Var ShowTextNumber4= "Enable"
EndIf
Var ShowSentSmsText = "Invisible"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 477 </X>
<Y> 1292 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_8.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_8.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var PinNumber = PinNumber + "8"
Var ShowTextNumber = "Invisible"
Trim PinNumber 4
StrLen PinNumber TelNumLen
If TelNumLen >= 4 Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
Var ShowText = "Enable"
If TelNumLen > 0 Then
Var ShowTextNumber1 = "Enable"
EndIf
If TelNumLen > 1 Then
Var ShowTextNumber2= "Enable"
EndIf
If TelNumLen > 2 Then
Var ShowTextNumber3= "Enable"
EndIf
If TelNumLen > 3 Then
Var ShowTextNumber4= "Enable"
EndIf
Var ShowSentSmsText = "Invisible"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 620 </X>
<Y> 1292 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_9.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_9.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var PinNumber = PinNumber + "9"
Var ShowTextNumber = "Invisible"
Trim PinNumber 4
StrLen PinNumber TelNumLen
If TelNumLen >= 4 Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
Var ShowText = "Enable"
If TelNumLen > 0 Then
Var ShowTextNumber1 = "Enable"
EndIf
If TelNumLen > 1 Then
Var ShowTextNumber2= "Enable"
EndIf
If TelNumLen > 2 Then
Var ShowTextNumber3= "Enable"
EndIf
If TelNumLen > 3 Then
Var ShowTextNumber4= "Enable"
EndIf
Var ShowSentSmsText = "Invisible"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 477 </X>
<Y> 1432 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_0.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_0.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var PinNumber = PinNumber + "0"
Trim PinNumber 4
StrLen PinNumber TelNumLen
If TelNumLen >= 4 Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowTextNumber = "Invisible"
Var ShowErrorText = "Invisible"
Var ShowText = "Enable"
If TelNumLen > 0 Then
Var ShowTextNumber1 = "Enable"
EndIf
If TelNumLen > 1 Then
Var ShowTextNumber2= "Enable"
EndIf
If TelNumLen > 2 Then
Var ShowTextNumber3= "Enable"
EndIf
If TelNumLen > 3 Then
Var ShowTextNumber4= "Enable"
EndIf
Var ShowSentSmsText = "Invisible"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 620 </X>
<Y> 1432 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_back-1.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_back-1.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Trim PinNumber -1
Var Tel_Confirm_State = "Invisible"
StrLen PinNumber TelNumLen
If TelNumLen = 0 Then
Var ShowTextNumber = "Enable"
EndIf
;Var ShowErrorText = "Invisible"
TimerReset
Refresh
If TelNumLen < 1 Then
Var ShowTextNumber1 = "Invisible"
EndIf
If TelNumLen < 2 Then
Var ShowTextNumber2= "Invisible"
EndIf
If TelNumLen < 3 Then
Var ShowTextNumber3= "Invisible"
EndIf
If TelNumLen < 4 Then
Var ShowTextNumber4= "Invisible"
EndIf
Var ShowSentSmsText = "Invisible"
Var ShowErrorText = "Invisible"
Var ShowText = "Enable"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 398 </X>
<Y> 1600 </Y>
<Refresh> "Enable" </Refresh>
<State> Tel_Confirm_State </State>
<Filename> Var( DirImage + "/bn_confirm.png" ) </Filename>
<FilenamePress> Var( DirImage + "/bp_confirm.png" )</FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
If GetAccFlag = 0 Then
Var DataTmp = TelephoneNumber + "/"
Var DataTmp = DataTmp + PinNumber
GETACCEXT DataTmp 19
Var GetAccFlag = 1
EndIf
</EventClick>
</Button>
<Button>
<X> 333 </X>
<Y> 1432 </Y>
<Filename> Var( DirImage + "/bn_getPin.png") </Filename>
<FilenamePress> Var( DirImage + "/bp_getPin.png") </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var BmiYear = ""
Var PointCrm = ""
Var GetScore = ""
AddData 13 TelephoneNumber BmiYear PointCrm GetScore
Var PinSMSFlag = 1
Var ChangePinPageSMS = CountryRootPath + "xml/page_payment_changePinSMS.lxml"
Open ChangePinPageSMS
</EventClick>
</Button>
<Image>
<X> 242 </X>
<Y> 830 </Y>
<Filename> Var( DirImage + "/img4.png" ) </Filename>
</Image>
<Image>
<X> 289 </X>
<Y> 870 </Y>
<State> ShowTextNumber1 </State>
<Refresh> "Enable" </Refresh>
<Filename> Var( DirImage + "/text_X.png" )</Filename>
</Image>
<Image>
<X> 446 </X>
<Y> 870 </Y>
<State> ShowTextNumber2 </State>
<Refresh> "Enable" </Refresh>
<Filename> Var( DirImage + "/text_X.png" )</Filename>
</Image>
<Image>
<X> 603 </X>
<Y> 870 </Y>
<State> ShowTextNumber3 </State>
<Refresh> "Enable" </Refresh>
<Filename> Var( DirImage + "/text_X.png" )</Filename>
</Image>
<Image>
<X> 758 </X>
<Y> 870 </Y>
<State> ShowTextNumber4 </State>
<Refresh> "Enable" </Refresh>
<Filename> Var( DirImage + "/text_X.png" )</Filename>
</Image>
<Image>
<X> 188 </X>
<Y> 640 </Y>
<Refresh> "Enable" </Refresh>
<State> ShowText </State>
<Filename> Var( DirImage + "/text_16.png" )</Filename>
</Image>
<Image>
<X> 188 </X>
<Y> 638 </Y>
<Refresh> "Enable" </Refresh>
<State> ShowErrorText </State>
<Filename> Var( DirImage + "/text_25.png") </Filename>
</Image>
<Button>
<X> 859 </X>
<Y> 628 </Y>
<Filename> Var( DirImage + "/Exit.png" ) </Filename>
<FilenamePress> Var( DirImage + "/Exit.png" )</FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var CheckMemberPage = CountryRootPath + "xml/page_check_member.lxml"
Open CheckMemberPage
</EventClick>
</Button>
<Video>
<X> 0 </X>
<Y> 0 </Y>
<Width> 1080</Width>
<Height> 380 </Height>
<Loop> "true" </Loop>
<Filename> video_menu_0 </Filename>
</Video>
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
</EventSecurity>
<EventUnitTest4>
Var CheckMemberPage2 = CountryRootPath + "xml/page_check_member2.lxml"
Open CheckMemberPage2
</EventUnitTest4>
</Popup>

View file

@ -0,0 +1,849 @@
<Popup>
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
; On open
Var Timeout = 0
Var DirImage = "ROOT/taobin_project/image/display_point_en"
Var page_doing_show_time_image = "ROOT/taobin_project/image/page_doing/img2.png"
Var show_btp = "ROOT/taobin_project/image/bn_thai_lang_press.png"
Var show_btn = "ROOT/taobin_project/image/bn_thai_lang.png"
Var CoffeePointRank = CoffeePointRankTmp
;Var PointDiff = 150 - CoffeePointRank
Var TaobinExpireDay = ""
Var TaobinExpireMonth = ""
Var TaobinExpireMonthX = ""
Var TaobinExpireYear = ""
Var buttonState = "Enable"
If MakeDrinkState = 1 Then
Var buttonState = "Invisible"
EndIf
SPLIT TaobinExpire "/" 1 TaobinExpireDay
SPLIT TaobinExpire "/" 2 TaobinExpireMonth
SPLIT TaobinExpire "/" 3 TaobinExpireYear
If TaobinExpireMonth = "01" Then
Var TaobinExpireMonth = "Jan"
Var TaobinExpireMonthX = "January"
EndIf
If TaobinExpireMonth = "02" Then
Var TaobinExpireMonth = "Feb"
Var TaobinExpireMonthX = "February"
EndIf
If TaobinExpireMonth = "03" Then
Var TaobinExpireMonth = "Mar"
Var TaobinExpireMonthX = "March"
EndIf
If TaobinExpireMonth = "04" Then
Var TaobinExpireMonth = "Apr"
Var TaobinExpireMonthX = "April"
EndIf
If TaobinExpireMonth = "05" Then
Var TaobinExpireMonth = "May"
Var TaobinExpireMonthX = "May"
EndIf
If TaobinExpireMonth = "06" Then
Var TaobinExpireMonth = "Jun"
Var TaobinExpireMonthX = "June"
EndIf
If TaobinExpireMonth = "07" Then
Var TaobinExpireMonth = "Jul"
Var TaobinExpireMonthX = "July"
EndIf
If TaobinExpireMonth = "08" Then
Var TaobinExpireMonth = "Aug"
Var TaobinExpireMonthX = "August"
EndIf
If TaobinExpireMonth = "09" Then
Var TaobinExpireMonth = "Sep"
Var TaobinExpireMonthX = "September"
EndIf
If TaobinExpireMonth = "10" Then
Var TaobinExpireMonth = "Oct"
Var TaobinExpireMonthX = "October"
EndIf
If TaobinExpireMonth = "11" Then
Var TaobinExpireMonth = "Nov"
Var TaobinExpireMonthX = "November"
EndIf
If TaobinExpireMonth = "12" Then
Var TaobinExpireMonth = "Dec"
Var TaobinExpireMonthX = "December"
EndIf
INT TaobinExpireYear
INT TaobinExpireDay
Var TaobinExpireYear = TaobinExpireYear + 0
Var ExpireStrTmp = ""
Var ExpireStrTmp = ExpireStrTmp + TaobinExpireDay
Var ExpireStrTmp = ExpireStrTmp + " "
Var ExpireStrTmp = ExpireStrTmp + TaobinExpireMonth
Var ExpireStrTmp = ExpireStrTmp + " "
Var ExpireStrTmp = ExpireStrTmp + TaobinExpireYear
;If TaobinLevel = "1" Then
; Var TaobinLevelDesc1 = "Shy turtle level"
; Var TaobinLevelDesc2 = ""
; Var TaobinLeveImg = "/taoLevel1.png"
;EndIf
If TaobinLevel = "1" Then
Var TaobinLevelDesc1 = "Walking turtle level"
Var PointDiff = 150 - CoffeePointRank
Var TaobinLevelDesc2 = "Earn " + PointDiff
Var TaobinLevelDesc2 = TaobinLevelDesc2 + " shells "
Var TaobinLevelDesc2 = TaobinLevelDesc2 + "to move to Flying turtle level"
Var TaobinLeveImg = "/taoLevel2.png"
If CoffeePointRank > 149 Then
;Var TaobinLeveImg = "/taoLevel3.png"
;Var TaobinLevelDesc1 = "Flying turtle level "
Var TaobinLevelDesc2 = ""
;Var CoffeePointRank = CoffeePointRank - 150
EndIf
EndIf
If TaobinLevel = "2" Then
Var TaobinLevelDesc1 = "Flying turtle level until " + ExpireStrTmp
Var PointDiff = 350 - CoffeePointRank
Var TaobinLevelDesc2 = "Earn " + PointDiff
Var TaobinLevelDesc2 = TaobinLevelDesc2 + " shells "
Var TaobinLevelDesc2 = TaobinLevelDesc2 + "to move to Master turtle level"
Var TaobinLeveImg = "/taoLevel3.png"
If CoffeePointRank > 349 Then
;Var TaobinLeveImg = "/taoLevel4.png"
;Var TaobinLevelDesc1 = "Master turtle level "
Var TaobinLevelDesc2 = ""
;Var CoffeePointRank = CoffeePointRank - 350
EndIf
EndIf
If TaobinLevel = "3" Then
Var TaobinLevelDesc1 = "Master turtle level until " + ExpireStrTmp
Var TaobinLevelDesc2 = ""
Var TaobinLeveImg = "/taoLevel4.png"
EndIf
Var PolygonST1 = "Invisible"
Var PolygonST2 = "Invisible"
;Var CouponInfo1 = Ext1a
;Var CouponInfo2 = Ext1b
;Var CouponInfo3 = Ext1c
;Var CouponInfo4 = Ext1d
;Var CouponInfo5 = Ext1e
;Var CouponInfo6 = Ext1f
;Var CouponInfo7 = Ext1g
;Var CouponInfo8 = Ext1h
;Var CouponInfo9 = Ext1i
;Var CouponInfo10 = Ext1j
Var CouponInfoA = ""
Var CouponInfoB = ""
Var CouponSTA = "Invisible"
Var CouponSTB = "Invisible"
Var CouponExpireA = ""
Var CouponExpireB = ""
Var CouponIDA = ""
Var CouponIDB = ""
DEBUGVAR CouponInfoA
DEBUGVAR CouponInfoB
Var CouponNum = TaobinCoupons
If CouponPage = 1 Then
If CouponInfo3 = "" Then
Else
Var PolygonST2 = "Enable"
EndIf
Var PolygonST1 = "Invisible"
Var CouponInfoA = CouponInfo1
Var CouponInfoB = CouponInfo2
SPLIT CouponInfoA "/" 1 CouponIDA
SPLIT CouponInfoB "/" 1 CouponIDB
EndIf
If CouponPage = 2 Then
If CouponInfo5 = "" Then
Else
Var PolygonST2 = "Enable"
EndIf
Var PolygonST1 = "Enable"
Var CouponInfoA = CouponInfo3
Var CouponInfoB = CouponInfo4
SPLIT CouponInfoA "/" 1 CouponIDA
SPLIT CouponInfoB "/" 1 CouponIDB
EndIf
If CouponPage = 3 Then
If CouponInfo7 = "" Then
Else
Var PolygonST2 = "Enable"
EndIf
Var PolygonST1 = "Enable"
Var CouponInfoA = CouponInfo5
Var CouponInfoB = CouponInfo6
SPLIT CouponInfoA "/" 1 CouponIDA
SPLIT CouponInfoB "/" 1 CouponIDB
EndIf
If CouponPage = 4 Then
If CouponInfo9 = "" Then
Else
Var PolygonST2 = "Enable"
EndIf
Var PolygonST1 = "Enable"
Var CouponInfoA = CouponInfo7
Var CouponInfoB = CouponInfo8
SPLIT CouponInfoA "/" 1 CouponIDA
SPLIT CouponInfoB "/" 1 CouponIDB
EndIf
If CouponPage = 5 Then
Var PolygonST1 = "Enable"
Var PolygonST2 = "Invisible"
Var CouponInfoA = CouponInfo9
Var CouponInfoB = CouponInfo10
SPLIT CouponInfoA "/" 1 CouponIDA
SPLIT CouponInfoB "/" 1 CouponIDB
EndIf
If CouponIDA = "" Then
Else
Var CouponSTA = "Enable"
Var CouponExireA_D = ""
Var CouponExireA_M = ""
Var CouponExireA_Y = ""
Var CouponTypeA = ""
Var CouponNameA = ""
SPLIT CouponInfoA "/" 2 CouponTypeA
SPLIT CouponInfoA "/" 4 CouponExireA_D
SPLIT CouponInfoA "/" 5 CouponExireA_M
SPLIT CouponInfoA "/" 6 CouponExireA_Y
If CouponTypeA = "100" Then
Var CouponNameA = "/imgCouponC33.png"
EndIf
If CouponTypeA = "101" Then
Var CouponNameA = "/imgCouponC44.png"
EndIf
If CouponTypeA = "102" Then
Var CouponNameA = "/imgCouponC39.png"
EndIf
If CouponTypeA = "103" Then
Var CouponNameA = "/imgCouponC40.png"
EndIf
If CouponTypeA = "105" Then
Var CouponNameA = "/imgCouponC38.png"
EndIf
If CouponTypeA = "106" Then
Var CouponNameA = "/imgCouponC41.png"
EndIf
If CouponTypeA = "107" Then
Var CouponNameA = "/imgCouponC42.png"
EndIf
If CouponTypeA = "109" Then
Var CouponNameA = "/imgCouponC33.png"
EndIf
If CouponTypeA = "112" Then
Var CouponNameA = "/imgCoupon112.png"
EndIf
If CouponTypeA = "113" Then
Var CouponNameA = "/imgCoupon113.png"
EndIf
INT CouponExireA_D
INT CouponExireA_Y
Var CouponExireA_Y = CouponExireA_Y + 0
If CouponExireA_M = "01" Then
Var CouponExireA_M = "January"
EndIf
If CouponExireA_M = "02" Then
Var CouponExireA_M = "February"
EndIf
If CouponExireA_M = "03" Then
Var CouponExireA_M = "March"
EndIf
If CouponExireA_M = "04" Then
Var CouponExireA_M = "April"
EndIf
If CouponExireA_M = "05" Then
Var CouponExireA_M = "May"
EndIf
If CouponExireA_M = "06" Then
Var CouponExireA_M = "June"
EndIf
If CouponExireA_M = "07" Then
Var CouponExireA_M = "July"
EndIf
If CouponExireA_M = "08" Then
Var CouponExireA_M = "August"
EndIf
If CouponExireA_M = "09" Then
Var CouponExireA_M = "September"
EndIf
If CouponExireA_M = "10" Then
Var CouponExireA_M = "October"
EndIf
If CouponExireA_M = "11" Then
Var CouponExireA_M = "November"
EndIf
If CouponExireA_M = "12" Then
Var CouponExireA_M = "December"
EndIf
Var CouponExpireA = CouponExpireA + CouponExireA_D
Var CouponExpireA = CouponExpireA + " "
Var CouponExpireA = CouponExpireA + CouponExireA_M
Var CouponExpireA = CouponExpireA + " "
Var CouponExpireA = CouponExpireA + CouponExireA_Y
Var CouponExpireA = "Expires " + CouponExpireA
EndIf
If CouponIDB = "" Then
Else
Var CouponSTB = "Enable"
Var CouponExireB_D = ""
Var CouponExireB_M = ""
Var CouponExireB_Y = ""
Var CouponTypeB = ""
Var CouponNameB = ""
SPLIT CouponInfoB "/" 2 CouponTypeB
SPLIT CouponInfoB "/" 4 CouponExireB_D
SPLIT CouponInfoB "/" 5 CouponExireB_M
SPLIT CouponInfoB "/" 6 CouponExireB_Y
If CouponTypeB = "100" Then
Var CouponNameB = "/imgCouponC33.png"
EndIf
If CouponTypeB = "101" Then
Var CouponNameB = "/imgCouponC44.png"
EndIf
If CouponTypeB = "102" Then
Var CouponNameB = "/imgCouponC39.png"
EndIf
If CouponTypeB = "103" Then
Var CouponNameB = "/imgCouponC40.png"
EndIf
If CouponTypeB = "105" Then
Var CouponNameB = "/imgCouponC38.png"
EndIf
If CouponTypeB = "106" Then
Var CouponNameB = "/imgCouponC41.png"
EndIf
If CouponTypeB = "107" Then
Var CouponNameB = "/imgCouponC42.png"
EndIf
If CouponTypeB = "109" Then
Var CouponNameB = "/imgCouponC33.png"
EndIf
If CouponTypeB = "112" Then
Var CouponNameB = "/imgCoupon112.png"
EndIf
If CouponTypeB = "113" Then
Var CouponNameB = "/imgCoupon113.png"
EndIf
INT CouponExireB_D
INT CouponExireB_Y
Var CouponExireB_Y = CouponExireB_Y + 0
If CouponExireB_M = "01" Then
Var CouponExireB_M = "January"
EndIf
If CouponExireB_M = "02" Then
Var CouponExireB_M = "February"
EndIf
If CouponExireB_M = "03" Then
Var CouponExireB_M = "March"
EndIf
If CouponExireB_M = "04" Then
Var CouponExireB_M = "April"
EndIf
If CouponExireB_M = "05" Then
Var CouponExireB_M = "May"
EndIf
If CouponExireB_M = "06" Then
Var CouponExireB_M = "June"
EndIf
If CouponExireB_M = "07" Then
Var CouponExireB_M = "July"
EndIf
If CouponExireB_M = "08" Then
Var CouponExireB_M = "August"
EndIf
If CouponExireB_M = "09" Then
Var CouponExireB_M = "September"
EndIf
If CouponExireB_M = "10" Then
Var CouponExireB_M = "October"
EndIf
If CouponExireB_M = "11" Then
Var CouponExireB_M = "November"
EndIf
If CouponExireB_M = "12" Then
Var CouponExireB_M = "December"
EndIf
Var CouponExpireB = CouponExpireB + CouponExireB_D
Var CouponExpireB = CouponExpireB + " "
Var CouponExpireB = CouponExpireB + CouponExireB_M
Var CouponExpireB = CouponExpireB + " "
Var CouponExpireB = CouponExpireB + CouponExireB_Y
Var CouponExpireB = "Expires " + CouponExpireB
EndIf
Var CouponText = "Coupons (" + CouponNum
Var CouponText = CouponText + ")"
If MakeDrinkState = 1 Then
Var bn_exit = "/bn_cancel2.png"
Var bp_exit = "/bp_cancel2.png"
Else
Var bn_exit = "/bn_main.png"
Var bp_exit = "/bp_main.png"
EndIf
Var text5Img = "/text5-HKD.png"
INT TaobinCredit
Var TaobinCreditStr !assigned StringFmt( TaobinCredit, DisplayFormat, PreScaleConvertShow )
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
Var Timeout = Timeout + 1
If Timeout > 30 Then
If MakeDrinkState = 1 Then
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
Open "ROOT/taobin_project/xml/page_back_to_main.xml"
EndIf
TimerReset
Refresh
</EventTimeout>
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
</EventSecurity>
<EventActionOk>
Var CheckMemberPage2 = CountryRootPath + "xml/page_check_member2.lxml"
Open CheckMemberPage2
</EventActionOk>
<EventMachine>
If MachineStage = "drink-success" Then
Var MachineState_Result = 1
EndIf
If MachineStage = "drink-failed" Then
Var MachineState_Result = 2
EndIf
</EventMachine>
;<Image>
;<X> 0 </X>
;<Y> 0 </Y>
;<Filename> "ROOT/taobin_project/image/ad_medium_2.png" </Filename>
;</Image>
<Video>
<X> 0 </X>
<Y> 0 </Y>
<Width> 1080</Width>
<Height> 380 </Height>
<Loop> "true" </Loop>
<Filename> video_menu_0 </Filename>
</Video>
<Button>
<X> 433 </X>
<Y> 411 </Y>
<State> "Invisible" </State>
<Filename> Var( DirImage + "/bn_topupCredit.png" )</Filename>
<FilenamePress> Var( DirImage + "/bn_topupCredit.png" )</FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var MemberTopup = CountryRootPath + "xml/page_member_topup.lxml"
Open MemberTopup
</EventClick>
</Button>
<Button>
<X> 719 </X>
<Y> 411 </Y>
<State> buttonState </State>
<Filename> Var( DirImage + "/bn_changePin.png" )</Filename>
<FilenamePress> Var( DirImage + "/bn_changePin.png" )</FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var ChangePinPage1 = CountryRootPath + "xml/page_payment_changePin1.lxml"
Open ChangePinPage1
</EventClick>
</Button>
<Image>
<X> 162 </X>
<Y> 560 </Y>
<Filename> Var( DirImage + text5Img )</Filename>
</Image>
<Image>
<X> 617 </X>
<Y> 587 </Y>
<Filename> Var( DirImage + TaobinLeveImg )</Filename>
</Image>
;
<Text>
<X> 253 </X>
<Y> 669 </Y>
<Size> 35 </Size>
<Width> 1000 </Width>
<Font> KanitRegularTTF </Font>
<Color> 0xFFFFFF </Color>
<Value> TaobinName </Value>
</Text>
<Text>
<X> 253 </X>
<Y> 720 </Y>
<Size> 20 </Size>
<Width> 1000 </Width>
<Font> KanitRegularTTF </Font>
<Color> 0xFFFFFF </Color>
<Value> TNumberTaobinMemberXXX </Value>
<Format> Telnum-mask-3 </Format>
</Text>
<Text>
<X> 546 </X>
<Y> 865 </Y>
<Size> 70 </Size>
<Width> 384 </Width>
<Align> Center </Align>
<Font> KanitRegularTTF </Font>
<Color> 0xDE794E </Color>
<Value> CoffeePointRank </Value>
</Text>
<Text>
<X> 162 </X>
<Y> 865 </Y>
<Size> 70 </Size>
<Width> 384 </Width>
<Align> Center </Align>
<Font> KanitRegularTTF </Font>
<Color> 0xDE794E </Color>
<Value> TaobinCreditStr </Value>
</Text>
<Text>
<X> 159 </X>
<Y> 1000 </Y>
<Size> 25 </Size>
<Width> 1000 </Width>
<Font> KanitRegularTTF </Font>
<Color> 0xDE794E </Color>
<Value> TaobinLevelDesc1 </Value>
</Text>
<Text>
<X> 159 </X>
<Y> 1032 </Y>
<Size> 20 </Size>
<Width> 1000 </Width>
<Font> KanitRegularTTF </Font>
<Color> 0x746253 </Color>
<Value> TaobinLevelDesc2 </Value>
</Text>
<Button>
<X> 397 </X>
<Y> 1746 </Y>
<Filename> Var( DirImage + bn_exit )</Filename>
<FilenamePress> Var( DirImage + bp_exit )</FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
; goto lid straw
If MakeDrinkState = 1 Then
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
Open "ROOT/taobin_project/xml/page_back_to_main.xml"
</EventClick>
</Button>
<Text>
<X> 159 </X>
<Y> 1121 </Y>
<Size> 36 </Size>
<Width> 240 </Width>
<Font> KanitRegularTTF </Font>
<Color> 0x513C2F </Color>
<Value> CouponText </Value>
</Text>
<Button>
<X> 166 </X>
<Y> 1228 </Y>
<State> CouponSTA </State>
<Filename> Var( DirImage + CouponNameA )</Filename>
<FilenamePress> Var( DirImage + CouponNameA )</FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
; goto lid straw
Var CouponSendSms = CouponIDA
Var CouponExpireDate = CouponExpireA
Var CouponName = CouponNameA
Var BmiYear = CouponSendSms
Var PointCrm = ""
Var GetScore = ""
AddData 12 TelephoneNumber BmiYear PointCrm GetScore
Var CheckMemberPage3 = CountryRootPath + "xml/page_check_member3.lxml"
Open CheckMemberPage3
</EventClick>
</Button>
<Text>
<X> 372 </X>
<Y> 1370 </Y>
<Size> 15 </Size>
<Width> 600 </Width>
<Font> KanitRegularTTF </Font>
<Color> 0x746253 </Color>
<Value> CouponExpireA </Value>
</Text>
<Button>
<X> 166 </X>
<Y> 1470 </Y>
<State> CouponSTB </State>
<Filename> Var( DirImage + CouponNameB )</Filename>
<FilenamePress> Var( DirImage + CouponNameB )</FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
; goto lid straw
Var CouponSendSms = CouponIDB
Var CouponExpireDate = CouponExpireB
Var CouponName = CouponNameB
Var BmiYear = CouponSendSms
Var PointCrm = ""
Var GetScore = ""
AddData 12 TelephoneNumber BmiYear PointCrm GetScore
Var CheckMemberPage3 = CountryRootPath + "xml/page_check_member3.lxml"
Open CheckMemberPage3
</EventClick>
</Button>
<Text>
<X> 372 </X>
<Y> 1613 </Y>
<Size> 15 </Size>
<Width> 600 </Width>
<Font> KanitRegularTTF </Font>
<Color> 0x746253 </Color>
<Value> CouponExpireB </Value>
</Text>
<Button>
<X> 65 </X>
<Y> 1405 </Y>
<State> PolygonST1 </State>
<Filename> "ROOT/taobin_project/image/display_point/Polygon1.png"</Filename>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var CouponPage = CouponPage - 1
Var CheckMemberPage2 = CountryRootPath + "xml/page_check_member2.lxml"
Open CheckMemberPage2
</EventClick>
</Button>
<Button>
<X> 990 </X>
<Y> 1405 </Y>
<State> PolygonST2 </State>
<Filename> "ROOT/taobin_project/image/display_point/Polygon2.png"</Filename>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var CouponPage = CouponPage + 1
Var CheckMemberPage2 = CountryRootPath + "xml/page_check_member2.lxml"
Open CheckMemberPage2
</EventClick>
</Button>
<EventUnitTest4>
Var CheckMemberPage3 = CountryRootPath + "xml/page_check_member3.lxml"
Open CheckMemberPage3
</EventUnitTest4>
</Popup>

View file

@ -0,0 +1,189 @@
<Popup>
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
; On open
Var Timeout = 0
Var DirImage = "ROOT/taobin_project/image/display_point_en"
Var page_doing_show_time_image = "ROOT/taobin_project/image/page_doing/img2.png"
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
Var Timeout = Timeout + 1
If Timeout > 30 Then
If MakeDrinkState = 1 Then
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
Open "ROOT/taobin_project/xml/page_back_to_main.xml"
EndIf
TimerReset
Refresh
</EventTimeout>
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
</EventSecurity>
<EventActionOk>
;Open "ROOT/taobin_project/xml/page_check_member2.xml"
</EventActionOk>
<EventMachine>
If MachineStage = "drink-success" Then
Var MachineState_Result = 1
EndIf
If MachineStage = "drink-failed" Then
Var MachineState_Result = 2
EndIf
</EventMachine>
;<Image>
;<X> 0 </X>
;<Y> 0 </Y>
;<Filename> "ROOT/taobin_project/image/ad_medium_2.png" </Filename>
;</Image>
<Video>
<X> 0 </X>
<Y> 0 </Y>
<Width> 1080</Width>
<Height> 380 </Height>
<Loop> "true" </Loop>
<Filename> video_menu_0 </Filename>
</Video>
;
<Image>
<X> 158 </X>
<Y> 593 </Y>
<Filename> Var( DirImage + "/img_popup4.png" )</Filename>
</Image>
<Button>
<X> 237 </X>
<Y> 1480 </Y>
<Filename> Var( DirImage + "/bn_useCoupon.png" )</Filename>
<FilenamePress> Var( DirImage + "/bp_useCoupon.png" )</FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
; goto lid straw
If MakeDrinkState = 1 Then
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
Open "ROOT/taobin_project/xml/page_catalog.xml"
</EventClick>
</Button>
<Button>
<X> 398 </X>
<Y> 1597 </Y>
<Filename> Var( DirImage + "/bn_cancel2.png" )</Filename>
<FilenamePress> Var( DirImage + "/bp_cancel2.png" )</FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
; goto lid straw
;Var BmiYear = "30/30"
;Var PointCrm = ""
;Var GetScore = ""
;AddData 11 TelephoneNumber BmiYear PointCrm GetScore
If MakeDrinkState = 1 Then
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
Open "ROOT/taobin_project/xml/page_back_to_main.xml"
</EventClick>
</Button>
<Button>
<X> 158 </X>
<Y> 661 </Y>
<Filename> Var( DirImage + CouponName )</Filename>
<FilenamePress> Var( DirImage + CouponName )</FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
</EventClick>
</Button>
<Text>
<X> 415 </X>
<Y> 815 </Y>
<Size> 15 </Size>
<Width> 300 </Width>
<Font> KanitRegularTTF </Font>
<Color> 0x746253 </Color>
<Value> CouponExpireDate </Value>
</Text>
</Popup>

View file

@ -0,0 +1,710 @@
<Popup>
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<Refresh> "Partial" </Refresh>
<EventOpen>
; On open
Var Timeout = 0
Var TimeoutSMS = 0
Var StateBGetSMS = "Enable"
Var ShowSentSmsText = "Invisible"
Var ShowTextNumber1 = "Invisible"
Var ShowTextNumber2 = "Invisible"
Var ShowTextNumber3 = "Invisible"
Var ShowTextNumber4 = "Invisible"
Var ShowText = "Enable"
Var ShowErrorText = "Invisible"
Var Tel_Confirm_State = "Invisible"
Var PinNumber = ""
Var ReqFlag = 0
Var DirImage = "ROOT/taobin_project/image/collectiing_en"
Var Xtext = 246
Var Ext1a = ""
Var GetAccFlag = 0
Var StepX = 0
PlayLong "/mnt/sdcard/coffeevending/taobin_project/sound_eng/Please_create_new_pin.mp3"
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
Var Timeout = Timeout + 1
If Timeout > 30 Then
Var CheckMemberPage = CountryRootPath + "xml/page_check_member.lxml"
Open CheckMemberPage
EndIf
TimerReset
Refresh
</EventTimeout>
<EventActionOk>
Refresh
</EventActionOk>
<EventActionError>
Refresh
</EventActionError>
<Image>
<X> 0 </X>
<Y> 380 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/alpha.png" </Filename>
</Image>
<Image>
<X> 158 </X>
<Y> 601 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/img_popup1.png" </Filename>
</Image>
<Button>
<X> 333 </X>
<Y> 1004 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_1.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_1.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var PinNumber = PinNumber + "1"
Var ShowTextNumber = "Invisible"
Trim PinNumber 4
StrLen PinNumber TelNumLen
If TelNumLen >= 4 Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
Var ShowText = "Enable"
If TelNumLen > 0 Then
Var ShowTextNumber1 = "Enable"
EndIf
If TelNumLen > 1 Then
Var ShowTextNumber2= "Enable"
EndIf
If TelNumLen > 2 Then
Var ShowTextNumber3= "Enable"
EndIf
If TelNumLen > 3 Then
Var ShowTextNumber4= "Enable"
EndIf
Var ShowSentSmsText = "Invisible"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 477 </X>
<Y> 1004 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_2.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_2.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var PinNumber = PinNumber + "2"
Var ShowTextNumber = "Invisible"
Trim PinNumber 4
StrLen PinNumber TelNumLen
If TelNumLen >= 4 Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
Var ShowText = "Enable"
If TelNumLen > 0 Then
Var ShowTextNumber1 = "Enable"
EndIf
If TelNumLen > 1 Then
Var ShowTextNumber2= "Enable"
EndIf
If TelNumLen > 2 Then
Var ShowTextNumber3= "Enable"
EndIf
If TelNumLen > 3 Then
Var ShowTextNumber4= "Enable"
EndIf
Var ShowSentSmsText = "Invisible"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 620 </X>
<Y> 1004 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_3.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_3.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var PinNumber = PinNumber + "3"
Var ShowTextNumber = "Invisible"
Trim PinNumber 4
StrLen PinNumber TelNumLen
If TelNumLen >= 4 Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
Var ShowText = "Enable"
If TelNumLen > 0 Then
Var ShowTextNumber1 = "Enable"
EndIf
If TelNumLen > 1 Then
Var ShowTextNumber2= "Enable"
EndIf
If TelNumLen > 2 Then
Var ShowTextNumber3= "Enable"
EndIf
If TelNumLen > 3 Then
Var ShowTextNumber4= "Enable"
EndIf
Var ShowSentSmsText = "Invisible"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 333 </X>
<Y> 1148 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_4.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_4.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var PinNumber = PinNumber + "4"
Var ShowTextNumber = "Invisible"
Trim PinNumber 4
StrLen PinNumber TelNumLen
If TelNumLen >= 4 Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
Var ShowText = "Enable"
If TelNumLen > 0 Then
Var ShowTextNumber1 = "Enable"
EndIf
If TelNumLen > 1 Then
Var ShowTextNumber2= "Enable"
EndIf
If TelNumLen > 2 Then
Var ShowTextNumber3= "Enable"
EndIf
If TelNumLen > 3 Then
Var ShowTextNumber4= "Enable"
EndIf
Var ShowSentSmsText = "Invisible"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 477 </X>
<Y> 1148 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_5.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_5.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var PinNumber = PinNumber + "5"
Var ShowTextNumber = "Invisible"
Trim PinNumber 4
StrLen PinNumber TelNumLen
If TelNumLen >= 4 Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
Var ShowText = "Enable"
If TelNumLen > 0 Then
Var ShowTextNumber1 = "Enable"
EndIf
If TelNumLen > 1 Then
Var ShowTextNumber2= "Enable"
EndIf
If TelNumLen > 2 Then
Var ShowTextNumber3= "Enable"
EndIf
If TelNumLen > 3 Then
Var ShowTextNumber4= "Enable"
EndIf
Var ShowSentSmsText = "Invisible"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 620 </X>
<Y> 1148 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_6.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_6.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var PinNumber = PinNumber + "6"
Var ShowTextNumber = "Invisible"
Trim PinNumber 4
StrLen PinNumber TelNumLen
If TelNumLen >= 4 Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
Var ShowText = "Enable"
If TelNumLen > 0 Then
Var ShowTextNumber1 = "Enable"
EndIf
If TelNumLen > 1 Then
Var ShowTextNumber2= "Enable"
EndIf
If TelNumLen > 2 Then
Var ShowTextNumber3= "Enable"
EndIf
If TelNumLen > 3 Then
Var ShowTextNumber4= "Enable"
EndIf
Var ShowSentSmsText = "Invisible"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 333 </X>
<Y> 1292 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_7.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_7.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var PinNumber = PinNumber + "7"
Var ShowTextNumber = "Invisible"
Trim PinNumber 4
StrLen PinNumber TelNumLen
If TelNumLen >= 4 Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
Var ShowText = "Enable"
If TelNumLen > 0 Then
Var ShowTextNumber1 = "Enable"
EndIf
If TelNumLen > 1 Then
Var ShowTextNumber2= "Enable"
EndIf
If TelNumLen > 2 Then
Var ShowTextNumber3= "Enable"
EndIf
If TelNumLen > 3 Then
Var ShowTextNumber4= "Enable"
EndIf
Var ShowSentSmsText = "Invisible"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 477 </X>
<Y> 1292 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_8.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_8.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var PinNumber = PinNumber + "8"
Var ShowTextNumber = "Invisible"
Trim PinNumber 4
StrLen PinNumber TelNumLen
If TelNumLen >= 4 Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
Var ShowText = "Enable"
If TelNumLen > 0 Then
Var ShowTextNumber1 = "Enable"
EndIf
If TelNumLen > 1 Then
Var ShowTextNumber2= "Enable"
EndIf
If TelNumLen > 2 Then
Var ShowTextNumber3= "Enable"
EndIf
If TelNumLen > 3 Then
Var ShowTextNumber4= "Enable"
EndIf
Var ShowSentSmsText = "Invisible"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 620 </X>
<Y> 1292 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_9.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_9.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var PinNumber = PinNumber + "9"
Var ShowTextNumber = "Invisible"
Trim PinNumber 4
StrLen PinNumber TelNumLen
If TelNumLen >= 4 Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
Var ShowText = "Enable"
If TelNumLen > 0 Then
Var ShowTextNumber1 = "Enable"
EndIf
If TelNumLen > 1 Then
Var ShowTextNumber2= "Enable"
EndIf
If TelNumLen > 2 Then
Var ShowTextNumber3= "Enable"
EndIf
If TelNumLen > 3 Then
Var ShowTextNumber4= "Enable"
EndIf
Var ShowSentSmsText = "Invisible"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 477 </X>
<Y> 1432 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_0.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_0.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var PinNumber = PinNumber + "0"
Trim PinNumber 4
StrLen PinNumber TelNumLen
If TelNumLen >= 4 Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowTextNumber = "Invisible"
Var ShowErrorText = "Invisible"
Var ShowText = "Enable"
If TelNumLen > 0 Then
Var ShowTextNumber1 = "Enable"
EndIf
If TelNumLen > 1 Then
Var ShowTextNumber2= "Enable"
EndIf
If TelNumLen > 2 Then
Var ShowTextNumber3= "Enable"
EndIf
If TelNumLen > 3 Then
Var ShowTextNumber4= "Enable"
EndIf
Var ShowSentSmsText = "Invisible"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 620 </X>
<Y> 1432 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_back-1.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_back-1.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Trim PinNumber -1
Var Tel_Confirm_State = "Invisible"
StrLen PinNumber TelNumLen
If TelNumLen = 0 Then
Var ShowTextNumber = "Enable"
EndIf
;Var ShowErrorText = "Invisible"
TimerReset
Refresh
If TelNumLen < 1 Then
Var ShowTextNumber1 = "Invisible"
EndIf
If TelNumLen < 2 Then
Var ShowTextNumber2= "Invisible"
EndIf
If TelNumLen < 3 Then
Var ShowTextNumber3= "Invisible"
EndIf
If TelNumLen < 4 Then
Var ShowTextNumber4= "Invisible"
EndIf
Var ShowSentSmsText = "Invisible"
Var ShowErrorText = "Invisible"
Var ShowText = "Enable"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 398 </X>
<Y> 1600 </Y>
<Refresh> "Enable" </Refresh>
<State> Tel_Confirm_State </State>
<Filename> Var( DirImage + "/bn_confirm.png" ) </Filename>
<FilenamePress> Var( DirImage + "/bp_confirm.png" )</FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
If GetAccFlag = 0 Then
Var PinNumber_New = PinNumber
Var CheckNewMember2 = CountryRootPath + "xml/page_check_newmember2.lxml"
Open CheckNewMember2
EndIf
</EventClick>
</Button>
<Image>
<X> 242 </X>
<Y> 830 </Y>
<Filename> Var( DirImage + "/img4.png" ) </Filename>
</Image>
<Image>
<X> 289 </X>
<Y> 870 </Y>
<State> ShowTextNumber1 </State>
<Refresh> "Enable" </Refresh>
<Filename> Var( DirImage + "/text_X.png" )</Filename>
</Image>
<Image>
<X> 446 </X>
<Y> 870 </Y>
<State> ShowTextNumber2 </State>
<Refresh> "Enable" </Refresh>
<Filename> Var( DirImage + "/text_X.png" )</Filename>
</Image>
<Image>
<X> 603 </X>
<Y> 870 </Y>
<State> ShowTextNumber3 </State>
<Refresh> "Enable" </Refresh>
<Filename> Var( DirImage + "/text_X.png" )</Filename>
</Image>
<Image>
<X> 758 </X>
<Y> 870 </Y>
<State> ShowTextNumber4 </State>
<Refresh> "Enable" </Refresh>
<Filename> Var( DirImage + "/text_X.png" )</Filename>
</Image>
<Image>
<X> 188 </X>
<Y> 640 </Y>
<Refresh> "Enable" </Refresh>
<State> ShowText </State>
<Filename> Var( DirImage + "/text_23.png" )</Filename>
</Image>
<Image>
<X> 188 </X>
<Y> 638 </Y>
<Refresh> "Enable" </Refresh>
<State> ShowErrorText </State>
<Filename> Var( DirImage + "/text_25.png") </Filename>
</Image>
<Button>
<X> 859 </X>
<Y> 628 </Y>
<Filename> Var( DirImage + "/Exit.png" ) </Filename>
<FilenamePress> Var( DirImage + "/Exit.png" )</FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var CheckMemberPage = CountryRootPath + "xml/page_check_member.lxml"
Open CheckMemberPage
</EventClick>
</Button>
<Video>
<X> 0 </X>
<Y> 0 </Y>
<Width> 1080</Width>
<Height> 380 </Height>
<Loop> "true" </Loop>
<Filename> video_menu_0 </Filename>
</Video>
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
</EventSecurity>
</Popup>

View file

@ -0,0 +1,873 @@
<Popup>
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<Refresh> "Partial" </Refresh>
<EventOpen>
; On open
Var Timeout = 0
Var TimeoutSMS = 0
Var StateBGetSMS = "Enable"
Var ShowSentSmsText = "Invisible"
Var ShowTextNumber1 = "Invisible"
Var ShowTextNumber2 = "Invisible"
Var ShowTextNumber3 = "Invisible"
Var ShowTextNumber4 = "Invisible"
Var ShowText = "Enable"
Var ShowErrorText = "Invisible"
Var Tel_Confirm_State = "Invisible"
Var PinNumber = ""
Var ReqFlag = 0
Var DirImage = "ROOT/taobin_project/image/collectiing_en"
Var Xtext = 246
Var Ext1a = "ok"
Var GetAccFlag = 0
Var StepX = 0
PlayLong "/mnt/sdcard/coffeevending/taobin_project/sound_eng/Please_confirm_your_pin_again.mp3"
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
Var Timeout = Timeout + 1
If Timeout > 40 Then
Var CheckMemberPage = CountryRootPath + "xml/page_check_member.lxml"
Open CheckMemberPage
EndIf
TimerReset
Refresh
</EventTimeout>
<EventActionOk>
If StepX = 1 Then
If Ext1a = "ok" Then
Var TaobinName = Ext1d
Var TaobinCoupons = Ext1g
Var TaobinExpire = Ext1f
Var TaobinLevel = Ext1e
Var TNumberTaobinMemberXXX = TelephoneNumber
Var CoffeePointRank = Ext1b
INT CoffeePointRank
Var CoffeePointRankTmp = CoffeePointRank
GETACCEXT TelephoneNumber 15
Var StepX = 2
Var Ext1a = ""
Else
Var ShowErrorText = "Enable"
Var ShowText = "Invisible"
EndIf
Else
If StepX = 2 Then
Var PolygonST1 = "Invisible"
Var PolygonST2 = "Invisible"
Var CouponSTA = "Invisible"
Var CouponSTB = "Invisible"
Var CouponPage = 1
Var MakeDrinkState = 0
Var CouponInfo1 = Ext1a
Var CouponInfo2 = Ext1b
Var CouponInfo3 = Ext1c
Var CouponInfo4 = Ext1d
Var CouponInfo5 = Ext1e
Var CouponInfo6 = Ext1f
Var CouponInfo7 = Ext1g
Var CouponInfo8 = Ext1h
Var CouponInfo9 = Ext1i
Var CouponInfo10 = Ext1j
Var GetAccFlag = 0
Var CheckMemberPage2 = CountryRootPath + "xml/page_check_member2.lxml"
Open CheckMemberPage2
EndIf
EndIf
If GetAccFlag = 1 Then
Var GetAccFlag = 2
If Ext1a = "ok" Then
Var TaobinName = ""
Var TaobinCoupons = ""
Var TaobinExpire = ""
Var TaobinLevel = ""
Var TNumberTaobinMemberXXX = TelephoneNumber
Var CoffeePointRank = 0
INT CoffeePointRank
Var CoffeePointRankTmp = CoffeePointRank
Var PolygonST1 = "Invisible"
Var PolygonST2 = "Invisible"
Var CouponSTA = "Invisible"
Var CouponSTB = "Invisible"
Var CouponPage = 1
Var MakeDrinkState = 0
Var CouponInfo1 = ""
Var CouponInfo2 = ""
Var CouponInfo3 = ""
Var CouponInfo4 = ""
Var CouponInfo5 = ""
Var CouponInfo6 = ""
Var CouponInfo7 = ""
Var CouponInfo8 = ""
Var CouponInfo9 = ""
Var CouponInfo10 = ""
Var TaobinCredit = 0
If UseHKCollectFlag = 1 Then
Var param1 = "HK/" + TelephoneNumber
GETACCEXT param1 35
Else
GETACCEXT TelephoneNumber 14
EndIf
Var StepX = 1
Var Ext1a = "ok"
;Open "ROOT/taobin_project/xml/page_check_member2.xml"
Else
Var ShowErrorText = "Enable"
Var ShowText = "Invisible"
Var ShowTextNumber1 = "Invisible"
Var ShowTextNumber2 = "Invisible"
Var ShowTextNumber3 = "Invisible"
Var ShowTextNumber4 = "Invisible"
Var PinNumber = ""
Var Tel_Confirm_State = "Invisible"
EndIf
EndIf
Refresh
</EventActionOk>
<EventActionError>
If GetAccFlag > 0 Then
Var ShowErrorText = "Enable"
Var ShowText = "Invisible"
Var GetAccFlag = 0
Var ShowTextNumber1 = "Invisible"
Var ShowTextNumber2 = "Invisible"
Var ShowTextNumber3 = "Invisible"
Var ShowTextNumber4 = "Invisible"
Var PinNumber = ""
Var Tel_Confirm_State = "Invisible"
EndIf
If StepX = 1 Then
Var ShowErrorText = "Enable"
Var ShowText = "Invisible"
EndIf
If StepX = 2 Then
Var ShowErrorText = "Enable"
Var ShowText = "Invisible"
EndIf
Refresh
</EventActionError>
<Image>
<X> 0 </X>
<Y> 380 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/alpha.png" </Filename>
</Image>
<Image>
<X> 158 </X>
<Y> 601 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/img_popup1.png" </Filename>
</Image>
<Button>
<X> 333 </X>
<Y> 1004 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_1.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_1.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var PinNumber = PinNumber + "1"
Var ShowTextNumber = "Invisible"
Trim PinNumber 4
StrLen PinNumber TelNumLen
If TelNumLen >= 4 Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
Var ShowText = "Enable"
If TelNumLen > 0 Then
Var ShowTextNumber1 = "Enable"
EndIf
If TelNumLen > 1 Then
Var ShowTextNumber2= "Enable"
EndIf
If TelNumLen > 2 Then
Var ShowTextNumber3= "Enable"
EndIf
If TelNumLen > 3 Then
Var ShowTextNumber4= "Enable"
EndIf
Var ShowSentSmsText = "Invisible"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 477 </X>
<Y> 1004 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_2.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_2.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var PinNumber = PinNumber + "2"
Var ShowTextNumber = "Invisible"
Trim PinNumber 4
StrLen PinNumber TelNumLen
If TelNumLen >= 4 Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
Var ShowText = "Enable"
If TelNumLen > 0 Then
Var ShowTextNumber1 = "Enable"
EndIf
If TelNumLen > 1 Then
Var ShowTextNumber2= "Enable"
EndIf
If TelNumLen > 2 Then
Var ShowTextNumber3= "Enable"
EndIf
If TelNumLen > 3 Then
Var ShowTextNumber4= "Enable"
EndIf
Var ShowSentSmsText = "Invisible"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 620 </X>
<Y> 1004 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_3.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_3.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var PinNumber = PinNumber + "3"
Var ShowTextNumber = "Invisible"
Trim PinNumber 4
StrLen PinNumber TelNumLen
If TelNumLen >= 4 Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
Var ShowText = "Enable"
If TelNumLen > 0 Then
Var ShowTextNumber1 = "Enable"
EndIf
If TelNumLen > 1 Then
Var ShowTextNumber2= "Enable"
EndIf
If TelNumLen > 2 Then
Var ShowTextNumber3= "Enable"
EndIf
If TelNumLen > 3 Then
Var ShowTextNumber4= "Enable"
EndIf
Var ShowSentSmsText = "Invisible"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 333 </X>
<Y> 1148 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_4.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_4.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var PinNumber = PinNumber + "4"
Var ShowTextNumber = "Invisible"
Trim PinNumber 4
StrLen PinNumber TelNumLen
If TelNumLen >= 4 Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
Var ShowText = "Enable"
If TelNumLen > 0 Then
Var ShowTextNumber1 = "Enable"
EndIf
If TelNumLen > 1 Then
Var ShowTextNumber2= "Enable"
EndIf
If TelNumLen > 2 Then
Var ShowTextNumber3= "Enable"
EndIf
If TelNumLen > 3 Then
Var ShowTextNumber4= "Enable"
EndIf
Var ShowSentSmsText = "Invisible"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 477 </X>
<Y> 1148 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_5.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_5.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var PinNumber = PinNumber + "5"
Var ShowTextNumber = "Invisible"
Trim PinNumber 4
StrLen PinNumber TelNumLen
If TelNumLen >= 4 Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
Var ShowText = "Enable"
If TelNumLen > 0 Then
Var ShowTextNumber1 = "Enable"
EndIf
If TelNumLen > 1 Then
Var ShowTextNumber2= "Enable"
EndIf
If TelNumLen > 2 Then
Var ShowTextNumber3= "Enable"
EndIf
If TelNumLen > 3 Then
Var ShowTextNumber4= "Enable"
EndIf
Var ShowSentSmsText = "Invisible"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 620 </X>
<Y> 1148 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_6.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_6.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var PinNumber = PinNumber + "6"
Var ShowTextNumber = "Invisible"
Trim PinNumber 4
StrLen PinNumber TelNumLen
If TelNumLen >= 4 Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
Var ShowText = "Enable"
If TelNumLen > 0 Then
Var ShowTextNumber1 = "Enable"
EndIf
If TelNumLen > 1 Then
Var ShowTextNumber2= "Enable"
EndIf
If TelNumLen > 2 Then
Var ShowTextNumber3= "Enable"
EndIf
If TelNumLen > 3 Then
Var ShowTextNumber4= "Enable"
EndIf
Var ShowSentSmsText = "Invisible"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 333 </X>
<Y> 1292 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_7.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_7.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var PinNumber = PinNumber + "7"
Var ShowTextNumber = "Invisible"
Trim PinNumber 4
StrLen PinNumber TelNumLen
If TelNumLen >= 4 Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
Var ShowText = "Enable"
If TelNumLen > 0 Then
Var ShowTextNumber1 = "Enable"
EndIf
If TelNumLen > 1 Then
Var ShowTextNumber2= "Enable"
EndIf
If TelNumLen > 2 Then
Var ShowTextNumber3= "Enable"
EndIf
If TelNumLen > 3 Then
Var ShowTextNumber4= "Enable"
EndIf
Var ShowSentSmsText = "Invisible"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 477 </X>
<Y> 1292 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_8.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_8.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var PinNumber = PinNumber + "8"
Var ShowTextNumber = "Invisible"
Trim PinNumber 4
StrLen PinNumber TelNumLen
If TelNumLen >= 4 Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
Var ShowText = "Enable"
If TelNumLen > 0 Then
Var ShowTextNumber1 = "Enable"
EndIf
If TelNumLen > 1 Then
Var ShowTextNumber2= "Enable"
EndIf
If TelNumLen > 2 Then
Var ShowTextNumber3= "Enable"
EndIf
If TelNumLen > 3 Then
Var ShowTextNumber4= "Enable"
EndIf
Var ShowSentSmsText = "Invisible"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 620 </X>
<Y> 1292 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_9.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_9.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var PinNumber = PinNumber + "9"
Var ShowTextNumber = "Invisible"
Trim PinNumber 4
StrLen PinNumber TelNumLen
If TelNumLen >= 4 Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
Var ShowText = "Enable"
If TelNumLen > 0 Then
Var ShowTextNumber1 = "Enable"
EndIf
If TelNumLen > 1 Then
Var ShowTextNumber2= "Enable"
EndIf
If TelNumLen > 2 Then
Var ShowTextNumber3= "Enable"
EndIf
If TelNumLen > 3 Then
Var ShowTextNumber4= "Enable"
EndIf
Var ShowSentSmsText = "Invisible"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 477 </X>
<Y> 1432 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_0.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_0.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var PinNumber = PinNumber + "0"
Trim PinNumber 4
StrLen PinNumber TelNumLen
If TelNumLen >= 4 Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowTextNumber = "Invisible"
Var ShowErrorText = "Invisible"
Var ShowText = "Enable"
If TelNumLen > 0 Then
Var ShowTextNumber1 = "Enable"
EndIf
If TelNumLen > 1 Then
Var ShowTextNumber2= "Enable"
EndIf
If TelNumLen > 2 Then
Var ShowTextNumber3= "Enable"
EndIf
If TelNumLen > 3 Then
Var ShowTextNumber4= "Enable"
EndIf
Var ShowSentSmsText = "Invisible"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 620 </X>
<Y> 1432 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_back-1.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_back-1.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Trim PinNumber -1
Var Tel_Confirm_State = "Invisible"
StrLen PinNumber TelNumLen
If TelNumLen = 0 Then
Var ShowTextNumber = "Enable"
EndIf
;Var ShowErrorText = "Invisible"
TimerReset
Refresh
If TelNumLen < 1 Then
Var ShowTextNumber1 = "Invisible"
EndIf
If TelNumLen < 2 Then
Var ShowTextNumber2= "Invisible"
EndIf
If TelNumLen < 3 Then
Var ShowTextNumber3= "Invisible"
EndIf
If TelNumLen < 4 Then
Var ShowTextNumber4= "Invisible"
EndIf
Var ShowSentSmsText = "Invisible"
Var ShowErrorText = "Invisible"
Var ShowText = "Enable"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 398 </X>
<Y> 1600 </Y>
<Refresh> "Enable" </Refresh>
<State> Tel_Confirm_State </State>
<Filename> Var( DirImage + "/bn_confirm.png" ) </Filename>
<FilenamePress> Var( DirImage + "/bp_confirm.png" )</FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
If GetAccFlag = 0 Then
If PinNumber_New = PinNumber Then
Var BmiYear = PinNumber_New
Var PointCrm = ""
Var GetScore = "setPin"
AddData 21 TelephoneNumber BmiYear PointCrm GetScore
Var GetAccFlag = 1
Else
Var ShowErrorText = "Enable"
Var ShowText = "Invisible"
Var GetAccFlag = 0
Var ShowTextNumber1 = "Invisible"
Var ShowTextNumber2 = "Invisible"
Var ShowTextNumber3 = "Invisible"
Var ShowTextNumber4 = "Invisible"
Var PinNumber = ""
Var Tel_Confirm_State = "Invisible"
EndIf
EndIf
</EventClick>
</Button>
<Image>
<X> 242 </X>
<Y> 830 </Y>
<Filename> Var( DirImage + "/img4.png" ) </Filename>
</Image>
<Image>
<X> 289 </X>
<Y> 870 </Y>
<State> ShowTextNumber1 </State>
<Refresh> "Enable" </Refresh>
<Filename> Var( DirImage + "/text_X.png" )</Filename>
</Image>
<Image>
<X> 446 </X>
<Y> 870 </Y>
<State> ShowTextNumber2 </State>
<Refresh> "Enable" </Refresh>
<Filename> Var( DirImage + "/text_X.png" )</Filename>
</Image>
<Image>
<X> 603 </X>
<Y> 870 </Y>
<State> ShowTextNumber3 </State>
<Refresh> "Enable" </Refresh>
<Filename> Var( DirImage + "/text_X.png" )</Filename>
</Image>
<Image>
<X> 758 </X>
<Y> 870 </Y>
<State> ShowTextNumber4 </State>
<Refresh> "Enable" </Refresh>
<Filename> Var( DirImage + "/text_X.png" )</Filename>
</Image>
<Image>
<X> 188 </X>
<Y> 640 </Y>
<Refresh> "Enable" </Refresh>
<State> ShowText </State>
<Filename> Var( DirImage + "/text_30.png" )</Filename>
</Image>
<Image>
<X> 188 </X>
<Y> 638 </Y>
<Refresh> "Enable" </Refresh>
<State> ShowErrorText </State>
<Filename> Var( DirImage + "/text_25.png") </Filename>
</Image>
<Button>
<X> 859 </X>
<Y> 628 </Y>
<Filename> Var( DirImage + "/Exit.png" ) </Filename>
<FilenamePress> Var( DirImage + "/Exit.png" )</FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var CheckMemberPage = CountryRootPath + "xml/page_check_member.lxml"
Open CheckMemberPage
</EventClick>
</Button>
<Video>
<X> 0 </X>
<Y> 0 </Y>
<Width> 1080</Width>
<Height> 380 </Height>
<Loop> "true" </Loop>
<Filename> video_menu_0 </Filename>
</Video>
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
</EventSecurity>
</Popup>

File diff suppressed because it is too large Load diff

View file

@ -0,0 +1,400 @@
<Popup>
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
; On open
Var Timeout = 0
SAVELOG UnitTestType
If UnitTestType = "1" Then
Var CoffeePoint = 10
Open "ROOT/taobin_project/xml/page_show_consent.xml"
EndIf
Var TaobinLevel = 0
Var Point2X = 0
Var Seeker.TaobinErrorNetwork = 0
If show_eng = "true" Then
Var DirImage = "ROOT/taobin_project/image/collectiing_en"
Var IMG_CNT = "ROOT/taobin_project/image/page_doing/img2_eng.png"
Else
Var DirImage = "ROOT/taobin_project/image/collectiing"
Var IMG_CNT = "ROOT/taobin_project/image/page_doing/img2.png"
EndIf
DEBUGVAR PayOfflineMode
If PayOfflineMode = 1 Then
Var Seeker.TaobinErrorNetwork = 1
Var Seeker.PointTaobinStr = ParamCP
Var TelephoneNumber = TelephoneNumberX
Var Seeker.TNumberTaobinMember= TelephoneNumber
Open "ROOT/taobin_project/inter/hk/xml/page_collect_point_error.lxml"
EndIf
Var InitCNT = BREW_CNT
Var ShowPercent = "Invisible"
Var ShowCountdown = "Enable"
If ShowCountDownAsPercent = 1 Then
Var ShowPercent = "Enable"
Var ShowCountdown = "Invisible"
Var IMG_CNT = "ROOT/taobin_project/inter/hk/image/page_doing/img2_percent_eng.png"
EndIf
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
Var CountDownBrewing = BREW_CNT
Var ShowCountDownBrewing = CountDownBrewing
; percent
If ShowCountDownAsPercent = 1 Then
Var XPercent = InitCNT - ShowCountDownBrewing
If ShowCountDownBrewing <= 5 Then
Var XPercent = 95
Else
Var XPercent = XPercent * 100
DEBUGVAR XPercent
Var XPercent = XPercent / InitCNT
EndIf
DEBUGVAR XPercent
EndIf
Var Timeout = Timeout + 1
If Timeout > 30 Then
Var TaobinLevel = 0
Var CoffeePoint = 1
Var Seeker.TaobinErrorNetwork = 1
Var Seeker.PointTaobinStr = ParamCP
Var TelephoneNumber = TelephoneNumberX
Var Seeker.TNumberTaobinMember= TelephoneNumber
DEBUGVAR "Try open collect.error timeout30"
Open "ROOT/taobin_project/inter/hk/xml/page_collect_point_error.lxml"
EndIf
TimerReset
Refresh
</EventTimeout>
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
</EventSecurity>
<EventActionOk>
If StepGetPoint = 0 Then
If PdpaAsk = 0 Then
Open "ROOT/taobin_project/xml/page_show_consent.xml"
Else
Var StepGetPoint = 1
Var TelephoneNumber = TelephoneNumberX
If UseHKCollectFlag = 1 Then
GETACCEXT Param1 35
Else
GETACCEXT TelephoneNumber 14
EndIf
Var Ext1a = ""
Open "ROOT/taobin_project/inter/hk/xml/page_collect_point_2.xml"
EndIf
Else
If Ext1a = "" Then
Var Seeker.TaobinErrorNetwork = 1
Var Seeker.PointTaobinStr = ParamCP
Var TelephoneNumber = TelephoneNumberX
Var Seeker.TNumberTaobinMember = TelephoneNumber
Open "ROOT/taobin_project/inter/hk/xml/page_collect_point_error.lxml"
Else
If Ext1a = "ok" Then
Var TaobinName = Ext1d
Var TaobinCoupons = Ext1g
Var TaobinExpire = Ext1f
Var TaobinLevel = Ext1e
Var TaobinPDPA = Ext1h
Var TaobinPromoX = Ext1j
DEBUGVAR TaobinPDPA
Var PointTaobinTmp = Ext1i
DEBUGVAR PointTaobinTmp
INT PointTaobinTmp
INT TaobinPDPA
DEBUGVAR TaobinName
Var CatchNotMember = 0
If TaobinName = "" Then
Var CatchNotMember = 1
Endif
If TaobinName = "-" Then
Var CatchNotMember = 1
EndIf
DEBUGVAR CatchNotMember
If CatchNotMember = 1 Then
Var MemberErrText = Param1 + ", member=false"
DEBUGVAR MemberErrText
Var MemberErrText = ""
DEBUGVAR TaobinName
Var TaobinName = ""
DEBUGVAR MemberPrompt
Var CatchNotMember = 0
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
Var TelephoneNumber = TelephoneNumberX
Var TNumberTaobinMemberXXX = TelephoneNumber
;Var PointTaobinTmp = 4
Var PointTaobin = PointTaobinTmp
Var pTaobin = PointTaobin
DEBUGVAR TaobinLevel
If TaobinLevel = "1" Then
Var pTaobin = PayAmount / 20
Else
Var pTaobin = PayAmount / 15
EndIf
If pTaobin > 0 Then
Var pTaobinX = PointTaobin / pTaobin
If pTaobinX >= 2 Then
Var Point2X = 1
EndIf
EndIf
Var Seeker.PointTaobinStr = ParamCP
Var Seeker.TNumberTaobinMember = TelephoneNumberX
Var CoffeePointRank = Ext1b
INT CoffeePointRank
Var CoffeePoint1 = Ext1c
INT CoffeePoint1
Var CoffeePoint = PointTaobin + CoffeePoint1
Var CoffeePointOld = CoffeePoint1
If TaobinLevel = 1 Then
Var CoffeePointRank = CoffeePointRank + 0
Else
Var CoffeePointRank = CoffeePointRank + PointTaobin
EndIf
Var CoffeePointRankTmp = CoffeePointRank
DEBUGVAR Seeker.PointTaobinStr
DEBUGVAR Seeker.TNumberTaobinMember
If TaobinPDPA = 0 Then
;inter-xml-open
If CountryName = "Malaysia" Then
Open "ROOT/taobin_project/inter/hk/xml/page_collect_point_3.xml"
EndIf
;inter-xml-open
If CountryName = "Indonesia" Then
Open "ROOT/taobin_project/inter/hk/xml/page_collect_point_3.xml"
EndIf
;inter-xml-open
If CountryName = "Australia" Then
If NewCollectPointFlag = 1 Then
Var pageCollectPoint = CountryRootPath + "/xml/page_collect_point_3.lxml"
Open pageCollectPoint
Else
Open "ROOT/taobin_project/xml/page_collect_point_3.xml"
EndIf
EndIf
;inter-xml-open
If CountryName = "HongKong" Then
DEBUGVAR "Try open collect3.hk"
Open "ROOT/taobin_project/inter/hk/xml/page_collect_point_3.lxml"
EndIf
Open "ROOT/taobin_project/xml/page_show_consent.xml"
EndIf
If PayAmount >= 20 Then
If TaobinPromoX = "p2.no_otp" Then
Open "ROOT/taobin_project/xml/page_collect_point_extend1.xml"
EndIf
If TaobinPromoX = "p2.unused" Then
Open "ROOT/taobin_project/xml/page_collect_point_extend1.xml"
EndIf
EndIf
If NewCollectPoint = 1 Then
Open "ROOT/taobin_project/xml/page_collect_point_3_28.xml"
Else
Open "ROOT/taobin_project/xml/page_collect_point_3.xml"
EndIf
Else
Var Seeker.TaobinErrorNetwork = 1
Var Seeker.PointTaobinStr = ParamCP
Var TelephoneNumber = TelephoneNumberX
Var Seeker.TNumberTaobinMember = TelephoneNumber
Open "ROOT/taobin_project/inter/hk/xml/page_collect_point_error.lxml"
EndIf
EndIf
EndIf
</EventActionOk>
<EventActionError>
Var Seeker.TaobinErrorNetwork = 1
Var Seeker.PointTaobinStr = ParamCP
Var TelephoneNumber = TelephoneNumberX
Var Seeker.TNumberTaobinMember= TelephoneNumber
Open "ROOT/taobin_project/inter/hk/xml/page_collect_point_error.lxml"
</EventActionError>
<EventMachine>
If MachineStage = "drink-success" Then
Var MachineState_Result = 1
EndIf
If MachineStage = "drink-failed" Then
Var MachineState_Result = 2
EndIf
</EventMachine>
<Image>
<X> 178 </X>
<Y> 680 </Y>
<Filename> Var( DirImage + "/text20.png" ) </Filename>
</Image>
;include="ROOT/taobin_project/inc/video.inc"
<Text>
<X> 0 </X>
<Y> 873 </Y>
<Width> 1080 </Width>
<Align> Center </Align>
<Size> 62 </Size>
<Font> RobotoBlack </Font>
<Color> 0x513C2F </Color>
<Value> TelephoneNumber </Value>
<Format> Telnum-mask-3 </Format>
</Text>
;
<Image>
<X> 751 </X>
<Y> 413 </Y>
<Filename> IMG_CNT </Filename>
</Image>
;
<Text>
<X> XPosiShowCountDownBrew </X>
<Y> 470 </Y>
<State> ShowCountdown </State>
<Align> End </Align>
<Width> 153 </Width>
<Size> 88 </Size>
<Font> RobotoBold </Font>
<Color> 0x513C2F </Color>
<Value> ShowCountDownBrewing </Value>
</Text>
;
<Text>
<X> XPosiShowCountDownBrew </X>
<Y> 470 </Y>
<State> ShowPercent </State>
<Align> End </Align>
<Width> 153 </Width>
<Size> 88 </Size>
<Font> RobotoBold </Font>
<Color> 0x513C2F </Color>
<Value> XPercent </Value>
</Text>
</Popup>

File diff suppressed because it is too large Load diff

View file

@ -0,0 +1,112 @@
<Popup>
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
; On open
Var Timeout = 0
SAVELOG show_eng
If show_eng = "true" Then
Var DirImage = "ROOT/taobin_project/image/display_get_free_en/"
Var show_btp = "ROOT/taobin_project/image/bn_thai_lang_press.png"
Var show_btn = "ROOT/taobin_project/image/bn_thai_lang.png"
Else
Var DirImage = "ROOT/taobin_project/image/display_get_free/"
Var show_btp = "ROOT/taobin_project/image/bn_eng_lang_press.png"
Var show_btn = "ROOT/taobin_project/image/bn_eng_lang.png"
EndIf
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
Var Timeout = Timeout + 1
If Timeout > 5 Then
; goto lid straw
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
TimerReset
Refresh
</EventTimeout>
<EventMachine>
If MachineStage = "drink-success" Then
Var MachineState_Result = 1
EndIf
If MachineStage = "drink-failed" Then
Var MachineState_Result = 2
EndIf
</EventMachine>
<Image>
<X> 0 </X>
<Y> 380 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/alpha.png" </Filename>
</Image>
<Image>
<X> 158 </X>
<Y> 665 </Y>
<Filename> Var( DirImage + "/img_popup4.png" )</Filename>
</Image>
<Button>
<X> 397 </X>
<Y> 1680 </Y>
<Filename> Var( DirImage + "/bn_accept.png" ) </Filename>
<FilenamePress> Var( DirImage + "/bp_accept.png" )</FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
; goto lid straw
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
</EventClick>
</Button>
;include="ROOT/taobin_project/inc/video.inc"
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
</EventSecurity>
</Page>

View file

@ -0,0 +1,267 @@
<Popup>
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
<Background> "0xEFEDEA" </Background>
<Volume> SoundVolume </Volume>
<Refresh> "Partial" </Refresh>
<EventOpen>
; On open
Var DirImage = CountryRootPath + "/image/collectiing/"
Var Timeout = 0
StopLongPlay
Var MachineErrorDetailAll = MachineErrorDetail + " / "
Var MachineErrorDetailAll = MachineErrorDetailAll + MachineErrorDetailEng
DEBUGVAR TelephoneNumberProblem
; try-get-user
Var payload = "HK/" + TelephoneNumberProblem
Var payload = payload + "/-"
Var payload = payload + "/-"
Var payload = payload + "/-"
Var payload = payload + "/-"
DEBUGVAR payload
Var Seeker.IsMember = 0
Var SendProblemOfMember = 0
Var ShowQRByNoMember = "Invisible"
Var TaobinName = ""
If TelephoneNumberProblem = "" Then
Var ShowQRByNoMember = "Enable"
Else
GETACCEXT payload 35
EndIf
Var StepX = 1
Var Ext1a = ""
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
Var Timeout = Timeout + 1
If Timeout > 30 Then
If SendProblemOfMember = 1 Then
DEBUGVAR TelephoneNumberProblem
StrLen TelephoneNumberProblem TelNumLen
If TelNumLen >= MinPhoneNumber Then
Var ProblemID = 7
Var ChooseProblem = "taobin purchasing problems"
If Seeker.PayWithQR = 1 Then
Var VendingTSIDProblem = VendingTSIDTmp
If Seeker.CampaignPayChanel = "promptpay" Then
Var ProblemID = 8
Var ChooseProblem = "taobin purchasing problems(Void Failed)"
EndIf
Else
Var VendingTSIDProblem = VendingTSID
EndIf
PROBLEM2 TelephoneNumberProblem ProblemID ChooseProblem VendingTSIDProblem
EndIf
EndIf
If MachineStage = "remove-cup" Then
Open "ROOT/taobin_project/xml/page_drinkfail3.xml"
Else
If NextOrder = "true" Then
Var NextOrder = "false"
TransferVar "next" "curr"
Var Seeker = "curr"
Open "ROOT/taobin_project/xml/page_thankyouConti.xml"
Else
Open "ROOT/taobin_project/xml/page_back_to_main.xml"
EndIf
EndIf
EndIf
TimerReset
</EventTimeout>
;include="ROOT/taobin_project/inc/video.inc"
<EventActionOk>
If StepX = 1 Then
If Ext1a = "ok" Then
Var TaobinName = Ext1d
If TaobinName = "" Then
Var Seeker.IsMember = 0
Else
If TaobinName = "-" Then
Var Seeker.IsMember = 0
Else
Var Seeker.IsMember = 1
EndIf
EndIf
DEBUGVAR Seeker.IsMember
If Seeker.IsMember = 1 Then
SAVELOG "Already member, will send problem"
Var SendProblemOfMember = 1
Else
SAVELOG "Not member, show QR"
Var SendProblemOfMember = 0
Var ShowQRByNoMember = "Enable"
EndIf
Else
Var Seeker.IsMember = 0
SAVELOG "StepX.error, show QR"
Var ShowQRByNoMember = "Enable"
EndIf
EndIf
</EventActionOk>
<EventActionError>
If StepX = 1 Then
SAVELOG "ActionError show QR"
Var ShowQRByNoMember = "Enable"
EndIf
</EventActionError>
<Image>
<X> 43 </X>
<Y> 428 </Y>
<Filename> Var( DirImage + "/text_11.png" ) </Filename>
</Image>
<Image>
<X> 429 </X>
<Y> 1301 </Y>
<State> ShowQRByNoMember </State>
<Filename> Var( DirImage + "/QR_contract.png" ) </Filename>
</Image>
;<Image>
;<X> 190 </X>
;<Y> 1548 </Y>
;<Filename> Var( DirImage + "/text13.png" ) </Filename>
;</Image>
<Button>
<X> 392 </X>
<Y> 1720 </Y>
<Filename> Var( DirImage + "/bn_close.png" )</Filename>
<FilenamePress> Var( DirImage + "/bp_close.png" )</FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
StrLen TelephoneNumberProblem TelNumLen
If SendProblemOfMember = 1 Then
If TelNumLen >= MinPhoneNumber Then
Var ProblemID = 7
Var ChooseProblem = "taobin purchasing problems"
If Seeker.PayWithQR = 1 Then
Var VendingTSIDProblem = VendingTSIDTmp
If Seeker.CampaignPayChanel = "promptpay" Then
Var ProblemID = 8
Var ChooseProblem = "taobin purchasing problems(Void Failed)"
EndIf
Else
Var VendingTSIDProblem = VendingTSID
EndIf
PROBLEM2 TelephoneNumberProblem ProblemID ChooseProblem VendingTSIDProblem
EndIf
EndIf
If MachineStage = "remove-cup" Then
Open "ROOT/taobin_project/xml/page_drinkfail3.xml"
Else
If NextOrder = "true" Then
Var NextOrder = "false"
TransferVar "next" "curr"
Var Seeker = "curr"
Open "ROOT/taobin_project/xml/page_thankyouConti.xml"
Else
Open "ROOT/taobin_project/xml/page_back_to_main.xml"
EndIf
EndIf
</EventClick>
</Button>
<Text>
<X> 5 </X>
<Y> 1868 </Y>
<Size> 24 </Size>
<Align> Center </Align>
<Width> 1080 </Width>
<Font> RobotoRegular </Font>
<Color> 0xDE794E </Color>
<Value> MachineErrorDetailAll </Value>
</Text>
</Popup>

View file

@ -0,0 +1,153 @@
<Popup>
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
;<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
Var DisplayPrompt = "Enable"
Var DisplayQR = "Invisible"
If CatchNotMember = 1 Then
Var DisplayPrompt = "Invisible"
Var DisplayQR = "Enable"
Var Timeout = 10
Var CatchNotMember = 0
Else
Var Timeout = 0
EndIf
; img
Var ImgDir = CountryRootPath + "/image/page_member/"
Var PromptDialogImg = ImgDir + "ask_member_dialog.png"
Var YesButton = ImgDir + "bn_yes.png"
Var NoButton = ImgDir + "bn_no.png"
Var YesPressButton = ImgDir + "bp_yes.png"
Var NoPressButton = ImgDir + "bp_no.png"
Var QRImg = ImgDir + "qr_regis.png"
Var UseHKCollectFlag = 0
DEBUGVAR YesButton
DEBUGVAR ChangeFlag2
Var IMG_CNT = ImgDir + "img2_sp_eng.png"
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
Var Timeout = Timeout + 1
Var RemainingInThisPage = 25 - Timeout
If RemainingInThisPage <= 0 Then
Var RemainingInThisPage = 0
EndIf
DEBUGVAR Timeout
If Timeout > 25 Then
Var Timeout = 0
; to-lid-straw
SAVELOG "member_prompt.Timeout"
;Open "ROOT/taobin_project/xml/page_catalog.xml"
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
Refresh
TimerReset
</EventTimeout>
<Image>
<X> 150 </X>
<Y> 618 </Y>
<State> DisplayPrompt </State>
<Height> 800 </Height>
<Width> 800 </Width>
<Volume> SoundVolume </Volume>
<Filename> PromptDialogImg </Filename>
</Image>
<Button>
<X> 250 </X>
<Y> 1065 </Y>
<State> DisplayPrompt </State>
<Filename> NoButton </Filename>
<FilenamePress> NoPressButton </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
; show-qr
Var DisplayPrompt = "Invisible"
Var DisplayQR = "Enable"
Var Timeout = 10
</EventClick>
</Button>
<Button>
<X> 600 </X>
<Y> 1065 </Y>
<State> DisplayPrompt </State>
<Filename> YesButton </Filename>
<FilenamePress> YesPressButton </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var UseHKCollectFlag = 1
Open "ROOT/taobin_project/inter/hk/xml/page_collect_point_1.lxml"
</EventClick>
</Button>
<Image>
<X> 751 </X>
<Y> 413 </Y>
<Filename> IMG_CNT </Filename>
</Image>
<Text>
<X> 768 </X>
<Y> 470 </Y>
<Align> End </Align>
<Width> 153 </Width>
<Size> 88 </Size>
<Font> RobotoBold </Font>
<Color> 0x513C2F </Color>
<Value> RemainingInThisPage </Value>
</Text>
<Text>
<X> 50 </X>
<Y> 865 </Y>
<Size> 56 </Size>
<Align> Center </Align>
<Width> 1080 </Width>
<Font> KanitRegularTTF </Font>
<State> DisplayQR </State>
<Color> 0xDE794E </Color>
<Value> "Please scan QR to register" </Value>
</Text>
<Image>
<X> 400 </X>
<Y> 1065 </Y>
<State> DisplayQR </State>
<Filename> QRImg </Filename>
</Image>
;include="ROOT/taobin_project/inc/video.inc"
</Popup>

View file

@ -0,0 +1,370 @@
<Popup>
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
; On open
Var Timeout = 0
Var SumCreditAmount = TaobinCredit
Var CashlessPayFlag = 0
Var LOADING_STATE = "Invisible"
Var alphaState = "Invisible"
Var PayAmount = 0
Var AdditionalAmount = 0
Var ChangeOK = 0
Var QRErrorState = "Invisible"
Var DirImage = "ROOT/taobin_project/image/page_payment_en/page_payment"
Var DirImage2 = "ROOT/taobin_project/inter/aus/image/page_member_topup"
Var page_doing_show_time_image = "ROOT/taobin_project/image/page_doing/img2.png"
Var show_btp = "ROOT/taobin_project/image/bn_thai_lang_press.png"
Var show_btn = "ROOT/taobin_project/image/bn_thai_lang.png"
Var text_4 = "/text_4-AUS.png"
Var PayCreditChannel = "credit-card"
Var OptionAmount1 = 2900
Var OptionAmount2 = 3900
Var OptionAmount3 = 4900
Var AmountAdditionCredit1 = 0
Var AmountAdditionCredit2 = 0
Var AmountAdditionCredit3 = 0
; Enable / Disable promotion additional credit
Var PromotionAdditionCredit = 1
If PromotionAdditionCredit = 1 Then
Var AmountAdditionCredit1 = 300
Var AmountAdditionCredit2 = 500
Var AmountAdditionCredit3 = 800
EndIf
INT TaobinCredit
Var TaobinCreditStr !assigned StringFmt( TaobinCredit, DisplayFormat, PreScaleConvertShow )
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
Var Timeout = Timeout + 1
If Timeout > 30 Then
Var alphaState = "Invisible"
Var LOADING_STATE = "Invisible"
Var QRErrorState = "Invisible"
If CashlessPayFlag = 1 Then
Var CashlessPayFlag = 0
CashlessReq FAIL
Else
CashlessReq OFF
EndIf
Var CheckMemberPage2 = CountryRootPath + "xml/page_check_member2.lxml"
Open CheckMemberPage2
EndIf
TimerReset
Refresh
</EventTimeout>
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
</EventSecurity>
<EventActionOk>
If VendingCashless = "OK" Then
CashlessReq SUCCESS
Var ToppupSuccessPage = CountryRootPath + "xml/page_member_topupSuccess.lxml"
Open ToppupSuccessPage
EndIf
</EventActionOk>
<EventActionError>
If VendingCashless = "ERROR" Then
Var Timeout = 0
;Var QRErrorFlag = 1
If alphaState = "Enable" Then
Var QRErrorState = "Enable"
Var LOADING_STATE = "Invisible"
EndIf
CashlessReq FAIL
EndIf
Refresh
</EventActionError>
<EventCashlessCard>
Var CreditCardRef = ""
GenHashWithTimeStamp CreditCardRef
DEBUGVAR VendingCashless
If VendingCashless = "READY" Then
Var Timeout = 0
Var QRErrorState = "Invisible"
Var QR_POPUP = "/img_popup8-2.png"
Var VendingCashless = "-"
Var LOADING_STATE = "Enable"
Var alphaState = "Enable"
Var TopupAmount = PayAmount
Var PromoAmount = AdditionalAmount
CashlessPayV2 TopupAmount CreditCardRef PromoAmount
Var CashlessPayFlag = 1
EndIf
Refresh
</EventCashlessCard>
<Video>
<X> 0 </X>
<Y> 0 </Y>
<Width> 1080</Width>
<Height> 380 </Height>
<Loop> "true" </Loop>
<Filename> video_menu_0 </Filename>
</Video>
<Image>
<X> 70 </X>
<Y> 499 </Y>
<Filename> Var( DirImage + "/text_3.png" )</Filename>
</Image>
<Image>
<X> 252 </X>
<Y> 1223 </Y>
<Filename> Var( DirImage + text_4 )</Filename>
</Image>
<Text>
<X> 0 </X>
<Y> 1280 </Y>
<Size> 120 </Size>
<Align> Center </Align>
<Width> 1080 </Width>
<Font> KanitRegularTTF </Font>
<Color> 0xDE794E </Color>
<Value> TaobinCreditStr </Value>
</Text>
<Button>
<X> 287 </X>
<Y> 670 </Y>
<Filename> Var( DirImage2 + "/bn_topup_29.png") </Filename>
<FilenamePress> Var( DirImage2 + "/bp_topup_29.png") </FilenamePress>
<FilenameDisable> Var( DirImage2 + "/bp_topup_29.png") </FilenameDisable>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var PayAmount = OptionAmount1
Var Timeout = 0
If PromotionAdditionCredit = 1 Then
Var AdditionalAmount = AmountAdditionCredit1
EndIf
If alphaState = "Invisible" Then
Var QR_POPUP = "/img_popup8.png"
Var alphaState = "Enable"
Coin CARD
EndIf
</EventClick>
</Button>
<Button>
<X> 287 </X>
<Y> 800 </Y>
<Filename> Var( DirImage2 + "/bn_topup_39.png") </Filename>
<FilenamePress> Var( DirImage2 + "/bp_topup_39.png") </FilenamePress>
<FilenameDisable> Var( DirImage2 + "/bp_topup_39.png") </FilenameDisable>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var PayAmount = OptionAmount2
Var Timeout = 0
If PromotionAdditionCredit = 1 Then
Var AdditionalAmount = AmountAdditionCredit2
EndIf
If alphaState = "Invisible" Then
Var QR_POPUP = "/img_popup8.png"
Var alphaState = "Enable"
Coin CARD
EndIf
</EventClick>
</Button>
<Button>
<X> 287 </X>
<Y> 930 </Y>
<Filename> Var( DirImage2 + "/bn_topup_49.png") </Filename>
<FilenamePress> Var( DirImage2 + "/bp_topup_49.png") </FilenamePress>
<FilenameDisable> Var( DirImage2 + "/bp_topup_49.png") </FilenameDisable>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var PayAmount = OptionAmount3
Var Timeout = 0
If PromotionAdditionCredit = 1 Then
Var AdditionalAmount = AmountAdditionCredit3
EndIf
If alphaState = "Invisible" Then
Var QR_POPUP = "/img_popup8.png"
Var alphaState = "Enable"
Coin CARD
EndIf
</EventClick>
</Button>
<Button>
<X> 397 </X>
<Y> 1622 </Y>
<Filename> Var( DirImage + "/bn_cancel2.png" )</Filename>
<FilenamePress> Var( DirImage + "/bp_cancel2.png" )</FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
If CashlessPayFlag = 1 Then
Var CashlessPayFlag = 0
CashlessReq FAIL
EndIf
Var CheckMemberPage2 = CountryRootPath + "xml/page_check_member2.lxml"
Open CheckMemberPage2
</EventClick>
</Button>
; QR popup
<Image>
<X> 0 </X>
<Y> 380 </Y>
<State> alphaState </State>
<Filename> "ROOT/taobin_project/image/page_payment/alpha.png" </Filename>
</Image>
<Image>
<X> 249 </X>
<Y> 748 </Y>
<State> alphaState </State>
<Filename> Var( DirImage + QR_POPUP )</Filename>
</Image>
<Image>
<X> 267 </X>
<Y> 1065 </Y>
<State> LOADING_STATE </State>
<Filename> Var( DirImage + "/loadingText.png" )</Filename>
</Image>
<GIF>
<X> 493 </X>
<Y> 968 </Y>
<Width> 94 </Width>
<Height> 94 </Height>
<State> LOADING_STATE </State>
<Filename> Var( DirImage + "/loading.gif" )</Filename>
</GIF>
<Button>
<X> 438 </X>
<Y> 1345 </Y>
<State> alphaState </State>
<Filename> Var( DirImage + "/bn_cancel.png" )</Filename>
<FilenamePress> Var( DirImage + "/bp_cancel.png" )</FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var LOADING_STATE = "Invisible"
Var QRErrorState = "Invisible"
Var alphaState = "Invisible"
CashlessReq OFF
If CashlessPayFlag = 1 Then
Var CashlessPayFlag = 0
CashlessReq FAIL
EndIf
DEBUGVAR LOADING_STATE
DEBUGVAR QRErrorState
DEBUGVAR alphaState
Refresh
</EventClick>
</Button>
<Button>
<X> 267 </X>
<Y> 960 </Y>
<State>QRErrorState</State>
<Filename> Var( DirImage + "/QRError.png" ) </Filename>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
</EventClick>
</Button>
<EventUnitTest4>
Var MemberToppupSuccessPage = CountryRootPath + "xml/page_member_topupSuccess.lxml"
Open MemberToppupSuccessPage
</EventUnitTest4>
</Popup>

View file

@ -0,0 +1,168 @@
<Popup>
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
; On open
Var Timeout = 0
DEBUGVAR PayAmount
DEBUGVAR PromotionAdditionCredit
DEBUGVAR AdditionalAmount
DEBUGVAR TaobinCredit
INT TaobinCredit
INT PayAmount
INT AdditionalAmount
Var SumCreditAmount = TaobinCredit + PayAmount
Var SumCreditAmount = SumCreditAmount + AdditionalAmount
Var ServiceAmount2 = PayAmount
Var ServiceCharge = 0
Var Donate = ""
Var SuggestID = ""
Var SumCreditAmountStr !assigned StringFmt( SumCreditAmount, DisplayFormat, PreScaleConvertShow )
Var text_4 = "/text_4-AUS.png"
Var DirImage = "ROOT/taobin_project/image/page_payment_en/page_payment"
Var DirImage2 = "ROOT/taobin_project/image/page_payment_cash_extend_en"
Var page_doing_show_time_image = "ROOT/taobin_project/image/page_doing/img2.png"
Var show_btp = "ROOT/taobin_project/image/bn_thai_lang_press.png"
Var show_btn = "ROOT/taobin_project/image/bn_thai_lang.png"
Var FlagPayCredit = 1
Var ExitState = "Disable"
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
If Timeout > 1 Then
If FlagPayCredit = 1 Then
If PayCreditChannel = "credit-card" Then
Var TelephoneNumber = TelephoneNumber
Var VendingDiscount = 0
Var VendingCampaign = 0
Var ServiceType = "credit"
Var SessionID2 = "00-00-00-0000"
Var ServiceCredit = "coffee"
Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate
Var FlagPayCredit = 0
EndIf
EndIf
Var ExitState = "Enable"
EndIf
Var Timeout = Timeout + 1
If Timeout > 30 Then
Open "ROOT/taobin_project/xml/page_back_to_main.xml"
EndIf
TimerReset
Refresh
</EventTimeout>
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
</EventSecurity>
<EventActionOk>
</EventActionOk>
<EventMachine>
</EventMachine>
<Video>
<X> 0 </X>
<Y> 0 </Y>
<Width> 1080</Width>
<Height> 380 </Height>
<Loop> "true" </Loop>
<Filename> video_menu_0 </Filename>
</Video>
<Image>
<X> 70 </X>
<Y> 741 </Y>
<Filename> Var( DirImage + "/PaymentSuccess.png" )</Filename>
</Image>
<Image>
<X> 252 </X>
<Y> 1053 </Y>
<Filename> Var( DirImage + text_4 )</Filename>
</Image>
<Text>
<X> 0 </X>
<Y> 1123 </Y>
<Size> 120 </Size>
<Align> Center </Align>
<Width> 1080 </Width>
<Font> KanitRegularTTF </Font>
<Color> 0xDE794E </Color>
<Value> SumCreditAmountStr </Value>
</Text>
<Button>
<X> 99 </X>
<Y> 1688 </Y>
<State> ExitState </State>
<Filename> Var( DirImage + "/bn_main.png" )</Filename>
<FilenamePress> Var( DirImage + "/bp_main.png" )</FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
If Timeout > 2 Then
Open "ROOT/taobin_project/xml/page_back_to_main.xml"
EndIf
</EventClick>
</Button>
<Button>
<X> 695 </X>
<Y> 1688 </Y>
<State> ExitState </State>
<Filename> Var( DirImage + "/bn_drink.png" )</Filename>
<FilenamePress> Var( DirImage + "/bp_drink.png" )</FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
If Timeout > 2 Then
Open "ROOT/taobin_project/xml/page_catalog.xml"
EndIf
</EventClick>
</Button>
</Popup>

View file

@ -0,0 +1,761 @@
<Popup>
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<Refresh> "Partial" </Refresh>
<EventOpen>
; On open
Var Timeout = 0
Var TimeoutSMS = 0
Var StateBGetSMS = "Enable"
Var ShowSentSmsText = "Invisible"
Var ShowTextNumber1 = "Invisible"
Var ShowTextNumber2 = "Invisible"
Var ShowTextNumber3 = "Invisible"
Var ShowTextNumber4 = "Invisible"
Var ShowText = "Enable"
Var ShowErrorText = "Invisible"
Var Tel_Confirm_State = "Invisible"
Var PinNumber = ""
Var ReqFlag = 0
Var DirImage = "ROOT/taobin_project/image/collectiing_en"
Var Xtext = 246
Var Ext1a = ""
Var GetAccFlag = 0
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
Var Timeout = Timeout + 1
If Timeout > 30 Then
Var CheckMemberPage2 = CountryRootPath + "xml/page_check_member2.lxml"
Open CheckMemberPage2
EndIf
TimerReset
Refresh
</EventTimeout>
<EventActionOk>
If GetAccFlag = 1 Then
If Ext1a = "ok" Then
Var ChangePinPage2 = CountryRootPath + "xml/page_payment_changePin2.lxml"
Open ChangePinPage2
Else
Var ShowErrorText = "Enable"
Var ShowText = "Invisible"
Var GetAccFlag = 0
Var ShowTextNumber1 = "Invisible"
Var ShowTextNumber2 = "Invisible"
Var ShowTextNumber3 = "Invisible"
Var ShowTextNumber4 = "Invisible"
Var PinNumber = ""
Var Tel_Confirm_State = "Invisible"
EndIf
EndIf
Refresh
</EventActionOk>
<EventActionError>
If GetAccFlag = 1 Then
Var ShowErrorText = "Enable"
Var ShowText = "Invisible"
Var GetAccFlag = 0
Var ShowTextNumber1 = "Invisible"
Var ShowTextNumber2 = "Invisible"
Var ShowTextNumber3 = "Invisible"
Var ShowTextNumber4 = "Invisible"
Var PinNumber = ""
Var Tel_Confirm_State = "Invisible"
EndIf
Refresh
</EventActionError>
<Image>
<X> 0 </X>
<Y> 380 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/alpha.png" </Filename>
</Image>
<Image>
<X> 158 </X>
<Y> 601 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/img_popup1.png" </Filename>
</Image>
<Button>
<X> 333 </X>
<Y> 1004 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_1.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_1.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var PinNumber = PinNumber + "1"
Var ShowTextNumber = "Invisible"
Trim PinNumber 4
StrLen PinNumber TelNumLen
If TelNumLen >= 4 Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
Var ShowText = "Enable"
If TelNumLen > 0 Then
Var ShowTextNumber1 = "Enable"
EndIf
If TelNumLen > 1 Then
Var ShowTextNumber2= "Enable"
EndIf
If TelNumLen > 2 Then
Var ShowTextNumber3= "Enable"
EndIf
If TelNumLen > 3 Then
Var ShowTextNumber4= "Enable"
EndIf
Var ShowSentSmsText = "Invisible"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 477 </X>
<Y> 1004 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_2.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_2.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var PinNumber = PinNumber + "2"
Var ShowTextNumber = "Invisible"
Trim PinNumber 4
StrLen PinNumber TelNumLen
If TelNumLen >= 4 Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
Var ShowText = "Enable"
If TelNumLen > 0 Then
Var ShowTextNumber1 = "Enable"
EndIf
If TelNumLen > 1 Then
Var ShowTextNumber2= "Enable"
EndIf
If TelNumLen > 2 Then
Var ShowTextNumber3= "Enable"
EndIf
If TelNumLen > 3 Then
Var ShowTextNumber4= "Enable"
EndIf
Var ShowSentSmsText = "Invisible"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 620 </X>
<Y> 1004 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_3.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_3.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var PinNumber = PinNumber + "3"
Var ShowTextNumber = "Invisible"
Trim PinNumber 4
StrLen PinNumber TelNumLen
If TelNumLen >= 4 Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
Var ShowText = "Enable"
If TelNumLen > 0 Then
Var ShowTextNumber1 = "Enable"
EndIf
If TelNumLen > 1 Then
Var ShowTextNumber2= "Enable"
EndIf
If TelNumLen > 2 Then
Var ShowTextNumber3= "Enable"
EndIf
If TelNumLen > 3 Then
Var ShowTextNumber4= "Enable"
EndIf
Var ShowSentSmsText = "Invisible"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 333 </X>
<Y> 1148 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_4.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_4.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var PinNumber = PinNumber + "4"
Var ShowTextNumber = "Invisible"
Trim PinNumber 4
StrLen PinNumber TelNumLen
If TelNumLen >= 4 Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
Var ShowText = "Enable"
If TelNumLen > 0 Then
Var ShowTextNumber1 = "Enable"
EndIf
If TelNumLen > 1 Then
Var ShowTextNumber2= "Enable"
EndIf
If TelNumLen > 2 Then
Var ShowTextNumber3= "Enable"
EndIf
If TelNumLen > 3 Then
Var ShowTextNumber4= "Enable"
EndIf
Var ShowSentSmsText = "Invisible"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 477 </X>
<Y> 1148 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_5.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_5.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var PinNumber = PinNumber + "5"
Var ShowTextNumber = "Invisible"
Trim PinNumber 4
StrLen PinNumber TelNumLen
If TelNumLen >= 4 Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
Var ShowText = "Enable"
If TelNumLen > 0 Then
Var ShowTextNumber1 = "Enable"
EndIf
If TelNumLen > 1 Then
Var ShowTextNumber2= "Enable"
EndIf
If TelNumLen > 2 Then
Var ShowTextNumber3= "Enable"
EndIf
If TelNumLen > 3 Then
Var ShowTextNumber4= "Enable"
EndIf
Var ShowSentSmsText = "Invisible"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 620 </X>
<Y> 1148 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_6.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_6.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var PinNumber = PinNumber + "6"
Var ShowTextNumber = "Invisible"
Trim PinNumber 4
StrLen PinNumber TelNumLen
If TelNumLen >= 4 Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
Var ShowText = "Enable"
If TelNumLen > 0 Then
Var ShowTextNumber1 = "Enable"
EndIf
If TelNumLen > 1 Then
Var ShowTextNumber2= "Enable"
EndIf
If TelNumLen > 2 Then
Var ShowTextNumber3= "Enable"
EndIf
If TelNumLen > 3 Then
Var ShowTextNumber4= "Enable"
EndIf
Var ShowSentSmsText = "Invisible"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 333 </X>
<Y> 1292 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_7.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_7.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var PinNumber = PinNumber + "7"
Var ShowTextNumber = "Invisible"
Trim PinNumber 4
StrLen PinNumber TelNumLen
If TelNumLen >= 4 Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
Var ShowText = "Enable"
If TelNumLen > 0 Then
Var ShowTextNumber1 = "Enable"
EndIf
If TelNumLen > 1 Then
Var ShowTextNumber2= "Enable"
EndIf
If TelNumLen > 2 Then
Var ShowTextNumber3= "Enable"
EndIf
If TelNumLen > 3 Then
Var ShowTextNumber4= "Enable"
EndIf
Var ShowSentSmsText = "Invisible"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 477 </X>
<Y> 1292 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_8.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_8.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var PinNumber = PinNumber + "8"
Var ShowTextNumber = "Invisible"
Trim PinNumber 4
StrLen PinNumber TelNumLen
If TelNumLen >= 4 Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
Var ShowText = "Enable"
If TelNumLen > 0 Then
Var ShowTextNumber1 = "Enable"
EndIf
If TelNumLen > 1 Then
Var ShowTextNumber2= "Enable"
EndIf
If TelNumLen > 2 Then
Var ShowTextNumber3= "Enable"
EndIf
If TelNumLen > 3 Then
Var ShowTextNumber4= "Enable"
EndIf
Var ShowSentSmsText = "Invisible"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 620 </X>
<Y> 1292 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_9.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_9.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var PinNumber = PinNumber + "9"
Var ShowTextNumber = "Invisible"
Trim PinNumber 4
StrLen PinNumber TelNumLen
If TelNumLen >= 4 Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
Var ShowText = "Enable"
If TelNumLen > 0 Then
Var ShowTextNumber1 = "Enable"
EndIf
If TelNumLen > 1 Then
Var ShowTextNumber2= "Enable"
EndIf
If TelNumLen > 2 Then
Var ShowTextNumber3= "Enable"
EndIf
If TelNumLen > 3 Then
Var ShowTextNumber4= "Enable"
EndIf
Var ShowSentSmsText = "Invisible"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 477 </X>
<Y> 1432 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_0.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_0.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var PinNumber = PinNumber + "0"
Trim PinNumber 4
StrLen PinNumber TelNumLen
If TelNumLen >= 4 Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowTextNumber = "Invisible"
Var ShowErrorText = "Invisible"
Var ShowText = "Enable"
If TelNumLen > 0 Then
Var ShowTextNumber1 = "Enable"
EndIf
If TelNumLen > 1 Then
Var ShowTextNumber2= "Enable"
EndIf
If TelNumLen > 2 Then
Var ShowTextNumber3= "Enable"
EndIf
If TelNumLen > 3 Then
Var ShowTextNumber4= "Enable"
EndIf
Var ShowSentSmsText = "Invisible"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 620 </X>
<Y> 1432 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_back-1.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_back-1.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Trim PinNumber -1
Var Tel_Confirm_State = "Invisible"
StrLen PinNumber TelNumLen
If TelNumLen = 0 Then
Var ShowTextNumber = "Enable"
EndIf
;Var ShowErrorText = "Invisible"
TimerReset
Refresh
If TelNumLen < 1 Then
Var ShowTextNumber1 = "Invisible"
EndIf
If TelNumLen < 2 Then
Var ShowTextNumber2= "Invisible"
EndIf
If TelNumLen < 3 Then
Var ShowTextNumber3= "Invisible"
EndIf
If TelNumLen < 4 Then
Var ShowTextNumber4= "Invisible"
EndIf
Var ShowSentSmsText = "Invisible"
Var ShowErrorText = "Invisible"
Var ShowText = "Enable"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 188 </X>
<Y> 1600 </Y>
<Filename> Var( DirImage + "/bn_getSMSPage.png") </Filename>
<FilenamePress> Var( DirImage + "/bp_getSMSPage.png") </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var BmiYear = ""
Var PointCrm = ""
Var GetScore = ""
AddData 13 TelephoneNumber BmiYear PointCrm GetScore
Var PinSMSFlag = 0
Var ChangePinPageSMS = CountryRootPath + "xml/page_payment_changePinSMS.lxml"
Open ChangePinPageSMS
</EventClick>
</Button>
<Button>
<X> 616 </X>
<Y> 1600 </Y>
<Refresh> "Enable" </Refresh>
<State> Tel_Confirm_State </State>
<Filename> Var( DirImage + "/bn_continue.png" ) </Filename>
<FilenamePress> Var( DirImage + "/bp_continue.png" )</FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
If GetAccFlag = 0 Then
Var DataTmp = TelephoneNumber + "/"
Var DataTmp = DataTmp + PinNumber
GETACCEXT DataTmp 13
Var GetAccFlag = 1
EndIf
</EventClick>
</Button>
<Image>
<X> 242 </X>
<Y> 830 </Y>
<Filename> Var( DirImage + "/img4.png" ) </Filename>
</Image>
<Image>
<X> 289 </X>
<Y> 870 </Y>
<State> ShowTextNumber1 </State>
<Refresh> "Enable" </Refresh>
<Filename> Var( DirImage + "/text_X.png" )</Filename>
</Image>
<Image>
<X> 446 </X>
<Y> 870 </Y>
<State> ShowTextNumber2 </State>
<Refresh> "Enable" </Refresh>
<Filename> Var( DirImage + "/text_X.png" )</Filename>
</Image>
<Image>
<X> 603 </X>
<Y> 870 </Y>
<State> ShowTextNumber3 </State>
<Refresh> "Enable" </Refresh>
<Filename> Var( DirImage + "/text_X.png" )</Filename>
</Image>
<Image>
<X> 758 </X>
<Y> 870 </Y>
<State> ShowTextNumber4 </State>
<Refresh> "Enable" </Refresh>
<Filename> Var( DirImage + "/text_X.png" )</Filename>
</Image>
<Image>
<X> 188 </X>
<Y> 640 </Y>
<Refresh> "Enable" </Refresh>
<State> ShowText </State>
<Filename> Var( DirImage + "/text_21.png" )</Filename>
</Image>
<Image>
<X> 188 </X>
<Y> 638 </Y>
<Refresh> "Enable" </Refresh>
<State> ShowErrorText </State>
<Filename> Var( DirImage + "/text_25.png") </Filename>
</Image>
<Button>
<X> 859 </X>
<Y> 628 </Y>
<Filename> Var( DirImage + "/Exit.png" ) </Filename>
<FilenamePress> Var( DirImage + "/Exit.png" )</FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var CheckMemberPage2 = CountryRootPath + "xml/page_check_member2.lxml"
Open CheckMemberPage2
</EventClick>
</Button>
<Video>
<X> 0 </X>
<Y> 0 </Y>
<Width> 1080</Width>
<Height> 380 </Height>
<Loop> "true" </Loop>
<Filename> video_menu_0 </Filename>
</Video>
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
</EventSecurity>
</Popup>

View file

@ -0,0 +1,783 @@
<Popup>
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<Refresh> "Partial" </Refresh>
<EventOpen>
; On open
Var Timeout = 0
Var TimeoutSMS = 0
Var StateBGetSMS = "Enable"
Var ShowSentSmsText = "Invisible"
Var ShowTextNumber1 = "Invisible"
Var ShowTextNumber2 = "Invisible"
Var ShowTextNumber3 = "Invisible"
Var ShowTextNumber4 = "Invisible"
Var ShowErrorText = "Invisible"
Var Tel_Confirm_State = "Invisible"
Var PinNumber = ""
Var PinNumberNew = ""
Var ReqFlag = 0
Var ReqT = 0
Var Xtext = 246
If show_eng = "true" Then
Var DirImage = "ROOT/taobin_project/image/collectiing_en"
Var Xtext = 246
Else
Var DirImage = "ROOT/taobin_project/image/collectiing"
EndIf
Var Ext1a = ""
Var TextWaiting = ""
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
Var Timeout = Timeout + 1
If Timeout > 30 Then
If ReqFlag = 0 Then
Var CheckMemberPage2 = CountryRootPath + "xml/page_check_member2.lxml"
Open CheckMemberPage2
EndIf
Var ChangePinPageFailed = CountryRootPath + "xml/page_payment_changePinFailed.lxml"
Open ChangePinPageFailed
EndIf
If ReqFlag = 1 Then
Var TimeoutSMS = TimeoutSMS + 1
If TimeoutSMS > 10 Then
Var DataTmp = TelephoneNumber
GETACCEXT DataTmp 13
Var ReqFlag = 2
EndIf
EndIf
TimerReset
Refresh
</EventTimeout>
<EventIDCard>
</EventIDCard>
<EventCoin>
</EventCoin>
<EventActionOk>
If ReqFlag = 1 Then
Var DataTmp = TelephoneNumber
GETACCEXT DataTmp 13
Var ReqFlag = 2
Else
If ReqFlag = 2 Then
If Ext1a = "ok" Then
Var PinNumberServer = Ext1c
If PinNumberServer = PinNumberNew Then
Var ChangePinPageSuccess = CountryRootPath + "xml/page_payment_changePinSuccess.lxml"
Open ChangePinPageSuccess
Else
Var DataTmp = TelephoneNumber
GETACCEXT DataTmp 13
Var ReqFlag = 2
EndIf
Else
Var ChangePinPageFailed = CountryRootPath + "xml/page_payment_changePinFailed.lxml"
Open ChangePinPageFailed
Var ShowErrorText = "Enable"
EndIf
EndIf
EndIf
TimerReset
Refresh
</EventActionOk>
<EventActionError>
If ReqFlag = 1 Then
Var ChangePinPageFailed = CountryRootPath + "xml/page_payment_changePinFailed.lxml"
Open ChangePinPageFailed
Else
If ReqFlag = 2 Then
Var ChangePinPageFailed = CountryRootPath + "xml/page_payment_changePinFailed.lxml"
Open ChangePinPageFailed
EndIf
EndIf
TimerReset
Refresh
</EventActionError>
<Image>
<X> 0 </X>
<Y> 380 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/alpha.png" </Filename>
</Image>
<Image>
<X> 158 </X>
<Y> 601 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/img_popup1.png" </Filename>
</Image>
<Button>
<X> 333 </X>
<Y> 1004 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_1.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_1.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var PinNumber = PinNumber + "1"
Var ShowTextNumber = "Invisible"
Trim PinNumber 4
StrLen PinNumber TelNumLen
If TelNumLen >= 4 Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
If TelNumLen > 0 Then
Var ShowTextNumber1 = "Enable"
EndIf
If TelNumLen > 1 Then
Var ShowTextNumber2= "Enable"
EndIf
If TelNumLen > 2 Then
Var ShowTextNumber3= "Enable"
EndIf
If TelNumLen > 3 Then
Var ShowTextNumber4= "Enable"
EndIf
Var ShowSentSmsText = "Invisible"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 477 </X>
<Y> 1004 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_2.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_2.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var PinNumber = PinNumber + "2"
Var ShowTextNumber = "Invisible"
Trim PinNumber 4
StrLen PinNumber TelNumLen
If TelNumLen >= 4 Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
If TelNumLen > 0 Then
Var ShowTextNumber1 = "Enable"
EndIf
If TelNumLen > 1 Then
Var ShowTextNumber2= "Enable"
EndIf
If TelNumLen > 2 Then
Var ShowTextNumber3= "Enable"
EndIf
If TelNumLen > 3 Then
Var ShowTextNumber4= "Enable"
EndIf
Var ShowSentSmsText = "Invisible"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 620 </X>
<Y> 1004 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_3.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_3.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var PinNumber = PinNumber + "3"
Var ShowTextNumber = "Invisible"
Trim PinNumber 4
StrLen PinNumber TelNumLen
If TelNumLen >= 4 Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
If TelNumLen > 0 Then
Var ShowTextNumber1 = "Enable"
EndIf
If TelNumLen > 1 Then
Var ShowTextNumber2= "Enable"
EndIf
If TelNumLen > 2 Then
Var ShowTextNumber3= "Enable"
EndIf
If TelNumLen > 3 Then
Var ShowTextNumber4= "Enable"
EndIf
Var ShowSentSmsText = "Invisible"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 333 </X>
<Y> 1148 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_4.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_4.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var PinNumber = PinNumber + "4"
Var ShowTextNumber = "Invisible"
Trim PinNumber 4
StrLen PinNumber TelNumLen
If TelNumLen >= 4 Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
If TelNumLen > 0 Then
Var ShowTextNumber1 = "Enable"
EndIf
If TelNumLen > 1 Then
Var ShowTextNumber2= "Enable"
EndIf
If TelNumLen > 2 Then
Var ShowTextNumber3= "Enable"
EndIf
If TelNumLen > 3 Then
Var ShowTextNumber4= "Enable"
EndIf
Var ShowSentSmsText = "Invisible"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 477 </X>
<Y> 1148 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_5.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_5.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var PinNumber = PinNumber + "5"
Var ShowTextNumber = "Invisible"
Trim PinNumber 4
StrLen PinNumber TelNumLen
If TelNumLen >= 4 Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
If TelNumLen > 0 Then
Var ShowTextNumber1 = "Enable"
EndIf
If TelNumLen > 1 Then
Var ShowTextNumber2= "Enable"
EndIf
If TelNumLen > 2 Then
Var ShowTextNumber3= "Enable"
EndIf
If TelNumLen > 3 Then
Var ShowTextNumber4= "Enable"
EndIf
Var ShowSentSmsText = "Invisible"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 620 </X>
<Y> 1148 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_6.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_6.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var PinNumber = PinNumber + "6"
Var ShowTextNumber = "Invisible"
Trim PinNumber 4
StrLen PinNumber TelNumLen
If TelNumLen >= 4 Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
If TelNumLen > 0 Then
Var ShowTextNumber1 = "Enable"
EndIf
If TelNumLen > 1 Then
Var ShowTextNumber2= "Enable"
EndIf
If TelNumLen > 2 Then
Var ShowTextNumber3= "Enable"
EndIf
If TelNumLen > 3 Then
Var ShowTextNumber4= "Enable"
EndIf
Var ShowSentSmsText = "Invisible"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 333 </X>
<Y> 1292 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_7.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_7.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var PinNumber = PinNumber + "7"
Var ShowTextNumber = "Invisible"
Trim PinNumber 4
StrLen PinNumber TelNumLen
If TelNumLen >= 4 Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
If TelNumLen > 0 Then
Var ShowTextNumber1 = "Enable"
EndIf
If TelNumLen > 1 Then
Var ShowTextNumber2= "Enable"
EndIf
If TelNumLen > 2 Then
Var ShowTextNumber3= "Enable"
EndIf
If TelNumLen > 3 Then
Var ShowTextNumber4= "Enable"
EndIf
Var ShowSentSmsText = "Invisible"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 477 </X>
<Y> 1292 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_8.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_8.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var PinNumber = PinNumber + "8"
Var ShowTextNumber = "Invisible"
Trim PinNumber 4
StrLen PinNumber TelNumLen
If TelNumLen >= 4 Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
If TelNumLen > 0 Then
Var ShowTextNumber1 = "Enable"
EndIf
If TelNumLen > 1 Then
Var ShowTextNumber2= "Enable"
EndIf
If TelNumLen > 2 Then
Var ShowTextNumber3= "Enable"
EndIf
If TelNumLen > 3 Then
Var ShowTextNumber4= "Enable"
EndIf
Var ShowSentSmsText = "Invisible"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 620 </X>
<Y> 1292 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_9.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_9.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var PinNumber = PinNumber + "9"
Var ShowTextNumber = "Invisible"
Trim PinNumber 4
StrLen PinNumber TelNumLen
If TelNumLen >= 4 Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowErrorText = "Invisible"
If TelNumLen > 0 Then
Var ShowTextNumber1 = "Enable"
EndIf
If TelNumLen > 1 Then
Var ShowTextNumber2= "Enable"
EndIf
If TelNumLen > 2 Then
Var ShowTextNumber3= "Enable"
EndIf
If TelNumLen > 3 Then
Var ShowTextNumber4= "Enable"
EndIf
Var ShowSentSmsText = "Invisible"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 477 </X>
<Y> 1432 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_0.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_0.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var PinNumber = PinNumber + "0"
Trim PinNumber 4
StrLen PinNumber TelNumLen
If TelNumLen >= 4 Then
Var Tel_Confirm_State = "Enable"
EndIf
Var ShowTextNumber = "Invisible"
Var ShowErrorText = "Invisible"
If TelNumLen > 0 Then
Var ShowTextNumber1 = "Enable"
EndIf
If TelNumLen > 1 Then
Var ShowTextNumber2= "Enable"
EndIf
If TelNumLen > 2 Then
Var ShowTextNumber3= "Enable"
EndIf
If TelNumLen > 3 Then
Var ShowTextNumber4= "Enable"
EndIf
Var ShowSentSmsText = "Invisible"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 620 </X>
<Y> 1432 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_back-1.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_back-1.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Trim PinNumber -1
Var Tel_Confirm_State = "Invisible"
StrLen PinNumber TelNumLen
If TelNumLen = 0 Then
Var ShowTextNumber = "Enable"
EndIf
;Var ShowErrorText = "Invisible"
TimerReset
Refresh
If TelNumLen < 1 Then
Var ShowTextNumber1 = "Invisible"
EndIf
If TelNumLen < 2 Then
Var ShowTextNumber2= "Invisible"
EndIf
If TelNumLen < 3 Then
Var ShowTextNumber3= "Invisible"
EndIf
If TelNumLen < 4 Then
Var ShowTextNumber4= "Invisible"
EndIf
Var ShowSentSmsText = "Invisible"
Var ShowErrorText = "Invisible"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 397 </X>
<Y> 1600 </Y>
<Refresh> "Enable" </Refresh>
<State> Tel_Confirm_State </State>
<Filename> Var( DirImage + "/bn_continue.png" ) </Filename>
<FilenamePress> Var( DirImage + "/bn_continue.png" )</FilenamePress>
<FilenameDisable> Var( DirImage + "/bn_continue.png" )</FilenameDisable>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
If ReqFlag = 0 Then
Var BmiYear = PinNumber
Var PointCrm = ""
Var GetScore = "1"
Var PinNumberNew = PinNumber
AddData 20 TelephoneNumber BmiYear PointCrm GetScore
Var ReqFlag = 1
Var Tel_Confirm_State = "Invisible"
Var Timeout = 0
If show_eng = "true" Then
Var TextWaiting = "Please wait..."
Else
Var TextWaiting = "กรุณารอซักครู่..."
EndIf
EndIf
Refresh
</EventClick>
</Button>
<Image>
<X> 242 </X>
<Y> 830 </Y>
<Filename> Var( DirImage + "/img4.png" ) </Filename>
</Image>
<Image>
<X> 289 </X>
<Y> 870 </Y>
<State> ShowTextNumber1 </State>
<Refresh> "Enable" </Refresh>
<Filename> Var( DirImage + "/text_X.png" )</Filename>
</Image>
<Image>
<X> 446 </X>
<Y> 870 </Y>
<State> ShowTextNumber2 </State>
<Refresh> "Enable" </Refresh>
<Filename> Var( DirImage + "/text_X.png" )</Filename>
</Image>
<Image>
<X> 603 </X>
<Y> 870 </Y>
<State> ShowTextNumber3 </State>
<Refresh> "Enable" </Refresh>
<Filename> Var( DirImage + "/text_X.png" )</Filename>
</Image>
<Image>
<X> 758 </X>
<Y> 870 </Y>
<State> ShowTextNumber4 </State>
<Refresh> "Enable" </Refresh>
<Filename> Var( DirImage + "/text_X.png" )</Filename>
</Image>
<Text>
<X> 5 </X>
<Y> 1700 </Y>
<Refresh> "Enable" </Refresh>
<Size> 30 </Size>
<Align> Center </Align>
<Width> 1080 </Width>
<Font> RobotoRegular </Font>
<Color> 0xFF0000 </Color>
<Value> TextWaiting </Value>
</Text>
<Image>
<X> 188 </X>
<Y> 640 </Y>
<Filename> Var( DirImage + "/text_23.png" )</Filename>
</Image>
<Button>
<X> 859 </X>
<Y> 628 </Y>
<Filename> Var( DirImage + "/Exit.png" ) </Filename>
<FilenamePress> Var( DirImage + "/Exit.png" )</FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var CheckMemberPage2 = CountryRootPath + "xml/page_check_member2.lxml"
Open CheckMemberPage2
</EventClick>
</Button>
<Video>
<X> 0 </X>
<Y> 0 </Y>
<Width> 1080</Width>
<Height> 380 </Height>
<Loop> "true" </Loop>
<Filename> video_menu_0 </Filename>
</Video>
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
</EventSecurity>
</Popup>

View file

@ -0,0 +1,133 @@
<Popup>
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<Refresh> "Partial" </Refresh>
<EventOpen>
; On open
Var Timeout = 0
Var Tel_Confirm_State = "Enable"
If show_eng = "true" Then
Var DirImage = "ROOT/taobin_project/image/collectiing_en"
Else
Var DirImage = "ROOT/taobin_project/image/collectiing"
EndIf
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
Var Timeout = Timeout + 1
If Timeout > 30 Then
Var CheckMemberPage2 = CountryRootPath + "xml/page_check_member2.lxml"
Open CheckMemberPage2
EndIf
TimerReset
Refresh
</EventTimeout>
<EventActionOk>
</EventActionOk>
<EventActionError>
</EventActionError>
<Image>
<X> 0 </X>
<Y> 380 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/alpha.png" </Filename>
</Image>
<Image>
<X> 158 </X>
<Y> 601 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/img_popup1.png" </Filename>
</Image>
<Button>
<X> 248 </X>
<Y> 1600 </Y>
<Refresh> "Enable" </Refresh>
<State> Tel_Confirm_State </State>
<Filename> Var( DirImage + "/bn_back3.png" ) </Filename>
<FilenamePress> Var( DirImage + "/bp_back3.png" )</FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Open "ROOT/taobin_project/xml/page_back_to_main.xml"
</EventClick>
</Button>
<Button>
<X> 558 </X>
<Y> 1600 </Y>
<Refresh> "Enable" </Refresh>
<State> Tel_Confirm_State </State>
<Filename> Var( DirImage + "/bn_tryAgainPin.png" ) </Filename>
<FilenamePress> Var( DirImage + "/bp_tryAgainPin.png" )</FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var ChangePinPage1 = CountryRootPath + "xml/page_payment_changePin1.lxml"
Open ChangePinPage1
</EventClick>
</Button>
<Image>
<X> 189 </X>
<Y> 1004 </Y>
<Filename> Var( DirImage + "/PinFailed.png" ) </Filename>
</Image>
<Button>
<X> 859 </X>
<Y> 628 </Y>
<Filename> Var( DirImage + "/Exit.png" ) </Filename>
<FilenamePress> Var( DirImage + "/Exit.png" )</FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var CheckMemberPage2 = CountryRootPath + "xml/page_check_member2.lxml"
Open CheckMemberPage2
</EventClick>
</Button>
<Video>
<X> 0 </X>
<Y> 0 </Y>
<Width> 1080</Width>
<Height> 380 </Height>
<Loop> "true" </Loop>
<Filename> video_menu_0 </Filename>
</Video>
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
</EventSecurity>
</Popup>

View file

@ -0,0 +1,138 @@
<Popup>
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<Refresh> "Partial" </Refresh>
<EventOpen>
; On open
Var Timeout = 0
Var Tel_Confirm_State = "Enable"
If show_eng = "true" Then
Var DirImage = "ROOT/taobin_project/image/collectiing_en"
Else
Var DirImage = "ROOT/taobin_project/image/collectiing"
EndIf
If PinSMSFlag = 1 Then
If show_eng = "true" Then
PlayLong "/mnt/sdcard/coffeevending/taobin_project/sound_eng/Press_next_to_receive_code_via_SMS.mp3"
Else
PlayLong "/mnt/sdcard/coffeevending/taobin_project/sound_thai/Press_next_to_receive_code_via_SMS.mp3"
EndIf
EndIf
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
Var Timeout = Timeout + 1
If Timeout > 30 Then
If PinSMSFlag = 1 Then
Var CheckMemberPage1 = CountryRootPath + "xml/page_check_member1.lxml"
Open CheckMemberPage1
Else
Var CheckMemberPage2 = CountryRootPath + "xml/page_check_member2.lxml"
Open CheckMemberPage2
EndIf
EndIf
</EventTimeout>
<EventActionOk>
</EventActionOk>
<EventActionError>
</EventActionError>
<Image>
<X> 0 </X>
<Y> 380 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/alpha.png" </Filename>
</Image>
<Image>
<X> 158 </X>
<Y> 601 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/img_popup1.png" </Filename>
</Image>
<Button>
<X> 397 </X>
<Y> 1600 </Y>
<Refresh> "Enable" </Refresh>
<State> Tel_Confirm_State </State>
<Filename> Var( DirImage + "/bn_continue.png" ) </Filename>
<FilenamePress> Var( DirImage + "/bn_continue.png" )</FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
If PinSMSFlag = 1 Then
Var CheckMemberPage1 = CountryRootPath + "xml/page_check_member1.lxml"
Open CheckMemberPage1
Else
Var ChangePinPage1 = CountryRootPath + "xml/page_payment_changePin1.lxml"
Open ChangePinPage1
EndIf
</EventClick>
</Button>
<Image>
<X> 189 </X>
<Y> 965 </Y>
<Filename> Var( DirImage + "/smartphone.png" ) </Filename>
</Image>
<Button>
<X> 859 </X>
<Y> 628 </Y>
<Filename> Var( DirImage + "/Exit.png" ) </Filename>
<FilenamePress> Var( DirImage + "/Exit.png" )</FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
If PinSMSFlag = 1 Then
Var CheckMemberPage1 = CountryRootPath + "xml/page_check_member1.lxml"
Open CheckMemberPage1
Else
Var CheckMemberPage2 = CountryRootPath + "xml/page_check_member2.lxml"
Open CheckMemberPage2
EndIf
</EventClick>
</Button>
<Video>
<X> 0 </X>
<Y> 0 </Y>
<Width> 1080</Width>
<Height> 380 </Height>
<Loop> "true" </Loop>
<Filename> video_menu_0 </Filename>
</Video>
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
</EventSecurity>
</Popup>

View file

@ -0,0 +1,129 @@
<Popup>
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
<Background> "0xeae6e1" </Background>
<Volume> SoundVolume </Volume>
<Refresh> "Partial" </Refresh>
<EventOpen>
; On open
Var Timeout = 0
Var Tel_Confirm_State = "Enable"
If show_eng = "true" Then
Var DirImage = "ROOT/taobin_project/image/collectiing_en"
Else
Var DirImage = "ROOT/taobin_project/image/collectiing"
EndIf
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
Var Timeout = Timeout + 1
If Timeout > 30 Then
Var CheckMemberPage2 = CountryRootPath + "xml/page_check_member2.lxml"
Open CheckMemberPage2
EndIf
TimerReset
Refresh
</EventTimeout>
<EventActionOk>
</EventActionOk>
<EventActionError>
</EventActionError>
<Image>
<X> 0 </X>
<Y> 380 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/alpha.png" </Filename>
</Image>
<Image>
<X> 158 </X>
<Y> 601 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/img_popup1.png" </Filename>
</Image>
<Button>
<X> 248 </X>
<Y> 1600 </Y>
<Refresh> "Enable" </Refresh>
<State> Tel_Confirm_State </State>
<Filename> Var( DirImage + "/bn_back3.png" ) </Filename>
<FilenamePress> Var( DirImage + "/bp_back3.png" )</FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Open "ROOT/taobin_project/xml/page_back_to_main.xml"
</EventClick>
</Button>
<Button>
<X> 558 </X>
<Y> 1600 </Y>
<Refresh> "Enable" </Refresh>
<State> Tel_Confirm_State </State>
<Filename> Var( DirImage + "/bn_catalog.png" ) </Filename>
<FilenamePress> Var( DirImage + "/bp_catalog.png" )</FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Open "ROOT/taobin_project/xml/page_catalog.xml"
</EventClick>
</Button>
<Image>
<X> 189 </X>
<Y> 1004 </Y>
<Filename> Var( DirImage + "/PinSuccess.png" ) </Filename>
</Image>
<Button>
<X> 859 </X>
<Y> 628 </Y>
<Filename> Var( DirImage + "/Exit.png" ) </Filename>
<FilenamePress> Var( DirImage + "/Exit.png" )</FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var CheckMemberPage2 = CountryRootPath + "xml/page_check_member2.lxml"
Open CheckMemberPage2
</EventClick>
</Button>
<Video>
<X> 0 </X>
<Y> 0 </Y>
<Width> 1080</Width>
<Height> 380 </Height>
<Loop> "true" </Loop>
<Filename> video_menu_0 </Filename>
</Video>
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
</EventSecurity>
</Popup>

View file

@ -0,0 +1,149 @@
<Page>
<X> 0 </X>
<Y> 608 </Y>
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1312 </Height>
<Background> "0xEFEDEA" </Background>
<Volume> SoundVolume </Volume>
<EventOpen>
Var countClick = 0
Var countClick2 = 0
Var CountryName = "HongKong"
DEBUGVAR "HK Remove Cup"
Var DirImage = "ROOT/taobin_project/inter/common/image/user_take_cup_en/"
LED LedDoorDoor 5 255 255 255 255
Var CheckCupStateDoorCupClose = ""
Var CheckCupStateDoorCupCloseCnt = 0
DEBUGVAR DoorCupPosition
If DoorCupPosition = "bottom" Then
Var buttonRemoveCup = "Enable"
EndIf
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
;SAVELOG MachineErrorDetail
Var MachineErrorDetailAll = MachineErrorDetail + " / "
Var MachineErrorDetailAll = MachineErrorDetailAll + MachineErrorDetailEng
If MachineStage = "show-menu" Then
Open "ROOT/taobin_project/xml/page_board.xml"
EndIf
If MachineStage = "close-maintenance" Then
Open "ROOT/taobin_project/xml/page_show_error.lxml"
EndIf
Var Timeout = Timeout + 1
DEBUGVAR Timeout
If Timeout > 5 Then
Var Timeout = 0
DEBUGVAR DoorCupPosition
If DoorCupPosition = "bottom" Then
Var buttonRemoveCup = "Enable"
EndIf
EndIf
; Logic have differrent drinkfail3.xml
; protect lock
;
If CheckCupStateDoorCupCloseCnt > 0 Then
Var CheckCupStateDoorCupCloseCnt = CheckCupStateDoorCupCloseCnt - 1
EndIf
If CheckCupStateDoorCupCloseCnt = 0 Then
Var CheckCupStateDoorCupClose = ""
EndIf
DEBUGVAR HaveCup
If HaveCup = "true" Then
Else
If buttonRemoveCup = "Enable" Then
Var buttonRemoveCup = "Invisible"
EndIf
EndIf
DEBUGVAR buttonRemoveCup
DEBUGVAR CheckCupStateDoorCupClose
Refresh
TimerReset
</EventTimeout>
<Text>
<X> 50 </X>
<Y> 852 </Y>
<Width> 1000 </Width>
<Height> 300 </Height>
<Language>
<ID> 000409 </ID>
</Language>
</Text>
<Text>
<X> 50 </X>
<Y> 1200 </Y>
<Width> 1000 </Width>
<Height> 200 </Height>
<Language>
<ID> 000410 </ID>
</Language>
</Text>
<Button>
<X> 212 </X>
<Y> 1661 </Y>
<Filename> Var( DirImage + "/bn_door_open.png" ) </Filename>
<FilenamePress> Var( DirImage + "/bp_door_open.png" )</FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<State> buttonRemoveCup </State>
<EventClick>
Machine RemoveCup
Machine DoorLidOpen
Var buttonRemoveCup = "Invisible"
Var CheckCupStateDoorCupClose = "reset"
Var CheckCupStateDoorCupCloseCnt = 30
</EventClick>
<Language>
<ID> 000411 </ID>
<X> 80 </X>
<Y> 40 </Y>
<Width> 500 </Width>
<Height> 50 <Height>
</Language>
</Button>
<Text>
<X> 5 </X>
<Y> 1868 </Y>
<Size> 24 </Size>
<Align> Center </Align>
<Width> 1080 </Width>
<Font> RobotoRegular </Font>
<Color> 0xDE794E </Color>
<Value> MachineErrorDetailAll </Value>
</Text>
</Page>

File diff suppressed because it is too large Load diff