传奇私服脚本大全。。（传3+传2更新中）|老数据合并综合服务端发布区 - 梦想仙境中文官方社区论坛

离线yourss

新手上路

发帖: 259

祝福宝石: 0

威望: 0

玛雅之石: 0

创造宝石: 0

只看楼主倒序阅读使用道具楼主发表于: 2004-08-11

个别传3版本不适用！

==========各商店NPC文件名================

沙吧克武器店 2Awe-0151 60GFVF]'2
服装店 3Adr-0155 3Ahe-0155(头盔) 60GFVF]'2
药店 4Adu-0153 4Adm-0153(毒药) 60GFVF]'2
杂货铺 7Ast-3 60GFVF]'2
首饰店 8Abr-0154(手镯) 8Ane-0154(项链) 8Ari-0154(戒指)

毒蛇山谷武器店 2Swe-0120 60GFVF]'2
服装店 3Sdr-2 60GFVF]'2
药店 4Sdu-0117 60GFVF]'2
杂货铺 7Sst-2

比奇城武器店 2Bwe-0103 60GFVF]'2
服装店 3Bdr-0106 60GFVF]'2
药店 4Bdm-0109(毒药) 4Bdu-0 4Bdu-0108 60GFVF]'2
书店 5Bbo-0104 60GFVF]'2
杂货铺 7Bst-0 60GFVF]'2
首饰店 8Bbr-0105(手镯) 8Bne-0105(项链) 8Bri-0105(戒指)

新手村武器店 2Gwe-0 60GFVF]'2
服装店 3Gdr-0 60GFVF]'2
药店 4Gdu-0119 4Gdm-0119(毒药) 60GFVF]'2
杂货铺 7Gst-0

边境城武器店 2Twe-0 60GFVF]'2
服装店 3Tdr-0 60GFVF]'2
药店 4Tdu-0(实际上是杂货铺) 60GFVF]'2
书店 5Tbo-0132 60GFVF]'2
首饰店 8Tbr-0141(手镯) 8Tne-0141（项链） 8Tri-0141（戒指）

盟重城武器店 2Mwe-0159 60GFVF]'2
服装店 3Mdr-0149 3Mga-0149(手套) 3Mhe-0149(头盔) 60GFVF]'2
药店 4Mdu-0160 60GFVF]'2
书店 5Mbo-0161 60GFVF]'2
杂货铺 7Mst-3 60GFVF]'2
首饰店 8Mbr-0158(手镯) 8Mne-0158（项链） 8Mri-0158（戒指）

==========怪物的攻击属性================

60GFVF]'2
纠正所有私服高手们的一个严重错误： 60GFVF]'2
关于MirServer\Mud2\DB 里面怪物数据库中的解释： 60GFVF]'2
所有网上公布的都是： 60GFVF]'2
“CoolEye :怪物是否主动攻击,0 不主动；100 主动。" 60GFVF]'2
这是错误的，CoolEye 其实应该是反隐身，你若把 60GFVF]'2
所有怪物CoolEye 调到100 ，再用隐身戒指也没用了。 60GFVF]'2
真正的决定怪物是否主动攻击的是：Race 这一项。 60GFVF]'2
它是决定怪物的攻击代码：调成51或52就不会主动攻击 60GFVF]'2
调成81是进入范围自动攻击，详解如下： 60GFVF]'2
51 不主动攻击*后物品不掉落要割的 60GFVF]'2
52 不主动攻击*后物品不掉落有一定几率会逃跑 60GFVF]'2
53 主动攻击物品不掉落 60GFVF]'2
82 主动攻击射程2 60GFVF]'2
81 普通的攻击进入范围自动攻击 60GFVF]'2
92 遇到范围外攻击会瞬移 60GFVF]'2
95 进入范围会从地下爬出来 60GFVF]'2
100 道士的召唤骷髅 60GFVF]'2
101 进入范围会从石像状态激活 60GFVF]'2
102 边攻击边召唤！SETUP里的ZUMA1~4里的特定的怪 60GFVF]'2
103 释放！SETUP里的BEE指定的怪 60GFVF]'2
105 麻痹攻击（高） 60GFVF]'2
106 麻痹攻击（低） 60GFVF]'2
107 全屏攻击+麻痹+中毒 60GFVF]'2
113 召唤神兽 60GFVF]'2
114 召唤神兽 60GFVF]'2
116 释放！SETUP里的SPIDER指定的怪 60GFVF]'2
117 自暴攻击 60GFVF]'2
11 无敌加瞬移攻击主动攻击MOB和红人 60GFVF]'2
85 地下钻出来原地攻击 *后物品不掉落 60GFVF]'2
87 主动攻击射程5 60GFVF]'2
93 主动攻击射程4 60GFVF]'2
94 主动攻击直线攻击 60GFVF]'2
96 自动复活 60GFVF]'2
104 主动攻击射程8 60GFVF]'2
112 只主动攻击红名射程11 60GFVF]'2
115 全屏攻击（地下出剌）

60GFVF]'2
脚本命令: 60GFVF]'2
一。脚本命令： 60GFVF]'2
checkjob (Warr, Wizard, Taos) ;测试职业 60GFVF]'2
checkgold (金币数) ;测试金币 60GFVF]'2
checklevel (等级) ;测试等级 60GFVF]'2
checkitem (物品名) (数量) ;测试物品及数量 60GFVF]'2
give gold (金币数) ;给钱 60GFVF]'2
give (物品名) (数量) ;给物及数量 60GFVF]'2
take gold (金币数) ;拿走钱 60GFVF]'2
take (物品名) (数量) ;拿走物及数量 60GFVF]'2
checkpkpoint (pk值) ;测试PK值 60GFVF]'2
checkluckypoint (幸运值) ;幸运值正值为好,负值为差 60GFVF]'2
checkduraeva (物品名) (数值) ;一般测试矿物等物品的品质 60GFVF]'2
checkhum (地图名) (数值) ;测试这个地图的人数 60GFVF]'2
checkmonmap (地图名) (数值) ;测试这个地图的怪物数 60GFVF]'2
map (地图名) ;移动到这个地图 60GFVF]'2
mapmove (地图名) (坐标A) (坐标B) ;移动到这个地图指定坐标 60GFVF]'2
monclear 地图清除 60GFVF]'2
close 关闭对话框 60GFVF]'2
TimeRecall (设定时间值) ;分钟,一般指进入地图时间限制 60GFVF]'2
BreakTimeRecall ;中断设定时间 60GFVF]'2
ExchangeMap (地图名) ;与指定地图里的人交换位置 60GFVF]'2
daytime sunset ;一天时间 60GFVF]'2
checkbaggage ;测试背包满没 60GFVF]'2
small (变量) (数值) ;测试变量是不是小于指定数值 60GFVF]'2
large (变量) (数值) ;测试变量是不是大于指定数值 60GFVF]'2
equal (变量) (数值) ;测试变量是不是等于指定数值 60GFVF]'2
mov (变量) (数值) ;让变量等于指定数值 60GFVF]'2
sum (变量A) (变量B) ;A+B 注意,如果还要家第3个数直接换行写sum (变量C) 60GFVF]'2
注:关于SUM的详解 60GFVF]'2
首先有MOV (变量X) 0 ;(变量X)清0 60GFVF]'2
sum (变量A) (变量B) ;X=A+B 60GFVF]'2
sum (变量C) ;X=X+C 60GFVF]'2
movr (变量) (数值) ;随机把指定数值以下的数(正数)给变量 60GFVF]'2
inc (变量) (数值) ;让变量自动加指定数值到变量 60GFVF]'2
playdice (骰子数) @xxx ;玩骰子,跳转到标签[@xxx] 60GFVF]'2
random (随机数) ;一般用在#IF语句中作为触发#IF机率,有时随机数=并列#IF语句数用于随 60GFVF]'2
机多项选择,例如: #IF RANDOM 3 #SAY() #ELSEACT 60GFVF]'2
Check [条件数] 1 ;测试[条件数]触发与否 1(触发) 60GFVF]'2
SET [条件数] 1 ;设置[条件数]触发 60GFVF]'2
Monclear 地图清理这个地图！ 60GFVF]'2
Param1 地图地图名 60GFVF]'2
Param2 横坐标坐标 60GFVF]'2
Param3 纵坐标坐标 60GFVF]'2
MonGen 怪物名称数量时间 60GFVF]'2
TimeRecall 时间时间限制

二。脚本变量： 60GFVF]'2
<$USERNAME> 当前用户名 60GFVF]'2
<$GUILDWARFEE>行会战金币数 60GFVF]'2
<$LORD>沙巴克行会头名 60GFVF]'2
<$OWNERGUILD>沙巴克行会名 60GFVF]'2
<$UPGRADEWEAPONFEE>升级武器价格 60GFVF]'2
<$USERWEAPON> 放在对话框里的武器名字 60GFVF]'2
<$STR(变量)> 把变量转换为字符型

[此贴子已经被作者于2004-8-11 2:42:58编辑过]

评价一下你浏览此帖子的感受

分享到 淘江湖新浪 QQ微博 QQ空间开心人人豆瓣网易微博百度鲜果白社会飞信

离线yourss

新手上路

发帖: 259

祝福宝石: 0

威望: 0

玛雅之石: 0

创造宝石: 0

只看该作者沙发发表于: 2004-08-11

m2修改
地址：[0X0008A4FC]
查找：07000000474F515545535400
修改：0600000046524545504B0000

地址：[0X0009BC98] 60GFVF]'2
查找：558BEC83C4F48945FC8B45088B40F08B80540500008B40084885C07C7940 60GFVF]'2
修改：8B45088B40FC8B90AC00000033D28990AC000000E873280200E9E21A0000

命令：FREEPK 60GFVF]'2
功能：清除当前使用脚本的用户的所有pk值（pk=0） 60GFVF]'2
范例脚本： 60GFVF]'2
[@main] 60GFVF]'2
#IF 60GFVF]'2
checkpkpoint 11 60GFVF]'2
#SAY 60GFVF]'2
见到你突然想起一堆成语，这些成语就是人面兽心，无可救药等等... 所以你就暂时的反省一下吧，我不决定帮你\ 60GFVF]'2
<离开/@exit> 60GFVF]'2
#ACT 60GFVF]'2
break

#IF 60GFVF]'2
checkpkpoint 10 60GFVF]'2
#SAY 60GFVF]'2
你的心灵已经被魔鬼所左右. 一直这样下去，人间就会受大灾难的.... 现在还不晚，想让我帮你清红你要花费1000万,你是否想<清红/@qing-10>? <离开/@exit> 60GFVF]'2
#ACT 60GFVF]'2
break

#IF 60GFVF]'2
checkpkpoint 8 60GFVF]'2
#SAY 60GFVF]'2
看来你也听了不少人的怨声. 如果你觉得内疚就到此为止，重新做人吧. \ 想让我帮你清红你要花费900万,你是否想<清红/@qing-8>? #ACT 60GFVF]'2
break

#IF 60GFVF]'2
checkpkpoint 6 60GFVF]'2
#SAY 60GFVF]'2
重复多次失误，失误就会变习惯. 目前是只要经过一天的时间，就可以洗掉罪过，但是照这样下去会有一天你会后悔的,当心点.. 想让我帮你清红你要花费700万,你是否想<清红/@qing-6>? <离开/@exit> 60GFVF]'2
#ACT 60GFVF]'2
break

#IF 60GFVF]'2
checkpkpoint 4 60GFVF]'2
#SAY 60GFVF]'2
嗯... 不管你是因为什么原因才犯罪，但是罪毕竟是罪犯了罪就要受到惩罚. 不过还好，你的罪还算轻想让我帮你清红你要花费500万,你是否想<清红/@qing-4>? <离开/@exit> 60GFVF]'2
#ACT 60GFVF]'2
break

#IF 60GFVF]'2
checkpkpoint 2 60GFVF]'2
#SAY 60GFVF]'2
看来你最近和别人有过争执. 不过问题不算严重. 可是以后要注意.一次失误会让你成为永久的罪人 \ 60GFVF]'2
想让我帮你清红你要花费300万,你是否想<清红/@qing-2>? <离开/@exit> 60GFVF]'2
#ACT 60GFVF]'2
break 60GFVF]'2
#ELSESAY 60GFVF]'2
你现在不红,别跟我开玩笑! <离开/@exit>

[@qing-2] 60GFVF]'2
#IF 60GFVF]'2
CHECKPKPOINT 4 60GFVF]'2
#ACT 60GFVF]'2
GOTO @cuowu 60GFVF]'2
BREAK 60GFVF]'2
#IF 60GFVF]'2
CHECKGOLD 3000000 60GFVF]'2
#ACT 60GFVF]'2
TAKE 金币 3000000 60GFVF]'2
FREEPK 60GFVF]'2
#SAY 60GFVF]'2
我已经帮你消除了你杀人的标记,希望你以后要小心多行不义必自毙 <谢谢/@exit> 60GFVF]'2
#ELSESAY 60GFVF]'2
你连这点钱也没有,就别指望我能帮你什么忙了! <离开/@exit>

[@qing-4] 60GFVF]'2
#IF 60GFVF]'2
CHECKPKPOINT 6 60GFVF]'2
#ACT 60GFVF]'2
GOTO @cuowu 60GFVF]'2
BREAK 60GFVF]'2
#IF 60GFVF]'2
CHECKGOLD 5000000 60GFVF]'2
#ACT 60GFVF]'2
TAKE 金币 5000000 60GFVF]'2
FREEPK 60GFVF]'2
#SAY 60GFVF]'2
我已经帮你消除了你杀人的标记,希望你以后要小心多行不义必自毙 <谢谢/@exit> 60GFVF]'2
#ELSESAY 60GFVF]'2
你连这点钱也没有,就别指望我能帮你什么忙了! <离开/@exit>

[@qing-6] 60GFVF]'2
#IF 60GFVF]'2
CHECKPKPOINT 8 60GFVF]'2
#ACT 60GFVF]'2
GOTO @cuowu 60GFVF]'2
BREAK 60GFVF]'2
#IF 60GFVF]'2
CHECKGOLD 7000000 60GFVF]'2
#ACT 60GFVF]'2
TAKE 金币 7000000 60GFVF]'2
FREEPK 60GFVF]'2
#SAY 60GFVF]'2
我已经帮你消除了你杀人的标记,希望你以后要小心多行不义必自毙 <谢谢/@exit> 60GFVF]'2
#ELSESAY 60GFVF]'2
你连这点钱也没有,就别指望我能帮你什么忙了! <离开/@exit>

