传奇一条龙,GM论坛,GM部落,传奇版本库,传奇服务端,传奇单机版 - dtbbk.Com

 找回密码
 立即注册

[Gm版本库]传奇脚本系列-通缉大师 - 传奇私服脚本

查看: 1348|回复: 0

[Gm版本库]传奇脚本系列-通缉大师

[复制链接]
发表于 2012-11-28 00:43:11 | 显示全部楼层 |阅读模式
;
(@@InPutString @@InPutInteger)
[@main]
#IF
#ACT
CloseBigDialogBox
#SAY
<包龙星包大人在此,谁敢放肆..../SCOLOR=250>\
<只要证据确凿,您就可以发起坐监和通缉功能/SCOLOR=250>\
<坐监说明:/SCOLOR=249>\
输入玩家姓名,对方就会被抓到监狱里,没保释前无法自由活动\
使用费<2000/SCOLOR=254>元宝,保释费用<2500/SCOLOR=254>元宝          <发起坐监功能/@发起坐监功能>\
<通缉说明:/SCOLOR=249>\
输入玩家姓名,对方全服通缉,上线无限红名\
使用费用<1000/SCOLOR=254>元宝,解除费<1500/SCOLOR=254>元宝,杀死通缉犯可以获得<800/SCOLOR=254>元宝\
                     <发起通缉功能/@发起通缉功能>\

[@发起通缉功能]
如果你没有能力干掉你痛恨之人,怎么办?\
如果你拥有一定的元宝,你可以发起党中央国际通缉令\
这样其他的玩家就会为了得到<赏金/SCOLOR=250>帮你追杀被通缉的人\ \
<通缉仇人[url=]/@@InPutString41[/url]>        <解除通缉[url=]/@@InPutString42[/url]>                 <通缉需知/@通缉需知>\ \
<手动抓获[url=]/@@InPutString43[/url]>“<被通缉的罪犯/SCOLOR=249>”   <说明/@说明>\ \
                                           【<返回[url=]/@Main[/url]>】【<关闭[url=]/@eXIT[/url]>】
[@CallInPutString41]
#IF
CheckOnline <$STR(S41)>
CheckTextList .\QuestDiary\通缉文本\通缉名单.txt <$STR(S41)>
#ACT
MESSAGEBOX 此人正在被通缉中,您无需重复通缉!!
break
#IF
CheckGAMEGOLD > 999
CheckOnline <$STR(S41)>
#ACT
GAMEGOLD - 1000
AddTextList .\QuestDiary\通缉文本\通缉名单.txt <$STR(S41)>
S41.SETRANKLEVELNAME %s\“我是通缉犯,杀我可以获得800元宝奖励”\☆★不杀白不杀★☆
S41.CHANGENAMECOLOR 249
GuildNoticeMsg 255 5 玩家(%S)悬赏800元宝通缉(<$STR(S41)>),赏金猎人们速度行动起来吧!
SendCenterMsg 255 5 【玩家(%S)悬赏800元宝通缉(<$STR(S41)>),赏金猎人们速度行动起来吧】 1
MESSAGEBOX 成功通缉了(<$STR(S41)>),等着他被干掉的好消息吧!
break
#ELSEACT
MESSAGEBOX 操作失败,可能的原因如下:\ \“玩家不在线”“元宝不足1000个”
[@CallInPutString42]
#IF
CheckOnline <$STR(S42)>
CheckGAMEGOLD > 1499
CheckTextList .\QuestDiary\通缉文本\通缉名单.txt <$STR(S42)>
#ACT
DEC G74 1
GAMEGOLD - 1500
DelTextList .\QuestDiary\通缉文本\通缉名单.txt <$STR(S42)>
S42.SETRANKLEVELNAME %s\●━━━━●\┃重获新生┃\●━━━━●
GuildNoticeMsg 255 252 通缉名单中的(<$STR(S42)>)成功解除通缉,重获自由之身!
MESSAGEBOX 成功解除了(<$STR(S42)>)的通缉令!
break
#ELSEACT
MESSAGEBOX 操作失败,可能的原因如下:\ \“玩家不在线”“元宝不足1500个”“不在通缉的名单里”
[@CallInPutString43]
#IF
CheckOnline <$STR(S43)>
#ACT
GOTO @XXXSSSA
break
#ELSEACT
MESSAGEBOX 对方不在线,无法抓获!
break
[@XXXSSSA]
#IF
CheckTextList .\QuestDiary\通缉文本\通缉名单.txt <$STR(S43)>
#ACT
GOTO @XXXSSSAA
break
#ELSEACT
MESSAGEBOX 对方没有被通缉,无法抓获!
break
[@XXXSSSAA]
#IF
S43.ISONMAP YXSD
#ACT
MESSAGEBOX 对方正在参加杀神大赛,无法抓捕!
break
#IF
S43.ISONMAP GA2
#ACT
MESSAGEBOX 对方正在参加斗鸡大赛,无法抓捕!
break
#IF
S43.CheckHumInRange 3 330 330 10
#ACT
MESSAGEBOX 对方在安全区呢!无法抓捕!
break
#IF
S43.CheckHumInRange 0 289 618 10
#ACT
MESSAGEBOX 对方在安全区呢!无法抓捕!
break
#IF
S43.CheckHumInRange 0 650 631 10
#ACT
MESSAGEBOX 对方在安全区呢!无法抓捕!
break
#IF
S43.CheckHumInRange 0 334 266 10
#ACT
MESSAGEBOX 对方在安全区呢!无法抓捕!
break
#IF
S43.CheckHumInRange 2 503 483 10
#ACT
MESSAGEBOX 对方在安全区呢!无法抓捕!
break
#IF
S43.CheckHumInRange 4 240 200 10
#ACT
MESSAGEBOX 对方在安全区呢!无法抓捕!
break
#IF
S43.CheckHumInRange 5 141 337 10
#ACT
MESSAGEBOX 对方在安全区呢!无法抓捕!
break
#IF
S43.CheckHumInRange 11 178 326 10
#ACT
MESSAGEBOX 对方在安全区呢!无法抓捕!
break
#IF
CheckGAMEGOLD > 99
#ACT
GAMEGOLD - 100
MAPMOVE 3 356 336
S43.MAPMOVE 3 361 336
S43.GuildNoticeMsg 249 0 你是通缉犯,被其他玩家花费元宝抓获啦! SELF
GuildNoticeMsg 255 5 玩家(%S)花费100元宝把通缉犯(<$STR(S43)>)抓到了土城药店啦!
break
#ELSEACT
MESSAGEBOX 操作失败,元宝不足100个或者通缉犯不在线,请重试!

