996引擎老三端txt通区示例

R8
后端
9天前
23热度
0评论

QFunction-0.txt


;充值触发
[@ReCharge]
#if
CheckContainsText <$ServerName> 测
#Act
MOV N$充 <$STR(M0)>
MOV N$充值时间 1
#ElseAct
Break

#if
LARGE <$MAINTONGSERVER> 0
not EQUAL <$MAINTONGSERVER> <$SERVERIDX>
#Act
GETMAINTONGFILE <$MAINTONGSERVER> ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt
DELAYGOTO 2000 @延迟记录充值信息QF
#ElseAct
goto @延迟记录充值信息QF

[@延迟记录充值信息QF]
#If
equal N$充值时间 1
#Act
MOV N$充值时间 0

MOV N$一区充值数量 0
MOV N$二区充值数量 0
MOV N$三区充值数量 0
MOV N$四区充值数量 0
MOV N$五区充值数量 0
MOV N$公测等级奖励 0
MOV N$公测回收金币 0
MOV N$公测回收绑金 0
MOV N$公测唯一赞助 0
ReadConfigFileItem ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt setup 1 N$一区充值数量
ReadConfigFileItem ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt setup 2 N$二区充值数量
ReadConfigFileItem ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt setup 3 N$三区充值数量
ReadConfigFileItem ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt setup 4 N$四区充值数量
ReadConfigFileItem ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt setup 5 N$五区充值数量
ReadConfigFileItem ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt setup 6 N$公测等级奖励
ReadConfigFileItem ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt setup 7 N$公测回收金币
ReadConfigFileItem ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt setup 8 N$公测回收绑金
ReadConfigFileItem ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt setup 9 N$公测唯一赞助
#ElseAct
Break

#If
CheckContainsText <$ServerName> 01区
#Act
FORMULATION <$Str(N$一区充值数量)>+<$Str(N$充)> N$一区充值数量
WriteConfigFileItem ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt setup 1 <$Str(N$一区充值数量)>

#If
CheckContainsText <$ServerName> 02区
#Act
FORMULATION <$Str(N$二区充值数量)>+<$Str(N$充)> N$二区充值数量
WriteConfigFileItem ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt setup 2 <$Str(N$二区充值数量)>

#If
CheckContainsText <$ServerName> 03区
#Act
FORMULATION <$Str(N$三区充值数量)>+<$Str(N$充)> N$三区充值数量
WriteConfigFileItem ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt setup 3 <$Str(N$三区充值数量)>

#If
CheckContainsText <$ServerName> 04区
#Act
FORMULATION <$Str(N$四区充值数量)>+<$Str(N$充)> N$四区充值数量
WriteConfigFileItem ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt setup 4 <$Str(N$四区充值数量)>

#If
CheckContainsText <$ServerName> 05区
#Act
FORMULATION <$Str(N$五区充值数量)>+<$Str(N$充)> N$五区充值数量
WriteConfigFileItem ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt setup 5 <$Str(N$五区充值数量)>

#If
LARGE <$MAINTONGSERVER> 0
not EQUAL <$MAINTONGSERVER> <$SERVERIDX>
#Act
UpDateTongFile ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt

#If
#Act
MOV N$充 0

;回收触发
[@RECYCLING]
#if
LARGE <$MAINTONGSERVER> 0
not EQUAL <$MAINTONGSERVER> <$SERVERIDX>
not equal <$ServerName>
#act
GETMAINTONGFILE <$MAINTONGSERVER> ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt

#If
#Act
MOV S$回收数据
MOV S$回收物品数据
MOV S$回收物品数据 <$TOTALRECYITEMS>
MOV S$回收数据 <$RECYITEMS>
;sendmsg 7 <$Str(S$回收数据)>
;sendmsg 7 <$GETSTRVALUE(S$回收数据,50069)>，<$GETSTRVALUE(S$回收数据,50071)>


#or
CheckContainsText <$ServerName> 测
equal U14 1
#Act
MOV N$公测回收金币记录 0
MOV N$公测回收绑金记录 0
#ElseAct
DELAYGOTO 200 @清楚回收触发数据
Break

#If
not equal <$GETSTRVALUE(S$回收数据,1)>
#Act
MOV N$公测回收金币记录 <$GETSTRVALUE(S$回收数据,1)>

#If
not equal <$GETSTRVALUE(S$回收数据,3)>
#Act
MOV N$公测回收绑金记录 <$GETSTRVALUE(S$回收数据,3)>

#or
Large N$公测回收金币记录 0
Large N$公测回收绑金记录 0
#ACT
MOVR N$回收时间 1000 3100
DELAYGOTO <$Str(N$回收时间)> @延迟记录回收信息
Break

