重新改编后的传奇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
equal s11
#act
messagebox 物品不可以为空
BREAK
#IF
#SAY
\ \
尊敬的管理员: 当前在线人数:<$USERCOUNT> 服务器已启动:<$STATSERVERTIME>\
\
\ \ \
【给予物品的人物名字：<$STR(S10)>】 【物品的名字：<$STR(S11)>】 \
<确定赠送/@ZENGSONG11>\ \
【<返回土城/@回城>】\
[@ZENGSONG11]
#IF
s10.checkonline
#ACT
S10.MOVEX S11 <$STR(S11)>
S10.GIVE <$STR(S11)> 1
S10.sendmsg 6 管理员老赵向你赠送了物品[<$STR(S11)>].
S10.sendmsg 6 管理员老赵向你赠送了物品[<$STR(S11)>].
S10.sendmsg 6 管理员老赵向你赠送了物品[<$STR(S11)>].
S10.messagebox 管理员老赵向你赠送了物品[<$STR(S11)>].
messagebox 赠送成功
close
[@回城]
#IF
#ACT
MAPMOVE 3 333 333
BREAK
[@InPutString4]
#IF
Equal S4
#ACT
SENDMSG 6 尊敬的管理阁下,您输入的内容错误.
BREAK
#IF
CheckTextList ..\QuestDiary\后台管理\机器码.txt <$STR(S4)>
#ACT
SENDMSG 5 尊敬的管理阁下,该机器码已经在禁止列表中了!
BREAK
#IF
NOT Equal S4
#ACT
AddTextList ..\QuestDiary\后台管理\机器码.txt <$STR(S4)>
SENDMSG 5 尊敬的管理阁下,机器码添加成功!
GMEXECUTE 开始提问 @封帐号全局触发
BREAK
[@InPutString5]
#IF
Equal S5
#ACT
SENDMSG 6 尊敬的管理阁下,您输入的内容错误.
BREAK
#IF
NOT Equal S5
#ACT
DELTextList ..\QuestDiary\后台管理\机器码.txt <$STR(S5)>
SENDMSG 5 尊敬的管理阁下,机器码删除成功!
BREAK
[@InPutString6]
#IF
Equal S6
#ACT
SENDMSG 6 尊敬的管理阁下,您输入的内容错误.
BREAK
#IF
CheckTextList ..\QuestDiary\后台管理\人物.txt <$STR(S6)>
#ACT
SENDMSG 5 尊敬的管理阁下,该人物已经在禁止列表中了!
BREAK
#IF
NOT Equal S6
#ACT
addTextList ..\QuestDiary\后台管理\人物.txt <$STR(S6)>
SENDMSG 5 尊敬的管理阁下,[<$STR(S6)>]人物已经禁止登录!
GMEXECUTE 开始提问 @封帐号全局触发
BREAK
[@InPutString7]
#IF
Equal S7
#ACT
SENDMSG 6 尊敬的管理阁下,您输入的内容错误.
BREAK
#IF
NOT Equal S7
#ACT
DELTextList ..\QuestDiary\后台管理\人物.txt <$STR(S7)>
SENDMSG 5 尊敬的管理阁下,[<$STR(S7)>]禁止登录人物已经解除!
BREAK
[@InPutString8]
#IF
Equal S8
#ACT
SENDMSG 6 尊敬的管理阁下,您输入的内容错误.
BREAK
#IF
CheckTextList ..\QuestDiary\后台管理\小组机器码.txt <$STR(S8)>
#ACT
SENDMSG 5 尊敬的管理阁下,小组机器码已经在禁止列表中了!
BREAK
#IF
NOT Equal S8
#ACT
addTextList ..\QuestDiary\后台管理\小组机器码.txt <$STR(S8)>
SENDMSG 5 尊敬的管理阁下,[<$STR(S6)>]已经禁止登录!
GMEXECUTE 开始提问 @封帐号全局触发
BREAK
- 上一篇文章：传奇一条龙分享的十重天最后一重脚本案例
- 下一篇文章：独家新编传奇一条龙天创副本脚本
热门文章
热门标签