[@通缉需知]
#IF
#ACT
MESSAGEBOX 通缉对手需要消耗元宝1000个,解除通缉需要元宝1500\ \杀死被通缉的人可以获得800个元宝的奖励\ \通缉之前请确定需要通缉的玩家是否在线?
[@说明]
#IF
#ACT
MESSAGEBOX 输入需要抓获的人物的名称既可,被抓获的玩家会在药店出现\ \每抓获一次收取元宝100个,抓获坐牢的玩家无效\ \抓获之前请确定被通缉的玩家是否在线?

[@发起坐监功能]
<规则说明:/SCOLOR=249>被抓获的玩家无法在牢房外面活动\
     就算他有机会传送到外面去,不到<10秒/SCOLOR=250>就会被<重新关押/SCOLOR=250>\
     <坐牢的玩家不要紧张,攻城前会被系统自动释放/SCOLOR=242>\ \
<想自由活动,可以在牢房内的牢狱管理处花费元宝保释自己/SCOLOR=254>\ \
<输入可恨之人的名称[url=]/@@InPutString51[/url]>          <保释坐牢的朋友[url=]/@@InPutString52>\[/url] \
                                           【<返回[url=]/@Main[/url]>】【<关闭[url=]/@eXIT[/url]>】

[@CallInPutString52]
#IF
CheckOnline <$STR(S52)>
CheckGAMEGOLD > 2499
CheckTextList .\QuestDiary\通缉文本\坐监名单.txt <$STR(S52)>
#ACT
GAMEGOLD - 2500
DelTextList .\QuestDiary\通缉文本\坐监名单.txt <$STR(S52)>
S52.SETRANKLEVELNAME %s\●━━━━●\┃已被保释┃\●━━━━●
GuildNoticeMsg 255 252 玩家(%S)成功获得保释(<$STR(S52)>),重获自由之身!
MESSAGEBOX 成功解救了正在坐牢的:(<$STR(S52)>)
break
#ELSEACT
MESSAGEBOX 操作失败,可能的原因如下:\ \“玩家不在线”“元宝不足2500个”“不在通缉的名单里”
[@CallInPutString51]
#IF
CheckOnline <$STR(S51)>
#ACT
GOTO @坐牢A
break
#ELSEACT
MESSAGEBOX 操作失败:玩家不在线,无法发起坐监功能!
[@坐牢A]
#IF
S51.ISONMAP YXSD
#ACT
MESSAGEBOX 对方正在参加杀神大赛,无法抓捕!
break
#IF
S51.ISONMAP GA2
#ACT
MESSAGEBOX 对方正在参加斗鸡大赛,无法抓捕!
break
#IF
CheckTextList .\QuestDiary\通缉文本\坐监名单.txt <$STR(S51)>
#ACT
MESSAGEBOX 操作失败:此人正在坐监中,您无需重复输入!
break
#IF
CheckGAMEGOLD > 1999
#ACT
GAMEGOLD - 2000
AddTextList .\QuestDiary\通缉文本\坐监名单.txt <$STR(S51)>
S51.SETRANKLEVELNAME %s\“我罪孽深重,不得不去坐牢去了”\☆★正在享受牢狱之苦★☆
S51.CHANGENAMECOLOR 253
GuildNoticeMsg 255 5 玩家(%S)花费2000元宝让(<$STR(S51)>)坐牢去了,真是可怜的孩子!
SendCenterMsg 255 5 【玩家(%S)花费2000元宝让(<$STR(S51)>)坐牢去了,真是可怜的孩子】 1
MESSAGEBOX 操作成功,(<$STR(S51)>)坐牢去了!
break
#ELSEACT
MESSAGEBOX 操作失败,元宝不足2000个,无法使用此功能!


回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

Archiver/手机版/Gm版本库 ( 蜀ICP备20007044号-4 )|网站地图

GMT+8, 2024-4-21 13:26 , Processed in 0.076974 second(s), 20 queries .

Powered by GM版本库 X3.4

© 2001-2011 传奇版本库>  template by 版本库