gm控制台.txt

企业版传奇世界本

break
#ELSEACT
SENDMSG 7 玩家<$STR(s1)>当前不在线...
break

;----------------------------------------------------------

[@色名]
#ACT
queryvalue 封色名名：请输入你想封闭的玩家名字 2 20 613
break

[@getstring613]
#ACT
Getstring S1
goto @人物名字
break

[@人物名字]
#IF
CHECKONLINE $STR(s1)
#ACT
hcall $STR(S1) @封人物哈
SENDMSG 7 封闭<$STR(s1)>的登陆名字成功...
break
#ELSEACT
SENDMSG 7 玩家<$STR(s1)>当前不在线...
break
;--------------------------------------------------------------------

[@帐号]
#ACT
queryvalue 封登陆帐号：请输入你想封闭的玩家名字 2 20 612
break

[@getstring612]
#ACT
Getstring S1
goto @帐号地址
break

[@帐号地址]
#IF
CHECKONLINE $STR(s1)
#ACT
hcall $STR(S1) @封帐号哈
SENDMSG 7 封闭<$STR(s1)>的登陆帐号成功...
break
#ELSEACT
SENDMSG 7 玩家<$STR(s1)>当前不在线...
break


;---------------------------------------------------------------

[@IP地址]
#ACT
queryvalue 封IP地址：请输入你想封闭的玩家名字 2 20 611
break

[@getstring611]
#ACT
Getstring S1
goto @IP地址11
break

[@IP地址11]
#IF
CHECKONLINE $STR(s1)
#ACT
hcall $STR(S1) @封IP哈
SENDMSG 7 封闭<$STR(s1)>的IP地址成功...
break
#ELSEACT
SENDMSG 7 玩家<$STR(s1)>当前不在线...
break

[@拯救公主]
目前拯救公主救公主活动默认在开区8小时后才自动打开！\
你可以自己设置开区多少小时后自动打开！\\
<COLOR=GREEN 距离自动开启还有：><$STR(G15)>小时　　设置为0则开启\\
<设置救公主自动开启时间/@救公主自动>　　　　　　　　　　　　　<返回上一页/@功能>\


[@救公主自动]
#ACT
queryvalue 请输入多少小时后该功能自动打开:[单位小时] 2 3 40169
break

[@getstring40169]
#ACT
Getstring S1
MOV G15 $STR(S1)
SENDMSG 5 救公主活动将在距离现在[<$STR(S1)>]小时后自动开启
goto @拯救公主
break

[@天关活动]
<COLOR=GREEN 闯天关>活动默认在开区12小时后才自动打开！\\
你可以自己设置开区多少小时后自动打开！\\\
<COLOR=GREEN 距离自动开启还有：><$STR(G16)>小时　　设置为0则开启\\
<设置天关自动开启时间/@天关自>\
　　　　　　　　　　　　　　　　　　　　　　　　　<返回上页/@功能>

[@天关自]
#ACT
queryvalue 请输入多少小时后该功能自动打开:[单位小时] 2 3 40167
break

[@getstring40167]
#ACT
Getstring S1
MOV G16 $STR(S1)
SENDMSG 5 闯天关活动将在距离现在[<$STR(S1)>]小时后自动开启
goto @天关活动
break

[@广告在线]
\
设置：<各地NPC传送门对话广告设置/@老兵NPC>\
<$GLOBAL(F40)>\\
设置：<在线每5分钟广播一次的公告设置/@广播公告>　<开启广播/@开启广播>　状态：<$STR(G73)>\
<$GLOBAL(F41)>\
　　　　　　　　　　　　　　　　　　　　　　<返回上一页/@归还宝>

[@开启广播]
#IF
EQUAL G73 1
#ACT
MOV G73 0
goto @广告在线
messagebox 每5分钟广播一次广播公告-关闭成功\需要开启，请再次点击即可！\
break
#ELSEACT
MOV G73 1
goto @广告在线
messagebox 每5分钟广播一次广播公告-开启成功\需要关闭，请再次点击即可！\
break

[@广播公告]
#ACT
queryvalue 请输入在线每5分钟广播一次的公告内容:[字数50字内] 2 200 5550
break

[@getstring5550]
#ACT
Getstring S1
CALCVAR GLOBAL F41 = $STR(S1)
SAVEVAR GLOBAL F41 ..\QuestDiary\数据文件\F类变量\F41Save.txt
SENDMSG 5 修改成功.当前广播公告内容是:[本公告需要开启后才有效]
SENDMSG 7 <$GLOBAL(F41)>
goto @广告在线
break

