网站首页 >>私服发布<< >>广告价格<< >>技术文章<< >>工具下载<< >>小偷采集<<

公告: 本站无任何客服人员,如有自称为本站客服人员主动联系客户的均为骗子.请大家注意.

完整中州祈愿树触发脚本
文章作者:zifeng 文章来源:传世私服,传奇世界私服,新开传世私服,传奇世界私服发布网 更新时间:2011-11-19 16:09:19 

;S0 有几率获得的物品
;S1 显示获得经验数
;S2 获得物品的几率

[@祈愿树]
{
  有道是,冥冥中自有天意。云游道长云游四海,自幼得\
高人传授,深谙占卜之道,观星相而知天命。如今发现了这\
棵万年神树,国王下令将神树迁到中州来。\
  万民只要有祈愿符,并将物品投掷到这棵祈愿树上,就\
可获得祈愿树的祈福。\
\
  <向祈愿树祈福/@openBless>\
  <了解神树的传说/@liaojie>\
  <了解可祈愿物品/@wupin>\

[@liaojie]
  上万年的风风雨雨,上万年的饱经沧桑,这棵老神树用\
它那孤单的臂膀,挡风遮雨,庇护着传世大陆上的人们。\
  云游道长首先发现了这棵神树,惊叹于这棵神树的灵力\
并称其为“祈愿树”。在祈福树的每一层,都挂着琳琅满目的\
物品。只要向树祈愿,更有几率获得祈福树上的物品。\
\
  <向祈愿树祈福/@openBless>\

[@wupin]
  世间万物都蕴涵各种灵力,但只有灵力充沛的物品才能\
用来向祈愿树祈福。\
  各种高级装备(圣战级以上)、高级武器(无极类以上)、\
高级技能书、高级勋章,以及所有宝石都可以向祈愿树祈福\
当然一些商城道具也蕴涵大量灵力可以用于祈福。\
  此外,所有绑定和固化的装备道具由于灵力被锁,所以\
均无法用于祈福。还有你可以将装备道具和祈愿符一起放上\
祈愿树下的物品格,\
  <向祈愿树祈福/@openBless>\

[@openBless]
#IF
CheckUserGap < 5
#ACT
SendBlessItemList ..\QuestDiary\游戏读取\祈愿树\
#ELSESAY
你离树太远了...\
\
<走近点/@exit>

[@StartBless]
#IF
equal $PARAM(0) 0
!CHECKVARLIST $ITEMINFO[$PARAM(1)].NAME ..\QuestDiary\游戏读取\祈愿树\树上物品1.txt
!CHECKVARLIST $ITEMINFO[$PARAM(1)].NAME ..\QuestDiary\游戏读取\祈愿树\树上物品2.txt
!CHECKVARLIST $ITEMINFO[$PARAM(1)].NAME ..\QuestDiary\游戏读取\祈愿树\树上物品3.txt
!CHECKVARLIST $ITEMINFO[$PARAM(1)].NAME ..\QuestDiary\游戏读取\祈愿树\可祈愿物品.txt
#ACT
MessageBox 无法用该物品进行祈愿
break

#IF
random 9
equal $PARAM(0) 0
#ACT
SetBlessPower 3
ReadRandomStr ..\QuestDiary\游戏读取\祈愿树\BlessItem3.txt S0
break

#IF
random 3
equal $PARAM(0) 0
#ACT
SetBlessPower 2
ReadRandomStr ..\QuestDiary\游戏读取\祈愿树\BlessItem2.txt S0
break

#IF
equal $PARAM(0) 0
#ACT
SetBlessPower 1
ReadRandomStr ..\QuestDiary\游戏读取\祈愿树\BlessItem1.txt S0
break

#IF
CHECKVARLIST $ITEMINFO[$PARAM(1)].NAME ..\QuestDiary\游戏读取\祈愿树\树上物品1.txt
#ACT
movr P0 40
inc P0 40
mov S2 6

#IF
CHECKVARLIST $ITEMINFO[$PARAM(1)].NAME ..\QuestDiary\游戏读取\祈愿树\树上物品2.txt
#ACT
movr P0 120
inc P0 120
mov S2 3

#IF
CHECKVARLIST $ITEMINFO[$PARAM(1)].NAME ..\QuestDiary\游戏读取\祈愿树\树上物品3.txt
#ACT
movr P0 360
inc P0 360
mov S2 1

#IF
CHECKVARLIST $ITEMINFO[$PARAM(1)].NAME ..\QuestDiary\游戏读取\祈愿树\可祈愿物品.txt
#ACT
movr P0 1080
inc P0 1080
mov S2 1

#IF
equal $PARAM(0) 1
#ACT
mov S3 $ITEMINFO[$PARAM(1)].NAME
takem $PARAM(1)
UPGRADEUSERITEM $PARAM(2) 20 - 1

#IF
equal $PARAM(0) 1
#ACT
MULT P0 10000
mov S1 $STR(P0)
CHANGEEXP + $STR(P0)
SENDMSG 5 你获得了<$STR(S1)>经验

#IF
equal $PARAM(0) 1
random $STR(S2)
#ACT
DELVARLIST $STR(S0) ..\QuestDiary\游戏读取\祈愿树\BlessItem1.txt
SENDMSG 10 %s向祈愿树许下愿望,并从祈愿树上获得了<$STR(S0)>,快去中州的祈愿树许下你的愿望。
give $STR(S0) 1
goto @是否留在树上

[@是否留在树上]
#IF
CHECKVARLIST $STR(S0) ..\QuestDiary\游戏读取\祈愿树\树上物品1.txt
CHECKVARLIST $STR(S3) ..\QuestDiary\游戏读取\祈愿树\树上物品1.txt
#ACT
DELVARLIST $STR(S0) ..\QuestDiary\游戏读取\祈愿树\BlessItem1.txt
ADDVARLIST $STR(S3) ..\QuestDiary\游戏读取\祈愿树\BlessItem1.txt 1
SENDMSG 10 %s向祈愿树许下愿望,并将<$STR(S3)>留在了祈愿树上,快去中州的祈愿树许下你的愿望。
break

#IF
CHECKVARLIST $STR(S0) ..\QuestDiary\游戏读取\祈愿树\树上物品2.txt
CHECKVARLIST $STR(S3) ..\QuestDiary\游戏读取\祈愿树\树上物品2.txt
#ACT
DELVARLIST $STR(S0) ..\QuestDiary\游戏读取\祈愿树\BlessItem2.txt
ADDVARLIST $STR(S3) ..\QuestDiary\游戏读取\祈愿树\BlessItem2.txt 1
SENDMSG 10 %s向祈愿树许下愿望,并将<$STR(S3)>留在了祈愿树上,快去中州的祈愿树许下你的愿望。
break

#IF
CHECKVARLIST $STR(S0) ..\QuestDiary\游戏读取\祈愿树\树上物品3.txt
CHECKVARLIST $STR(S3) ..\QuestDiary\游戏读取\祈愿树\树上物品3.txt
#ACT
DELVARLIST $STR(S0) ..\QuestDiary\游戏读取\祈愿树\BlessItem3.txt
ADDVARLIST $STR(S3) ..\QuestDiary\游戏读取\祈愿树\BlessItem3.txt 1
SENDMSG 10 %s向祈愿树许下愿望,并将<$STR(S3)>留在了祈愿树上,快去中州的祈愿树许下你的愿望。
#ELSEACT
#ECALL [\游戏功能\祈愿树.txt] @祈愿树读取
}

