|
|
本帖最后由 传奇一条龙 于 2015-4-14 17:33 编辑
飞舞传奇80金币版传奇服务端下载：https://www.hongyingbbs.com/thread-45327-1-1.html
找到D:\mirserver\Mir200\Envir\Market_Def\游戏助理-dddt.txt 如下脚本：
()
%100
[@main]
╔┈┈┈┈╗ 本服务器4月26日19点开放测试，2月28日19点00分正式开放。\
┊<建立英雄/@@buLeg引擎>┊ 基本英雄技能书店有卖..高级技能需要用书页合成\
<╚┈┈┈┈╝ <尸王殿增加了爆英雄技能,新手玩家可以去尸王身上打>\ \
<飞舞传奇80金币区/@>┊<COLOR=CLYELLOW 将免费进行到底！>\ \
<进入玛珐大陆/@jinru> <关 闭/@exit>
[@jinru]
#IF
EQUAL G99 0
#ACT
MESSAGEBOX 19点开放，请耐心等待！
break
#ELSEACT
CHANLeg引擎XP + 2000
mapmove 0 330 268
break
[@huanqujn]
英雄合击威力无比，因此我派前辈在记录英雄合击时，\
使用了一种眼睛看不见的特制药水进行书写，\
并只在部分白日门技能书中留有记录。\
我们家族一直以来负责保护合击技的秘密，\
你既然对白日门有恩，我一定会帮你的。\ \
<我是来给书页换取英雄技能的/@书页碎片>\ \
<我只是路过，打扰了/@exit> <哪里还能获得书页呢？/@获得书页>\
[@书页碎片]
如果你有书页的话，你就交给我看看，\
我可以帮您拼凑一下，看是否可以还原成一本技能秘籍。\
你可以交给我2片、5片或者8片书页，\
如果提供的书页越多，越有可能根据里面的提示还原成高级技能书，\
当然，由于碎片过于残破，不是每次都能够还原成技能秘籍，\
如果还原出来，不是您需要的技能，您可以把书页给我，\
好让我把这个技能发扬光大，重现当年白日门的风光。\
<递交书页/@递交书页>\
[@获得书页]
据说很多技能书页已经流散到玛法的各大魔王身上，\
尸王、白野猪在混乱中抢到了大部分书页，\
如果你能找到这些书页，我也许能帮你拼出一本完整的技能秘籍。\ \
<返回/@MAIN>\
[@递交书页]
您是想要给我2片、5片还是8片书页呢？\
如果提供的书页越多，越有可能根据里面的提示还原成高级技能书，\
<COLOR=CLYELLOW 交8片书页更可能获得英雄冰咆哮、英雄烈火剑法、英雄召唤神兽三本技能书。>\ \
<COLOR=CLRED 合成英雄技能书籍需要花费30000金币>\
<交2片书页/@交2片书页> <交5片书页/@交5片书页> <交8片书页/@交8片书页>\
<让我再考虑考虑/@exit>\
[@交2片书页]
#IF
CHECKGOLD 30000
#ELSEACT
MESSAGEBOX 合成英雄技能书籍需要花费30000金币
BREAK
#IF
checkitem 书页 2
random 8
#SAY
很可惜，这2片书页并没有关系，不能修复成技能书\
#ACT
take 书页 2
break
#IF
CHECKGOLD 30000
checkitem 书页 2
#SAY
恭喜您，您给我的书页很重要，可以还原成为<$STR(S18)>！\
#ACT
TAKE 金币 30000
take 书页 2
ReadRandomStr .\QuestDiary\抽取数据\合成书页\书页2片.txt S18
give <$STR(S18)> 1
SENDMSG 0 恭喜：<$USERNAME>，还原<$STR(S18)>成功！
#ELSESAY
您好象没有带来足够的书页啊\
[@交5片书页]
#IF
CHECKGOLD 30000
#ELSEACT
MESSAGEBOX 合成英雄技能书籍需要花费30000金币
BREAK
#IF
checkitem 书页 5
random 9
#SAY
很可惜，这5片书页并没有关系，不能修复成技能书\
#ACT
take 书页 5
break
#IF
CHECKGOLD 30000
checkitem 书页 5
#SAY
恭喜您，您给我的书页很重要，可以还原成为<$STR(S18)>！\
#ACT
TAKE 金币 30000
take 书页 5
ReadRandomStr .\QuestDiary\抽取数据\合成书页\书页5片.txt S18
give <$STR(S18)> 1
SENDMSG 0 恭喜：<$USERNAME>，还原<$STR(S18)>成功！
#ELSESAY
您好象没有带来足够的书页啊\
[@交8片书页]
#IF
CHECKGOLD 30000
#ELSEACT
MESSAGEBOX 合成英雄技能书籍需要花费30000金币
BREAK
#IF
checkitem 书页 8
random 10
#SAY
很可惜，这8片书页并没有关系，不能修复成技能书\
#ACT
take 书页 8
break
#IF
CHECKGOLD 30000
checkitem 书页 8
#SAY
恭喜您，您给我的书页很重要，可以还原成为<$STR(S18)>！\
#ACT
TAKE 金币 30000
take 书页 8
ReadRandomStr .\QuestDiary\抽取数据\合成书页\书页8片.txt S18
give <$STR(S18)> 1
SENDMSG 0 恭喜：<$USERNAME>，还原<$STR(S18)>成功！
#ELSESAY
您好象没有带来足够的书页啊\
[@@buLeg引擎]
#ACT
DELAYCALL 10 ~$CREATELeg引擎
[~$CREATELeg引擎]
你现在可以挑选一位英雄了。不过你只有一次挑选机会，\
当你成功领取英雄后是无法再更换，请您仔细选择！\
你想带领哪位英雄呢？\ \
<英雄（男战士）/@CREATELeg引擎_WARR_MAN> <英雄（男法师）/@CREATELeg引擎_WIZA_MAN> <英雄（男道士）/@CREATELeg引擎_TAOS_MAN>\ \
<英雄（女战士）/@CREATELeg引擎_WARR_WOM> <英雄（女法师）/@CREATELeg引擎_WIZA_WOM> <英雄（女道士）/@CREATELeg引擎_TAOS_WOM>\
[@CREATELeg引擎_WARR_MAN]
#ACT
CREATELeg引擎 0 0
[@CREATELeg引擎_WARR_WOM]
#ACT
CREATELeg引擎 0 1
[@CREATELeg引擎_WIZA_MAN]
#ACT
CREATELeg引擎 1 0
[@CREATELeg引擎_WIZA_WOM]
#ACT
CREATELeg引擎 1 1
[@CREATELeg引擎_TAOS_MAN]
#ACT
CREATELeg引擎 2 0
[@CREATELeg引擎_TAOS_WOM]
#ACT
CREATELeg引擎 2 1
[@@buLeg引擎Ex]
#ACT
DELAYCALL 10 ~$CREATELeg引擎EX
[~$CREATELeg引擎EX]
选择英雄职业：\ \
<男战士/@CREATELeg引擎_WARR_MAN1> <女战士/@CREATELeg引擎_WARR_WOM1>\
<男法师/@CREATELeg引擎_WIZA_MAN1> <女法师/@CREATELeg引擎_WIZA_WOM1>\
<男道士/@CREATELeg引擎_TAOS_MAN1> <女道士/@CREATELeg引擎_TAOS_WOM1>\ \
<关闭/@exit>
[@CREATELeg引擎_WARR_MAN1]
#ACT
CREATELeg引擎EX 0 0
[@CREATELeg引擎_WARR_WOM1]
#ACT
CREATELeg引擎EX 0 1
[@CREATELeg引擎_WIZA_MAN1]
#ACT
CREATELeg引擎EX 1 0
[@CREATELeg引擎_WIZA_WOM1]
#ACT
CREATELeg引擎EX 1 1
[@CREATELeg引擎_TAOS_MAN1]
#ACT
CREATELeg引擎EX 2 0
[@CREATELeg引擎_TAOS_WOM1]
#ACT
CREATELeg引擎EX 2 1
//返回消息
[@CreateingLeg引擎]
系统正在接受申请，请稍候……\ \
<关闭/@exit>
[@HaveLeg引擎]
您已经有英雄了。\ \
<关闭/@exit>
[@SetLeg引擎Name]
请先给您的英雄取名字。\ \
<关闭/@exit>
[@qding]
请确定一下是否真要删英雄,注意:删除以后不可以恢复！
\ \
<确定删除英雄/@DelMyLeg引擎>
[@DelMyLeg引擎]
#ACT
DELETELeg引擎
//返回消息
[@NotHaveLeg引擎]
你没有英雄。\ \
<关闭/@exit>
[@LogOutLeg引擎First]
请将英雄设置下线！\ \
<关闭/@exit>
[@DeleteLeg引擎OK]
删除英雄成功。\ \
<关闭/@exit>
[@合击技能]
你先看看需要哪种的合击技能，\
如果你有50000万金币，我马上就给你想要的合击技能！\ \
<COLOR=CLRED 英雄合击技能20级学。>\
<破魂斩 战士和战士/@破魂斩> <噬魂沼泽 道士和道士/@噬魂沼泽>\ \
<火龙气焰 法师和法师/@火龙气焰> <雷霆一击 战士和法师/@雷霆一击>\ \
<末日审判 道士和法师/@末日审判> <劈星斩 战士和道士/@劈星斩>\
[@劈星斩]
#IF
CHECKBAGSIZE 2
#ELSEACT
MESSAGEBOX 包裹空间不够！请空出至少2个位置！
BREAK
#IF
checkgold 50000
#ACT
CLOSE
take 金币 50000
give 劈星斩 1
BREAK
#ELSESAY
对不起！你的金币不够50000！\
<返 回/@Main>
[@末日审判]
#IF
CHECKBAGSIZE 2
#ELSEACT
MESSAGEBOX 包裹空间不够！请空出至少2个位置！
BREAK
#IF
checkgold 50000
#ACT
CLOSE
take 金币 50000
give 末日审判 1
BREAK
#ELSESAY
对不起！你的金币不够50000！\
<返 回/@Main>
[@雷霆一击]
#IF
CHECKBAGSIZE 2
#ELSEACT
MESSAGEBOX 包裹空间不够！请空出至少2个位置！
BREAK
#IF
checkgold 50000
#ACT
CLOSE
take 金币 50000
give 雷霆一击 1
BREAK
#ELSESAY
对不起！你的金币不够50000！\
<返 回/@Main>
[@火龙气焰]
#IF
CHECKBAGSIZE 2
#ELSEACT
MESSAGEBOX 包裹空间不够！请空出至少2个位置！
BREAK
#IF
checkgold 50000
#ACT
CLOSE
take 金币 50000
give 火龙气焰 1
BREAK
#ELSESAY
对不起！你的金币不够50000！\
<返 回/@Main>
[@噬魂沼泽]
#IF
CHECKBAGSIZE 2
#ELSEACT
MESSAGEBOX 包裹空间不够！请空出至少2个位置！
BREAK
#IF
checkgold 50000
#ACT
CLOSE
take 金币 50000
give 噬魂沼泽 1
BREAK
#ELSESAY
对不起！你的金币不够50000！\
<返 回/@Main>
[@破魂斩]
#IF
CHECKBAGSIZE 2
#ELSEACT
MESSAGEBOX 包裹空间不够！请空出至少2个位置！
BREAK
#IF
checkgold 50000
#ACT
CLOSE
take 金币 50000
give 破魂斩 1
BREAK
#ELSESAY
对不起！你的金币不够50000！\
<返 回/@Main>
直接删除红色标注部分（时间变量）为：
[@jinru]
#IF
#ACT
CHANLeg引擎XP + 2000
mapmove 0 330 268
break
不检查直接跳地图：mapmove 0 330 268，很简单的东西，新手多看多学。
|
上一篇：急！急！Leg引擎服务端如何编写有天气变化的脚本（飞沙走石 下雪 ）等的效果下一篇：今日土豪脚本【3KM2，BLUE，Leg引擎，3种引擎】
|
/1 
发表于 2015-4-14 17:19:24