[@qing-8] 60GFVF]'2
#IF 60GFVF]'2
CHECKPKPOINT 10 60GFVF]'2
#ACT 60GFVF]'2
GOTO @cuowu 60GFVF]'2
BREAK 60GFVF]'2
#IF 60GFVF]'2
CHECKGOLD 9000000 60GFVF]'2
#ACT 60GFVF]'2
TAKE 金币 9000000 60GFVF]'2
FREEPK 60GFVF]'2
#SAY 60GFVF]'2
我已经帮你消除了你杀人的标记,希望你以后要小心多行不义必自毙 <谢谢/@exit> 60GFVF]'2
#ELSESAY 60GFVF]'2
你连这点钱也没有,就别指望我能帮你什么忙了! <离开/@exit>

[@qing-10] 60GFVF]'2
#IF 60GFVF]'2
CHECKPKPOINT 11 60GFVF]'2
#ACT 60GFVF]'2
GOTO @cuowu 60GFVF]'2
BREAK 60GFVF]'2
#IF 60GFVF]'2
CHECKGOLD 10000000 60GFVF]'2
#ACT 60GFVF]'2
TAKE 金币 10000000 60GFVF]'2
FREEPK 60GFVF]'2
#SAY 60GFVF]'2
我已经帮你消除了你杀人的标记,希望你以后要小心多行不义必自毙 <谢谢/@exit> 60GFVF]'2
#ELSESAY 60GFVF]'2
你连这点钱也没有,就别指望我能帮你什么忙了! <离开/@exit>

[@cuowu] 60GFVF]'2
#SAY 60GFVF]'2
你喜欢用外挂吗?对不起,我不能为你服务!! <离开/@exit>

离线yourss

新手上路

发帖: 259

祝福宝石: 0

威望: 0

玛雅之石: 0

创造宝石: 0

只看该作者板凳发表于: 2004-08-11

**********************美容系统的修改************************
需修改的程序：M2Server.exe
修改工具：UltraEdit
************************************************************
美容.理发.转职.买宝宝.修改大全,包括所有脚本原创]

UltraEdit打开结婚系统修改后没有做任何修改的m2server.exe

******理发和美容改法**********

查找：e9cf00000045b050b9b0ae4800babcae48008b45ece8f798fcff8b 60GFVF]'2
替换：8b45b4bae8ae4800e8f097f7ff7507c745e008000000e9b9000000 60GFVF]'2
查找：4900cdd749008e324d0039 60GFVF]'2
替换：4900cdd749008e324d0003 60GFVF]'2
查找：33d28b45ac8b4004e81063fbff8945d833d28b45ac8b400ce80063fbff8945d48b45088b40fc8b4dd48b55d8e8e03d0200e95f0b000033d28b45ac8b4004e8da62fbff8945d833d28b45ac8b400ce8ca62fbff8945d48b45088b40fc8b4dd48b55 LsS
替换：8b55ac8b4204ba445e4d00e82db5f6ff85c0751b8b55088b52fc528b45ac8b401088422e58e85fcd0100e9660b00008b55ac8b4204baa85e4d00e8feb4f6ff85c075198b55088b52fc528b45ac8b40108882a202000058e8c5180200e9340b0000

************配套脚本*********** LsS
[@main] LsS
#if LsS
checkpkpoint 2 LsS
#say LsS
我们这里不和罪犯做生意的！\ <关闭/@exit> LsS
#elseact LsS
goto @main-1

[@main-1] LsS
#if LsS
checklevel 45 LsS
#act LsS
goto @main-2 LsS
#elsesay LsS
你不到45级别,不能享受我的服务！

LsS
[@main-2] LsS
#if LsS
#say LsS
你好，尊敬的<$username> 我可以帮你<理发/@lifa>和<美名/@meimin> LsS
<关闭/@exit>

[@lifa] LsS
#if LsS
#say LsS
<$username>，你可以做下面两种发型~当然你得给我10万金币! <带发/@hair0> <光头/@hair1> <关闭/@exit>

LsS
[@hair0] LsS
#if LsS
checkgold 100000 LsS
#act LsS
take 金币 100000 LsS
setunit hair 1 LsS
break LsS
#elsesay LsS
看看你身上有没有10万块金币。<关闭/@exit>

[@hair1] LsS
#if LsS
checkgold 100000 LsS
#act LsS
take 金币 100000 LsS
setunit hair 0 LsS
break LsS
#elsesay LsS
看看你身上有没有10万块金币。<关闭/@exit>

[@meimin] LsS
#if LsS
#say LsS
请注意美化名字每次1万元，下线后将消失选择你所要染的颜色编号：\┏━━┳━━┳━━┳━━┳━━┳━━┳━━┓\┃<墨黑/@namecolor_1>┃<深蓝/@namecolor_2>┃<亮青/@namecolor_3>┃<倩绿/@namecolor_4>┃<暗红/@namecolor_5>┃<古典/@namecolor_6>┃<青色/@namecolor_7>┃\┣━━╋━━╋━━╋━━╋━━╋━━╋━━┫\┃<橘红/@namecolor_8>┃<绿色/@namecolor_9>┃<土黄/@namecolor_10>┃<紫色/@namecolor_11>┃<暗蓝/@namecolor_12>┃<青灰/@namecolor_13>┃<返回/@main>┃\┗━━┻━━┻━━┻━━┻━━┻━━┻━━┛<关闭/@exit>

[@namecolor_1] LsS
#if LsS
checkgold 10000 LsS
#act LsS
take 金币 10000 LsS
setunit namecolor 190 LsS
break LsS
#elsesay LsS
看看你是否有足够的钱来买染料。<关闭/@exit>

[@namecolor_2] LsS
#if LsS
checkgold 10000 LsS
#act LsS
take 金币 10000 LsS
setunit namecolor 252 LsS
break LsS
#elsesay LsS
看看你是否有足够的钱来买染料。<关闭/@exit>

[@namecolor_3] LsS
#if LsS
checkgold 10000 LsS
#act LsS
take 金币 10000 LsS
setunit namecolor 254 LsS
break LsS
#elsesay LsS
看看你是否有足够的钱来买染料。<关闭/@exit>

[@namecolor_4] LsS
#if LsS
checkgold 10000 LsS
#act LsS
take 金币 10000 LsS
setunit namecolor 250 LsS
break LsS
#elsesay LsS
看看你是否有足够的钱来买染料。<关闭/@exit>

[@namecolor_5] LsS
#if LsS
checkgold 10000 LsS
#act LsS
take 金币 10000 LsS
setunit namecolor 5656 LsS
break LsS
#elsesay LsS
看看你是否有足够的钱来买染料。<关闭/@exit>

[@namecolor_6] LsS
#if LsS
checkgold 10000 LsS
#act LsS
take 金币 10000 LsS
setunit namecolor 5757 LsS
break LsS
#elsesay LsS
看看你是否有足够的钱来买染料<关闭/@exit>

[@namecolor_7] LsS
#if LsS
checkgold 10000 LsS
#act LsS
take 金币 10000 LsS
setunit namecolor 4566 LsS
break LsS
#elsesay LsS
看看你是否有足够的钱来买染料。<关闭/@exit>

[@namecolor_8] LsS
#if LsS
checkgold 10000 LsS
#act LsS
take 金币 10000 LsS
setunit namecolor 19 LsS
break LsS
#elsesay LsS
看看你是否有足够的钱来买染料。<关闭/@exit>

[@namecolor_9] LsS
#if LsS
checkgold 10000 LsS
#act LsS
take 金币 10000 LsS
setunit namecolor 2 LsS
break LsS
#elsesay LsS
看看你是否有足够的钱来买染料。<关闭/@exit>

[@namecolor_10] LsS
#if LsS
checkgold 10000 LsS
#act LsS
take 金币 10000 LsS
setunit namecolor 3 LsS
break LsS
#elsesay LsS
看看你是否有足够的钱来买染料<关闭/@exit>

[@namecolor_11] LsS
#if LsS
checkgold 10000 LsS
#act LsS
take 金币 10000 LsS
setunit namecolor 5 LsS
break LsS
#elsesay LsS
看看你是否有足够的钱来买染料。<关闭/@exit>

[@namecolor_12] LsS
#if LsS
checkgold 10000 LsS
#act LsS
take 金币 10000 LsS
setunit namecolor 8 VK/@jrL+
break VK/@jrL+
#elsesay VK/@jrL+
看看你是否有足够的钱来买染料。<关闭/@exit>

[@namecolor_13] VK/@jrL+
#if VK/@jrL+
checkgold 10000 VK/@jrL+
#act VK/@jrL+
take 金币 10000 VK/@jrL+
setunit namecolor 396 VK/@jrL+
break VK/@jrL+
#elsesay VK/@jrL+
看看你是否有足够的钱来买染料。<关闭/@exit>

离线yourss

新手上路

发帖: 259

祝福宝石: 0

威望: 0

玛雅之石: 0

创造宝石: 0

只看该作者地板发表于: 2004-08-11

**********************NPC在线转职的修改************************
需修改的程序：M2Server.exe
修改工具：UltraEdit
************************************************************

修改过结婚的英文GM命令的M2可以试用一下修改. VK/@jrL+
****转职具体修改******** VK/@jrL+
***查找*** VK/@jrL+
73 74 00 00 00 00 7A 44 8B 45 08 8B 40 FC 8B 90 AC 00 00 00 33 D2 89 90 AC 00 00 00 E8 73 28 02 00 E9 E2 1A 00 00 89 45 F4 C7 45 F8 00 00 00 00 8B 45 08 8B 40 F0 8B 80 54 05 00 00 8B 55 F8 E8 30 4E F7 FF 8B 40 04 3B 45 FC 75 4A 8B 45 08 8B 40 F0 8B 80 54 05 00 00 8B 55 F8 E8 14 4E F7 FF 8B 55 08 8B 52 FC 89 82 2C 06 00 00 8B 45 08 8B 40 F0 8B 55 08 8B 52 FC 89 82 30 06 00 00 8B 45 08 8B 50 FC 8B 45 08 8B 40 F0 B9 3C C9 49 00 E8 60 1C 00 00 EB 08 FF 45 F8 FF 4D F4 75 92 8B E5 5D C3 00 00 FF FF FF FF 05 00 00 00 40 6D 61 69 6E 00 00 00 55 8B EC 51 89 45 FC 8B 45 FC E8 2D

***替换** VK/@jrL+
7374000000007a448b55ac8b4204bafc5d4d00e898c4f6ff85c075258b45088b40fc8b90ac00000083fa64720283ea64eb0233d28990ac000000e855280200eb6e8b55ac8b4204ba78a44800e85fc4f6ff85c0751a8b45088b40fc80b80f01000000754b8a502d80f20188502deb408b45088b40fc8a502f50528b55ac8b5204e8fffd02005a583a502f7412b20528503433d289504c42e840240200eb118b55ac8b52048b45088b40fce8011f0300e9541a0000558bec518945fc8b45fce82d

***.转换职业后降低级别的修改方法**** VK/@jrL+
查找:3A502F7412B203 ************此为降低5级************ VK/@jrL+
最后面的03就是转职的时候降3级 VK/@jrL+
改成01就是降1级别

VK/@jrL+
************************************************以下为配套脚本******************************************** VK/@jrL+
;转职命令:freepk **可以按自己修改的命令** VK/@jrL+
[@main] VK/@jrL+
#say VK/@jrL+
作为战士您是否已经厌倦了烈火和半月呢?作为法师您是否不再喜欢闪电和冰咆哮了呢?作为道士您是否不在只想做为别人的配角只放宝宝和魔防了呢?OK!现在机会来了.为了满足您的要求.特提供转职服务.当然天上是不会掉"馅饼"的.为了您PK的更爽.自然您也得付出小小的代价.先看清楚下面的需知再做决定吧!<转职必看/@readme> <离开/@exit>

[@readme] VK/@jrL+
<$username> VK/@jrL+
<1>转职后保留您现有的级别.但您的各项技能可就要从头学起了.<2>需要等级45级以上才可以转职.并且需要5个金砖.好了祝好运.快去体验那完全不一样的职业给您带来的快感吧.<转职/@zhzy> <离开/@exit>

[@zhzy] VK/@jrL+
#IF VK/@jrL+
checklevel 45 *****可自定义转职需要的等级条件******* VK/@jrL+
checkitem 金砖 5 ******可自定义转职把需的物品****** VK/@jrL+
#SAY VK/@jrL+
<$username> 转职之前再次提醒你:转职后身上原有的技能将全部消失.切记!你是否确定转职?<转职/@zhzy-3> <离开/@exit> VK/@jrL+
#ELSESAY VK/@jrL+
转职程序第一步: <$username>请确定您是否有45级.并且带够了5个金砖.<离开/@exit>

[@zhzy-3] VK/@jrL+
#IF VK/@jrL+
checklevel 45 VK/@jrL+
checkitem 金砖 5 VK/@jrL+
#ACT VK/@jrL+
freepk 火球术 VK/@jrL+
freepk 治愈术 VK/@jrL+
freepk 基本剑术 VK/@jrL+
freepk 精神力战法 VK/@jrL+
freepk 大火球 VK/@jrL+
freepk 施毒术 VK/@jrL+
freepk 攻杀剑术 VK/@jrL+
freepk 抗拒火环 VK/@jrL+
freepk 地狱火 VK/@jrL+
freepk 疾光电影 VK/@jrL+
freepk 雷电术 VK/@jrL+
freepk 刺杀剑术 VK/@jrL+
freepk 灵魂火符 VK/@jrL+
freepk 幽灵盾 VK/@jrL+
freepk 神圣战甲术 VK/@jrL+
freepk 困魔咒 VK/@jrL+
freepk 召唤骷髅 VK/@jrL+
freepk 隐身术 VK/@jrL+
freepk 集体隐身术 VK/@jrL+
freepk 瞬息移动 VK/@jrL+
freepk 诱惑之光 VK/@jrL+
freepk 火墙 VK/@jrL+
freepk 爆裂火焰 VK/@jrL+
freepk 地狱雷光 VK/@jrL+
freepk 半月弯刀 VK/@jrL+
freepk 烈火剑法 VK/@jrL+
freepk 野蛮冲撞 VK/@jrL+
freepk 心灵启示 VK/@jrL+
freepk 群体治疗术 VK/@jrL+
freepk 召唤神兽 VK/@jrL+
freepk 魔法盾 VK/@jrL+
freepk 圣言术 VK/@jrL+
freepk 冰咆哮 VK/@jrL+
#SAY VK/@jrL+
请选择合适的职业:<武士/@warr> <魔法师/@wizard> <道士/@taos> VK/@jrL+
#ELSESAY VK/@jrL+
干吗?想作什么啊.没有金砖？？那就别想转职.<离开/@exit>