[@祈愿树读取]
{
#ACT
goto @祈愿树物品1
goto @祈愿树物品2
goto @祈愿树物品3

[@祈愿树物品1]
#IF
random 1
#ACT
ReadRandomStr ..\QuestDiary\游戏读取\祈愿树\BlessItem1.txt S0 49

#IF
equal S0
#ACT
ReadRandomStr ..\QuestDiary\游戏读取\祈愿树\树上物品1.txt S0
ADDVARLIST $STR(S0) ..\QuestDiary\游戏读取\祈愿树\BlessItem1.txt 1
goto @祈愿树物品1

[@祈愿树物品2]
#IF
random 1
#ACT
ReadRandomStr ..\QuestDiary\游戏读取\祈愿树\BlessItem2.txt S0 49

#IF
equal S0
random 3
#ACT
ReadRandomStr ..\QuestDiary\游戏读取\祈愿树\树上物品2.txt S0
ADDVARLIST $STR(S0) ..\QuestDiary\游戏读取\祈愿树\BlessItem2.txt 1
goto @祈愿树物品2
break

#IF
equal S0
#ACT
ReadRandomStr ..\QuestDiary\游戏读取\祈愿树\树上物品1.txt S0
ADDVARLIST $STR(S0) ..\QuestDiary\游戏读取\祈愿树\BlessItem2.txt 1
goto @祈愿树物品2

[@新开传世SF祈愿树物品3]
#IF
random 1
#ACT
ReadRandomStr ..\QuestDiary\游戏读取\祈愿树\BlessItem3.txt S0 49

#IF
equal S0
random 3
#ACT
ReadRandomStr ..\QuestDiary\游戏读取\祈愿树\树上物品3.txt S0
ADDVARLIST $STR(S0) ..\QuestDiary\游戏读取\祈愿树\BlessItem3.txt 1
goto @祈愿树物品3
break

#IF
equal S0
#ACT
ReadRandomStr ..\QuestDiary\游戏读取\祈愿树\树上物品2.txt S0
ADDVARLIST $STR(S0) ..\QuestDiary\游戏读取\祈愿树\BlessItem3.txt 1
goto @祈愿树物品3
}

