传奇JS追杀脚本

显示全部楼层 · 2012-9-20 15:32:28

我在我帮助按钮里直接取出来的`大家根据自己需要改` 在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

论坛一条龙