[@warr] VK/@jrL+
#IF VK/@jrL+
checklevel 45 VK/@jrL+
checkitem 金砖 5 VK/@jrL+
#ACT VK/@jrL+
TAKE 金砖 5 VK/@jrL+
freepk 武士 VK/@jrL+
#SAY VK/@jrL+
<$username>我亲爱的勇士您已经完成了转职.您现在是一位强悍的战士了~哈哈哈~好好享受战士的强劲吧.<离开/@exit> VK/@jrL+
#ELSESAY VK/@jrL+
干吗?想作什么啊.没有金砖？？那就别想转职.<离开/@exit>

[@wizard] VK/@jrL+
#IF VK/@jrL+
checklevel 45 VK/@jrL+
checkitem 金砖 5 VK/@jrL+
#ACT VK/@jrL+
TAKE 金砖 5 VK/@jrL+
freepk 魔法师 VK/@jrL+
#SAY VK/@jrL+
<$username>我亲爱的勇士您已经完成了转职.您现在是一位伟大的魔法师了.<离开/@exit> VK/@jrL+
#ELSESAY VK/@jrL+
干吗?想作什么啊.没有金砖？？那就别想转职.<离开/@exit>

[@taos] VK/@jrL+
#IF VK/@jrL+
checklevel 45 VK/@jrL+
checkitem 金砖 5 VK/@jrL+
#ACT VK/@jrL+
TAKE 金砖 5 VK/@jrL+
freepk 道士 VK/@jrL+
#SAY VK/@jrL+
<$username>我亲爱的勇士您已经完成了转职.您现在是一位伟大的道士了.<离开/@exit> VK/@jrL+
#ELSESAY VK/@jrL+
干吗?想作什么啊.没有金砖？？那就别想转职.<离开/@exit>

离线yourss

新手上路

发帖: 259

祝福宝石: 0

威望: 0

玛雅之石: 0

创造宝石: 0

只看该作者 4楼发表于: 2004-08-11

《洗红名脚本》]

[@main] VK/@jrL+
我是来自地狱的通灵法师!我得到了追梦之神的咒语可以洗去你被血染红的姓名!但是神的旨意我只能帮助人不能帮助魔鬼和其帮凶!并且我只能帮你一次,如果还想让我帮你你就必须经住地狱的考验!我更具你杀人的多少来收取回报! \ VK/@jrL+
<我想要你帮忙/@qinghong> <我只是来看看/@exit>

[@qinghong] VK/@jrL+
#IF VK/@jrL+
checkpkpoint 12 VK/@jrL+
#SAY VK/@jrL+
恩....你的PK值已经超过了1200!\ 你不要撒谎说你不是故意的!或者误杀!我不会相信的!追梦不欢迎杀人狂!你走吧在来的话我不客气！\ VK/@jrL+
<离开/@exit> VK/@jrL+
#ACT VK/@jrL+
break

#IF VK/@jrL+
checkpkpoint 11 VK/@jrL+
#SAY VK/@jrL+
恩......你的PK值在1100到1200之间\ 见到你突然想起一堆成语这些成语就是人面兽心，无可救药等等... 所以你滚的远远的我不想帮你!\ VK/@jrL+
<离开/@exit> VK/@jrL+
#ACT VK/@jrL+
break

#IF VK/@jrL+
checkpkpoint 10 VK/@jrL+
#SAY VK/@jrL+
恩......你的PK值在1000到1100之间\ 你知道什么叫禽兽吗?不过你现在禽兽不如禽兽也不会经常残杀同类,我不想看见你\ VK/@jrL+
<离开/@exit> VK/@jrL+
#ACT VK/@jrL+
break

#IF VK/@jrL+
checkpkpoint 9 VK/@jrL+
#SAY VK/@jrL+
恩......你的PK值在900到1000之间\ 你的心灵已经被魔鬼所左右. 一直这样下去，人间就会受大灾难的.... 现在还不晚.我可以用追梦神灵的力量洗净你肮脏的心灵但是你需要以牺牲15个金盒为代价!\ VK/@jrL+
<离开/@exit> <我决定重新做人/@qing-9> VK/@jrL+
#ACT VK/@jrL+
break

#IF VK/@jrL+
checkpkpoint 8 VK/@jrL+
#SAY VK/@jrL+
恩......你的PK值在800到900之间\ 是不是看到了来自地狱的怨恨?听到来自死亡的召唤要是金盆洗手我可以给你一个机会，但是我要没收你的非法所的12个金盒!\ VK/@jrL+
<离开/@exit> <我决定金盆洗手/@qing-8> VK/@jrL+
#ACT VK/@jrL+
break

#IF VK/@jrL+
checkpkpoint 7 VK/@jrL+
#SAY VK/@jrL+
恩......你的PK值在700到800之间\ 你是不是来捣乱的?我们的法律严惩捣乱份子!留下9个金盒饶你一次!不然驱除出境!\ VK/@jrL+
<离开/@exit> <下次我不捣乱了/@qing-7> VK/@jrL+
#ACT VK/@jrL+
break

#IF VK/@jrL+
checkpkpoint 6 VK/@jrL+
#SAY VK/@jrL+
恩......你的PK值在600到700之间\ 级别高了有人骂你?正常呀!我还挨打了呢!你级别高了就不起了呀!为人要宽容才是高手的作为,洗红名7个金盒要不走人\ VK/@jrL+
<离开/@exit> <我知道错了/@qing-6> VK/@jrL+
#ACT VK/@jrL+
break

#IF VK/@jrL+
checkpkpoint 5 VK/@jrL+
#SAY VK/@jrL+
恩......你的PK值在500到600之间\ 杀了不少人了吧?虽然我心软但是我也要为我们的服务器着想.你交5个金盒的罚金吧! VK/@jrL+
<离开/@exit> <我认罚/@qing-5> VK/@jrL+
#ACT VK/@jrL+
break

#IF VK/@jrL+
checkpkpoint 4 VK/@jrL+
#SAY VK/@jrL+
恩......你的PK值在400到500之间\ 伸张正义?替罪羔羊?你也太过分了吧!不要说理由了!既然有心悔改我也可以帮忙但是我要收3个金盒的服务费! VK/@jrL+
<离开/@exit> <我想悔改/@qing-4> VK/@jrL+
#ACT VK/@jrL+
break

#IF VK/@jrL+
checkpkpoint 3 VK/@jrL+
#SAY VK/@jrL+
恩......你的PK值在300到400之间\ 误杀?你不会小心呀!PK是合法的杀人是有罪的!不过我可以相信你一次2个给我金盒你就自由了!\ VK/@jrL+
<离开/@exit> <我要自由/@qing-3> VK/@jrL+
#ACT VK/@jrL+
break

#IF VK/@jrL+
checkpkpoint 2 VK/@jrL+
#SAY VK/@jrL+
恩......你的PK值在200到300之间\ 可怜的孩子下次PK的时候要注意呀!杀人毕竟是不对的,给我1个金盒让\ 我解决你的烦恼吧! \ VK/@jrL+
<离开/@exit> <下次我不会失手了/@qing-2>

#ACT VK/@jrL+
#ELSESAY VK/@jrL+
别开玩笑了,你的名字还没有红呢!<离开/@exit>

[@qing-2] VK/@jrL+
#IF VK/@jrL+
CHECKPKPOINT 4 VK/@jrL+
#ACT VK/@jrL+
GOTO @cuowu VK/@jrL+
BREAK VK/@jrL+
#IF VK/@jrL+
CHECKITEM 金盒 1 VK/@jrL+
#ACT VK/@jrL+
TAKE 金盒 1 VK/@jrL+
FREEPK VK/@jrL+
#SAY VK/@jrL+
我已经帮你消除了你杀人的标记,希望你以后要小心多行不义必自毙<谢谢/@exit> VK/@jrL+
#ELSESAY VK/@jrL+
你的钱不够,回去拿够了钱再来！<离开/@exit>

[@qing-3] VK/@jrL+
#IF VK/@jrL+
CHECKPKPOINT 5 VK/@jrL+
#ACT VK/@jrL+
GOTO @cuowu VK/@jrL+
BREAK VK/@jrL+
#IFCHECKITEM 金盒 2 VK/@jrL+
TAKE 金盒 2 VK/@jrL+
FREEPK VK/@jrL+
#SAY VK/@jrL+
我已经帮你消除了你杀人的标记,希望你以后要小心多行不义必自毙<谢谢/@exit> VK/@jrL+
#ELSESAY VK/@jrL+
你的钱不够,回去拿够了钱再来！<离开/@exit>

[@qing-4] VK/@jrL+
#IF VK/@jrL+
CHECKPKPOINT 6 VK/@jrL+
#ACT VK/@jrL+
GOTO @cuowu VK/@jrL+
BREAK VK/@jrL+
#IFCHECKITEM 金盒 3 VK/@jrL+
TAKE 金盒 3 VK/@jrL+
FREEPK VK/@jrL+
#SAY VK/@jrL+
我已经帮你消除了你杀人的标记,希望你以后要小心多行不义必自毙<谢谢/@exit> VK/@jrL+
#ELSESAY VK/@jrL+
你的钱不够,回去拿够了钱再来！<离开/@exit>

[@qing-5] VK/@jrL+
#IF VK/@jrL+
CHECKPKPOINT 7 VK/@jrL+
#ACT VK/@jrL+
GOTO @cuowu VK/@jrL+
BREAK VK/@jrL+
#IF VK/@jrL+
CHECKITEM 金盒 5 VK/@jrL+
#ACT VK/@jrL+
TAKE 金盒 5 VK/@jrL+
FREEPK VK/@jrL+
#SAY VK/@jrL+
我已经帮你消除了你杀人的标记,希望你以后要小心多行不义必自毙<谢谢/@exit> VK/@jrL+
#ELSESAY VK/@jrL+
你的钱不够,回去拿够了钱再来！<离开/@exit>

[@qing-6] VK/@jrL+
#IF VK/@jrL+
CHECKPKPOINT 8 VK/@jrL+
#ACT VK/@jrL+
GOTO @cuowu VK/@jrL+
BREAK VK/@jrL+
#IF VK/@jrL+
CHECKITEM 金盒 7 VK/@jrL+
#ACT VK/@jrL+
TAKE 金盒 7 VK/@jrL+
FREEPK VK/@jrL+
#SAY VK/@jrL+
我已经帮你消除了你杀人的标记,希望你以后要小心多行不义必自毙<谢谢/@exit> VK/@jrL+
#ELSESAY VK/@jrL+
你的钱不够,回去拿够了钱再来！<离开/@exit>

[@qing-7] VK/@jrL+
#IF VK/@jrL+
CHECKPKPOINT 9 VK/@jrL+
#ACT VK/@jrL+
GOTO @cuowu VK/@jrL+
BREAK VK/@jrL+
#IF VK/@jrL+
CHECKITEM 金盒 9 VK/@jrL+
#ACT VK/@jrL+
TAKE 金盒 9 VK/@jrL+
FREEPK VK/@jrL+
#SAY 8BHtN
我已经帮你消除了你杀人的标记,希望你以后要小心多行不义必自毙<谢谢/@exit> 8BHtN
#ELSESAY 8BHtN
你的钱不够,回去拿够了钱再来！<离开/@exit>

[@qing-8] 8BHtN
#IF 8BHtN
CHECKPKPOINT 10 8BHtN
#ACT 8BHtN
GOTO @cuowu 8BHtN
BREAK 8BHtN
#IF 8BHtN
CHECKITEM 金盒 12 8BHtN
#ACT 8BHtN
TAKE 金盒 12 8BHtN
FREEPK 8BHtN
#SAY 8BHtN
我已经帮你消除了你杀人的标记,希望你以后要小心多行不义必自毙<谢谢/@exit> 8BHtN
#ELSESAY 8BHtN
你的钱不够,回去拿够了钱再来！<离开/@exit>

[@qing-9] 8BHtN
#IF 8BHtN
CHECKPKPOINT 11 8BHtN
#ACT 8BHtN
GOTO @cuowu 8BHtN
BREAK 8BHtN
#IF 8BHtN
CHECKITEM 金盒 15 8BHtN
#ACT 8BHtN
TAKE 金盒 15 8BHtN
FREEPK 8BHtN
#SAY 8BHtN
我已经帮你消除了你杀人的标记,希望你以后要小心多行不义必自毙<谢谢/@exit> 8BHtN
#ELSESAY 8BHtN
你的钱不够,回去拿够了钱再来！<离开/@exit>

[@cuowu] 8BHtN
#SAY 8BHtN
你喜欢用外挂吗?对不起,我不能为你服务!!<离开/@exit> 8BHtN

离线yourss

新手上路

发帖: 259

祝福宝石: 0

威望: 0

玛雅之石: 0

创造宝石: 0

只看该作者 5楼发表于: 2004-08-11

有等级要求和时间限制的训练场看门人[@main]
#IF
checkpkpoint 2
#act
set [999] 1
timerecall 120
mapmove 0162
break
#elseact
goto @zjl-1[@zjl-1]#IF
checklevel 48
#ACT
goto @zjl-2
break #IF
checklevel 42
#ACT
goto @zjl-3
#ELSEACT
goto @zjl-4[@zjl-2]
你已经不再需要我的训练了，我的训练是专门为中级英雄们准备的，\
我以经不能在帮助你了,以后的路就要你自已去努力啦!! \ <退出/@exit>[@zjl-3]
你确定想接受我的训练吗？？在这里你可以训练到48级!! 不过要交500000元场地费用!! 时间为90分钟<确定/@zjl-3-1> \
<退出/@exit>[@zjl-4]
你还没有42级，没有资格进行我的训练！ <退出/@exit>[@zjl-3-1]
#IF
checkgold 500000
#ACT
take 金币 500000
TimeRecall 90
mapmove ZJL111
close
#ELSESAY
你没有足够的金币使用我们的服务!快走开~不要浪费我们的时间!\ <取消/@exit>

