特戒引擎

通区数据表¶

特戒引擎脚本示例：¶

 ¶

[@main]
#say
\ \<创建表/@创建>
\ \<查看表内容/@查看>
\ \<修改表/@@inputString0>
\ \<加记录/@加记录>
\ \<删记录/@删记录>
\ \<重置列/@重置列>
\ \<遍历表/@遍历表>
\ \<查看通区表清单/@通区表>
\ \<查看通区表记录数/@记录数>
\ \<读配置/@读配置>
\ \<删除表/@删除>
 
[@创建]
#act
tbl_create_cross tb_cross沙城捐献 关键字 奖励名称 捐献额度 领取状态
tbl_add tb_cross沙城捐献 1 超级富豪 1000金币 1
tbl_add tb_cross沙城捐献 2 大富豪 900金币 3
goto @存盘同步
 
[@查看]
#if
tbl_exist tb_cross沙城捐献
#act
tbl_toStr tb_cross沙城捐献 s0
messageBox <$str(s0)>
#elseAct
messageBox 表不存在，请先创建表
 
[@inputString0]
;--修改表，关键字2的捐献额度
#act
mov <$tbl(tb_cross沙城捐献,2,捐献额度)> <$str(s0)>
goto @存盘同步
 
[@加记录]
#act
tbl_add tb_cross沙城捐献 3 小富豪 500金币 2
goto @存盘同步
 
[@存盘同步]
#act
tbl_save tb_cross沙城捐献
messageBox 保存完毕
 
[@删记录]
#act
tbl_del tb_cross沙城捐献 1
goto @存盘同步
 
[@删除]
#act
tbl_destroy tb_cross沙城捐献
messageBox 删除完毕
 
[@重置列]
#act
tbl_reset tb_cross沙城捐献 领取状态 0
goto @存盘同步
 
[@遍历表]
#if tbl tb_cross沙城捐献 s$关键字
#act
mov s0 <$tbl(tb_cross沙城捐献,s$关键字,奖励名称)>
sendMsg 6 <$str(s0)>
 
[@通区表]
#act
tbl_toStr sys_tbl_cross s0
messageBox <$str(s0)>
 
[@记录数]
#act
tbl_size tb_cross沙城捐献 n0
messageBox 通区表记录数量<$str(n0)>
 
[@读配置]
#act
tbl_load 沙捐配置 \数据文件\沙城捐献.csv
tbl_create_cross tb_cross沙城捐献 关键字 奖励名称 捐献额度 领取状态
tbl_copy 沙捐配置 tb_cross沙城捐献
goto @存盘同步