腾飞论坛 发表于 2012-9-20 15:32:28

传奇JS追杀脚本

我在我帮助按钮里直接取出来的`大家根据自己需要改` 在x:\MirServer\Mir200\Envir\Market_def 目录建立4个TXT文件,名字分别为
不能传他的地图他.txt
不能传他的地图我.txt
不能传自己的地图他txt
不能传自己的地图我.txt

安全提示:请在你M2里过滤字符 \<或 \> 一行一个.

[@追杀]
#IF
checkcastlewar <$CASTLENAME>
#ACT
goto @UserCmd2
SendMsg 7 [提示]:攻城期间不允许使用
break
#IF
#SAY
您有<元宝>：{<$GAMEGOLD>=FCOLO=252}个 <灵符>：{<$GAMEGIRD>=FCOLO=252}张 <金刚石>：{<$HUMAN(JGS)>=FCOLO=252}块<声望>：<$CREDITPOINT>点\
╔┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄╗\
┆你想暗杀你的仇人吗? 你的朋友正在被人追杀吗?             ┆\
┆你想和你的朋友一起打BOSS吗?只需要花<20个元宝/FCOLOR=254>.我就可以让你┆\
┆直接飞到他的身边.花<30个元宝/FCOLOR=254>.我就可以让他直接飞到你的身边┆\
╚┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄╝\
<温馨提示/FCOLOR=253>:<人物不在线.或者名字输错不会收取元宝/FCOLOR=70>\ \
<输入人物角色名/@@InPutString5>                     <返回帮助菜单/@UserCmd2>
[@InPutString5]
#IF
equal S5
#ACT
goto @追杀
break
#IF
equal S5 斩天传奇
#ACT
MESSAGEBOX [提示]:管理员不允许追杀！！！
goto @追杀
break
#IF
equal S5 <$USERNAME>
#ACT
MESSAGEBOX [提示]:不能追杀自己！！！
goto @追杀
#ELSEACT
goto @追杀1
[@追杀1]
#IF
CHECKONLINE <$STR(S5)>
#ACT
MOV S1 =FCOLOR=250
goto @追杀2
#ELSEACT
MOV S1 =FCOLOR=56
MOV S2 =FCOLOR=56
MOV S3 =FCOLOR=56
MOV S4 <传送自己20元宝>
MOV S6 <传送他人30元宝>
goto @追杀3
[@追杀2]
#IF
<$STR(S5)>.INSAFEZONE
#ACT
MOV S2 =FCOLOR=56
MOV S6 <传送他人30元宝>
goto   @不能传自己的地图他
#elseact
goto   @不能传他的地图他
[@不能传他的地图他]
#IF
<$STR(S5)>.CHECKLISTTEXT 不能传他的地图他.txt <$MAP>
#ACT
goto    @不能传自己的地图他
#elseact
goto   @不能传他的地图我
[@不能传他的地图我]
#IF
CHECKLISTTEXT 不能传他的地图我.txt <$MAP>
#ACT
goto    @不能传自己的地图他
#elseact
MOV S2 =FCOLOR=250
MOV S6 <传送他人30元宝/@zstr>
goto    @不能传自己的地图他
[@不能传自己的地图他]
#IF
<$STR(S5)>.CHECKLISTTEXT 不能传自己的地图他.txt <$MAP>
#ACT
MOV S3 =FCOLOR=56
MOV S4 <传送自己20元宝>
goto @追杀3
#elseact
goto    @不能传自己的地图我
[@不能传自己的地图我]
#IF
CHECKLISTTEXT 不能传自己的地图我.txt <$MAP>
#ACT
MOV S3 =FCOLOR=56
MOV S4 <传送自己20元宝>
goto @追杀3
#elseact
MOV S3 =FCOLOR=250
MOV S4 <传送自己20元宝/@zszj>
goto @追杀3
[@追杀3]
#if
equal p0 1
#act
goto @zszj1
#if
equal p0 2
#act
goto @zstr1
#if
equal p0 0
#SAY
╔┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄╗\
┆您输入的角色名为:{<$STR(S5)>=FCOLO=252}    <修改/@@InPutString5>\
┆┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┆\
┆[{●=FCOLOR=250}在线]   [{●=FCOLOR=56}不在线]      {→ 是否在线=FCOLOR=151}   {●<$STR(S1)>}       ┆\   
┆[{◆=FCOLOR=250}能传他]   [{◆=FCOLOR=56}不能传他]    {→ 是否能传他=FCOLOR=151}   {◆ <$STR(S2)>}      ┆\
┆[{▲=FCOLOR=250}能传自己] [{▲=FCOLOR=56}不能传自己]{→ 是否能传自己=FCOLOR=151} {▲ <$STR(S3)>}<刷新/@追杀1>┆\
╚┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄╝\
<温馨提示/FCOLOR=253>:<人物不在线.或者名字输错不会收取元宝/FCOLOR=70>\
<$STR(S4)>   <$STR(S6)>   <返回上一页/@追杀>
[@zszj]
#act
MOV p0 1
goto @追杀1
[@zstr]
#act
MOV p0 2
goto @追杀1
[@zszj1]
#IF
equal p0 1
#act
MOV p0 0
#IF
equal s1 =FCOLOR=512346
#act
MessageBox 该人物当前并不在线。请仔细检查名字是否输入错误。
goto @追杀1
break
#IF
equal S3 =FCOLOR=56
#ACT
MessageBox 该人物当前地图不允许传送自己。
goto @追杀1
break
#IF
CHECKGAMEGOLD > 19
#ACT
GAMEGOLD - 20
GMEXECUTE 传送到 <$STR(S5)>
close
#elseact
MESSAGEBOX [提示]:你的元宝不够哦！
close
[@zstr1]
#IF
equal p0 2
#act
MOV p0 0
#IF
equal s1 =FCOLOR=56
#act
MessageBox 该人物当前并不在线。请仔细检查名字是否输入错误。
goto @追杀1
break
#IF
equal S2 =FCOLOR=56
#ACT
MessageBox 该人物当前地图不允许传送他。
goto @追杀1。
break
break
#IF
CHECKGAMEGOLD > 29
#ACT
GAMEGOLD - 30
GMEXECUTE传唤 <$STR(S5)>
close
#elseact
MESSAGEBOX [提示]:你的元宝不够哦！
close
[@IsInFilterList]
#Act
MessageBox 输入数据中包含了非法字符.请重新编辑
Break

论坛一条龙

蓝河 发表于 2012-11-17 22:27:30

苏打撒撒打算打算

口袋中心 发表于 2014-4-13 18:44:47

林子大了，什么鸟都有了啊！

同名同姓 发表于 2014-4-13 18:29:26

楼主说的我也略懂！

黄花鱼 发表于 2014-4-13 18:22:13

经典，收藏了！

紫灵梦雪 发表于 2014-4-13 18:00:52

在哪里跌倒，就在那里多爬一会儿！

同名同姓 发表于 2014-4-13 18:14:46

这个帖子好无聊啊！

爱问马丁 发表于 2014-6-1 12:36:51

小弟默默的路过贵宝地~~~

中国人 发表于 2014-6-1 12:05:29

看帖、回帖、拿分、走人

爱问马丁 发表于 2014-6-1 12:04:57

楼上长在线啊？
页: [1] 2
查看完整版本: 传奇JS追杀脚本