离线yourss

新手上路

发帖: 259

祝福宝石: 0

威望: 0

玛雅之石: 0

创造宝石: 0

只看该作者 6楼发表于: 2004-08-11

武器合成师脚本（可以举一反三的进行首饰打造，装备升级等

离线yourss

新手上路

发帖: 259

祝福宝石: 0

威望: 0

玛雅之石: 0

创造宝石: 0

只看该作者 7楼发表于: 2004-08-11

（只要想的到，没有办不到）[@main]
#IF
checkpkpoint 2
#act
set [999] 1
timerecall 120
mapmove 0162
break
#elseact
goto @main-1[@main-1]
#IF
#SAY
你知道我是谁吗？ \
告诉你我是何等人物... \
我是这个大陆上唯一的恶魔创师你要试一下吗..? 说说看需要我帮你做什么 \ <了解一下/@ljyx> <不了，谢谢/@exit> [@ljyx]
#IF
#SAY你想拥有一把终极装备，使你变得更强大吗？但是做成一把适合你的装备，需要很多的备料。你想要让我为你做一套以你为主的装备吗？\
<了解备料/@ljbl> <了解装备/@ljzb><不了，谢谢/@exit>
[@ljbl]
#IF
#SAY要想做出一把属于你自己的装备，你需要以下的一些备料还有100000金币超级金创药，超级魔法药，疗伤药，神水，战神油，祝福油，血剑块.<了解超级金创药/@jcy> <了解神水/@ss> <了解战神油/@zsy><了解祝福油/@zfy> <了解超级魔法药/@mfy><了解疗伤药/@lsy> <了解血剑块/@xjk><下一步/@xyb> [@jcy]
#IF
#SAY
超级金创药，你可以在毒蛇山谷，村庄边界，银杏山谷韩家的杂货店,盟重的小药店那里买到它。\ <返回/@ljbl> \
<关闭./@exit>
[@mfy]
#IF
#SAY
超级魔法药，你可以在毒蛇山谷，村庄边界，银杏山谷韩家的杂货店,盟重的小药店那里买到它。\ <返回/@ljbl> \
<关闭./@exit>
[@lsy]
#IF
#SAY
疗伤药,能够快速恢复大量体力和魔法力的高级药水 \ <返回/@ljbl> \
<关闭./@exit> [@zsy]
#IF
#SAY
战神油,战神油是战神为了保护他后世的战士们而特制的。它可以使武器的持久性恢复为满值。方法为双击战神油，它将应用于你正使用的武器。\ \
<返回/@ljbl> <关闭./@exit>
[@zfy]
#IF
#SAY
祝福油,古老的米尔人制造了它，使用于武器的话，它将带来好运。这件幸运武器的拥有者将发挥他的最大的能力。它可以将武器的受咀咒值降低1，也可将普通武器的幸运值升到7。小心!它有时候会给你带来诅咒.\ <返回/@ljbl> <关闭./@exit>
[@ss]
#IF
#SAY
神水，在秘密通道里的未知暗殿中的稻草人身上，可以打出神水，它的作用是帮你脱掉你身上受到诅咒的神秘装备。\ <返回/@ljbl> <关闭./@exit>
[@xjk]
#IF
#SAY
血剑块，据说是季正秘密修炼的一把魔剑,不过碎了.虽然魔剑碎了,但是碎裂的剑锋却闪着妖异光芒.\ <返回/@ljbl> <关闭./@exit>
[@ljzb]
#IF
#SAY
赤血魔剑,魔血项链,魔血戒指,魔血手镯，这一套魔血装备是所有的修行者毕生追求的梦幻装备，穿上这套装备，你会有意想不到的效果。\ <返回/@ljyx> <关闭./@exit>
[@xyb]
#IF
#SAY你想好了吗？如果你准备好了所有的备料，并且有100000金币的话，我会为你打造的。\ <是的，我准备好了/@whl> <稍等一下，我再去找找/@exit> [@whl]
#IF
checkitem 超级金创药 1
checkitem 超级魔法药 1
checkitem 疗伤药1 1
checkitem 神水 1
checkitem 战神油 1
checkitem 祝福油 1
checkitem 血剑块 1
checkgold 1000000
#ACT
take 超级金创药 1
take 超级魔法药 1
take 疗伤药1 1
take 神水 1
take 战神油 1
take 祝福油 1
take 血剑块 1
take gold 1000000
give 赤血魔剑 1
give 魔血项链 1
give 魔血戒指 1
give 魔血手镯 1
#SAY已经给你做出了一套装备， \
快去试试它的威力吧。\ <关闭./@exit> #ELSESAY没有足够的备料或没有足够的金币支付手续费重新确认一下吧 \ <关闭./@exit>

离线yourss

新手上路

发帖: 259

祝福宝石: 0

威望: 0

玛雅之石: 0

创造宝石: 0

只看该作者 8楼发表于: 2004-08-11

spawn-0137.txt的内容：
;;礼仪小姐
[@main]
请问你想做什么？\ <准备请柬/@syqj><进入洞房/@jrdf><参加典礼/@cjhl><关闭/@exit> [@jrdf]
#if
check [453] 1
#act
goto @jhdl1
#ELSESAY
你忘记向朋友们发送请柬了。没有请柬，得朋友们怎么来参加你的婚礼呢？\ <索取请柬/@syqj><取消/@exit>[@jhdl1]
#IF
check [451] 0
#SAY
干什么这么着急结婚，去办理一下结婚登记再来。\ <离开/@exit>
#ELSESAY
新人想进入结婚典礼会场，需要[结婚证书]，如果你已经准备好了，我检查一下你就可以进去了。但是先请把请柬发给你的朋友，否则就是进去了也就你们两个\ <确定/@jhdl2><取消/@exit>[@jhdl2]
#IF
check [452] 1
#SAY
我记得以前你已经结婚了呀，怎么想犯重婚罪吗？<离开/@exit>
#ELSEACT
goto @jhdl3[@jhdl3]
#IF
check [451] 1
checkitem 结婚证书 1
#SAY
首先恭喜您，您的婚礼现场正在准备中，您现在就可以进去了。\ <进入/@jhdl4><离开/@exit>
#ELSESAY
你办理过结婚登记吗？还是证件丢失了，快去准备好，再来这里。\ <离开/@exit>[@jhdl4]
#ACT
set [452] 1
mapmove 0139 25 22[@cjhl]
您好，结婚典礼现场是很神圣的地方，进入时我需要看一下你的证件，如果正确的话，我马上带你去。\ <确定/@cjhl1><离开/@exit>[@cjhl1]
#IF
checkitem 请柬 1
#ACT
mapmove 0139 20 15
#ELSESAY
对不起，你拿不出任何证明你身份的证件，我无法让你进去参加婚礼。\ <离开/@exit>[@syqj]
#IF
check [452] 1
#SAY
对不起，请柬已经发完了。我再也找不到一张请柬了，抱歉！\ <离开/@exit>
#ELSEACT
goto @syqj1[@syqj1]
#IF
check [451] 0
#SAY
只有新婚夫妇才有权向我索要请柬，我很忙，对不起了。\ <离开/@exit>
#ELSEact
goto @lqqj[@lqqj]
#say
注意：只有把请柬发给朋友们以后才好进入洞房啊不然朋友们没有请柬，可是进不去哦\ <领取/@syqj2>请柬<离开/@exit>
#act
set [453] 1[@syqj2]
#ACT
give 请柬 1

离线yourss

新手上路

发帖: 259

祝福宝石: 0

威望: 0

玛雅之石: 0

创造宝石: 0

只看该作者 9楼发表于: 2004-08-11

中国特色的结婚脚本
第一步
打开merchant.txt文件。
加入下面的语句：
spawn 0139 19 19 婚礼司仪 0 16 0
spawn 0137 15 18 礼仪小姐 0 13 0
xinlang b341 16 21 楼兰城主 0 8 0
第二步
打开mapinfo.txt文件。
更改下面的语句：
[0137 竞技场 0] FIGHT 改成 [0137 新房一楼 0] FIGHT
[0139 竞技场 0] FIGHT 改成 [0139 洞房 0] SAFE CHECKQUEST(Q1404) NEEDSET_ON(404) NORECONNECT(0)
第三步
进入MAPQUEST_DEF文件夹
打开Q1404.TXT 文件：
内容改成（此文件是任务文件，4F上一般没有涉及到，可以随意改。）：
[@main]
#IF
check [451] 1
checkitem 结婚证书 1
#act
goto @jinr
break #if
checkitem 请柬 1
#ACT
goto @jinr
#ELSEACT
goto @bun[@bun]
(为什么我不能进入这房间???)[@jinr]
#act
mapmove 0139~~~~~~~~~~~~~~~~
xinlang-b341.txt文件的内容
;;楼兰城主
[@main]
你好，我是楼兰城的城主。你有什么事情要我帮忙？你在我这里可以办理<身份证/@gysfz>、申请<结婚/@jhread>、申请离婚等\ <办身份证/@bl><申请结婚/@jhdj1><申请离婚/@sqlh><取消/@exit>[@bl]
#IF
checklevel 42
#SAY
你已经有资格领取身份证了，很快我就会给你办好的。请你准备好10000元的办理费，并稍等……\ <继续/@next1>
#ELSESAY
对不起，你还没有资格办理身份证，等你到了42级以后再来吧！\ <关闭/@exit>[@next1]
#IF
check [450] 1
#act
goto @no_1_1
#elseact
goto @no_1[@no_1]
#if
checkgold 10000
#ACT
take 金币 10000
set [450] 1
give 身份证 1
#SAY
从现在开始，你就是个有“身份”的人了。有了身份证你就可以登记结婚了。每个人只有一次办理的机会如果你丢失了，那你只能做“单身贵族”了\ <关闭/@exit>
#ELSEACT
goto @no_1_2[@no_1_2]
你没有办理身份证所需要的费用，请你赚到10000块再来吧\ <确定/@exit>[@no_1_1]
通过检索登记纪录，发现你以前办理过身份证。放哪里去了？好好想想吧！\ <关闭/@exit>[@jhdj1]
#if
gender man
#SAY
申请结婚是为了证明你们二人成为合法夫妻，但申请的手续费是昂贵的需要申请人拿出一个珠宝箱，并出示爱情戒指进行登记，小伙子，你现在就要登记申请结婚吗？\ <确定/@jh><关闭/@exit>
#ELSESAY
申请结婚是为了证明你们二人成为合法夫妻小姐，你现在就要登记申请结婚吗？\ <确定/@jh><关闭/@exit>[@gysfz]
办理身份证的人要有42的级别才行有了身份证你就可以登记结婚了。每个人只有一次办理的机会如果你丢失了，那你只能做“单身贵族”了\ <确定/@main>[@jhread]
申请成功后，我会发给你们合法的[结婚证书]，凭借证书，你们到结婚礼堂进行结婚典礼仪式同时你也可以向他索取[请柬]，你们可以向你们的亲朋好友发送[请柬]参加你们的结婚典礼宾客拿着[请柬]就可以参加你们的婚礼了。\ <确定/@main>[@jh]
#if
checkhum b341 3
#say
申请结婚是件神圣的事情，不能有多的人，希望他能回避一下\ <确定/@exit>#if
checkhum b341 2
#act
goto @jinr
break#if
checkhum b341 1
#say
你一个人怎么结婚？难道和我？呵呵。\ <确定/@exit>[@jinr]
#if
gender man
#act
goto @jh_1
#ELSEACT
goto @jh_2[@jh_1]
#IF
check [451] 1
#SAY
<$USERNAME>先生,你高兴过头了吗？你已经结过婚了，不用再来找我了。\ <离开/@exit>
#ELSESAY
好，首先预祝你们二人新婚幸福,白头偕老。给我一个珠宝箱并出示你的爱情戒指 ,我来给你们办理手续。\ <办理/@jhbl0><关闭/@exit>[@jhbl0]
#IF
checkitem 珠宝箱 1
checkitem 身份证 1
checkitem 爱情戒指 1
#ACT
take 珠宝箱 1
take 身份证 1
give 结婚证书 1
set [451] 1
#SAY
手续已经为您办理好了，二位定好日子后，去找“盟重老兵”进行结婚仪式。要收好你的结婚证书哦，别把它弄丢了！你费尽周折得到的“爱情戒指”在婚礼上记得给你妻子哟！\ <关闭/@exit>
#ELSESAY
申请结婚需要1个珠宝箱和身份证，并需要出示你的“爱情戒指”去准备一下,一会再来找我就行了,我等你。\ <关闭/@exit>[@jh_2]
#IF
check [451] 1
#SAY
<$USERNAME>小姐,你高兴过头了吗？你已经结过婚了，不用再来找我了。\ <离开/@exit>
#ELSESAY
好，首先预祝你们二人新婚幸福,白头偕老。给我你的身份证，我给你们办理手续。\ <继续/@jhbl1><关闭/@exit>[@jhbl1]
#IF
checkitem 身份证 1
#ACT
take 身份证 1
give 结婚证书 1
set [451] 1
#SAY
手续已经为您办理好了，二位定好日子后，去找“盟重老兵”进行结婚仪式。要收好你的结婚证书哦，别把它弄丢了！你丈夫的“爱情戒指”戒指已经准好了哦！他说他会在婚礼上送给你的，再次祝贺你！\ <关闭/@exit>
#ELSESAY
申请结婚需要身份证，去准备一下一会再来找我就行了,我等你。\ <关闭/@exit>[@sqlh]
#if
check [451] 1
#act
goto @wylh
#ELSEACT
goto @mjh[@wylh]
有什么事情非要使你们走这一步呢？你们真的决定要离婚吗？\ <确定/@lh><取消/@exit>[@mjh]
你没结婚？！怎么离婚？？？\ <确定/@exit>[@lh]
#if
checkhum b341 2
#act
goto @lh_1
break#if
checkhum b341 1
#say
你一个人不能离婚？我要征求对方的意见\ <确定/@exit>
#act
break[@lh_1]
真的非常替你们难过，不过还是希望你能找到自己的真爱！\ <确定/@lh_2><取消/@exit>[@lh_2]
#if
checkitem 结婚证书 1
#act
take 结婚证书 1
give 身份证 1
set [451] 0
set [452] 0
set [453] 0
#say
你解放了，希望下次不要这么感情用事！\ <确定/@exit>
#ELSESAY
你没有带结婚证书来这里，我不能办理离婚手续\ <确定/@exit>