麒麟传世发布站,传奇世界发布网,新开传奇世界私服,每日新开传奇世界私服,麒麟传世广告代理!

www.231woool.com    www.231woool.com   www.233woool.com

代理联系 QQ 443555029 

·上一篇;开发杀怪练级脚本(独创)
·下一篇;幸运使者(幸运礼包)脚本
浏览次数:10
最新文章
· 广西秋风树|大量供应秋风树|可长期合作...
· 麒麟教您 如何让百度快速收录新站内容页面...
· 麒麟发布站:编写修改脚本必备与传奇私服常...
· 麒麟教你如何添加最新传奇私服发型脚本...
· 麒麟教你传奇私服四级魔法盾的设置方法...
· 传世私服一条龙怎么才可以开两个区...
· 如何选折现在的传世私服,防止上当...
· 最新八大任务系统脚本集合...
· 开发杀怪练级脚本(独创)...
· 完整中州祈愿树触发脚本...
热门文章
· 海底转盘升级(炎神,凡品,上品,极品,仙...
· 最新八大任务系统脚本集合...
· 开发杀怪练级脚本(独创)...
· 完整中州祈愿树触发脚本...
· 幸运使者(幸运礼包)脚本...
· 挖矿大师...
· 麒麟发布站:编写修改脚本必备与传奇私服常...
· 麒麟教你如何添加最新传奇私服发型脚本...
· 麒麟教你传奇私服四级魔法盾的设置方法...
· 传世私服一条龙怎么才可以开两个区...
· 如何选折现在的传世私服,防止上当...
Copyright 2010-2011 laiqn.net (注:本站只接受官方授权游戏广告,非官方授权游戏请办理广告业务之前告知本站
品牌商标、文字、形象及内容归 游戏导航 版权所有,任何组织或个人未经本站同意,不得使用和传播
拒绝盗版游戏 注意自我保护 谨防受骗上当 适度游戏益脑 沉迷游戏伤身 合理安排时间 享受健康生活
本站所有游戏均来自网络版权归游戏业主所有,如果无意之中侵犯了您的版权,请来信告知,本站将在3个工作日内删除
*注释:本站发布所有游戏信息,均来自互联网,与本站无关。请玩家仔细辨认游戏信息的真实性,避免上当受骗
网站备案登记号:辽ICP备07010702号 来千年