通区文本设置(新)
通区设置，需要在后台开启功能才可以使用注:开通新通区后,将无法再使用老通区)
;通区创建和删除文本
TongFile 参数1 参数2
参数1：(0创建文件
1删除文件)
参数2：文件名称 如：aaa.txt
;通区同步文本
UpDateTongFile
参数1
参数1：文件名称 如：996m2.txt
;通区同步文本
UpDateTongFile 参数1
参数2
参数1：远程文件名称 如：bbb.txt
参数2：同步的文件名 (如：996m2.txt)
;更改文件内容
ChangeTongFile 参数1 参数2 参数3
参数4
参数1：文本路径(最大200字符)
参数2：内容(最大64中文字符)
参数3：指定操作行
参数4：0 =文件尾追加内容(快) ;
1 =插入内容到指定行 ; 2=替换内容到指定行; 3=删除指定行内容; 4=清空整个文件内容
;通区变量同步
UpdateTongVar
参数1
参数1：全局变量名，如果是全局自定义变量，这么写：GLOBAL(变量名)，如果是G，A变量，就正常写即可
新增命令
主区常量<$MAINTONGSERVER>如果未设置主区,常量为0
- 主区执行
增加创建文件
MAINTONGFILE参数1 参数2 参数3
参数1：区服ID
参数2：类别（类别 0创建文件
1删除文件）
参数3：文件（..\QuestDiary\996m2.txt）
- 写入指定 区服 配置
WRITETONGKEY参数1
参数2 参数3
参数4
参数1：区服ID
参数2：文件路径（..\QuestDiary\996m2.txt）
参数3：key(字段
参数4：value(值)
- 读取指定 区服 配置
读取后由QF触发
READTONGKEY参数1 参数2 参数3
参数4
参数1：区服ID
参数2：文件路径（..\QuestDiary\996m2.txt）
参数3：key(字段
参数4：变量(GLOBAL(变量名)
或 G100 或 A100)
- 执行查询通区主服 执行后触发QF 在线 @MAINTONGLINE 离线
@MAINTONGOFF
CHECKTONGSVR参数1 参数2 参数3
参数4
参数1：区服ID
参数2：执行后触发QF
- 主区执行 同步文件
将本地文件路径同步到服务器路径
UPDATEMAINTONGFILE参数1
参数2
参数1：区服ID
参数2：文件路径（..\QuestDiary\996m2.txt）
- 主区执行 同步文件
将本地文件路径同步到服务器路径
UPDATEMAINTONGFILE参数1 参数2
参数3
参数1：区服ID
参数2：服务器文件路径（..\QuestDiary\bbb.txt）
参数3：本地文件路径（..\QuestDiary\996m2.txt）
- 主区执行 拉取文件
GETMAINTONGFILE 参数1 参数2
参数3
参数1：区服ID
参数2：本地文件路径（..\QuestDiary\bbb.txt）
参数3：远程服务器路径（..\QuestDiary\996m2.txt）
;例子
[@新建文件]
#IF
#ACT
TongFile 0
..\QuestDiary\996m2.txt
[@删除文件]
#IF
#ACT
TongFile 1
..\QuestDiary\996m2.txt
[@同步目标文件]
#IF
#ACT
UpDateTongFile ..\QuestDiary\bbb.txt
..\QuestDiary\996m2.txt
[@同步当前文件]
#IF
#ACT
UpDateTongFile
..\QuestDiary\996m2.txt
[@InPutString22]
#IF
#ACT
ChangeTongFile
..\QuestDiary\996m2.txt <$STR(S22)> 1 0
[@同步通区变量]
#act
MOV G100 200
UpdateTongVar
G100
新增命令
[@主区创建文件]
#if
LARGE <$MAINTONGSERVER>
0
#act
MAINTONGFILE <$MAINTONGSERVER> 0
..\QuestDiary\<$USERACCOUNT>.txt
#elseact
messagebox
主区不存在
[@主区删除文件]
#if
LARGE <$MAINTONGSERVER>
0
#act
MAINTONGFILE <$MAINTONGSERVER> 1
..\QuestDiary\<$USERACCOUNT>.txt
#elseact
messagebox
主区不存在
[@同步文件1]
#if
LARGE <$MAINTONGSERVER> 0
#act
mov
S66 <$UTCNOW8>
AddTextListEx ..\QuestDiary\996m2.txt <$str(S66)>
0
UPDATEMAINTONGFILE <$MAINTONGSERVER>
..\QuestDiary\996m2.txt
#elseact
messagebox
主区不存在
[@读取同步文件1]
#if
LARGE <$MAINTONGSERVER> 0
Equal
N$等待时间 0
#act
mov N$等待时间 1
GETMAINTONGFILE <$MAINTONGSERVER>
..\QuestDiary\bbb.txt ..\QuestDiary\996m2.txt
sendmsg 6 延时3秒跳转结果
DELAYGOTO
3000 @读取同步文件1s
#elseact
sendmsg 6 延时等待,出结果
[@读取同步文件1s]
#act
mov S66
mov N$等待时间
0
GetListString ..\QuestDiary\bbb.txt 0 S66
sendmsg 6
读取远程服务器996m2到本地bbb通区值<$str(S66)>
[@同步文件2]
#if
LARGE <$MAINTONGSERVER>
0
#act
mov S66 <$UTCNOW8>
AddTextListEx ..\QuestDiary\996m2.txt
<$str(S66)> 0
UPDATEMAINTONGFILE <$MAINTONGSERVER>
..\QuestDiary\bbb.txt ..\QuestDiary\996m2.txt
#elseact
messagebox
主区不存在
[@读取同步文件2]
#if
LARGE <$MAINTONGSERVER> 0
Equal
N$等待时间2 0
#act
mov N$等待时间2 1
GETMAINTONGFILE <$MAINTONGSERVER>
..\QuestDiary\996m2.txt ..\QuestDiary\bbb.txt
sendmsg 6 延时3秒跳转结果
DELAYGOTO
3000 @读取同步文件2S
#elseact
sendmsg 6 延时等待,出结果
[@读取同步文件2S]
#act
mov S66
mov N$等待时间2
0
GetListString ..\QuestDiary\996m2.txt 0 S66
sendmsg 6
读取远程服务器bbb到本地996m2通区值<$str(S66)>
[@向服务器写入S]
#if
LARGE <$MAINTONGSERVER>
0
#act
WRITETONGKEY <$MAINTONGSERVER> ..\QuestDiary\aaa.txt 通区配置
<$UTCNOW8>
#elseact
messagebox 主区不存在
[@读取服务器内容S]
#if
LARGE <$MAINTONGSERVER>
0
#act
READTONGKEY <$MAINTONGSERVER> ..\QuestDiary\aaa.txt 通区配置
A100
;由QF触发反馈结果@READTONGOK
#elseact
messagebox 主区不存在
[@检测服务器是否可用]
#if
LARGE <$MAINTONGSERVER>
0
#act
CHECKTONGSVR <$MAINTONGSERVER>
sendmsg 6
当前服务器ID是<$MAINTONGSERVER>,等待触发反馈结果
#elseact
messagebox
主区不存在
;--------------------------------通区触发
[@READTONGOK]
#act
sendmsg
0
QF触发:当前读取服务器<$MAINTONGSERVER>--时间戳--<$UTCNOW8>--读取值<$str(A100)>
[@MAINTONGLINE]
#act
sendmsg 0
QF触发:<$MAINTONGSERVER>服务器在线<$UTCNOW8>
[@MAINTONGOFF]
#act
sendmsg 0
QF触发:<$UTCNOW8>服务器断开
---------------------------------------------------------------
通区变量操作
命令:SETTONGVAR 参数1 参数2 参数3
参数1：通区变量1-50
参数2：+ - =
参数3：数值(可超过21亿)
命令:SETTONGVAR -1 //清理所有通区变量(将1-50个通区变量初始化为0)
[@CHANGETONGVAR] //修改成功后触发QF
通区变量常量:<$TONGVAR1> ~ <$TONGVAR50>
例:
[@通区变量1增加10]
#IF
#act
SETTONGVAR 1 + 10
SendMsg 0 当前通区变量1为:<$TONGVAR1>
[@通区变量1清除]
#IF
#act
SETTONGVAR 1 = 0
SendMsg 0 当前通区变量1为:<$TONGVAR1>
;修改成功后触发QF
[@CHANGETONGVAR]
#IF
#ACT
SendMsg 0 IDX:<$PARAM1>-------修改前：<$PARAM2>-------修改后：<$PARAM3>