离线yourss

新手上路

发帖: 259

祝福宝石: 0

威望: 0

玛雅之石: 0

创造宝石: 0

只看该作者 10楼发表于: 2004-08-11

《MapQuest_def文件夹怪物设置！》

大家都知道MapQuest_def这个文件夹中存放的都是一些临时触发.就利用他来完成. ~~@y_e[N#l
我举个例子出来 ~~@y_e[N#l
mapinfo.txt ~~@y_e[N#l
[D601 地牢南一层] DARK ~~@y_e[N#l
现在把他修改如下 ~~@y_e[N#l
[D601 地牢南一层] DARK CHECKQUEST(Q001) ~~@y_e[N#l
~~@y_e[N#l
上面的Q001其实就是放入MapQuest_def的文件. ~~@y_e[N#l
~~@y_e[N#l
Q001.txt我们可以这样写这个脚本 ~~@y_e[N#l
[@main] ~~@y_e[N#l
#if ~~@y_e[N#l
checkmonmap D601 50 ~~@y_e[N#l
#act ~~@y_e[N#l
goto @exit of>}fJ_p
#elseact of>}fJ_p
goto @shua-2 of>}fJ_p
of>}fJ_p
of>}fJ_p
[@shua-2] of>}fJ_p
#IF of>}fJ_p
#ACT of>}fJ_p
Param1 D601 of>}fJ_p
Param2 40 of>}fJ_p
Param3 27 of>}fJ_p
MonGen 蜈蚣 50 50 of>}fJ_p
MonGen 跳跳蜂 50 50 of>}fJ_p
of>}fJ_p
这样只要一旦有人要进入d601这个地图.就会自动调用这个脚本.在怪物少于50的时候就会刷出蜈蚣和跳跳蜂各50只，多余50则不刷新出来. of>}fJ_p
of>}fJ_p
你们还可以自己加入checkhum来设定人多怪物耍的人，人少怪物耍的少，我这里就不用写出那个脚本了，也许还有人的想法比我还要好.这样下来Mongen.txt中就可以把d601的刷新完全删除.但是这样做的一个坏处就是太麻烦了.这样修改下来需要花很多的时间.这样下载你的mogen.txt应该是这个样子.除了几个大地图，就是比齐盟重啊，封魔城，苍月岛以外的都应该是没有怪物的刷新配置还在 mongen.txt中，因为主地图是必须刷新的.好了就到这里了.这样的觉得好处挺多的.没有人去的地方就不会有怪物出现，一旦有人去了怪物自己也出来了，这样不是很好吗?不要浪费系统资源. of>}fJ_p

离线yourss

新手上路

发帖: 259

祝福宝石: 0

威望: 0

玛雅之石: 0

创造宝石: 0

只看该作者 11楼发表于: 2004-08-11

简单说明：
注意 market_def 中的设定script的语法，例如“#IF”，“#ACT”，“checkgold”，“checkitem”等等。
在market_def中他的script可以设为
[@main] －－－－－－主程序
#IF －－－－－－条件判断
checkgold 20000 －－－－－－检查玩家是否具备条件
#SAY －－－－－－对话
NPC和你说的话.\\－－－－－－对话内容
<够条件后点同意/@givegold>\ －－－－－－进入子程序的两个分枝
<够条件后不同意/@takegold>\

#ELSESAY －－－－－－条件不成立时 of>}fJ_p
NPC对不起你不能完成这个\\ －－－－－－对话内容 of>}fJ_p
<退出/@exit>\

[@givegold]\ －－－－－－子程序1 of>}fJ_p
#ACT －－－－－－动作启动 of>}fJ_p
take gold 10000 －－－－－－从玩家身上扣除1w金币 of>}fJ_p
give 金条 1 －－－－－－给玩家一个金条 of>}fJ_p
#SAY of>}fJ_p
知道了吧！\<结束/@exit>\

[@takegold] －－－－－－子程序2 of>}fJ_p
#ACT of>}fJ_p
take gold 20000 of>}fJ_p
#SAY of>}fJ_p
呵呵~~不给\<结束/@exit>\

应该是这样的，可以编辑自己做的任务的，只是还不怎么会用。如果在过些天私服在多研究点的话，在指定地点放自己的NPC，然后编辑脚本的话，是可以做出任务的啊。 of>}fJ_p
注意Mir200\Envir目录下的MapQuest.txt文件和mapinfo.txt还有Mir200\Envir\MapQuest_def目录下的所有文件都是有联系的~~ of>}fJ_p
什么联系？比如mapinfo.txt下有一句 of>}fJ_p
[D10061 Great_TaoTomb 0] DARK CHECKQUEST(Q1404) NEEDSET_ON(404) NORECALL NORECONNECT(D10031) of>}fJ_p
这是Great_TaoTomb这块地图的信息~~第一段就是地图文件名，第二段就是显示在游戏的地图名，第3段……不知道~然后第4段DARK~~就是黑暗，就是不能点蜡烛的意思（不过大家都用免蜡了……）~~~第5段CHECKQUEST(Q1404)就是检测运行Mir200\Envir\MapQuest_def\目录下的Q1404.txt里的脚本~Q1404.txt里的脚本如下 of>}fJ_p
[@main] ---开始信息 of>}fJ_p
#IF ---条件语句 of>}fJ_p
check [408] 1 ---检测开关408是否为1 of>}fJ_p
#ACT ---运行脚本语句 of>}fJ_p
break ---停止运行脚本

#IF ---条件语句 of>}fJ_p
check [405] 1 ---检测开关405是否为1 of>}fJ_p
#ACT ---运行脚本语句 of>}fJ_p
break ---停止运行脚本

#IF ---条件语句 of>}fJ_p
check [404] 1 ---检测404开关是否为1 of>}fJ_p
checkitem JadeCrystal 1 ---检测物品JadeCrystal是否存在（1为在0为不在） of>}fJ_p
#ACT ---运行脚本 of>}fJ_p
take JadeCrystal 40 ---拿走40个JadeCrystal（为什么是40个自己想） of>}fJ_p
SET [405] 1 ---设置开关405为1 of>}fJ_p
#ELSESAY ---条件语句和前6句的IF相对应，这条语句的意思是不符合条件即显示↓下面这段话~~~~ of>}fJ_p
(Why can't i get in this room???)

回到地图文件那里的这段NEEDSET_ON(404)，意思就是需要开关404为1才能进入地图 of>}fJ_p
再下一段NORECALL 就是该地图禁止传送的意思（GM的传送除外） of>}fJ_p
再下一段NORECONNECT(D10031)意思是不允许掉线后上线仍然留再此地图~~而要转到地图d10031~~

以上就是地图控制脚本控制的一个基本例子

of>}fJ_p
服务器脚本命令： of>}fJ_p
#IF of>}fJ_p
#ACT of>}fJ_p
#ELSEACT of>}fJ_p
{Quest of>}fJ_p
{~Quest of>}fJ_p
[] of>}fJ_p
#RAND of>}fJ_p
[goods] of>}fJ_p
#SAY of>}fJ_p
#ELSESAY of>}fJ_p
@HOME of>}fJ_p
@main of>}fJ_p
@exit of>}fJ_p
@s_repair of>}fJ_p
@buy of>}fJ_p
@sell of>}fJ_p
@repair of>}fJ_p
@makedrug of>}fJ_p
@prices of>}fJ_p
@storage of>}fJ_p
@getback of>}fJ_p
@upgradenow of>}fJ_p
@getbackupgnow of>}fJ_p
@@buildguildnow of>}fJ_p
@@guildwar of>}fJ_p
@@donate of>}fJ_p
@requestcastlewarnow of>}fJ_p
@openmaindoor of>}fJ_p
@closemaindoor of>}fJ_p
@@withdrawal of>}fJ_p
@repairdoornow of>}fJ_p
@repairwallnow1 of>}fJ_p
@repairwallnow2 of>}fJ_p
@repairwallnow3 of>}fJ_p
@hireguardnow of>}fJ_p
@hireguards of>}fJ_p
@hirearchernow of>}fJ_p
~@upgradenow_ing of>}fJ_p
~@upgradenow_ok of>}fJ_p
~@upgradenow_fail of>}fJ_p
~@getbackupgnow_ok of>}fJ_p
~@getbackupgnow_ing of>}fJ_p
~@getbackupgnow_fail of>}fJ_p
~@repair of>}fJ_p
~@request_ok

内部变量 of>}fJ_p
$CASTLEGOLD of>}fJ_p
$TODAYINCOME of>}fJ_p
$CASTLEDOORSTATE of>}fJ_p
$REPAIRDOORGOLD of>}fJ_p
$REPAIRWALLGOLD of>}fJ_p
$GUARDFEE of>}fJ_p
$ARCHERFEE of>}fJ_p
$GUARDRULE

用在#...语句后的命令 of>}fJ_p
check of>}fJ_p
CHECKOPEN of>}fJ_p
CHECKUNIT of>}fJ_p
RANDOM of>}fJ_p
GENDER of>}fJ_p
DAYTIME of>}fJ_p
CHECKLEVEL of>}fJ_p
CHECKJOB of>}fJ_p
CHECKITEM of>}fJ_p
CHECKITEMW of>}fJ_p
CHECKGOLD of>}fJ_p
ISTAKEITEM of>}fJ_p
CHECKDURA of>}fJ_p
CHECKDURAEVA of>}fJ_p
DAYOFWEEK of>}fJ_p
HOUR of>}fJ_p
MIN of>}fJ_p
CHECKPKPOINT of>}fJ_p
CHECKLUCKYPO h;@c%Vm
INT h;@c%Vm
CHECKMONMAP h;@c%Vm
CHECKMONAREA h;@c%Vm
CHECKHUM h;@c%Vm
CHECKBAGGAGE h;@c%Vm
CHECKNAMELIST h;@c%Vm
EQUAL h;@c%Vm
LARGE h;@c%Vm
SMALL h;@c%Vm
开关变量命令 h;@c%Vm
SET h;@c%Vm
[] h;@c%Vm
RESET h;@c%Vm
SETOPEN h;@c%Vm
SETUNIT h;@c%Vm
RESETUNIT h;@c%Vm
TAKE h;@c%Vm
GIVE h;@c%Vm
TAKEW h;@c%Vm
CLOSE h;@c%Vm
MAPMOVE h;@c%Vm
MAP h;@c%Vm
BREAK h;@c%Vm
TIMERECALL h;@c%Vm
BREAKTIMERECALL h;@c%Vm
PARAM1 h;@c%Vm
PARAM2 h;@c%Vm
PARAM3 h;@c%Vm
PARAM4 h;@c%Vm
TAKECHECKITEM h;@c%Vm
MONGEN h;@c%Vm
MONCLEAR h;@c%Vm
MOV h;@c%Vm
INC h;@c%Vm
DEC h;@c%Vm
SUM h;@c%Vm
MOVR h;@c%Vm
EXCHANGEMAP h;@c%Vm
RECALLMAP h;@c%Vm
ADDBATCH h;@c%Vm
BATCHDELAY h;@c%Vm
BATCHMOVE h;@c%Vm
PLAYDICE h;@c%Vm
ADDNAMELIST h;@c%Vm
DELNAMELIST h;@c%Vm
GOQUEST h;@c%Vm
ENDQUEST h;@c%Vm
GOTO

用在mapinfo.txt里的条件命令 h;@c%Vm
SAFE h;@c%Vm
DARK h;@c%Vm
FIGHT h;@c%Vm
FIGHT3 h;@c%Vm
DAY h;@c%Vm
QUIZ h;@c%Vm
NORECONNECT h;@c%Vm
[] h;@c%Vm
() h;@c%Vm
CHECKQUEST h;@c%Vm
NEEDSET_ON h;@c%Vm
NEEDSET_OFF h;@c%Vm
NEEDHOLE h;@c%Vm
NORECALL h;@c%Vm
NORANDOMMOVE h;@c%Vm
NODRUG h;@c%Vm
MINE h;@c%Vm
NOPOSITIONMOVE

$USERNAME h;@c%Vm
$OWNERGUILD h;@c%Vm
$LORD h;@c%Vm
$GUILDWARFEE h;@c%Vm
$CASTLEWARDATE h;@c%Vm
$LISTOFWAR h;@c%Vm
$STR()

h;@c%Vm

离线yourss

新手上路

发帖: 259

祝福宝石: 0

威望: 0

玛雅之石: 0

创造宝石: 0

只看该作者 12楼发表于: 2004-08-11

新手接待员脚本~

[@main]
#IF
check [567] 0
#ACT
goto @main0
#ELSESAY
你已领过一次救济金了,怎么还想领啊？还是自己去努力赚吧！还有我能帮你什么？<变更职业/@changejob>
<关闭/@exit>
[@main0]
#IF
checkjob warrior
#ACT
goto @main1
#IF
checkjob wizard
#ACT
goto @main2
#IF
checkjob taoist
#ACT
goto @main3

[@main1]
#ACT
SET [567] 1
#ACT
give 金币 100000
give 裁决之杖 1
give 力量戒指 2
give 绿色项链 1
give 战神盔甲(男) 1
give 黑铁头盔 1
give 阎罗手套 2
give 骑士手镯 2
give 火炬 1
give 基本剑术 1
give 攻杀剑术 1
give 刺杀剑术 1
give 半月弯刀 1
give 野蛮冲撞 1
give 烈火剑法 1
give 超级金创药 5
give 超级魔法药 1

