传奇重新改编后的GM服务器管理后台脚本

来源: 作者: 点击:
[@MAIN]

#IF
ISADMIN
#SAY
\\
  尊敬的管理员:当前在线人数:<$USERCOUNT>服务器已启动:<$STATSERVERTIME>\
  【<封人物机器码/@@InPutString4(请输入人物机器码:)>】【<解封人物机器码/@@InPutString5(请输入人物机器码:)>】\
  【<禁止人物登录/@@InPutString6(请输入人物名称:)>】【<解封禁人物登录/@@InPutString7(请输入人物名称:)>】【<封小组机器码/@@InPutString8(请输入逗逼小组机器码:)>】\
  【<输入给予物品的人物名字/@@InPutString10(请输入人物名称:)>】【<输入物品的名字/@@InPutString11(请输入人物名称:)>】\\
  【<添加一级宣传/@@InPutString12(请输入玩家名称:)>】  【<添加二级宣传/@@InPutString13(请输入玩家名称:)>】\
  【<添加三级宣传/@@InPutString14(请输入玩家名称:)>】  【<添加四级宣传/@@InPutString15(请输入玩家名称:)>】    【<删除宣传奖励/@删除>】\\
  【<添加一级赞助/@@InPutString32(请输入玩家名称:)>】  【<添加二级赞助/@@InPutString33(请输入玩家名称:)>】\
  【<添加三级赞助/@@InPutString34(请输入玩家名称:)>】  【<添加四级赞助/@@InPutString35(请输入玩家名称:)>】    【<删除赞助奖励/@删除>】\\
  【<返回土城/@回城>】\
#elsesay
\\
  感谢您对游戏的支持.『<返回土城/@回城>』

[@删除1]
\\\\\
  【<删除一级赞助/@@InPutString42(请输入玩家名称:)>】  【<删除二级赞助/@@InPutString43(请输入玩家名称:)>】\
  【<删除三级赞助/@@InPutString44(请输入玩家名称:)>】  【<删除四级赞助/@@InPutString45(请输入玩家名称:)>】\\
  【<返回/@MAIN>】\

[@InPutString42]
#if
#act
DELTextList..\QuestDiary\大帅专用\赞助1.txt<$STR(S42)>
GOTO@main
MESSAGEBOX删除成功

[@InPutString43]
#if
#act
DELTextList..\QuestDiary\大帅专用\赞助2.txt<$STR(S43)>
GOTO@main
MESSAGEBOX删除成功

[@InPutString44]
#if
#act
DELTextList..\QuestDiary\大帅专用\赞助3.txt<$STR(S44)>
GOTO@main
MESSAGEBOX删除成功

[@InPutString45]
#if
#act
DELTextList..\QuestDiary\大帅专用\赞助4.txt<$STR(S45)>
GOTO@main
MESSAGEBOX删除成功


[@InPutString32]
#if
#say
\\\\\
<>【<给予[1级赞助]的人物名字>:<$STR(S32)>】<确定给予/@确定11><重新输入/@main>\\
  【<返回/@MAIN>】\


[@确定11]
#IF
#ACT
AddTextList..\QuestDiary\大帅专用\赞助1.txt<$STR(S32)>
GOTO@main
MESSAGEBOX设置成功

[@InPutString33]
#if
#say
\\\\\
<>【<给予[2级赞助]的人物名字>:<$STR(S33)>】<确定给予/@确定12><重新输入/@main>\\
  【<返回/@MAIN>】\


[@确定12]
#IF
#ACT
AddTextList..\QuestDiary\大帅专用\赞助2.txt<$STR(S33)>
GOTO@main
MESSAGEBOX设置成功
[@InPutString34]
#if
#say
\\\\\
<>【<给予[3级赞助]的人物名字>:<$STR(S34)>】<确定给予/@确定13><重新输入/@main>\\
  【<返回/@MAIN>】\


[@确定13]
#IF
#ACT
AddTextList..\QuestDiary\大帅专用\赞助3.txt<$STR(S34)>
GOTO@main
MESSAGEBOX设置成功
[@InPutString35]
#if
#say
\\\\\
<>【<给予[4级赞助]的人物名字>:<$STR(S35)>】<确定给予/@确定14><重新输入/@main>\\
 【<返回/@MAIN>】\


[@确定14]
#IF
#ACT
AddTextList..\QuestDiary\大帅专用\赞助4.txt<$STR(S35)>
GOTO@main
MESSAGEBOX设置成功

[@删除]
\\\\\
  【<删除一级宣传/@@InPutString22(请输入玩家名称:)>】  【<删除二级宣传/@@InPutString23(请输入玩家名称:)>】\
  【<删除三级宣传/@@InPutString24(请输入玩家名称:)>】  【<删除四级宣传/@@InPutString25(请输入玩家名称:)>】\\
  【<返回/@MAIN>】\

[@InPutString22]
#if
#act
DELTextList..\QuestDiary\大帅专用\宣传1.txt<$STR(S22)>
GOTO@main
MESSAGEBOX删除成功

[@InPutString23]
#if
#act
DELTextList..\QuestDiary\大帅专用\宣传2.txt<$STR(S23)>
GOTO@main
MESSAGEBOX删除成功

[@InPutString24]
#if
#act
DELTextList..\QuestDiary\大帅专用\宣传3.txt<$STR(S24)>
GOTO@main
MESSAGEBOX删除成功

[@InPutString25]
#if
#act
DELTextList..\QuestDiary\大帅专用\宣传4.txt<$STR(S25)>
GOTO@main
MESSAGEBOX删除成功


[@InPutString12]
#if
#say
\\\\\
<>【<给予[1级宣传]的人物名字>:<$STR(S12)>】<确定给予/@确定1><重新输入/@main>\\
  【<返回/@MAIN>】\