[@延迟记录回收信息]
#If
Large N$回收时间 0
#Act
MOV N$回收时间 0
#ElseAct
Break

#If
#Act
MOV N$一区充值数量 0
MOV N$二区充值数量 0
MOV N$三区充值数量 0
MOV N$四区充值数量 0
MOV N$五区充值数量 0
MOV N$公测等级奖励 0
MOV N$公测回收金币 0
MOV N$公测回收绑金 0
MOV N$公测唯一赞助 0
ReadConfigFileItem ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt setup 1 N$一区充值数量
ReadConfigFileItem ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt setup 2 N$二区充值数量
ReadConfigFileItem ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt setup 3 N$三区充值数量
ReadConfigFileItem ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt setup 4 N$四区充值数量
ReadConfigFileItem ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt setup 5 N$五区充值数量
ReadConfigFileItem ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt setup 6 N$公测等级奖励
ReadConfigFileItem ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt setup 7 N$公测回收金币
ReadConfigFileItem ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt setup 8 N$公测回收绑金
ReadConfigFileItem ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt setup 9 N$公测唯一赞助

#If
Large N$公测回收金币记录 0
#Act
INC N$公测回收金币 <$Str(N$公测回收金币记录)>
WriteConfigFileItem ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt setup 7 <$str(N$公测回收金币)>
UpDateTongFile ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt
DELAYGOTO 200 @清楚回收触发数据
Break

#If
Large N$公测回收绑金记录 0
#Act
INC N$公测回收绑金 <$Str(N$公测回收绑金记录)>
WriteConfigFileItem ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt setup 8 <$str(N$公测回收绑金)>
UpDateTongFile ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt
DELAYGOTO 200 @清楚回收触发数据
Break

[@清楚回收触发数据]
#If
#Act
MOV S$回收数据
MOV S$回收物品数据

QF引用的NPC：公测奖励.txt

