独家制作英雄合击(2012/8/17)私发服网心魔霸主NPC脚本

显示全部楼层 · 2012-8-17 04:44:47

英雄合击私发服网心魔霸主NPC脚本安装的方法如下：

1、D:\Mirserver\Mir200\Envir\Market_def 下建立一个名称以英雄合击私发服网心魔霸主NPC脚本
2、D:\Mirserver\Mir200\Envir 底下或者自己插入某个角落Merchant.txt 建立该NPC的坐标
3、将下面的脚本复制防止上面的第一个步骤完美创建的那个英雄合击私发服网心魔霸主NPC脚本内然后保存重启M2即可

[@MAIN]
鼎天霸主：只要竞标成功的玩家可获得特殊服务.\
只要你的等级和元宝数量超过上一位玩家,即可\
成功竞标,竞标成功时只检测玩家元宝数量而不\
扣除玩家元宝数量.玩家大可以放心.\ \
当前竞标人:<$STR(A200)>　当前等级:<$STR(G200)>　元宝数量:<$STR(G201)>\ \
『<参与霸主竞标/@Mrrp_参与竞标>』　　　　『<霸主使用特权/@Mrrp_使用特权>』　　　　『<关闭对话/@EXIT>』\

#IF
ISADMIN
#SAY
『<清空霸主数据/@Mrrp_清空霸主数据>』

[@Mrrp_清空霸主数据]
#IF
ISADMIN
#ACT
MOV A200
MOV G200 0
MOV G201 0
CLEARNAMELIST ..\QuestDiary\Mrrp系列脚本\Mrrp_地图进入限制名单.txt
MESSAGEBOX 清空成功
goto @main

[@Mrrp_参与竞标]
#IF
CHECKLEVELEX > <$STR(G200)>
CHECKGAMEGOLD > <$STR(G201)>
#ACT
MOV S1 <$STR(A200)>
MOV A200 <$USERNAME>
MOV G200 <$LEVEL>
MOV G201 <$GAMEGOLD>
SetOnTimer 0 1
SENDMSG 0 恭喜玩家[%s]以等级<$STR(G200)>级，元宝<$STR(G201)>个竞标鼎天霸主成功.
SENDMSG 0 恭喜玩家[%s]以等级<$STR(G200)>级，元宝<$STR(G201)>个竞标鼎天霸主成功.
SENDMSG 0 恭喜玩家[%s]以等级<$STR(G200)>级，元宝<$STR(G201)>个竞标鼎天霸主成功.
#ELSEACT
GOTO @MAIN
MESSAGEBOX 对不起,您的等级或者元宝并没有现任的霸主多.
break

#IF
EQUAL S1
#ACT
close
BREAK

#IF
CheckOnline <$STR(S1)>
#ACT
close
BREAK
#ELSEACT
DelTextList .\QuestDiary\Mrrp系列脚本\Mrrp_地图进入限制名单.txt <$STR(S1)>
close
break

[@Mrrp_使用特权]
#IF
EQUAL A200 <$USERNAME>
#SAY
每个地图每天可以免费传送八次!!!\
<领取工资/@Mrrp_领取工资>　<传送魔界/@Mrrp_传送魔界>　<传送会员20层/@Mrrp_会员20层>　<传送经验墓穴底层/@Mrrp_经验墓穴底层> <等待更新/@Mrrp_等待更新>
#ELSESAY
每个地图每天可以免费传送八次!!!\
<每日领取经验>　<传送魔界> <传送会员20层> <传送经验墓穴底层>

[@Mrrp_传送魔界]
#IF
CHECKVAR HUMAN $Mrrp_DTJSXZ01 > 0
EQUAL A200 <$USERNAME>
#ACT
MAPMOVE hddt03 23 26
give 回城卷
SENDMSG 0 尊贵的鼎天霸主[%s]享用特权免费进入魔界地图!!!
CALCVAR HUMAN $Mrrp_DTJSXZ01 - 1
SAVEVAR HUMAN $Mrrp_DTJSXZ01 ..\QuestDiary\Mrrp系列脚本\Mrrp_地图进入限制变量数据.txt
SENDMSG 5 今天您还可以进入该地图[<$HUMAN($Mrrp_DTJSXZ01)>]次
#ELSEACT
GOTO @MAIN
BREAK

