[@main]
#IF
isadmin
#say
状态:;<$GLOBAL($自助攻城状态)> <开启/@开启攻城> <封锁/@封锁攻城> 新老:<$GLOBAL($自助攻城次数)> <新区/@设为新区> <老区/@设为老区> <0>为新区 大于<1>为老区\
<礼拜一/@礼拜一> <礼拜二/@礼拜二> <礼拜三/@礼拜三> <礼拜四/@礼拜四> <礼拜五/@礼拜五> <礼拜六/@礼拜六> <礼拜天/@礼拜天>\
<攻城信息:/SCOLOR=250><(/SCOLOR=249><$GLOBAL($自助攻城显示)><)/SCOLOR=249>\ \
<沙城所属行会:/SCOLOR=250><(/SCOLOR=249><$GLOBAL($沙城所属行会)><)/SCOLOR=249>\ \
<城主名称:/SCOLOR=250><(/SCOLOR=249><$GLOBAL($沙城城主名称)><)/SCOLOR=249>\ \
<★★/SCOLOR=254>【<确定领取/@领取嘉奖>】<首次攻城嘉奖/SCOLOR=253><$GLOBAL($攻城首次嘉奖)><元宝/SCOLOR=253> <逐日攻城嘉奖/SCOLOR=253><$GLOBAL($攻城老区嘉奖)><元宝/SCOLOR=242>\ \
#ELSESAY
<攻城信息:/SCOLOR=250><(/SCOLOR=249><$GLOBAL($自助攻城显示)><)/SCOLOR=249>\ \
<沙城所属行会:/SCOLOR=250><(/SCOLOR=249><$GLOBAL($沙城所属行会)><)/SCOLOR=249>\ \
<城主名称:/SCOLOR=250><(/SCOLOR=249><$GLOBAL($沙城城主名称)><)/SCOLOR=249>\ \
<★★/SCOLOR=254>【<确定领取/@领取嘉奖>】<首次攻城嘉奖/SCOLOR=253><$GLOBAL($攻城首次嘉奖)><元宝/SCOLOR=253> <逐日攻城嘉奖/SCOLOR=253><$GLOBAL($攻城老区嘉奖)><元宝/SCOLOR=242>\ \
[@礼拜一]
#IF
#ACT
CALCVAR GLOBAL $自助攻城显示 = $本服礼拜一攻城
SAVEVAR GLOBAL $自助攻城显示 ..\QuestDiary\自助攻城\自界说全局变量数据.txt
Goto @main
[@礼拜二]
#IF
#ACT
CALCVAR GLOBAL $自助攻城显示 = $本服礼拜二攻城
SAVEVAR GLOBAL $自助攻城显示 ..\QuestDiary\自助攻城\自界说全局变量数据.txt
Goto @main
[@礼拜三]
#IF
#ACT
CALCVAR GLOBAL $自助攻城显示 = $本服礼拜三攻城
SAVEVAR GLOBAL $自助攻城显示 ..\QuestDiary\自助攻城\自界说全局变量数据.txt
Goto @main
[@礼拜四]
#IF
#ACT
CALCVAR GLOBAL $自助攻城显示 = $本服礼拜四攻城
SAVEVAR GLOBAL $自助攻城显示 ..\QuestDiary\自助攻城\自界说全局变量数据.txt
Goto @main
[@礼拜五]
#IF
#ACT
CALCVAR GLOBAL $自助攻城显示 = $本服礼拜五攻城
SAVEVAR GLOBAL $自助攻城显示 ..\QuestDiary\自助攻城\自界说全局变量数据.txt
Goto @main
[@礼拜六]
#IF
#ACT
CALCVAR GLOBAL $自助攻城显示 = $本服礼拜六攻城
SAVEVAR GLOBAL $自助攻城显示 ..\QuestDiary\自助攻城\自界说全局变量数据.txt
Goto @main
[@礼拜天]
#IF
#ACT
CALCVAR GLOBAL $自助攻城显示 = $本服礼拜天攻城
SAVEVAR GLOBAL $自助攻城显示 ..\QuestDiary\自助攻城\自界说全局变量数据.txt
Goto @main
[@设为新区]
#IF
#ACT
CALCVAR GLOBAL $自助攻城次数 = 0
SAVEVAR GLOBAL $自助攻城次数 ..\QuestDiary\自助攻城\自界说全局变量数据.txt
Goto @main
[@设为老区]
#IF
#ACT
CALCVAR GLOBAL $自助攻城次数 = 1
SAVEVAR GLOBAL $自助攻城次数 ..\QuestDiary\自助攻城\自界说全局变量数据.txt
Goto @main
[@开启攻城]
#IF
#ACT
CALCVAR GLOBAL $自助攻城状态 = $开启
CALCVAR GLOBAL $自助攻城显示 = $本服今天攻城
CALCVAR GLOBAL $沙城所属行会 = 打点员
CALCVAR GLOBAL $沙城城主名称 = 打点员
SAVEVAR GLOBAL $沙城城主名称 ..\QuestDiary\自助攻城\自界说全局变量数据.txt
SAVEVAR GLOBAL $沙城所属行会 ..\QuestDiary\自助攻城\自界说全局变量数据.txt
SAVEVAR GLOBAL $自助攻城显示 ..\QuestDiary\自助攻城\自界说全局变量数据.txt
SAVEVAR GLOBAL $自助攻城状态 ..\QuestDiary\自助攻城\自界说全局变量数据.txt
Goto @main
[@封锁攻城]
#IF
#ACT
CALCVAR GLOBAL $自助攻城状态 = $封锁
CALCVAR GLOBAL $自助攻城显示 = $本服暂不攻城
CALCVAR GLOBAL $沙城所属行会 = 打点员
CALCVAR GLOBAL $沙城城主名称 = 打点员
SAVEVAR GLOBAL $沙城城主名称 ..\QuestDiary\自助攻城\自界说全局变量数据.txt
SAVEVAR GLOBAL $沙城所属行会 ..\QuestDiary\自助攻城\自界说全局变量数据.txt
SAVEVAR GLOBAL $自助攻城显示 ..\QuestDiary\自助攻城\自界说全局变量数据.txt
SAVEVAR GLOBAL $自助攻城状态 ..\QuestDiary\自助攻城\自界说全局变量数据.txt
Goto @main
[@领取嘉奖]
#IF
CHECKVAR GLOBAL $沙城嘉奖发放 = $暂未发放
hour 22
ISCASTLEMASTER
#ACT
GOTO @抉择嘉奖范例
#ELSEACT
messagebox 领取失败:\①你不是沙巴克的城主\②此刻不是领取嘉奖的时间,攻城后1小时内领取有效\③本次嘉奖已经领取过了,请来日诰日攻城后再来领取
[@抉择嘉奖范例]
#IF
CHECKVAR GLOBAL $自助攻城次数 > 0
#act
CALCVAR GLOBAL $沙城所属行会 = <$GUILDNAME>
CALCVAR GLOBAL $沙城城主名称 = <$USERNAME>
CALCVAR GLOBAL $沙城嘉奖发放 = $已经发放
CALCVAR GLOBAL $自助攻城次数 + 1
SAVEVAR GLOBAL $沙城所属行会 ..\QuestDiary\自助攻城\自界说全局变量数据.txt
SAVEVAR GLOBAL $沙城城主名称 ..\QuestDiary\自助攻城\自界说全局变量数据.txt
SAVEVAR GLOBAL $沙城嘉奖发放 ..\QuestDiary\自助攻城\自界说全局变量数据.txt
SAVEVAR GLOBAL $自助攻城次数 ..\QuestDiary\自助攻城\自界说全局变量数据.txt
gamegold + <$GLOBAL($攻城老区嘉奖)>
sendmsg 7 嘉奖:恭喜您得到了【<$GLOBAL($攻城老区嘉奖)>】元宝的城主嘉奖
GuildNoticeMsg 249 251 沙城主【%s】领取了处事器第<$GLOBAL($自助攻城次数)>次沙城争霸战嘉奖【<$GLOBAL($攻城老区嘉奖)>】元宝,但愿他可以攻无不克!
SendCenterMsg 249 251 沙城主【%s】领取了处事器第<$GLOBAL($自助攻城次数)>次沙城争霸战嘉奖【<$GLOBAL($攻城老区嘉奖)>】元宝,但愿他可以攻无不克! 1
SendCenterMsg 249 251 沙城主【%s】领取了处事器第<$GLOBAL($自助攻城次数)>次沙城争霸战嘉奖【<$GLOBAL($攻城老区嘉奖)>】元宝,但愿他可以攻无不克! 1
SendCenterMsg 249 251 沙城主【%s】领取了处事器第<$GLOBAL($自助攻城次数)>次沙城争霸战嘉奖【<$GLOBAL($攻城老区嘉奖)>】元宝,但愿他可以攻无不克! 1
SendCenterMsg 249 251 沙城主【%s】领取了处事器第<$GLOBAL($自助攻城次数)>次沙城争霸战嘉奖【<$GLOBAL($攻城老区嘉奖)>】元宝,但愿他可以攻无不克! 1
SendCenterMsg 249 251 沙城主【%s】领取了处事器第<$GLOBAL($自助攻城次数)>次沙城争霸战嘉奖【<$GLOBAL($攻城老区嘉奖)>】元宝,但愿他可以攻无不克! 1
break
#IF
#act
CALCVAR GLOBAL $沙城所属行会 = <$GUILDNAME>
CALCVAR GLOBAL $沙城城主名称 = <$USERNAME>
CALCVAR GLOBAL $沙城嘉奖发放 = $已经发放
CALCVAR GLOBAL $自助攻城次数 + 1
SAVEVAR GLOBAL $沙城所属行会 ..\QuestDiary\自助攻城\自界说全局变量数据.txt
SAVEVAR GLOBAL $沙城城主名称 ..\QuestDiary\自助攻城\自界说全局变量数据.txt
SAVEVAR GLOBAL $沙城嘉奖发放 ..\QuestDiary\自助攻城\自界说全局变量数据.txt
SAVEVAR GLOBAL $自助攻城次数 ..\QuestDiary\自助攻城\自界说全局变量数据.txt
gamegold + <$GLOBAL($攻城首次嘉奖)>
sendmsg 7 嘉奖:恭喜您得到了【<$GLOBAL($攻城首次嘉奖)>】元宝的城主嘉奖
GuildNoticeMsg 249 251 沙城主【%s】领取了处事器第一次沙城争霸战嘉奖【<$GLOBAL($攻城首次嘉奖)>】元宝,但愿他可以攻无不克!
SendCenterMsg 249 251 沙城主【%s】领取了处事器第一次沙城争霸战嘉奖【<$GLOBAL($攻城首次嘉奖)>】元宝,但愿他可以攻无不克! 1
SendCenterMsg 249 251 沙城主【%s】领取了处事器第一次沙城争霸战嘉奖【<$GLOBAL($攻城首次嘉奖)>】元宝,但愿他可以攻无不克! 1
SendCenterMsg 249 251 沙城主【%s】领取了处事器第一次沙城争霸战嘉奖【<$GLOBAL($攻城首次嘉奖)>】元宝,但愿他可以攻无不克! 1
SendCenterMsg 249 251 沙城主【%s】领取了处事器第一次沙城争霸战嘉奖【<$GLOBAL($攻城首次嘉奖)>】元宝,但愿他可以攻无不克! 1
SendCenterMsg 249 251 沙城主【%s】领取了处事器第一次沙城争霸战嘉奖【<$GLOBAL($攻城首次嘉奖)>】元宝,但愿他可以攻无不克! 1
break
|