#SAY
<$USERNAME>,你是新手吧!看来你需要点帮助,你要去冒险吗?没有点资本怎么去呢?让我帮帮你吧!\这是100000救济金，还有你需要的装备拿去用吧!\有什么问题就去找GM问吧！
[@main2]
#ACT
SET [567] 1
#ACT
give 金币 100000
give 血饮 1
give 恶魔长袍(男) 1
give 思贝尔手镯 2
give 生命项链 1
give 红宝石戒指 2
give 记忆头盔 1
give 火炬 1
give 火球术 1
give 抗拒火环 1
give 诱惑之光 1
give 地狱火 1
give 雷电术 1
give 瞬息移动 1
give 大火球 1
give 爆裂火焰 1
give 疾光电影 1
give 火墙 1
give 地狱雷光 1
give 魔法盾 1
give 圣言术 1
give 冰咆哮 1
give 超级金创药 1
give 超级魔法药 5
#SAY
<$USERNAME>,你是新手吧!看来你需要点帮助,你要去冒险吗?没有点资本怎么去呢?让我帮帮你吧!\这是100000救济金，还有你需要的装备拿去用吧!\有什么问题就去找GM问吧！
[@main3]
#ACT
SET [567] 1
#ACT
give 金币 100000
give 无极棍 1
give 幽灵战衣(男) 1
give 铂金戒指 2
give 心灵手镯 1
give 天珠项链 1
give 护身符 2
give 记忆头盔 1
give 火炬 1
give 红毒 1
give 绿毒 1
give 治愈术 1
give 精神力战法 1
give 施毒术 1
give 灵魂火符 1
give 召唤骷髅 1
give 隐身术 1
give 集体隐身术 1
give 幽灵盾 1
give 神圣战甲术 1
give 捆魔咒 1
give 心灵启示 1
give 群体治疗术 1
give 召唤神兽 1
give 超级金创药 3
give 超级魔法药 3
#SAY
<$USERNAME>,你是新手吧!看来你需要点帮助,你要去冒险吗?没有点资本怎么去呢?让我帮帮你吧!\这是100000救济金，还有你需要的装备拿去用吧!\有什么问题就去找GM问吧！

[职业变更有]
[@changejob]
#IF
checklevel 10
#ELSESAY
<$USERNAME>你还没到10级不能变更！
<关闭/@exit>
#IF
checkjob warrior
#ACT
goto @@changejob1

#IF
checkjob wizard
#ACT
goto @@changejob2

#IF
checkjob taoist
#ACT
goto @@changejob3

[@@changejob1]
<$USERNAME>你想变更什么职业？需要100000金币。<法师/@change1>\<道士/@change2><关闭/@exit>
[@@changejob2]
<$USERNAME>你想变更什么职业？需要100000金币。<战士/@change>\<道士/@change2><关闭/@exit>
[@@changejob3]
<$USERNAME>你想变更什么职业？需要100000金币。<战士/@change>\<法师/@change1>
<关闭/@exit>
[@change]
#IF
checkgold 100000
#ACT
take 金币 100000
ChangeJob warr
#ELSESAY
<$USERNAME>你没有足够的钱<关闭/@exit>
[@change1]
#IF
checkgold 100000
#ACT
take 金币 100000
ChangeJob wizard
#ELSESAY
<$USERNAME>你没有足够的钱<关闭/@exit>
[@change2]
#IF
checkgold 100000
#ACT
take 金币 100000
ChangeJob taoi
#ELSESAY
<$USERNAME>你没有足够的钱<关闭/@exit>

关于红名的解决办法~

关于红名的解决办法~
大家都知道，在某些甚至大部分的服务器中，管理员设定了PK值超过一定程度不允许和NPC交谈
，这样红名就买不了药，也飞不到别的地方，只能在城里呆着什么都不敢做，由此就令很多的
服务器游戏管理员产生了做一个消红名的脚本的愿望，可是因为没有那个命令或者至今未发现那个改变PK值的命令，
所以至今没有成功，既然没有或者发现不了那样的命令，为何我们不能从别的地方入手呢？消红名最主要是想让红
名的付出一定代价后可以和NPC自由交谈、买卖。现在就让我们来一步步实现这个目标吧。
步骤：
1 .先添加好必须的文件，在market_def和npcs_def两个目录里各新建一个名为“red”的文本文档，
然后在market_def目录新建几个名为hongming-*的文本文档，接merchant.txt里添加此NPC的放置信息
2 .在market_def和Npcs_def目录的所有有红名限制的NPC文件头上都有如下的字段：
[@main]
#IF
checkpkpoint 2
#SAY
我不想和你这样的人打交道.. \ <取消/@exit>

#ELSEACT
goto @main-1

现在我们必须把它改成：
[@main]
#IF
checkpkpoint 2
#ACT
goto @main-0
#ELSEACT
goto @main-1

[@main-0]
#IF
checknamelist red.txt
#ACT
goto @main-1
#ELSESAY
我不想和你这样的人打交道.. \ <取消/@exit>

3 .添加内容到hongming-*文件，内容如下：
[@main]
#IF
checkpkpoint 2
#act
goto @PK1
#elseact
goto @QUIT

[@QUIT]
你无需我的服务，再见

[@PK1]
#if
checkpkpoint 10
#act
goto @PK2
#elsesay
你想让自己变得清白么？像你这样的杀人犯要使自己变成清白需要100万金币需要我的服务吗？
先声明，如果你在我这里申请了以后你可以自由买卖物品但大刀手攻击你我可不负责任<需要/@PK1TO><不需要/@exit><>

[@PK1TO]
#if
checkgold 1000000
#act
take 金币 1000000
addnamelist red.txt
#say
你的申请已经通过
#elsesay
你都没钱，滚滚滚~

[@PK2]
#if
checkpkpoint 50
#act
goto @quit2
#elsesay
你想让自己变得清白么？像你这样的杀人犯要使自己变成清白需要250万金币需要我的服务吗？先声明，
如果你在我这里申请了以后你可以自由买卖物品但大刀手攻击你我可不负责任<需要/@PK2TO><不需要/@exit><>

[@PK2TO]
#IF
checkgold 2500000
#act
take 金币 2500000
addnamelist reg.txt
#say
你的申请已经通过
#elsesay
你都没钱，滚滚滚~

[@quit2]
你罪大恶极，等着大刀砍吧！

沙的领钱脚本！

修改 *:\mirserver\Mir200\Envir\Npcs.txt 文件

;;
; name race mapNum x y fTile bTile
;--------------------------------------------------------------
行政官员 1 0122 29 32 0 8
行政官员 2 0150 7 16 0 8
老人 0 3 669 338 0 1

添加一句
沙巴克管家 2 0150 7 16 0 8

存档

在 *:\mirserver\Mir200\Envir\Npc_def 添加一个
沙巴克管家-0150.txt 的文本文件

内容如下:
[@main]
尊贵的<$USERNAME>你好，我是沙巴克的管家，根据这个城堡的主人<$LORD>的吩咐,
将给于<$OWNERGUILD>的成员提供每天20万员的薪水\
<领工资/@main-1> <取消/@exit>
[@main-1]
#if
dayofweek sun
check [701] 0
#act
set [701] 1
set [702] 0
set [703] 0
set [704] 0
set [705] 0
set [706] 0
set [707] 0
give 金币 200000
goto main1

#if
dayofweek mon
check [702] 0
#act
set [701] 0
set [702] 1
set [703] 0
set [704] 0
set [705] 0
set [706] 0
set [707] 0
give 金币 200000
goto main1

#if
dayofweek tue
check [703] 0
#act
set [701] 0
set [702] 0
set [703] 1
set [704] 0
set [705] 0
set [706] 0
set [707] 0
give 金币 200000
goto main1

#if
dayofweek wed
check [704] 0
#act
set [701] 0
set [702] 0
set [703] 0
set [704] 1
set [705] 0
set [706] 0
set [707] 0
give 金币 200000
goto main1

#if
dayofweek thu
check [705] 0
#act
set [701] 0
set [702] 0
set [703] 0
set [704] 0
set [705] 1
set [706] 0
set [707] 0
give 金币 200000
goto main1

#if
dayofweek fri
check [706] 0
#act
set [701] 0
set [702] 0
set [703] 0
set [704] 0
set [705] 0
set [706] 1
set [707] 0
give 金币 200000
goto main1

#if
dayofweek sat
check [707] 0
#act
set [701] 0
set [702] 0
set [703] 0
set [704] 0
set [705] 0
set [706] 0
set [707] 1
give 金币 200000
goto main1

[@main1]
你这个无赖，沙巴克怎么会有这种人渣，你领过一次了，还想再领？你还不走开，
不然我请<$LORD>将你逐出沙巴克。<退出/@exit>

首饰打造员！

[@main]
#IF
checkpkpoint 2
#SAY
我不想和你这样的人打交道.. \
<取消/@exit>

#ELSEACT
goto @maina

[@maina]
<$USERNAME>欢迎你的到来！我这里可以帮你打造极品首饰。
你要打造什么？\<戒指/@ssjz> \<手镯/@sssz> \<项链/@ssxl>\<关闭/@exit>

[@ssjz]
当你收集了5块“水晶”你就可以找我打造极品戒指。价钱是3个金条。\<我要打造/@zjdz>\<关闭/@exit>

[@zjdz]
<法师/@jzfs>\<武士/@jzws>\<道士/@jzds>\<关闭/@exit>

[@jzfs]
#IF
checkitem 金条 3
checkitem 水晶 5
checkjob wizard

#ACT
take 金条 3
take 水晶 5
give 法神寒冰戒指 1

#SAY
法师~~ 你已经获得了“法神寒冰戒指”,还有更多的等你去追求，咱们后会有期！\<再见/@exit>

#ELSESAY
你还没有资格打造，好好搜集材料去吧。\<关闭/@exit>

[@jzws]
#IF
checkitem 金条 3
checkitem 水晶 5
checkjob warrior

#ACT
take 金条 3
take 水晶 5
give 战神寒冰戒指 1

#SAY
武士~~ 你已经获得了“战神寒冰戒指”！还有更多的等你去追求，咱们后会有期！\<再见/@exit>

#ELSESAY
你还没有资格打造，好好搜集材料去吧。\<关闭/@exit>

[@jzds]
#IF
checkitem 金条 3
checkitem 水晶 5
checkjob taoist

#ACT
take 金条 3
take 水晶 5
give 道神寒冰戒指 1

#SAY
道士~~ 你已经获得了“道神寒冰戒指”！还有更多的等你去追求，咱们后会有期！\<再见/@exit>

#ELSESAY
你还没有资格打造，好好搜集材料去吧。\<关闭/@exit>

[@sssz]
当你收集了5块“水晶”你就可以找我打造极品手镯。价钱是3个金条。\<我要打造/@szdz>\<关闭/@exit>

[@szdz]
<法师/@szfs>\<武士/@szws>\<道士/@szds>\<关闭/@szds>

[@szfs]
#IF
checkitem 金条 3
checkitem 水晶 5
checkjob wizard

#ACT
take 金条 3
take 水晶 5
give 法神寒冰手镯 1

#SAY
法师~~ 你已经获得了“法神寒冰手镯”,还有更多的等你去追求，咱们后会有期！\<再见/@exit>

#ELSESAY
你还没有资格打造，好好搜集材料去吧。\<关闭/@exit>

[@szws]
#IF
checkitem 金条 3
checkitem 水晶 5
checkjob warrior

#ACT
take 金条 3
take 水晶 5
give 战神寒冰手镯 1

#SAY
武士~~ 你已经获得了“战神寒冰手镯”！还有更多的等你去追求，咱们后会有期！\<再见/@exit>

#ELSESAY
你还没有资格打造，好好搜集材料去吧。\<关闭/@exit>

[@szds]
#IF
checkitem 金条 3
checkitem 水晶 5
checkjob taoist

#ACT
take 金条 3
take 水晶 5
give 道神寒冰手镯 1

#SAY
道士~~ 你已经获得了“道神寒冰手镯”！还有更多的等你去追求，咱们后会有期！\<再见/@exit>

#ELSESAY
你还没有资格打造，好好搜集材料去吧。\<关闭/@exit>

[@ssxl]
当你收集了5块“水晶”你就可以找我打造极品项链。价钱是3个金条。\<我要打造/@xldz>\<关闭/@exit>

[@xldz]
<法师/@xlfs>\<武士/@xlws>\<道士/@xlds>\<关闭/@exit>

[@xlfs]
#IF
checkitem 金条 3
checkitem 水晶 5
checkjob wizard

#ACT
take 金条 3
take 水晶 5
give 法神寒冰项链 1

#SAY
法师~~ 你已经获得了“法神寒冰项链”,还有更多的等你去追求，咱们后会有期！\<再见/@exit>

#ELSESAY
你还没有资格打造，好好搜集材料去吧。\<关闭/@exit>

[@xlws]
#IF
checkitem 金条 3
checkitem 水晶 5
checkjob warrior

#ACT
take 金条 3
take 水晶 5
give 战神寒冰项链 1

#SAY
武士~~ 你已经获得了“战神寒冰项链”！还有更多的等你去追求，咱们后会有期！\<再见/@exit>

#ELSESAY
你还没有资格打造，好好搜集材料去吧。\<关闭/@exit>

[@xlds]
#IF
checkitem 金条 3
checkitem 水晶 5
checkjob taoist

#ACT
take 金条 3
take 水晶 5
give 道神寒冰项链 1

#SAY
道士~~ 你已经获得了“道神寒冰戒指”！还有更多的等你去追求，咱们后会有期！\<再见/@exit>

#ELSESAY
你还没有资格打造，好好搜集材料去吧。\<关闭/@exit

武器打造员脚本
――――――――――――――――――――――――――――――――――――――-
[@main]
#IF
checkpkpoint 2
#SAY
我不想和你这样的人打交道.. \
<取消/@exit>

#ELSEACT
goto @maina

[@maina]
<$USERNAME>欢迎你的到来！我这里可以帮你打造极品武器。如果你达到了要求可以找我哦。\<查看需要东东/@rzwd>\<开始打造/@rzwda>\<关闭/@exit>

[@rzwd]
当你集齐了血剑碎片 10块你就可以找我打造极品装备。价钱是一个珠宝箱。法师要“嗜魂法杖”道士要“龙纹剑”武士要“屠龙”\<我要打造极品装备/@rzwda>\<关闭/@exit>

[@rzwda]
<法师/@rzwdge>\<武士/@rzwdnv> \<道士/@rzwdds>\<关闭/@exit>

[@rzwdge]
#IF
checkitem 珠宝箱 1
checkitem 血剑碎片 10
checkitem 嗜魂法杖 1
checkjob wizard

#ACT
take 珠宝箱 1
take 嗜魂法杖 1
take 血剑碎片 10
give 血之法杖 1