[@确定1]
#IF
#ACT
AddTextList..\QuestDiary\大帅专用\宣传1.txt<$STR(S12)>
GOTO@main
MESSAGEBOX设置成功

[@InPutString13]
#if
#say
\\\\\
<>【<给予[1级宣传]的人物名字>:<$STR(S13)>】<确定给予/@确定2><重新输入/@main>\\
  【<返回/@MAIN>】\


[@确定2]
#IF
#ACT
AddTextList..\QuestDiary\大帅专用\宣传2.txt<$STR(S13)>
GOTO@main
MESSAGEBOX设置成功
[@InPutString14]
#if
#say
\\\\\
<>【<给予[1级宣传]的人物名字>:<$STR(S14)>】<确定给予/@确定3><重新输入/@main>\\
  【<返回/@MAIN>】\


[@确定3]
#IF
#ACT
AddTextList..\QuestDiary\大帅专用\宣传3.txt<$STR(S14)>
GOTO@main
MESSAGEBOX设置成功
[@InPutString15]
#if
#say
\\\\\
<>【<给予[1级宣传]的人物名字>:<$STR(S15)>】<确定给予/@确定4><重新输入/@main>\\
 【<返回/@MAIN>】\


[@确定4]
#IF
#ACT
AddTextList..\QuestDiary\大帅专用\宣传4.txt<$STR(S15)>
GOTO@main
MESSAGEBOX设置成功

[@InPutString10]
#if
s10.checkonline
#act
goto@zs111
#elseact
messagebox<$STR(S10)>不在线。
goto@main
[@zs111]
#IF
#SAY
\\
  尊敬的管理员:当前在线人数:<$USERCOUNT>服务器已启动:<$STATSERVERTIME>\
  \
  \\\
  【<给予物品的人物名字>:<$STR(S10)>】【<输入物品的名字/@@InPutString11(请输入人物名称:)>】\
      【<返回土城/@回城>】\



[@InPutString11]
#if
equals11
#act
messagebox物品不可以为空
BREAK
#IF
#SAY
\\
  尊敬的管理员:当前在线人数:<$USERCOUNT>服务器已启动:<$STATSERVERTIME>\
  \
  \\\
  【给予物品的人物名字:<$STR(S10)>】【物品的名字:<$STR(S11)>】\
      <确定赠送/@ZENGSONG11>\\
      【<返回土城/@回城>】\


[@ZENGSONG11]
#IF
s10.checkonline
#ACT
S10.MOVEXS11<$STR(S11)>
S10.GIVE<$STR(S11)>1
S10.sendmsg6管理员老赵向你赠送了物品[<$STR(S11)>].
S10.sendmsg6管理员老赵向你赠送了物品[<$STR(S11)>].
S10.sendmsg6管理员老赵向你赠送了物品[<$STR(S11)>].
S10.messagebox管理员老赵向你赠送了物品[<$STR(S11)>].
messagebox赠送成功
close

[@回城]
#IF
#ACT
MAPMOVE3333333
BREAK
[@InPutString4]
#IF
EqualS4
#ACT
SENDMSG6尊敬的管理阁下您输入的内容错误.
BREAK

#IF
CheckTextList..\QuestDiary\后台管理\机器码.txt<$STR(S4)>
#ACT
SENDMSG5尊敬的管理阁下该机器码已经在禁止列表中了!
BREAK


#IF
NOTEqualS4
#ACT
AddTextList..\QuestDiary\后台管理\机器码.txt<$STR(S4)>
SENDMSG5尊敬的管理阁下机器码添加成功!
GMEXECUTE开始提问@封帐号全局触发
BREAK



[@InPutString5]
#IF
EqualS5
#ACT
SENDMSG6尊敬的管理阁下您输入的内容错误.
BREAK

#IF
NOTEqualS5
#ACT
DELTextList..\QuestDiary\后台管理\机器码.txt<$STR(S5)>
SENDMSG5尊敬的管理阁下机器码删除成功!
BREAK

[@InPutString6]
#IF
EqualS6
#ACT
SENDMSG6尊敬的管理阁下您输入的内容错误.
BREAK

#IF
CheckTextList..\QuestDiary\后台管理\人物.txt<$STR(S6)>
#ACT
SENDMSG5尊敬的管理阁下该人物已经在禁止列表中了!
BREAK

#IF
NOTEqualS6
#ACT
addTextList..\QuestDiary\后台管理\人物.txt<$STR(S6)>
SENDMSG5尊敬的管理阁下[<$STR(S6)>]人物已经禁止登录!
GMEXECUTE开始提问@封帐号全局触发
BREAK

[@InPutString7]
#IF
EqualS7
#ACT
SENDMSG6尊敬的管理阁下您输入的内容错误.
BREAK

#IF
NOTEqualS7
#ACT
DELTextList..\QuestDiary\后台管理\人物.txt<$STR(S7)>
SENDMSG5尊敬的管理阁下[<$STR(S7)>]禁止登录人物已经解除!
BREAK

[@InPutString8]
#IF
EqualS8
#ACT
SENDMSG6尊敬的管理阁下您输入的内容错误.
BREAK

#IF
CheckTextList..\QuestDiary\后台管理\小组机器码.txt<$STR(S8)>
#ACT
SENDMSG5尊敬的管理阁下小组机器码已经在禁止列表中了!
BREAK

#IF
NOTEqualS8
#ACT
addTextList..\QuestDiary\后台管理\小组机器码.txt<$STR(S8)>
SENDMSG5尊敬的管理阁下[<$STR(S6)>]已经禁止登录!
GMEXECUTE开始提问@封帐号全局触发
BREAK
[顶部]