[@老兵NPC]
#ACT
queryvalue 请输入老兵传送对话广告内容:[字数21字内] 2 42 550
break

[@getstring550]
#ACT
Getstring S1
CALCVAR GLOBAL F40 = $STR(S1)
SAVEVAR GLOBAL F40 ..\QuestDiary\数据文件\F类变量\F40Save.txt
SENDMSG 5 修改成功.当前广告内容是:
SENDMSG 7 <$GLOBAL(F40)>
goto @广告在线
break


[@排统]
------======<color=GREEN 飞雪世界-GM控制台-V4.01版>=====------\\
<初始化公主排名/@公主变量>　　　<初始化夺宝奇兵/@夺宝6>　　　<初始化PK值排名/@PK值>\
<初始化行会排名/@行会变量1>　　　<初始化英雄擂台/@雄擂>　　　<初始化家族名字/@族名>\
<初始化骑兵排名/@骑兵变量>　　　<初始化家族排名/@家族>\
<初始化天下第一/@第一6>　　　<初始化冲级比赛/@冲级>\
<初始化铁血魔城/@铁血变量>　　　<初始化武馆排名/@武馆>\
<初始化冠军变量/@天冠军变>　　　<初始元神排名系统/@神排名>　　　<返回主菜单/@归还宝>\

[@族名]
------======<color=GREEN 飞雪世界-GM控制台-V4.01版>=====------\\
01家族:　<$GLOBAL(JZM01)>　族长：<$GLOBAL(JZZ01)>　人数：<$GLOBAL(JZR01)>　<初始化/@初01>\
02家族:　<$GLOBAL(JZM02)>　族长：<$GLOBAL(JZZ02)>　人数：<$GLOBAL(JZR02)>　<初始化/@初02>\
03家族:　<$GLOBAL(JZM03)>　族长：<$GLOBAL(JZZ03)>　人数：<$GLOBAL(JZR03)>　<初始化/@初03>\
04家族:　<$GLOBAL(JZM04)>　族长：<$GLOBAL(JZZ04)>　人数：<$GLOBAL(JZR04)>　<初始化/@初04>\
05家族:　<$GLOBAL(JZM05)>　族长：<$GLOBAL(JZZ05)>　人数：<$GLOBAL(JZR05)>　<初始化/@初05>\
06家族:　<$GLOBAL(JZM06)>　族长：<$GLOBAL(JZZ06)>　人数：<$GLOBAL(JZR06)>　<初始化/@初06>\
　　　　　　　　　　　　　　　　　　　　　　<下一页/@下家族01>　<上一页/@排统>

[@下家族01]
------======<color=GREEN 飞雪世界-GM控制台-V4.01版>=====------\\
07家族:　<$GLOBAL(JZM07)>　族长：<$GLOBAL(JZZ07)>　人数：<$GLOBAL(JZR07)>　<初始化/@初07>\
08家族:　<$GLOBAL(JZM08)>　族长：<$GLOBAL(JZZ08)>　人数：<$GLOBAL(JZR08)>　<初始化/@初08>\
09家族:　<$GLOBAL(JZM09)>　族长：<$GLOBAL(JZZ09)>　人数：<$GLOBAL(JZR09)>　<初始化/@初09>\
10家族:　<$GLOBAL(JZM10)>　族长：<$GLOBAL(JZZ10)>　人数：<$GLOBAL(JZR10)>　<初始化/@初10>\
11家族:　<$GLOBAL(JZM11)>　族长：<$GLOBAL(JZZ11)>　人数：<$GLOBAL(JZR11)>　<初始化/@初11>\
12家族:　<$GLOBAL(JZM12)>　族长：<$GLOBAL(JZZ12)>　人数：<$GLOBAL(JZR12)>　<初始化/@初12>\
　　　　　　　　　　　　　　　　　　　　　　<下一页/@下家族02>　<上一页/@族名>