#SAY
法师~~ 你已经获得了“血之法杖”玛法大陆就看你的了，咱们后会有期！\ <再见/@exit>

#ELSESAY
你还没有资格打造，好好搜集材料去吧。\<关闭/@exit>

[@rzwdnv]
#IF
checkitem 珠宝箱 1
checkitem 血剑碎片 10
checkitem 屠龙 1
checkjob warrior

#ACT
take 珠宝箱 1
take 血剑碎片 10
take 屠龙 1
give 血之屠龙 1

#SAY
武士~~ 你已经获得了“血之屠龙”！玛法大陆就看你的了，咱们后会有期！\<再见/@exit>

#ELSESAY
你还没有资格打造，好好搜集材料去吧。\ <关闭/@exit>

[@rzwdds]
#IF
checkitem 珠宝箱 1
checkitem 血剑碎片 10
checkitem 龙纹剑 1
checkjob taoist

#ACT
take 珠宝箱 1
take 血剑碎片 10
take 龙纹剑 1
give 血之龙纹 1

#SAY
道士~~ 你已经获得了“血之龙纹”！玛法大陆就看你的了，咱们后会有期！\<再见/@exit>

#ELSESAY
你还没有资格打造，好好搜集材料去吧。\ <关闭/@exit>

使用说明：
1.在c:\mirserver\mir200\envir\Npc_def里创建首饰打造员-3.txt，武器打造员-3.txt
把上面的复制进去。
2.打开c:\mirserver\mir200\envir里的Npcs.txt
将
;;
; name race mapNum x y fTile bTile
;--------------------------------------------------------------
赌徒 0 0 302 254 0 10

替换为
;;
; name race mapNum x y fTile bTile
;--------------------------------------------------------------
赌徒 0 0 302 254 0 10
武器打造员 0 3 331 331 0 13
首饰打造员 0 3 333 333 0 13

离线yourss

新手上路

发帖: 259

祝福宝石: 0

威望: 0

玛雅之石: 0

创造宝石: 0

只看该作者 13楼发表于: 2004-08-11

恋人传奇的NPC

[@main]
#IF
check [567] 0
#SAY
<$USERNAME>，您是新来的吧！\ 看来您是需要一点帮助，帮助新手是“恋人传奇”世界的优良传统！
当然，天下没有不要钱的午餐，您要自己丰衣足食！您去赚到5块鸡肉和5块肉来<换取您需要的装备及
原始积累/@lqzb>。\ #ELSEACT
goto @csfw

[@csfw]
#IF
checkpkpoint 2
#SAY
啊！！！我认得你，你就是正在被通缉的坏蛋<$USERNAME>\
你别走！来人呀，抓坏蛋呀！这里有一个通缉犯呀！！ \
<$USERNAME>这时心里正在想“是<赶紧溜/@exit>呢？还是<留在这里/@gjjy>呢？”
#ELSEACT
goto @csfwok

[@gjjy]
#IF
checklevel 14
#ACT
mapmove 0147 9 14
#ELSESAY
年纪轻轻，不学好还学人家打架，是不是还要加入黑社会？你难道一点都不顾忌你的前程吗！！！\
念在你未满14岁，级别还低的份上，暂且放你一马。要学好，要<好好做人/@exit>！！知道吗！！\
[@lqzb]
#IF
gender man
#ACT
goto @nan
#ELSEACT
goto @nv

[@nan]
#IF
checkitem 鸡肉 5
checkitem 肉 5
#ACT
SET [567] 1
take 鸡肉 5
take 肉 5
goto @nanok
#ELSESAY
<$USERNAME>您没有努力劳动，因为您没有带齐我要的5块鸡肉和5块肉。现在就请您<离开/@exit>去继续您的任务。\
[@nanok]
#IF
checkjob warrior
#ACT
give 金币 10000
give 牛角戒指 2
give 黑色水晶项链 1
give 轻型盔甲(男) 1
give 青铜头盔 1
give 钢手镯 1
give 大手镯 1
give 基本剑术 1
give 金创药(中量) 3
give 魔法药(中量) 1
give 回城卷
give 随机传送卷包
goto @jiesu
#ELSESAY
#IF
checkjob wizard
#ACT
give 金币 10000
give 轻型盔甲(男) 1
give 钢手镯 2
give 黑檀项链 1
give 六角戒指 2
give 青铜头盔 1
give 火球术 1
give 金创药(中量) 1
give 魔法药(中量) 3
give 回城卷
give 随机传送卷包
goto @jiesu
#ELSESAY
#IF
checkjob taoist
#ACT
give 金币 10000
give 轻型盔甲(男) 1
give 牛角戒指 2
give 大手镯 1
give 金项链 1
give 护身符 1
give 青铜头盔 1
give 灵魂火符 1
give 金创药(中量) 2
give 魔法药(中量) 2
give 回城卷
give 随机传送卷包
goto @jiesu

[@nv]
#IF
checkitem 鸡肉 5
checkitem 肉 5
#ACT
SET [567] 1
take 鸡肉 5
take 肉 5
goto @nvok
#ELSESAY
<$USERNAME>您没有努力劳动，因为您没有带齐我要的5块鸡肉和5块肉。现在就请您<离开/@exit>去继续您的任务。\
[@nvok]
#IF
checkjob warrior
#ACT
give 金币 10000
give 牛角戒指 2
give 黑色水晶项链 1
give 轻型盔甲(女) 1
give 青铜头盔 1
give 钢手镯 1
give 大手镯 1
give 基本剑术 1
give 金创药(中量) 3
give 魔法药(中量) 1
give 回城卷
give 随机传送卷包
goto @jiesu
#ELSESAY
#IF
checkjob wizard
#ACT
give 金币 10000
give 轻型盔甲(女) 1
give 钢手镯 2
give 黑檀项链 1
give 六角戒指 2
give 青铜头盔 1
give 火球术 1
give 金创药(中量) 1
give 魔法药(中量) 3
give 回城卷
give 随机传送卷包
goto @jiesu
#ELSESAY
#IF
checkjob taoist
#ACT
give 金币 10000
give 轻型盔甲(女) 1
give 牛角戒指 2
give 大手镯 1
give 金项链 1
give 护身符 1
give 青铜头盔 1
give 灵魂火符 1
give 金创药(中量) 2
give 魔法药(中量) 2
give 回城卷
give 随机传送卷包
goto @jiesu

[@jiesu]
<$USERNAME>您已经领取了您所需要的装备。\ 朝着您的方向前进吧！并且对自己说吧，我要拯救这个世界，
我将要<踏上英雄的征途/@exit>！！！希望您在“<铁马金戈(易通)/@wmgy>”里玩的愉快。\
[@wmgy]
<$USERNAME>,我知道您是个好玩家啦!\ 再看看文明公约也没坏处，对吗？别忘了把公约内容告
诉您的朋友啊！有人说告诉一百个人的话，您的名字会自动变成金黄色，还会闪烁呢！不过我不太相信，
因为我都告诉几十万人了...\ 查看<《铁马金戈用户文明自律公约》/@gongyue>
[@gongyue]
尊敬的玩家朋友，首先提醒您，游戏只为休闲娱乐，请勿沉溺其中。适当的休息比升级更重要！！\ <下一页/@gongyue1>

[@gongyue1]
《恋人传奇用户文明自律公约》 \ 为贯彻落实党中央、国务院对互联网管理工作的指示精神，
根据国务院整顿和规范市场经济秩序工作会议的要求和全国整顿和规范文化市场秩序电视电话会议的总体部署，
切实加强网络游戏的管理，特拟订以下网络文明公约：1.《恋人传奇》游戏玩家在游戏中应该主动维护网络文明，
使用文明用语言，不随意辱骂他人或是做出其他引人反感的行为。2.《铁马金戈》游戏玩家在游戏中应该自觉维护
游戏中的良好氛<下一页/@gongyue2>

[@gongyue2]
围，不传播反动、封建、迷信和色情信息。同时，也不应以此类信息作为网络游戏中人物的名称。
3.《恋人传奇》游戏玩家在游戏中，一旦发现他人有违反国家政策和反动、色情的言论和行为时，
有责任和义务及时向游戏的管理人员举报，管理人员在接到举保，会根据情节情重对其处以不同程度的处罚。
情节特别恶劣者，将移交至公安机关解决。4.未成年玩家在参与网络游戏时，需有监护人陪同，同时每次游
戏的时间也不应过长。<下一页/@gongyue3>

[@gongyue3]
5.《恋人传奇》游戏玩家在游戏中应该主动发扬互助友爱精神，帮助需要帮助的玩家。
6. 游戏玩家在不得利用网络游戏进行赌博等违反国家法律规定的活动，如果发现有人利用网络游戏从事不法活动，
应及时向游戏管理人员举报。7.《恋人传奇》游戏玩家在发现游戏的BUG后，应及时向游戏管理人员反映，
而不是利用其为己牟利。同时，也不应该使用外挂等非法工具破坏游戏的平衡性。 <离开/@exit>

[@swd1001]
您是来<换取尸王殿凭证/@swd1001_1>的还是<没事瞎溜溜/@exit>？\
[@swd1001_1]
#IF
checkitem 金矿 3
checkduraeva 金矿 13
#ACT
take 金矿 3
give 尸王殿凭证 1
#SAY
凭证已经给您了，你还要<继续换/@swd1001_1>还是<现在就走/@exit>？ \
#ELSESAY
您以为我是糊涂的人啊，想来投机取巧？不拿来合适的材料我是不会给您的。还是请您<离开这里/@exit>吧！ \
[@csfwok]
非常欢迎您的到来，并且很高兴能为您服务。通过我的努力，我现在也学会了“传送魔法”；
可以送您去<其他的城市/@bxycs>，但是这样会花掉您5000金币。其实我还可以送您去一些<特殊的地方/@xycs>，
不过哪需要3倍或以上的价钱和一些东西！何去何从？您自己看着办了！虽然说“<恋人传奇/@gongyue>”
是法制文明的地方，但没有钱还是万万不能的呀！当然我还会<捆扎卷书和药水/@kglys>。如果您确实没什么需要的话，
那您还是<离开吧/@exit>！还有很多人等着和我做生意呢！！\
[@kglys]
#IF
#SAY
让您瞧瞧我得能力吧！千万不要瞧不起我！虽然是小买卖！！可<捆各种卷书和药水/@bind>也是技术活呀！
您要会的话就不会找我了\ 我也可以把您身上的<金币换成金条/@changeGold>或把<金条换成金币/@changeMoney>。
[@changeGold]
#IF
checkgold 1002000
#SAY
您说您要把金币<换成金条/@changeGold_1>? 好的，我帮您换，但是要支付手续费费用是2000金币，您还换吗？ \
#ELSESAY
<开玩笑/@Main>吧，您连这点钱都没有，还换什么？我很忙，请您<离开/@exit>。等您有足够的钱，再来找我吧！ \
[@changeGold_1]
#IF
CHECKBAGGAGE
checkgold 1002000
#ACT
take 金币 1002000
give 金条 1
#SAY
金币已经换好金条了，您继续<交换/@changeGold>呢，还是<离开/@exit>？

#ELSESAY
您的包里东西已经满了，或者您没有足够的钱支付手续费您再<确认一下/@exit>吧 \

[@changeMoney]
#IF
checkitem 金条 1
#SAY
您说您要把金条<换成金币/@changeMoney_1>? 好的，我帮您换，但是要支付手续费费用是2000金币，您还换吗？ \
#ELSESAY
<开玩笑/@Main>吧，您连金条都没有，还换什么？我很忙，请您<离开/@exit>。等您有了金条，再来找我吧！ \
[@changeMoney_1]
#IF
checkitem 金条 1
checkgold 4002001
#SAY
我也很想给您换，但是您钱太多了，我<没办法/@exit>给您换。 \ #ELSEACT
goto @changeMoney_2

[@changeMoney_2]
#IF
checkitem 金条 1
#ACT
take 金条 1
give 金币 998000
#SAY
金条已经换好金币了，您继续<交换/@changeMoney>呢，还是<离开/@exit>？ \

[@bind]
要捆东西需要100金币，您需要<捆药水/@P_bind>还是<捆卷书/@Z_bind>？\
[@P_bind]
<捆强效金创药/@ch_bind1> <捆强效魔法药/@ma_bind1> \
<捆金创药(中)/@ch_bind2> <捆魔法药(中)/@ma_bind2> <捆金创药(小)/@ch_bind3>
<捆魔法药(小)/@ma_bind3> \ <还是干点别的吧/@bind>

[@Z_bind]
<捆地牢逃脱卷/@zum_bind1> <捆随机传送卷/@zum_bind2> <捆行会回城卷/@zum_bind3>
<捆回城卷/@zum_bind4> \ <还是干点别的吧/@bind>

[@ch_bind1]
#IF
checkitem 强效金创药 6
#ACT
goto @ch_bind1_1
#ELSESAY
<开玩笑/@Main>吧，您都没有要捆的药水，还捆什么？我很忙，请您<离开/@exit>。等您准备好药水之后再来找我吧！ \
[@ch_bind1_1]
#IF
checkgold 100
checkitem 强效金创药 6
#ACT
take 金币 100
take 强效金创药 6
give 超级金创药 1
#SAY
已经捆好了... 我的技术不错吧，您<继续捆/@P_bind>呢，还是<离开/@exit>？ \ #ELSESAY
<开玩笑/@Main>吧，您都没有钱捆东西，还捆什么？我很忙，请您<离开/@exit>。\
[@ma_bind1]
#IF
checkitem 强效魔法药 6
#ACT
goto @ma_bind1_1
#ELSESAY
<开玩笑/@Main>吧，您都没有要捆的药水，还捆什么？我很忙，请您<离开/@exit>。等您准备好药水之后再来找我吧！ \
[@ma_bind1_1]
#IF
checkgold 100
checkitem 强效魔法药 6
#ACT
take 金币 100
take 强效魔法药 6
give 超级魔法药 1
#SAY
已经捆好了... 我的技术不错吧，您<继续捆/@P_bind>呢，还是<离开/@exit>？ \ #ELSESAY
<开玩笑/@Main>吧，您都没有钱捆东西，还捆什么？我很忙，请您<离开/@exit>。\
[@ch_bind2]
#IF
checkitem 金创药(中量) 6
#ACT
goto @ch_bind2_1
#ELSESAY
<开玩笑/@Main>吧，您都没有要捆的药水，还捆什么？我很忙，请您<离开/@exit>。等您准备好药水之后再来找我吧！ \

