gm控制台.txt

企业版传奇世界本

#ACT
Getstring S1
CALCVAR GLOBAL BSC05 = $STR(S1)
SAVEVAR GLOBAL BSC05 ..\QuestDiary\数据文件\BOSS刷新\BSC05save.txt
SENDMSG 5 刷新间隔时间修改成功
goto @BOSS刷新设置
break

[@修改B06]
#ACT
queryvalue 请输入此BOSS死亡复活间隔时间:[单位分钟] 2 3 80126
break

[@getstring80126]
#ACT
Getstring S1
CALCVAR GLOBAL BSC06 = $STR(S1)
SAVEVAR GLOBAL BSC06 ..\QuestDiary\数据文件\BOSS刷新\BSC06save.txt
SENDMSG 5 刷新间隔时间修改成功
goto @下一1
break

[@修改B07]
#ACT
queryvalue 请输入此BOSS死亡复活间隔时间:[单位分钟] 2 3 80127
break

[@getstring80127]
#ACT
Getstring S1
CALCVAR GLOBAL BSC07 = $STR(S1)
SAVEVAR GLOBAL BSC07 ..\QuestDiary\数据文件\BOSS刷新\BSC07save.txt
SENDMSG 5 刷新间隔时间修改成功
goto @下一1
break

[@修改B08]
#ACT
queryvalue 请输入此BOSS死亡复活间隔时间:[单位分钟] 2 3 80128
break

[@getstring80128]
#ACT
Getstring S1
CALCVAR GLOBAL BSC08 = $STR(S1)
SAVEVAR GLOBAL BSC08 ..\QuestDiary\数据文件\BOSS刷新\BSC08save.txt
SENDMSG 5 刷新间隔时间修改成功
goto @下一1
break

[@修改B09]
#ACT
queryvalue 请输入此BOSS死亡复活间隔时间:[单位分钟] 2 3 80129
break

[@getstring80129]
#ACT
Getstring S1
CALCVAR GLOBAL BSC09 = $STR(S1)
SAVEVAR GLOBAL BSC09 ..\QuestDiary\数据文件\BOSS刷新\BSC09save.txt
SENDMSG 5 刷新间隔时间修改成功
goto @下一1
break

[@修改B10]
#ACT
queryvalue 请输入此BOSS死亡复活间隔时间:[单位分钟] 2 3 80130
break

[@getstring80130]
#ACT
Getstring S1
CALCVAR GLOBAL BSC10 = $STR(S1)
SAVEVAR GLOBAL BSC10 ..\QuestDiary\数据文件\BOSS刷新\BSC10save.txt
SENDMSG 5 刷新间隔时间修改成功
goto @下一1
break

[@修改B11]
#ACT
queryvalue 请输入此BOSS死亡复活间隔时间:[单位分钟] 2 3 80131
break

[@getstring80131]
#ACT
Getstring S1
CALCVAR GLOBAL BSC11 = $STR(S1)
SAVEVAR GLOBAL BSC11 ..\QuestDiary\数据文件\BOSS刷新\BSC11save.txt
SENDMSG 5 刷新间隔时间修改成功
goto @下一2
break

[@修改B12]
#ACT
queryvalue 请输入此BOSS死亡复活间隔时间:[单位分钟] 2 3 80132
break

[@getstring80132]
#ACT
Getstring S1
CALCVAR GLOBAL BSC12 = $STR(S1)
SAVEVAR GLOBAL BSC12 ..\QuestDiary\数据文件\BOSS刷新\BSC12save.txt
SENDMSG 5 刷新间隔时间修改成功
goto @下一2
break

[@修改B13]
#ACT
queryvalue 请输入此BOSS死亡复活间隔时间:[单位分钟] 2 3 80133
break

[@getstring80133]
#ACT
Getstring S1
CALCVAR GLOBAL BSC13 = $STR(S1)
SAVEVAR GLOBAL BSC13 ..\QuestDiary\数据文件\BOSS刷新\BSC13save.txt
SENDMSG 5 刷新间隔时间修改成功
goto @下一2
break

[@修改B14]
#ACT
queryvalue 请输入此BOSS死亡复活间隔时间:[单位分钟] 2 3 80134
break

[@getstring80134]
#ACT
Getstring S1
CALCVAR GLOBAL BSC14 = $STR(S1)
SAVEVAR GLOBAL BSC14 ..\QuestDiary\数据文件\BOSS刷新\BSC14save.txt
SENDMSG 5 刷新间隔时间修改成功
goto @下一2
break

[@修改B15]
#ACT
queryvalue 请输入此BOSS死亡复活间隔时间:[单位分钟] 2 3 80135
break

[@getstring80135]
#ACT
Getstring S1
CALCVAR GLOBAL BSC15 = $STR(S1)
SAVEVAR GLOBAL BSC15 ..\QuestDiary\数据文件\BOSS刷新\BSC15save.txt
SENDMSG 5 刷新间隔时间修改成功
goto @下一2
break

[@修改B16]
#ACT
queryvalue 请输入此BOSS死亡复活间隔时间:[单位分钟] 2 3 80136
break

[@getstring80136]
#ACT
Getstring S1
CALCVAR GLOBAL BSC16 = $STR(S1)
SAVEVAR GLOBAL BSC16 ..\QuestDiary\数据文件\BOSS刷新\BSC16save.txt
SENDMSG 5 刷新间隔时间修改成功
goto @下一3
break

[@修改B17]
#ACT
queryvalue 请输入此BOSS死亡复活间隔时间:[单位分钟] 2 3 80137
break