[@下家族02]
------======<color=GREEN 飞雪世界-GM控制台-V4.01版>=====------\\
13家族:　<$GLOBAL(JZM13)>　族长：<$GLOBAL(JZZ13)>　人数：<$GLOBAL(JZR13)>　<初始化/@初13>\
14家族:　<$GLOBAL(JZM14)>　族长：<$GLOBAL(JZZ14)>　人数：<$GLOBAL(JZR14)>　<初始化/@初14>\
15家族:　<$GLOBAL(JZM15)>　族长：<$GLOBAL(JZZ15)>　人数：<$GLOBAL(JZR15)>　<初始化/@初15>\
16家族:　<$GLOBAL(JZM16)>　族长：<$GLOBAL(JZZ16)>　人数：<$GLOBAL(JZR16)>　<初始化/@初16>\
17家族:　<$GLOBAL(JZM17)>　族长：<$GLOBAL(JZZ17)>　人数：<$GLOBAL(JZR17)>　<初始化/@初17>\
18家族:　<$GLOBAL(JZM18)>　族长：<$GLOBAL(JZZ18)>　人数：<$GLOBAL(JZR18)>　<初始化/@初18>\
　　　　　　　　　　　　　　　　　　　　　　<下一页/@下家族03>　<上一页/@下家族01>

[@下家族03]
------======<color=GREEN 飞雪世界-GM控制台-V4.01版>=====------\\
19家族:　<$GLOBAL(JZM19)>　族长：<$GLOBAL(JZZ19)>　人数：<$GLOBAL(JZR19)>　<初始化/@初19>\
20家族:　<$GLOBAL(JZM20)>　族长：<$GLOBAL(JZZ20)>　人数：<$GLOBAL(JZR20)>　<初始化/@初20>\\
\
\
\
　　　　　　　　　　　　　　　　　　　　　　<下一页/@下家族02>　<上一页/@排统>

[@初01]
#ACT
CALCVAR GLOBAL JZM01 = 暂无
CALCVAR GLOBAL JZZ01 = 无人
CALCVAR GLOBAL JZR01 = 0
CALCVAR GLOBAL JZJ01 = 0
CALCVAR GLOBAL JZG01 = 无
SAVEVAR GLOBAL JZM01 ..\QuestDiary\数据文件\家族\JZM01.txt
SAVEVAR GLOBAL JZR01 ..\QuestDiary\数据文件\家族\JZR01.txt
SAVEVAR GLOBAL JZZ01 ..\QuestDiary\数据文件\家族\JZZ01.txt
SAVEVAR GLOBAL JZJ01 ..\QuestDiary\数据文件\家族\JZJ01.txt
SAVEVAR GLOBAL JZG01 ..\QuestDiary\数据文件\家族\JZG01.txt
CLEARNAMELIST ..\QuestDiary\数据文件\家族\家族01.txt
SENDMSG 7 01号家族变量初始化成功...
goto @族名
break

[@初02]
#ACT
CALCVAR GLOBAL JZM02 = 暂无
CALCVAR GLOBAL JZZ02 = 无人
CALCVAR GLOBAL JZR02 = 0
CALCVAR GLOBAL JZJ02 = 0
CALCVAR GLOBAL JZG02 = 无
SAVEVAR GLOBAL JZM02 ..\QuestDiary\数据文件\家族\JZM02.txt
SAVEVAR GLOBAL JZR02 ..\QuestDiary\数据文件\家族\JZR02.txt
SAVEVAR GLOBAL JZZ02 ..\QuestDiary\数据文件\家族\JZZ02.txt
SAVEVAR GLOBAL JZJ02 ..\QuestDiary\数据文件\家族\JZJ02.txt
SAVEVAR GLOBAL JZG02 ..\QuestDiary\数据文件\家族\JZG02.txt
CLEARNAMELIST ..\QuestDiary\数据文件\家族\家族02.txt
SENDMSG 7 02号家族变量初始化成功...
goto @族名
break

[@初03]
#ACT
CALCVAR GLOBAL JZM03 = 暂无
CALCVAR GLOBAL JZZ03 = 无人
CALCVAR GLOBAL JZR03 = 0
CALCVAR GLOBAL JZJ03 = 0
CALCVAR GLOBAL JZG03 = 无
SAVEVAR GLOBAL JZM03 ..\QuestDiary\数据文件\家族\JZM03.txt
SAVEVAR GLOBAL JZR03 ..\QuestDiary\数据文件\家族\JZR03.txt
SAVEVAR GLOBAL JZZ03 ..\QuestDiary\数据文件\家族\JZZ03.txt
SAVEVAR GLOBAL JZJ03 ..\QuestDiary\数据文件\家族\JZJ03.txt
SAVEVAR GLOBAL JZG03 ..\QuestDiary\数据文件\家族\JZG03.txt
CLEARNAMELIST ..\QuestDiary\数据文件\家族\家族03.txt
SENDMSG 7 03号家族变量初始化成功...
goto @族名
break