[@ch_bind2_1]
#IF
checkgold 100
checkitem 金创药(中量) 6
#ACT
take 金币 100
take 金创药(中量) 6
give 金创药(中)包 1
#SAY
已经捆好了... 我的技术不错吧，您<继续捆/@P_bind>呢，还是<离开/@exit>？ \ #ELSESAY
<开玩笑/@Main>吧，您都没有钱捆东西，还捆什么？我很忙，请您<离开/@exit>。

离线yourss

新手上路

发帖: 259

祝福宝石: 0

威望: 0

玛雅之石: 0

创造宝石: 0

只看该作者 14楼发表于: 2004-08-11

关于结婚的脚本！

[@main]
欢迎来到恋人传奇！<$USERNAME>你好啊!他们叫我月老.天气变凉了,有没有多穿点衣服呀？结婚？哦！需要条件的
！<了解条件/@a> <结婚登记/@a_4><需要帮助/@a_2> <去蜜月村/@a_3><去我的新房/@love> <离婚/@wylh><离开/@ffff> [@a]
#IF
#ACT
#SAY
<$USERNAME>感谢您光临.我将随时为你服务,结婚需要的等级都是30级，各自拥有1个金盒.还要准备喜糖，
想去圣地旅游的话各需要一个金盒.不要说我贪心，毕竟结婚只有一次呀.呵~~呵~~~呵~~~~!\<返回/@main>
[@a_4]
#IF
#ACT
#SAY
<$USERNAME>感谢您光临.我将随时为你服务,毕竟结婚是件大事，请考虑清楚.记住！本私服严禁重婚！！<继续/@b> <返回/@main>[@b]
#if
checkhum DM011 3
#say
申请结婚是件神圣的事情，不能有多的人，希望他能回避一下\ <确定/@exit>
#ELSEACT
goto @bb

[@bb]
#if
checkhum DM011 2
#act
goto @jinr
break
#ELSEACT
goto @bbb

[@bbb]
#if
checkhum DM011 1
#say
你一个人怎么结婚？难道和我？呵呵。\
<确定/@exit>

[@jinr]
#IF
check [101] 1
#ACT
goto @qqq
#ELSEACT
goto @TEST4

[@qqq]
#if
gender 1
#act
goto @meimei
#ELSEACT
goto @gege

[@gege]
我以圣父圣母，圣灵的名义，为你们举办仪式！<$USERNAME>你是否愿意娶你身边的.
美丽善良的女孩为妻,愿意一生一世的照顾她？永远爱她！只到永远！\<再等等/@main> <愿意/@TEST1>\[@meimei]
我以圣父圣母，圣灵的名义，为你们举办仪式！<$USERNAME>你是否愿意嫁给你身边.
英俊潇洒的男士为妻,愿意一生一世的伴随他？无论生老病*！只到永远！\<再等等/@main> <愿意/@TEST2>\[@TEST1]

#IF
check [601] 1
#ACT
goto @TEST3SEACT
goto @c

[@c]
#IF
checkitem 喜糖 1
checkitem 金盒 1
checklevel 30
#ACT
set [601] 1
take 喜糖 1
take 金盒 1
give 结婚证书(男) 1
give 苹果 1
goto @z
#ELSESAY
<$USERNAME>男士，你是否具备下列条件就想使用我们的服务!\
①：你有一个金盒吗？②：你准备喜糖了吗？③：你有30级了吗？好了！我就说到这里了，要不要结婚自己考虑吧！\
<取消/@exit> [@TEST2]
#IF
check [601] 1
#ACT
goto @TEST3
#ELSEACT
goto @v

[@v]
#IF
checkitem 喜糖 1
checkitem 金盒 1
checklevel 30
#ACT
set [601] 1
take 喜糖 1
take 金盒 1
give 结婚证书(女) 1
give 苹果 1
goto @z
#ELSESAY
<$USERNAME>女士，你是否具备下列条件就想使用我们的服务!\
①：你有一个金盒吗？②：你准备喜糖了吗？③：你有30级了吗？好了！我就说到这里了，要不要结婚自己考虑吧！ <取消/@exit>\

[@z]
#IF
checkjob warrior
#ACT
give 圣战婚戒 1
goto @mm
#ELSEACT
goto @zzz

[@zzz]
#IF
checkjob taoist
#ACT
give 天尊婚戒 1
goto @mm
#ELSEACT
goto @zzzz

[@zzzz]
#IF
checkjob wizard
#ACT
give 法神婚戒 1
goto @mm

[@mm]
现在我代表圣父圣母，圣灵的名义，正式宣布你们两个结为合法夫妻，愿仁慈的主保佑你们，
造福你们！阿门！<返回/@main> <关闭/@exit>
[@a_2]
#IF
#SAY
<$USERNAME>你辛苦了.我是月老.喜糖？哦！去蜜月村吧！找爱情宝宝.\<关闭/@exit><返回/@main>[@a_3]
#IF
check [601] 1
#ACT
goto @TEST3
#ELSEACT
goto @qq

[@qq]
#IF
checkitem 金盒 1
checklevel 30
#ACT
set [101] 1
take 金盒 1
mapmove g001 51 51
break
#ELSESAY
<$USERNAME>你是否具备下列条件就想使用我们的服务!\
①：你有一个金盒吗？②：你有30级了吗？好了！我就说到这里了，要不要结婚自己考虑吧！\
<返回/@main> <取消/@exit>

[@TEST3]
<$USERNAME>不是吧 !好象你已经结过婚了!还要结婚？那可不行哦.我可帮不了你！而且根据《本服务器治安管理条例》，
决定对你处于罚款100000，拘留15天作为处罚.你有权保持沉默，你说的每句话将作为呈堂证供！#ACT
take 金币 100000
mapmove 0156 8 10
break

[@TEST4]
<$USERNAME>不是吧 !喜糖需要自己准备!拿别人的喜糖来结婚？那可不行哦.我可帮不了你！\<返回/@main> <取消/@exit>[@love]
#IF
check [601] 1
#ACT
goto @TEST5
#ELSEACT
goto @TEST6

[@TEST5]
#IF
check [201] 1
#ACT
goto @TEST7
#ELSEACT
goto @ww

[@ww]
<$USERNAME>!!你好呀！欢迎你的到来！！结婚了没有房子？哦.我可帮你！<继续/@www> <取消/@exit>\[@www]
#if
gender 1
#act
goto @meimei1
#ELSEACT
goto @gege1

[@gege1]
#IF
checkitem 结婚证书(男) 1
#ACT
set [201] 1
take 结婚证书(男) 1
give 结婚证书(男) 1
mapmove 0123 4 7
break
#ELSESAY
<$USERNAME>你是否具备下列条件就想使用我们的服务!\
①：你有结婚证书吗？
好了！我就说到这里了，要不要新房自己考虑吧！\
<返回/@main> <取消/@exit> \[@meimei1]
#IF
checkitem 结婚证书(女) 1
#ACT
set [201] 1
take 结婚证书(女) 1
give 结婚证书(女) 1
mapmove 0123 4 7
break
#ELSESAY
<$USERNAME>你是否具备下列条件就想使用我们的服务!\
①：你有结婚证书吗？
好了！我就说到这里了，要不要新房自己考虑吧！\
<返回/@main> <取消/@exit>\
[@TEST7]
#IF
#ACT
mapmove 0123 4 7
break

[@TEST6]
<$USERNAME>对不起！好象你还没有结婚！本私服的新房只为结了婚的人准备！\<返回/@main> <取消/@exit>[@wylh]
有什么事情非要使你们走这一步呢？你们真的决定要离婚吗？\ <确定/@lh><取消/@exit>

[@mjh]
你没结婚？！怎么离婚？？？\ <确定/@exit>

[@lh]
#if
checkhum DM011 2
#act
goto @lh_1
break
#ELSEACT
goto @bbbb

[@bbbb]
#if
checkhum DM011 1
#say
你一个人不能离婚？我要征求对方的意见\
<确定/@exit>
#act
break

[@lh_1]
真的非常替你们难过，不过还是希望你能找到自己的真爱！\ <确定/@lh_2><取消/@exit>

[@lh_2]
#if
gender 1
#act
goto @meimei2
#ELSEACT
goto @gege2

[@meimei2]
#if
checkitem 结婚证书(女) 1
#act
take 结婚证书(女) 1
reset [101] 0
reset [201] 0
reset [601] 0
goto @k
#ELSESAY
你没有带结婚证书来这里，我不能办理离婚手续\ <确定/@exit>
[@k]
#IF
checkjob warrior
#ACT
give 圣战婚戒 1
goto @pp
#ELSEACT
goto @kk

[@kk]
#IF
checkjob taoist
#ACT
give 天尊婚戒 1
goto @pp
#ELSEACT
goto @kkk

[@kkk]
#IF
checkjob wizard
#ACT
give 法神婚戒 1
goto @pp

[@gege2]
#if
checkitem 结婚证书(男) 1
#act
take 结婚证书(男) 1
reset [101] 0
reset [201] 0
reset [601] 0
goto @t
#ELSESAY
你没有带结婚证书来这里，我不能办理离婚手续\ <确定/@exit>
[@t]
#IF
checkjob warrior
#ACT
give 圣战婚戒 1
goto @pp
#ELSEACT
goto @tt

[@tt]
#IF
checkjob taoist
#ACT
give 天尊婚戒 1
goto @pp
#ELSEACT
goto @ttt

[@ttt]
#IF
checkjob wizard
#ACT
give 法神婚戒 1
goto @pp
[@pp]
你解放了，希望下次不要这么感情用事！\ <确定/@exit>

[@ffff]
#IF
#ACT
mapmove 3 330 330
break

我的爱情宝宝是用邪恶巨人做的！
喜糖是用票卷做的
DM011 婚礼屋 (这个NPC就放到这个房间里面)
在盟重的传送员那里可以加上去婚礼屋的传送！
新房用0123这个房子做的，里面放了个可以免费去任何地方的NPC！
圣战婚戒，天尊婚戒，法神婚戒，是用里面的图片自己做的。属性可以自己做
蜜月村是用圣地2做的，里面放了我私服里不用的鸡，鹿，足球，把它们改成了媒婆鸡，
梅花鹿，爱情流星！他们的血都加到了9999，以防玩家捣乱！
呵呵！喜欢的请顶！这个程序我在我的私服里试过了，没有问题！而且只能结一次婚！
现在加上一些东西的数据！
法神婚戒 22 0 2 25 0 8 156 11000 1 3 1 3 0 0 2 7 0 0 0 30 8000 5
天尊婚戒 22 0 2 25 0 8 438 11000 1 3 1 3 0 0 0 0 2 7 0 30 8000 5
圣战婚戒 22 0 2 25 0 8 441 11000 1 3 1 3 2 7 0 0 0 0 0 30 8000 5
喜糖 0 1 2 0 0 0 412 1 120 0 120 0 0 0 0 0 0 0 0 0 100 5
结婚证书(男) 36 1 1 0 0 0 265 1 0 0 0 0 0 0 0 0 0 0 0 0 100 5
结婚证书(女) 36 1 1 0 0 0 265 1 0 0 0 0 0 0 0 0 0 0 0 0 100 5

这里面只能结一次婚哦~否则.....................呵呵~

卖盾的脚本

前两天无聊，突然发灵感，想到了第六种首饰：盾系列（就是原先放蜡烛的地方放这个）
首先先在数据库添加几块，Stdmode为30，后面自己加
然后在market_def里添加这个脚本
;武器
%100
;盾
+30

;对话框, '*' : 对话框标签
[@main]
#IF
checkpkpoint 2
#SAY
我不想和你这样的人打交道.. \ <离开/@exit>

#ELSEACT
goto @main-1

[@main-1]
欢迎. 我可以帮你什么吗?\ <购买/@buy> 盾 <出售/@sell> 盾 <修理/@repair> 盾 <离开/@exit>
<>

[@Tmove]
#IF
random 4
#ACT
mapmove 0 306 276
break

#IF
random 4
#ACT
mapmove 0 306 277
break

#IF
random 4
#ACT
mapmove 0 296 286
break

#IF
random 4
#ACT
mapmove 0 297 285
break

#ELSEACT
goto @Tmove

[@buy]
请选择适合你的盾，每10级就能换块盾\ \ <返回/@Main>

[@sell]
您出售哪种盾?\ <返回/@Main>

[@repair]
你可以修理各种盾. \ \ <返回/@Main>

[~@repair]
看上去修好了.\ <返回/@Main>

[goods]
;物品(can be Zen) 数量时间
平民的盾 10 10
皮盾 10 10
铁盾 10 10
钢盾 10 10

祈祷一套生效的苯办法

先说明：这东西只是好玩说了是笨办法。
自己把真的祈祷生效的办法写上来啊.
说明：此脚本是引用了怪物攻城脚本而写的。
1：在NPCS里加一个：祈祷之神 0 3 339 335 0 8
2：脚本：
3：现在唯一想解决的问题就是神兽找出来我想让它是站立的，而且主动攻击人
[@main]
#IF
checklevel 42
#SAY
你拥有祈祷一套??\
有的话点确定吧！<确定/@spawnlist>叛变?但是你要清楚我们会收掉你祈祷一套!!\#ELSESAY
你等级没有42!
[@spawnlist]
#SAY
如果你拥有祈祷一套，将会使。。。。\ <我确定/@jiangjun>
[@jiangjun]
#SAY
我们请你认你三思，如果你使用了祈祷一套，将会使。。。<我确定/@shenshou_50>
;subs made by list.pl
[@shenshou_50]
#IF
checkitem 祈祷头盔 1
checkitem 祈祷戒指 1
checkitem 祈祷之刃 1
checkitem 祈祷手镯 1
checkitem 祈祷项链 1
#ACT
take 祈祷头盔 1
take 祈祷戒指 1
take 祈祷之刃 1
take 祈祷手镯 1
take 祈祷项链 1
Param1 3
Param2 330
Param3 330
MonGen 祈祷兽 30 1
MonGen 祈祷骷髅 30 1
close
#ELSESAY
你没有?快滚! \
<取消/@exit>

注：生郊不是所有的服务端都可以用