[@Mrrp_经验墓穴底层]
#IF
CHECKVAR HUMAN $Mrrp_DTJSXZ02 > 0
EQUAL A200 <$USERNAME>
#ACT
MAPMOVE jy170 25 75
give 回城卷
SENDMSG 0 尊贵的鼎天霸主[%s]享用特权免费进入经验墓穴底层!!!
CALCVAR HUMAN $Mrrp_DTJSXZ02 - 1
SAVEVAR HUMAN $Mrrp_DTJSXZ02 ..\QuestDiary\Mrrp系列脚本\Mrrp_地图进入限制变量数据.txt
SENDMSG 5 今天您还可以进入该地图[<$HUMAN($Mrrp_DTJSXZ02)>]次
#ELSEACT
GOTO @MAIN
BREAK

[@Mrrp_会员20层]
#IF
CHECKVAR HUMAN $Mrrp_DTJSXZ03 > 0
EQUAL A200 <$USERNAME>
#ACT
MAPMOVE sfdt111 38 40
give 回城卷
SENDMSG 0 尊贵的鼎天霸主[%s]享用特权免费进入会员地图20层!!!
CALCVAR HUMAN $Mrrp_DTJSXZ03 - 1
SAVEVAR HUMAN $Mrrp_DTJSXZ03 ..\QuestDiary\Mrrp系列脚本\Mrrp_地图进入限制变量数据.txt
SENDMSG 5 今天您还可以进入该地图[<$HUMAN($Mrrp_DTJSXZ03)>]次
#ELSEACT
GOTO @MAIN
BREAK

[@Mrrp_领取工资]
#IF
EQUAL A200 <$USERNAME>
#ELSEACT
GOTO @MAIN
BREAK

#IF
dayofweek sun
check [211] 0
#ACT
set [211] 1
set [212] 0
set [213] 0
set [214] 0
set [215] 0
set [216] 0
set [217] 0
CHANGEEXP + 100000000
SENDMSG 0 鼎天霸主[%s]领取了今日工资,10亿经验.
goto @GiveOK
break
#IF
dayofweek mon
check [212] 0
#ACT
set [211] 0
set [212] 1
set [213] 0
set [214] 0
set [215] 0
set [216] 0
set [217] 0
CHANGEEXP + 100000000
SENDMSG 0 鼎天霸主[%s]领取了今日工资,10亿经验.
goto @GiveOK
break
#IF
dayofweek tue
check [213] 0
#ACT
set [211] 0
set [212] 0
set [213] 1
set [214] 0
set [215] 0
set [216] 0
set [217] 0
CHANGEEXP + 100000000
SENDMSG 0 鼎天霸主[%s]领取了今日工资,10亿经验.
goto @GiveOK
break
#IF
dayofweek wed
check [214] 0
#ACT
set [211] 0
set [212] 0
set [213] 0
set [214] 1
set [215] 0
set [216] 0
set [217] 0
CHANGEEXP + 100000000
SENDMSG 0 鼎天霸主[%s]领取了今日工资,10亿经验.
break
#IF
dayofweek thu
check [215] 0
#ACT
set [211] 0
set [212] 0
set [213] 0
set [214] 0
set [215] 1
set [216] 0
set [217] 0
CHANGEEXP + 100000000
SENDMSG 0 鼎天霸主[%s]领取了今日工资,10亿经验.
goto @GiveOK
break
#IF
dayofweek fri
check [216] 0
#ACT
set [211] 0
set [212] 0
set [213] 0
set [214] 0
set [215] 0
set [216] 1
set [217] 0
CHANGEEXP + 100000000
SENDMSG 0 鼎天霸主[%s]领取了今日工资,10亿经验.
goto @GiveOK
break
#IF
dayofweek sat
check [217] 0
#ACT
set [211] 0
set [212] 0
set [213] 0
set [214] 0
set [215] 0
set [216] 0
set [217] 1
CHANGEEXP + 100000000
SENDMSG 0 鼎天霸主[%s]领取了今日工资,10亿经验.
goto @GiveOK
break
#ELSEACT
GOTO @MAIN
messagebox 您今天已经领取过了
break

[@GiveOK]
#ACT
GOTO @MAIN
messagebox 东西可拿好了，掉了可没的补哟。^_*
break

论坛一条龙