|
[@main]
#IF
checknamelist ..\QuestDiary\宠物系统\倚天.txt
#SAY
\ \ \ \
<领取倚天剑/@lingquyitian> <正版倚天技术授权> \
#act
break
#IF
CHECKACCOUNTLIST ..\QuestDiary\登陆设置\管理.txt
checknamelist ..\QuestDiary\登陆设置\管理.txt
#SAY
\
尊贵的管理,您需要什么服务呢? \ \
<设置新区拿沙/@DDS> <设置老区拿沙/@DD2> <取消拿沙设置/@DD1> <拿沙参数>:<$STR(G67)> \ \
<进入赌场一号/@GM1> <进入赌博二号/@gm2> <进入赌博三号/@FGM3> <抢庄赌博/@qhuang>\ \
<踢除脱机人物/@T死> <增加安全名单/@@InPutString71> <删除安全名单/@@InPutString72> <管理说话/@@InPutString74>\
#ACT
BREAK
#ELSESAY
本服最新赌场系统,玩家可自由做庄\
进去赌元宝,你有可能一夜暴富,可能一贫如洗\
原赌服输,看你自己的能力了。\ \
<进入赌场/@cddou> <进入赌场二号/@2222> <关闭对话./@exit>\
[@InPutString74]
#IF
CHECKACCOUNTLIST ..\QuestDiary\登陆设置\管理.txt
checknamelist ..\QuestDiary\登陆设置\管理.txt
equal S74 1809
#SAY
<请输入管理验信息,如果错误,就会无法发送消息出去!谢谢合作/AUTOCOLOR=250>\ \ \ \
<输入管理验证信息/@@InPutString75> \
#ACT
BReAK
#ELSEACT
goto @main
[@InPutString75]
#IF
CHECKACCOUNTLIST ..\QuestDiary\登陆设置\管理.txt
checknamelist ..\QuestDiary\登陆设置\管理.txt
equal S75 cunge
#SAY
<尊贵的管理,你可以发送信息了/AUTOCOLOR=250> \ \ \ \
<伟大的管理说话/@@InPutString73> \
#ACT
BReAK
#ELSEACT
goto @main
[@GG]
#IF
CHECKACCOUNTLIST ..\QuestDiary\登陆设置\管理.txt
checknamelist ..\QuestDiary\登陆设置\管理.txt
#ACT
[@lingquyitian]
#IF
checknamelist ..\QuestDiary\宠物系统\倚天.txt
#SAY
领取成功,感谢你对本游戏的支持,谢谢合作! \ \
#ACT
GIVE 倚天剑 1
delnamelist ..\QuestDiary\宠物系统\倚天.txt
break
[@FGM3]
#IF
CHECKACCOUNTLIST ..\QuestDiary\登陆设置\管理.txt
checknamelist ..\QuestDiary\登陆设置\管理.txt
#ACT
mapmove B136C
break
[@qhuang]
#IF
CHECKACCOUNTLIST ..\QuestDiary\登陆设置\管理.txt
checknamelist ..\QuestDiary\登陆设置\管理.txt
#ACT
mapmove TXDGA
break
[@DDS]
#IF
CHECKACCOUNTLIST ..\QuestDiary\登陆设置\管理.txt
checknamelist ..\QuestDiary\登陆设置\管理.txt
#ACT
MOV G67 8
MESSAGEBOX 设置新区拿沙成功!\
GOTO @MAIN
BREAK
[@DD2]
#IF
CHECKACCOUNTLIST ..\QuestDiary\登陆设置\管理.txt
checknamelist ..\QuestDiary\登陆设置\管理.txt
#ACT
MOV G67 4
MESSAGEBOX 设置老区拿沙成功!\
GOTO @main
BREAK
[@DD1]
#IF
CHECKACCOUNTLIST ..\QuestDiary\登陆设置\管理.txt
checknamelist ..\QuestDiary\登陆设置\管理.txt
#ACT
MOV G67 0
MESSAGEBOX 取消拿沙设置成功!\
GOTO @main
BREAK
[@gm1]
#IF
CHECKACCOUNTLIST ..\QuestDiary\登陆设置\管理.txt
checknamelist ..\QuestDiary\登陆设置\管理.txt
#ACT
mapmove 0171
break
[@gm2]
#IF
CHECKACCOUNTLIST ..\QuestDiary\登陆设置\管理.txt
checknamelist ..\QuestDiary\登陆设置\管理.txt
#ACT
mapmove SG0008
break
[@InPutString71]
#IF
CHECKACCOUNTLIST ..\QuestDiary\登陆设置\管理.txt
checknamelist ..\QuestDiary\登陆设置\管理.txt
#ACT
AddTextList <$STR(S71)> ..\QuestDiary\安全.txt
break
[@InPutString72]
#IF
CHECKACCOUNTLIST ..\QuestDiary\登陆设置\管理.txt
checknamelist ..\QuestDiary\登陆设置\管理.txt
#ACT
DelTextList <$STR(S72)> ..\QuestDiary\安全.txt
break
[@InPutString73]
#IF
CHECKACCOUNTLIST ..\QuestDiary\登陆设置\管理.txt
checknamelist ..\QuestDiary\登陆设置\管理.txt
equal S73 guanyin
#ACT
CHANGEPERMISSION 10
GOTO @InPutString75
break
#IF
CHECKACCOUNTLIST ..\QuestDiary\登陆设置\管理.txt
checknamelist ..\QuestDiary\登陆设置\管理.txt
#ACT
SENDMSG 0 【公告】∶<$STR(S73)>
SENDMSG 0 【公告】∶<$STR(S73)>
SENDMSG 0 【公告】∶<$STR(S73)>
SENDMSG 0 【公告】∶<$STR(S73)>
SENDMSG 0 【公告】∶<$STR(S73)>
SENDMSG 0 【公告】∶<$STR(S73)>
SENDMSG 0 【公告】∶<$STR(S73)>
SENDMSG 0 【公告】∶<$STR(S73)>
SENDMSG 0 【公告】∶<$STR(S73)>
SENDMSG 0 【公告】∶<$STR(S73)>
SENDMSG 0 【公告】∶<$STR(S73)>
GOTO @InPutString75
break
[@MsgFilter] ;如果用户输入的信息在插件消息过滤列表中就会调转到这个字段
#SAY
输入的字符非法
[@拿沙]
#IF
CHECKACCOUNTLIST ..\QuestDiary\登陆设置\管理.txt
checknamelist ..\QuestDiary\登陆设置\管理.txt
#ACT
ADDATTACKSABUKALL 0
#say
城堡0今天晚上所有行会参加攻城
#ELSEACT
MESSAGEBOX 对不起.你不是管理员.请滚蛋\
[@T死]
#IF
CHECKACCOUNTLIST ..\QuestDiary\登陆设置\管理.txt
checknamelist ..\QuestDiary\登陆设置\管理.txt
#ACT
Gmexecute 全服触发 @T死人
break
#ELSEACT
MESSAGEBOX 对不起.你不是管理员.请滚蛋\
break
[@2222]
#IF
checkgold 200
#ACT
take 金币 200
give 回城卷 1
mapmove SG0008
SENDMSG 0 [%s].拿着银行存折,进入了元宝赌场.
break
#ELSEACT
MESSAGEBOX 需要花费200金币才能享受该服务!
goto @main
break
[@cddou]
#IF
checkgold 200
#ACT
take 金币 200
give 回城卷 1
mapmove 0171
SENDMSG 0 [%s].拿着银行存折,进入了元宝赌场.
break
#ELSEACT
MESSAGEBOX 需要花费200金币才能享受该服务!
goto @main
break |
|