[@公测奖励啊]
{
#If
Large <$UTCNOW8> 1748880000
#Act
sendmsg 9 已过领取时间
break

#If
small <$UTCNOW8> N$记录数据时间戳
#Act
sendmsg 9 获取数据中，请稍等
break

#if
not EQUAL <$MAINTONGSERVER> <$SERVERIDX>
not equal <$ServerName>
LARGE <$MAINTONGSERVER> 0
#Act
GETMAINTONGFILE <$MAINTONGSERVER> ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt

#If
#Act
MOV S$主号1 0
MOV S$主号2 1
MOV S$切 0
MOV S$标记 人物
MOV N$记录数据时间戳 <$UTCNOW8>
Inc N$记录数据时间戳 3

#If
CheckContainsText <$ServerName> 测
#Act
sendmsg 9 获取数据中，请稍等
MOVR N$随机时间 1000 3100
MOV S$随机时间 1
DELAYGOTO <$Str(N$随机时间)> @测试奖励面板 1
#ElseAct
sendmsg 9 获取数据中，请稍等
MOVR N$随机时间 1000 3100
DELAYGOTO <$Str(N$随机时间)> @测试领奖面板 1

[@测试领奖面板]
#If
Large N$随机时间 0
#Act
MOV N$随机时间 0
#ElseAct
Break

#If
#Act
MOV S$LINGQU
goto @获取公测奖励数据

#If
small n$公测充值元宝 1
#Act
MOV n$公测充值元宝 0

#If
#Act
#Say
<Img|x=-1500|y=-1500|width=3000|height=3000|img=public/1900000651_1.png|link=@exit>
<Img|reset=1|img=custom/main/di.png|show=4|loadDelay=0|move=0|bg=1>
<Layout|x=765.0|y=-1.0|width=80|height=80|link=@exit>
<RText|a=4|x=382.0|y=18.0|outline=1|color=103|size=20|text=公测奖励>
<Button|x=765.0|y=-1.0|pimg=custom/main/exit.png|nimg=custom/main/exit.png|link=@exit>
<Img|x=14.0|y=35.0|show=4|img=custom/ceshi/bg2.png>
<Img|x=347.0|y=163|show=4|img=custom/ceshi/kk.png>
<Img|x=347.0|y=200|show=4|img=custom/ceshi/kk.png>
<Img|x=347.0|y=237|show=4|img=custom/ceshi/kk.png>
<Img|x=347.0|y=274|show=4|img=custom/ceshi/kk.png>
<Img|x=347.0|y=311|show=4|img=custom/ceshi/kk.png>
<RText|ax=0|x=236.0|y=168|outline=1|color=103|size=17|text=领取充值累充：<<$Str(n$公测充值数量)>累充/FCOLOR=250>>
<RText|ax=0|x=236.0|y=205|outline=1|color=103|size=17|text=领取等级奖励：<<$Str(n$公测等级奖励)>累充/FCOLOR=250>>
<RText|ax=0|x=236.0|y=242|outline=1|color=103|size=17|text=领取所有金币：<<$Str(n$公测回收金币)>金币/FCOLOR=250>>
<RText|ax=0|x=236.0|y=279|outline=1|color=103|size=17|text=领取所有绑金：<<$Str(n$公测回收绑金)>绑金/FCOLOR=250>>
<RText|ax=0|x=236.0|y=316|outline=1|color=103|size=17|text=总计领取元宝：<<$Str(n$公测充值元宝)>元宝/FCOLOR=250>>
<Button|ay=1|x=319.0|y=358.0|width=100|height=38|nimg=custom/main/an6.png|clickInterval=200|color=103|outline=1|size=18|text=领取|link=@领取公测奖励>
<RText|ax=0.5|x=377.0|y=105.0|outline=1|color=70|size=18|text=您可以在<任意区服/FCOLOR=250>的<同账号/FCOLOR=250>下领取奖励>
<RText|ax=0.5|x=377.0|y=413.0|outline=1|color=103|size=18|text=测试区有开通唯一赞助，可直接在唯一赞助界面开启！>
<RText|ax=0.5|x=377.0|y=445.0|outline=1|color=70|size=18|text=同账号<仅能领取1次/FCOLOR=250>奖励，请<慎重考虑/FCOLOR=250>需要在哪个区领取！>
<RText|x=510.0|y=316.0|outline=1|size=16|color=7|text=唯一赞助部分无元宝>
<RText|x=510.0|y=168.0|outline=1|size=16|color=7|text=公测充值额外+20%>

[@获取公测奖励数据]
#or
equal <$ServerName>
LARGE <$MAINTONGSERVER> 0
#Act
MOV N$公测充值数量 0
MOV N$一区充值数量 0
MOV N$二区充值数量 0
MOV N$三区充值数量 0
MOV N$四区充值数量 0
MOV N$五区充值数量 0
MOV N$公测等级奖励 0
MOV N$公测回收金币 0
MOV N$公测回收绑金 0
MOV N$公测唯一赞助 0
ReadConfigFileItem ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt setup 1 N$一区充值数量
ReadConfigFileItem ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt setup 2 N$二区充值数量
ReadConfigFileItem ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt setup 3 N$三区充值数量
ReadConfigFileItem ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt setup 4 N$四区充值数量
ReadConfigFileItem ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt setup 5 N$五区充值数量
ReadConfigFileItem ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt setup 6 N$公测等级奖励
ReadConfigFileItem ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt setup 7 N$公测回收金币
ReadConfigFileItem ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt setup 8 N$公测回收绑金
ReadConfigFileItem ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt setup 9 N$公测唯一赞助
INC N$公测充值数量 <$Str(N$一区充值数量)>
INC N$公测充值数量 <$Str(N$二区充值数量)>
INC N$公测充值数量 <$Str(N$三区充值数量)>
INC N$公测充值数量 <$Str(N$四区充值数量)>
INC N$公测充值数量 <$Str(N$五区充值数量)>

FORMULATION <$Str(n$公测充值数量)>*1.2 n$公测充值数量 1

FORMULATION <$Str(n$公测回收金币)>/10 n$公测回收金币 1
FORMULATION <$Str(n$公测回收绑金)>/10 n$公测回收绑金 1
#elseact
Close
SENDMSG 9 <font color='#FF0000'>未配置主区</font>
Break

#If
Large <$Str(n$公测充值数量)> 999
small <$Str(n$公测充值数量)> 3000
#Act
FORMULATION <$Str(n$公测充值数量)>000*1.05+<$Str(n$公测等级奖励)>000-<$Str(N$公测唯一赞助)>*68000 n$公测充值元宝 1
Break

#If
Large <$Str(n$公测充值数量)> 2999
small <$Str(n$公测充值数量)> 5000
#Act
FORMULATION <$Str(n$公测充值数量)>000*1.1+<$Str(n$公测等级奖励)>000-<$Str(N$公测唯一赞助)>*68000 n$公测充值元宝 1
Break

#If
Large <$Str(n$公测充值数量)> 4999
#Act
FORMULATION <$Str(n$公测充值数量)>000*1.2+<$Str(n$公测等级奖励)>000-<$Str(N$公测唯一赞助)>*68000 n$公测充值元宝 1
Break

#If
#Act
FORMULATION <$Str(n$公测充值数量)>000+<$Str(n$公测等级奖励)>000-<$Str(N$公测唯一赞助)>*68000 n$公测充值元宝 1
Break

[@领取公测奖励]
#If
#Act
MOV S$LINGQU 1
MessageBox 你确定要在区服：<$ServerName>，领取你的奖励吗？ @去领取 @公测奖励啊


[@去领取]
#If
equal S$LINGQU 1
#Act
MOV S$LINGQU
#ElseAct
Break

#If
Large <$UTCNOW8> 1748880000
#Act
sendmsg 9 已过领取时间
break

#if
small n$公测充值数量 1
small n$公测等级奖励 1
small n$公测回收金币 1
small n$公测回收绑金 1
#act
SENDMSG 9 <font color='#FF0000'>无公测奖励数据</font>
Break

#If
CheckContainsText <$ServerName> 测
#Act
sendmsg 9 测试区无法领取
Break

#if
Large N$等待时间 <$UTCNOW8>
#act
sendmsg 9 领取中，请等待
Break

#or
equal <$ServerName>
LARGE <$MAINTONGSERVER> 0
#elseact
SENDMSG 9 <font color='#FF0000'>未配置主区</font>
Break

#If
not EQUAL <$MAINTONGSERVER> <$SERVERIDX>
not equal <$ServerName>
LARGE <$MAINTONGSERVER> 0
#Act
GETMAINTONGFILE <$MAINTONGSERVER> ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt

#If
#Act
mov N$等待时间 <$UTCNOW8>
INC N$等待时间 3
sendmsg 9 3秒出结果，请勿进行任何操作
MOV S$防御啊 1
Movr N$延迟时间 1000 3100
DELAYGOTO <$Str(N$延迟时间)> @公测1s123R877 1
break


[@公测1s123R877]
#If
equal S$防御啊 1
#Act
MOV S$防御啊
mov N$等待时间 0
MOV N$公测充值数量 0
MOV N$一区充值数量 0
MOV N$二区充值数量 0
MOV N$三区充值数量 0
MOV N$四区充值数量 0
MOV N$五区充值数量 0
MOV N$公测等级奖励 0
MOV N$公测回收金币 0
MOV N$公测回收绑金 0
MOV N$公测唯一赞助 0
ReadConfigFileItem ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt setup 1 N$一区充值数量
ReadConfigFileItem ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt setup 2 N$二区充值数量
ReadConfigFileItem ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt setup 3 N$三区充值数量
ReadConfigFileItem ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt setup 4 N$四区充值数量
ReadConfigFileItem ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt setup 5 N$五区充值数量
ReadConfigFileItem ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt setup 6 N$公测等级奖励
ReadConfigFileItem ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt setup 7 N$公测回收金币
ReadConfigFileItem ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt setup 8 N$公测回收绑金
ReadConfigFileItem ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt setup 9 N$公测唯一赞助
INC N$公测充值数量 <$Str(N$一区充值数量)>
INC N$公测充值数量 <$Str(N$二区充值数量)>
INC N$公测充值数量 <$Str(N$三区充值数量)>
INC N$公测充值数量 <$Str(N$四区充值数量)>
INC N$公测充值数量 <$Str(N$五区充值数量)>
#ElseAct
Break

#if
small N$公测充值数量 1
#act
SENDMSG 9 <font color='#FF0000'>无公测奖励数据</font>
close
Break

#If
#Act
MOV N$可领取 0
MOV S$可领取

#If
Large N$一区充值数量 0
#Act
INC S$可领取 一区、

#If
Large N$二区充值数量 0
#Act
INC S$可领取 二区、

#If
Large N$三区充值数量 0
#Act
INC S$可领取 三区、

#If
Large N$四区充值数量 0
#Act
INC S$可领取 四区、

#If
Large N$五区充值数量 0
#Act
INC S$可领取 五区

#If
Large N$一区充值数量 0
CheckContainsText <$ServerName> 01区
#Act
MOV N$可领取 1

#If
Large N$二区充值数量 0
CheckContainsText <$ServerName> 02区
#Act
MOV N$可领取 1

#If
Large N$三区充值数量 0
CheckContainsText <$ServerName> 03区
#Act
MOV N$可领取 1

#If
Large N$四区充值数量 0
CheckContainsText <$ServerName> 04区
#Act
MOV N$可领取 1

#If
Large N$五区充值数量 0
CheckContainsText <$ServerName> 05区
#Act
MOV N$可领取 1

#If
not small N$公测充值数量 388
#Act
MOV N$可领取 1

#If
Equal N$可领取 0
#Act
MessageBox 你只能在以下区服中领取：\<$Str(S$可领取)> @测试领奖面板 @取消字段
Break


#If
not EQUAL <$MAINTONGSERVER> <$SERVERIDX>
not equal <$ServerName>
LARGE <$MAINTONGSERVER> 0
#Act
WRITETONGKEY <$MAINTONGSERVER> ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt 1 0
WRITETONGKEY <$MAINTONGSERVER> ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt 2 0
WRITETONGKEY <$MAINTONGSERVER> ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt 3 0
WRITETONGKEY <$MAINTONGSERVER> ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt 4 0
WRITETONGKEY <$MAINTONGSERVER> ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt 5 0
WRITETONGKEY <$MAINTONGSERVER> ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt 6 0
WRITETONGKEY <$MAINTONGSERVER> ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt 7 0
WRITETONGKEY <$MAINTONGSERVER> ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt 8 0

#or
equal <$ServerName>
EQUAL <$MAINTONGSERVER> <$SERVERIDX>
#Act
WriteConfigFileItem ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt setup 1 0
WriteConfigFileItem ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt setup 2 0
WriteConfigFileItem ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt setup 3 0
WriteConfigFileItem ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt setup 4 0
WriteConfigFileItem ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt setup 5 0
WriteConfigFileItem ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt setup 6 0
WriteConfigFileItem ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt setup 7 0
WriteConfigFileItem ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt setup 8 0
UpDateTongFile ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt


#If
#Act
FORMULATION <$Str(n$公测充值数量)>*1.2 n$公测充值数量 1
FORMULATION <$Str(n$公测回收金币)>/10 n$公测回收金币 1
FORMULATION <$Str(n$公测回收绑金)>/10 n$公测回收绑金 1
FORMULATION <$Str(n$公测充值数量)>000+<$str(n$公测等级奖励)>000-<$Str(N$公测唯一赞助)>*68000 n$公测充值元宝 1

#If
Large <$Str(n$公测充值数量)> 999
small <$Str(n$公测充值数量)> 3000
#Act
FORMULATION <$Str(n$公测充值数量)>000*1.05+<$str(n$公测等级奖励)>000-<$Str(N$公测唯一赞助)>*68000 n$公测充值元宝 1

#If
Large <$Str(n$公测充值数量)> 2999
small <$Str(n$公测充值数量)> 5000
#Act
FORMULATION <$Str(n$公测充值数量)>000*1.1+<$str(n$公测等级奖励)>000-<$Str(N$公测唯一赞助)>*68000 n$公测充值元宝 1

#If
Large <$Str(n$公测充值数量)> 4999
#Act
FORMULATION <$Str(n$公测充值数量)>000*1.2+<$str(n$公测等级奖励)>000-<$Str(N$公测唯一赞助)>*68000 n$公测充值元宝 1

#If
#Act
FORMULATION <$Str(n$公测充值数量)>+<$str(n$公测等级奖励)> n$公测充值数量
money 累充 + <$str(n$公测充值数量)>
money 元宝 + <$str(n$公测充值元宝)>
money 金币 + <$str(n$公测回收金币)>
money 绑定金币 + <$str(n$公测回收绑金)>


sendmsg 9 获得<$str(n$公测充值数量)>累充+<$str(n$公测充值元宝)>元宝+<$str(n$公测回收金币)>金币+<$str(n$公测回收绑金)>绑金

mov N$等待时间 <$UTCNOW8>
INC N$等待时间 3
MOV n$公测充值数量 0
MOV n$公测等级奖励 0
MOV n$公测回收金币 0
MOV n$公测回收绑金 0


#If
Large <$money(累充)> 0
#Act
SENDMSG 1 ★[充值]:恭喜玩家"<$USERNAME>"成功充值了大量元宝，如果您也想获得，请赶快充值吧。
SENDMSG 1 ★[充值]:恭喜玩家"<$USERNAME>"成功充值了大量元宝，如果您也想获得，请赶快充值吧。

#If
#Act
close

[@测试奖励面板]
#If
equal S$随机时间 1
#Act
MOV S$随机时间
#ElseAct
Break

#If
#Act
MOV N$一区充值数量 0
MOV N$二区充值数量 0
MOV N$三区充值数量 0
MOV N$四区充值数量 0
MOV N$五区充值数量 0
MOV N$公测等级奖励 0
MOV N$公测回收金币 0
MOV N$公测回收绑金 0
MOV N$公测唯一赞助 0
ReadConfigFileItem ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt setup 1 N$一区充值数量
ReadConfigFileItem ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt setup 2 N$二区充值数量
ReadConfigFileItem ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt setup 3 N$三区充值数量
ReadConfigFileItem ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt setup 4 N$四区充值数量
ReadConfigFileItem ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt setup 5 N$五区充值数量
ReadConfigFileItem ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt setup 6 N$公测等级奖励
ReadConfigFileItem ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt setup 7 N$公测回收金币
ReadConfigFileItem ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt setup 8 N$公测回收绑金
ReadConfigFileItem ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt setup 9 N$公测唯一赞助

FORMULATION 3-<$Str(G61)> N$剩余名额10
FORMULATION 5-<$Str(G62)> N$剩余名额20
FORMULATION 10-<$Str(G63)> N$剩余名额30

FORMULATION 3-<$Str(G64)> N$剩余名额11
FORMULATION 5-<$Str(G65)> N$剩余名额21
FORMULATION 10-<$Str(G66)> N$剩余名额31

#Say
<Img|x=-1500|y=-1500|width=3000|height=3000|img=public/1900000651_1.png|link=@exit>
<Img|reset=1|move=0|loadDelay=0|bg=1|show=4|img=custom/main/di.png>
<Layout|x=765.0|y=-1.0|width=80|height=80|link=@exit>
<RText|a=4|x=382.0|y=18.0|outline=1|size=20|color=103|text=公测奖励>
<Button|x=765.0|y=-1.0|nimg=custom/main/exit.png|pimg=custom/main/exit.png|link=@exit>
<Button|x=-35.0|y=112.0|nimg=custom/main/zh<$Str(S$主号1)>.png|pimg=custom/main/zh<$Str(S$主号1)>.png|clickInterval=200|link=@测试奖励面板#随机时间=1#主号1=0#主号2=1#切=0#标记=人物>
<Button|x=-34.0|y=202.0|nimg=custom/main/yx<$Str(S$主号2)>.png|pimg=custom/main/yx<$Str(S$主号2)>.png|clickInterval=200|link=@测试奖励面板#随机时间=1#主号1=1#主号2=0#切=1#标记=英雄>
<Img|x=14.0|y=35.0|show=4|img=custom/ceshi/bg<$Str(S$切)>.png>
<RText|ax=0.5|x=393.0|y=105.0|color=103|outline=1|size=17|text=人物英雄奖励可<叠加领取/FCOLOR=250>，70级<可同时领取/FCOLOR=250>65级和60级的奖励，<名额有限，先到先得/FCOLOR=251>！>
<RText|ax=0|x=580.0|y=158.0|color=250|outline=1|size=20|text=<$Str(N$剩余名额1<$Str(S$切)>)>>
<RText|ax=0|x=580.0|y=223.0|color=250|outline=1|size=20|text=<$Str(N$剩余名额2<$Str(S$切)>)>>
<RText|ax=0|x=580.0|y=286.0|color=250|outline=1|size=20|text=<$Str(N$剩余名额3<$Str(S$切)>)>>
<Img|x=210.0|y=353.0|show=4|img=custom/ceshi/kk.png>
<Img|x=210.0|y=387.0|show=4|img=custom/ceshi/kk.png>
<Img|x=519.0|y=354.0|show=4|img=custom/ceshi/kk.png>
<Img|x=518.0|y=387.0|show=4|img=custom/ceshi/kk.png>
<RText|ax=0|x=81.0|y=358.0|color=103|outline=1|size=17|text=账号累计总充值：<<$Str(n$公测充值数量)>元/FCOLOR=250>>
<RText|ax=0|x=81.0|y=392.0|color=103|outline=1|size=17|text=账号等级总奖励：<<$Str(n$公测等级奖励)>累充/FCOLOR=250>>
<RText|ax=0|x=388.0|y=358.0|color=103|outline=1|size=17|text=账号回收总金币：<<$Str(n$公测回收金币)>金币/FCOLOR=250>>
<RText|ax=0|x=388.0|y=392.0|color=103|outline=1|size=17|text=账号回收总绑金：<<$Str(n$公测回收绑金)>绑金/FCOLOR=250>>
<RText|a=4|x=385.0|y=444.0|outline=1|size=17|color=7|text=公测期间，<充值/FCOLOR=251>可在正式区<多送20%/FCOLOR=251>，<回收的金币/FCOLOR=251>可在正式区获得<10%奖励/FCOLOR=251>>
<RText|a=4|x=385.0|y=468.0|outline=1|size=17|color=7|text=<同账号/FCOLOR=251>可在<任意正式区/FCOLOR=251>领取所有角色的<奖励/FCOLOR=251>>

#If
equal S$切 0
#Act
MOV S$变1 61
MOV S$变2 62
MOV S$变3 63
#ElseAct
MOV S$变1 64
MOV S$变2 65
MOV S$变3 66

#If
small N$剩余名额1<$Str(S$切)> 1
equal U<$Str(S$变1)> 0
#Act
#Say
<RText|ax=0|x=640.0|y=159.0|color=249|outline=1|size=20|text=无名额>

#If
equal U<$Str(S$变1)> 1
#Act
#Say
<RText|ax=0|x=640.0|y=159.0|color=250|outline=1|size=20|text=已领取>


#If
Large N$剩余名额1<$Str(S$切)> 0
equal U<$Str(S$变1)> 0
#Act
#Say
<Button|ay=1|x=620.0|y=148|width=100|height=38|nimg=custom/main/an6.png|color=103|clickInterval=200|outline=1|size=18|text=一键领取|link=@开始记录公测奖励#顺序=1>
<Button|x=721.0|y=148.0|tips={说明：/FCOLOR=251}^{为防止误操作，领取的时候/FCOLOR=103}^{自动领取符合条件的所有奖励/FCOLOR=103}^{包括英雄的奖励/FCOLOR=253}^{无需每个按钮点过去/FCOLOR=250}|clickInterval=200|nimg=custom/main/wenhao.png>

#If
small N$剩余名额2<$Str(S$切)> 1
equal U<$Str(S$变2)> 0
#Act
#Say
<RText|ax=0|x=640.0|y=224.0|color=249|outline=1|size=20|text=无名额>

#If
equal U<$Str(S$变2)> 1
#Act
#Say
<RText|ax=0|x=640.0|y=224.0|color=250|outline=1|size=20|text=已领取>

#If
Large N$剩余名额2<$Str(S$切)> 0
equal U<$Str(S$变2)> 0
#Act
#Say
<Button|ay=1|x=620.0|y=215|width=100|height=38|nimg=custom/main/an6.png|color=103|clickInterval=200|outline=1|size=18|text=一键领取|link=@开始记录公测奖励#顺序=1>
<Button|x=721.0|y=215.0|tips={说明：/FCOLOR=251}^{为防止误操作，领取的时候/FCOLOR=103}^{自动领取符合条件的所有奖励/FCOLOR=103}^{包括英雄的奖励/FCOLOR=253}^{无需每个按钮点过去/FCOLOR=250}|clickInterval=200|nimg=custom/main/wenhao.png>


#If
small N$剩余名额3<$Str(S$切)> 1
equal U<$Str(S$变3)> 0
#Act
#Say
<RText|ax=0|x=640.0|y=287.0|color=249|outline=1|size=20|text=无名额>

#If
equal U<$Str(S$变3)> 1
#Act
#Say
<RText|ax=0|x=640.0|y=287.0|color=250|outline=1|size=20|text=已领取>

#If
Large N$剩余名额3<$Str(S$切)> 0
equal U<$Str(S$变3)> 0
#Act
#Say
<Button|ay=1|x=620.0|y=279.0|width=100|height=38|nimg=custom/main/an6.png|color=103|clickInterval=200|outline=1|size=18|text=一键领取|link=@开始记录公测奖励#顺序=1>
<Button|x=721.0|y=279.0|tips={说明：/FCOLOR=251}^{为防止误操作，领取的时候/FCOLOR=103}^{自动领取符合条件的所有奖励/FCOLOR=103}^{包括英雄的奖励/FCOLOR=253}^{无需每个按钮点过去/FCOLOR=250}|clickInterval=200|nimg=custom/main/wenhao.png>


[@开始记录公测奖励]
#if
small <$level> 60
small <$H.level> 60
#Act
SENDMSG 9 <font color='#FF0000'>等级不足</font>
Break


#if
LARGE <$MAINTONGSERVER> 0
#ElseAct
SENDMSG 9 <font color='#FF0000'>未配置主区</font>
Break

#If
Large N$等待时间 <$UTCNOW8>
#Act
sendmsg 9 记录数据中，请稍后
Break

#if
not EQUAL <$MAINTONGSERVER> <$SERVERIDX>
not equal <$ServerName>
LARGE <$MAINTONGSERVER> 0
#Act
GETMAINTONGFILE <$MAINTONGSERVER> ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt

#If
CheckContainsText <$ServerName> 测
#Act
mov N$等待时间 <$UTCNOW8>
INC N$等待时间 3
sendmsg 9 记录数据中，请勿进行任何操作
MOVR N$随机时间 1000 3100
DELAYGOTO <$Str(N$随机时间)> @开始记录公测奖励1 1


[@开始记录公测奖励1]
#If
Large N$随机时间 0
#Act
MOV N$随机时间 0
#ElseAct
Break

#if
LARGE <$MAINTONGSERVER> 0
#ElseAct
SENDMSG 9 <font color='#FF0000'>未配置主区</font>
Break

#if
small <$level> 60
small <$H.level> 60
#Act
SENDMSG 9 <font color='#FF0000'>等级不足</font>
Break

#If
#Act
FORMULATION 3-<$Str(G61)> N$剩余名额10
FORMULATION 5-<$Str(G62)> N$剩余名额20
FORMULATION 10-<$Str(G63)> N$剩余名额30

FORMULATION 3-<$Str(G64)> N$剩余名额11
FORMULATION 5-<$Str(G65)> N$剩余名额21
FORMULATION 10-<$Str(G66)> N$剩余名额31

MOV N$奖励 0

#If
Not Small <$Level> 60
small G63 10
EQUAL U63 0
#Act
MOV U63 1
INC G63 1
INC N$奖励 100
SendMsgNew 70 0 恭喜<[<$username>]/FCOLOR=251>人物等级达到<60级/FCOLOR=250>领取了<[公测奖励]/FCOLOR=249> 1 3

#If
Not Small <$Level> 65
small G62 5
EQUAL U62 0
#Act
MOV U62 1
INC G62 1
INC N$奖励 500
SendMsgNew 70 0 恭喜<[<$username>]/FCOLOR=251>人物等级达到<65级/FCOLOR=250>领取了<[公测奖励]/FCOLOR=249> 1 3

#If
Not Small <$Level> 70
small G61 3
EQUAL U61 0
#Act
MOV U61 1
INC G61 1
INC N$奖励 1000
SendMsgNew 70 0 恭喜<[<$username>]/FCOLOR=251>人物等级达到<70级/FCOLOR=250>领取了<[公测奖励]/FCOLOR=249> 1 3

#If
Not Small <$H.Level> 60
small G66 10
EQUAL U66 0
#Act
MOV U66 1
INC G66 1
INC N$奖励 100
SendMsgNew 70 0 恭喜<[<$username>]/FCOLOR=251>英雄等级达到<60级/FCOLOR=250>领取了<[公测奖励]/FCOLOR=249> 1 3

#If
Not Small <$H.Level> 65
small G65 5
EQUAL U65 0
#Act
MOV U65 1
INC G65 1
INC N$奖励 500
SendMsgNew 70 0 恭喜<[<$username>]/FCOLOR=251>英雄等级达到<65级/FCOLOR=250>领取了<[公测奖励]/FCOLOR=249> 1 3

#If
Not Small <$H.Level> 70
small G64 3
EQUAL U64 0
#Act
MOV U64 1
INC G64 1
INC N$奖励 1000
SendMsgNew 70 0 恭喜<[<$username>]/FCOLOR=251>英雄等级达到<70级/FCOLOR=250>领取了<[公测奖励]/FCOLOR=249> 1 3

#If
Large N$奖励 0
#Act
MOV N$一区充值数量 0
MOV N$二区充值数量 0
MOV N$三区充值数量 0
MOV N$四区充值数量 0
MOV N$五区充值数量 0
MOV N$公测等级奖励 0
MOV N$公测回收金币 0
MOV N$公测回收绑金 0
MOV N$公测唯一赞助 0
ReadConfigFileItem ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt setup 1 N$一区充值数量
ReadConfigFileItem ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt setup 2 N$二区充值数量
ReadConfigFileItem ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt setup 3 N$三区充值数量
ReadConfigFileItem ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt setup 4 N$四区充值数量
ReadConfigFileItem ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt setup 5 N$五区充值数量
ReadConfigFileItem ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt setup 6 N$公测等级奖励
ReadConfigFileItem ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt setup 7 N$公测回收金币
ReadConfigFileItem ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt setup 8 N$公测回收绑金
ReadConfigFileItem ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt setup 9 N$公测唯一赞助


INC N$公测等级奖励 <$Str(N$奖励)>
WriteConfigFileItem ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt setup 6 <$Str(N$公测等级奖励)>
UpDateTongFile ..\QuestDiary\00通区数据\<$USERACCOUNT>.txt

MOV N$随机时间 1
goto @测试奖励面板
break
#ElseAct
SENDMSG 9 <font color='#FF0000'>条件不足，没有可领取的奖励</font>
Break
}