[@getstring80137]
#ACT
Getstring S1
CALCVAR GLOBAL BSC17 = $STR(S1)
SAVEVAR GLOBAL BSC17 ..\QuestDiary\数据文件\BOSS刷新\BSC17save.txt
SENDMSG 5 刷新间隔时间修改成功
goto @下一3
break

[@修改B18]
#ACT
queryvalue 请输入此BOSS死亡复活间隔时间:[单位分钟] 2 3 80138
break

[@getstring80138]
#ACT
Getstring S1
CALCVAR GLOBAL BSC18 = $STR(S1)
SAVEVAR GLOBAL BSC18 ..\QuestDiary\数据文件\BOSS刷新\BSC18save.txt
SENDMSG 5 刷新间隔时间修改成功
goto @下一3
break

[@修改B19]
#ACT
queryvalue 请输入此BOSS死亡复活间隔时间:[单位分钟] 2 3 80139
break

[@getstring80139]
#ACT
Getstring S1
CALCVAR GLOBAL BSC19 = $STR(S1)
SAVEVAR GLOBAL BSC19 ..\QuestDiary\数据文件\BOSS刷新\BSC19save.txt
SENDMSG 5 刷新间隔时间修改成功
goto @下一3
break

[@修改B20]
#ACT
queryvalue 请输入此BOSS死亡复活间隔时间:[单位分钟] 2 3 80140
break

[@getstring80140]
#ACT
Getstring S1
CALCVAR GLOBAL BSC20 = $STR(S1)
SAVEVAR GLOBAL BSC20 ..\QuestDiary\数据文件\BOSS刷新\BSC20save.txt
SENDMSG 5 刷新间隔时间修改成功
goto @下一3
break


[@封闭家族]
目前仅支持<color=green 封闭3个家族名字>的设置~\\
当前封闭的是:　<$GLOBAL(F42)>　　　<$GLOBAL(F43)>　　　<$GLOBAL(F44)>\\
<设置封闭家族名字1/@设置粉笔>　　<设置封闭家族名字2/@设置粉笔2>　　<设置封闭家族名字3/@设置粉笔3>\\
<返回上页/@封闭>

[@设置粉笔]
#ACT
queryvalue 请输入想禁止登陆的家族名字:[输入部分] 2 20 4445
break

[@getstring4445]
#ACT
Getstring S1
CALCVAR GLOBAL F42 = $STR(S1)
SAVEVAR GLOBAL F42 ..\QuestDiary\数据文件\F类变量\F42Save.txt
SENDMSG 7 修改成功.
goto @封闭家族
break

[@设置粉笔2]
#ACT
queryvalue 请输入想禁止登陆的家族名字:[输入部分] 2 20 4446
break

[@getstring4446]
#ACT
Getstring S1
CALCVAR GLOBAL F43 = $STR(S1)
SAVEVAR GLOBAL F43 ..\QuestDiary\数据文件\F类变量\F43Save.txt
SENDMSG 7 修改成功.
goto @封闭家族
break

[@设置粉笔3]
#ACT
queryvalue 请输入想禁止登陆的家族名字:[输入部分] 2 20 4447
break

[@getstring4447]
#ACT
Getstring S1
CALCVAR GLOBAL F44 = $STR(S1)
SAVEVAR GLOBAL F44 ..\QuestDiary\数据文件\F类变量\F44Save.txt
SENDMSG 7 修改成功.
goto @封闭家族
break


[@开启沙城]
<COLOR=GREEN 行会申请攻城>默认在第一届争霸赛后才自动打开！\
当然你也可以自己直接打开或者关闭！\\
第一届<color=red 沙城争霸赛>时间：<$STR(G35)>月<$STR(G36)>日晚上8点\\
<COLOR=GREEN 目前沙城攻城申请状态：><$STR(G19)>　　设置为0则开启、1为关闭\\
<开启与关闭攻城申请/@申请攻城1>　　<设置第一次攻沙时间/@设置攻沙1>\
　　　　　　　　　　　　　　　　　　　　　　　　　<返回上页/@功能>

[@设置攻沙1]
#ACT
queryvalue 请输入第一次攻沙的月份:[月] 2 2 14441
break

[@getstring14441]
#ACT
Getstring S1
MOV G35 $STR(S1)
DELAY 0 @shurrile
break

[@shurrile]
#ACT
queryvalue 请输入第一次攻沙的号数:[天] 2 2 14442
break

[@getstring14442]
#ACT
Getstring S1
MOV G37 0
MOV G36 $STR(S1)
SENDMSG 7 你将第一攻沙时间设置成了：<$STR(G35)>月<$STR(G36)>日晚上8点
DELAY 0 @开启沙城
break


[@申请攻城1]
#IF
LARGE G19 0
#ACT
MOV G19 0
SENDMSG 7 沙城攻城申请——开启
goto @开启沙城
break
#ELSEACT
MOV G19 1
SENDMSG 7 沙城攻城申请——关闭
goto @开启沙城
break


[@重新领取]
#ACT
CLEARNAMELIST ..\QuestDiary\数据文件\已领取至尊屠龙行会.txt
SENDMSG 7 设置成功，目前沙城行会已经可以重新领取至尊屠龙了...
break


[@监狱]
#ACT
queryvalue 关监狱：请输入你想关押的玩家名字 2 20 614
break

[@getstring614]
#ACT
Getstring S1
goto @关监狱
break

[@关监狱]
#IF
CHECKONLINE $STR(s1)
#ACT
hcall $STR(S1) @关监狱哈
SENDMSG 7 关<$STR(s1)>监狱成功...