红警尤里超级变态补丁。[@MAIN]
#IF
ISADMIN
#SAY
\ \
　　尊敬的管理员: 当前在线人数:$USERCOUNT 服务器已启动:$STATSERVERTIME\
　　【封人物机器码/@@InPutString4(请输入人物机器码:)】 【解封人物机器码/@@InPutString5(请输入人物机器码:)】\
　　【禁止人物登录/@@InPutString6(请输入人物名称:)】 【解封禁人物登录/@@InPutString7(请输入人物名称:)】 【封小组机器码/@@InPutString8(请输入逗逼小组机器码:)】\
　　【输入给予物品的人物名字/@@InPutString10(请输入人物名称:)】 【输入物品的名字/@@InPutString11(请输入人物名称:)】\ \
　　【添加一级宣传/@@InPutString12(请输入玩家名称:)】 　　【添加二级宣传/@@InPutString13(请输入玩家名称:)】 \
　　【添加三级宣传/@@InPutString14(请输入玩家名称:)】 　　【添加四级宣传/@@InPutString布拉格家族战歌15(请输入玩家名称:)】 　　　　【删除宣传奖励/@删除】\ \
　　【添加一级赞助/@@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\大帅专用185传奇合击私服\赞助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

上一篇

传奇服务新开轻变传奇私服端灭生遗址-第二大陆地图脚本

下一篇

仿盛大传奇版本中宠物放养配置和使用方英雄合击传奇私发服法讲解