[@初04]
#ACT
CALCVAR GLOBAL JZM04 = 暂无
CALCVAR GLOBAL JZZ04 = 无人
CALCVAR GLOBAL JZR04 = 0
CALCVAR GLOBAL JZJ04 = 0
CALCVAR GLOBAL JZG04 = 无
SAVEVAR GLOBAL JZM04 ..\QuestDiary\数据文件\家族\JZM04.txt
SAVEVAR GLOBAL JZR04 ..\QuestDiary\数据文件\家族\JZR04.txt
SAVEVAR GLOBAL JZZ04 ..\QuestDiary\数据文件\家族\JZZ04.txt
SAVEVAR GLOBAL JZJ04 ..\QuestDiary\数据文件\家族\JZJ04.txt
SAVEVAR GLOBAL JZG04 ..\QuestDiary\数据文件\家族\JZG04.txt
CLEARNAMELIST ..\QuestDiary\数据文件\家族\家族04.txt
SENDMSG 7 04号家族变量初始化成功...
goto @族名
break

[@初05]
#ACT
CALCVAR GLOBAL JZM05 = 暂无
CALCVAR GLOBAL JZZ05 = 无人
CALCVAR GLOBAL JZR05 = 0
CALCVAR GLOBAL JZJ05 = 0
CALCVAR GLOBAL JZG05 = 无
SAVEVAR GLOBAL JZM05 ..\QuestDiary\数据文件\家族\JZM05.txt
SAVEVAR GLOBAL JZR05 ..\QuestDiary\数据文件\家族\JZR05.txt
SAVEVAR GLOBAL JZZ05 ..\QuestDiary\数据文件\家族\JZZ05.txt
SAVEVAR GLOBAL JZJ05 ..\QuestDiary\数据文件\家族\JZJ05.txt
SAVEVAR GLOBAL JZG05 ..\QuestDiary\数据文件\家族\JZG05.txt
CLEARNAMELIST ..\QuestDiary\数据文件\家族\家族05.txt
SENDMSG 7 05号家族变量初始化成功...
goto @族名
break

[@初06]
#ACT
CALCVAR GLOBAL JZM06 = 暂无
CALCVAR GLOBAL JZZ06 = 无人
CALCVAR GLOBAL JZR06 = 0
CALCVAR GLOBAL JZJ06 = 0
CALCVAR GLOBAL JZG06 = 无
SAVEVAR GLOBAL JZM06 ..\QuestDiary\数据文件\家族\JZM06.txt
SAVEVAR GLOBAL JZR06 ..\QuestDiary\数据文件\家族\JZR06.txt
SAVEVAR GLOBAL JZZ06 ..\QuestDiary\数据文件\家族\JZZ06.txt
SAVEVAR GLOBAL JZJ06 ..\QuestDiary\数据文件\家族\JZJ06.txt
SAVEVAR GLOBAL JZG06 ..\QuestDiary\数据文件\家族\JZG06.txt
CLEARNAMELIST ..\QuestDiary\数据文件\家族\家族06.txt
SENDMSG 7 06号家族变量初始化成功...
goto @族名
break

[@初07]
#ACT
CALCVAR GLOBAL JZM07 = 暂无
CALCVAR GLOBAL JZZ07 = 无人
CALCVAR GLOBAL JZR07 = 0
CALCVAR GLOBAL JZJ07 = 0
CALCVAR GLOBAL JZG07 = 无
SAVEVAR GLOBAL JZM07 ..\QuestDiary\数据文件\家族\JZM07.txt
SAVEVAR GLOBAL JZR07 ..\QuestDiary\数据文件\家族\JZR07.txt
SAVEVAR GLOBAL JZZ07 ..\QuestDiary\数据文件\家族\JZZ07.txt
SAVEVAR GLOBAL JZJ07 ..\QuestDiary\数据文件\家族\JZJ07.txt
SAVEVAR GLOBAL JZG07 ..\QuestDiary\数据文件\家族\JZG07.txt
CLEARNAMELIST ..\QuestDiary\数据文件\家族\家族07.txt
SENDMSG 7 07号家族变量初始化成功...
goto @下家族01
break

[@初08]
#ACT
CALCVAR GLOBAL JZM08 = 暂无
CALCVAR GLOBAL JZZ08 = 无人
CALCVAR GLOBAL JZR08 = 0