传奇私服 发表于 2017-9-26 17:22:56

传奇灵符仙子脚本

[@灵符仙子]
{
#ACT
MOV D0 0
CALCVAR HUMAN 元宝 = 0
SAVEVAR HUMAN 元宝 ..\QuestDiary\数据文件\变量.txt
#SAY
在进入天关通道的瞬间,使用1张灵符将可以隐身遁形。\
此时,天关通道内的怪物将无法看到你,\
你就可以直接穿越通道,闯入天关!\
通过我,我可以将您的元宝兑换成灵符\
进入庄园后,等待一分钟后就可以兑换灵符\
<前往天庭闯天关/@前往天庭>\
<查询灵符数量/@查询灵符>\
<了解闯天关的规则/@天关规则> <使用元宝兑换灵符/@元宝换灵符>\
<回土城/@去四周> <离开/@exit>
[@去四周]
#IF
checkgold 1000
#ACT
take 金币 1000
close
mapmove 3 334 333
#ELSESAY
[@前往天庭]
#act
map 0122A
[@查询灵符]
你当前的灵符总数是:<$GAMEGIRD>
[@查询元宝]
你当前的元宝总数是:<$GAMEGOLD>
[@天关规则]
<为什么提示我“天关通道已经满员,请稍后再试”/@满员提示>\
<天关通道是否就是天关/@天关通道>\
\ \
<返回/@main>
[@满员提示]
如果玩家对自己的实力有信心,可以[选择消灭怪物]
在没有灵符的保护下进入天关通道\
玩家必须只身消灭完天关通道里的所有怪物,才能进入天关夺宝\
这里的通道一共有5条\
如果满员就会提示:“天关通道已经满员,请稍后再试”\
\ \
<返回上一页/@天关规则>
[@天关通道]
天关通道并不是天关,只是天庭通往天关的通道\
天关通道里没有宝藏,真正的宝藏是隐藏在天关里的\
\ \
\ \
<返回上一页/@天关规则>
[@元宝换灵符]
#IF
equal G2 1
#ACT
MessageBox 闯天关暂未开放,开放时系统将进行通知,请注意游戏公告!
break
#IF
small D0 0
#ACT
mov D0 0
#IF
#SAY
兑换标准:50个元宝可以用以兑换1张灵符,\
如果您进行灵符的兑换,则视您已经同意以上兑换规则。\
<查询灵符数量/@查询灵符> <查询元宝数量/@查询元宝>\
#IF
equal D0 0
#SAY
你还没有灵符。\
#IF
large D0 0
#SAY
你打算兑换 <$STR(D0)> 张灵符。\
#IF
#SAY
<加一张/@加一张> <加五张/@加五张> <加十张/@加十张> <减一张/@减一张> <减五张/@减五张> <减十张/@减十张>\
\
\
<确定使用元宝兑换/@确定兑换>
[@加一张]
#ACT
inc D0 1
CALCVAR HUMAN 元宝 + 50
SAVEVAR HUMAN 元宝 ..\QuestDiary\数据文件\变量.txt
goto @元宝换灵符
[@加五张]
#ACT
inc D0 5
CALCVAR HUMAN 元宝 + 250
SAVEVAR HUMAN 元宝 ..\QuestDiary\数据文件\变量.txt
goto @元宝换灵符
[@加十张]
#ACT
inc D0 10
CALCVAR HUMAN 元宝 + 500
SAVEVAR HUMAN 元宝 ..\QuestDiary\数据文件\变量.txt
goto @元宝换灵符
[@减一张]
#ACT
dec D0 1
CALCVAR HUMAN 元宝 - 50
SAVEVAR HUMAN 元宝 ..\QuestDiary\数据文件\变量.txt
goto @元宝换灵符
[@减五张]
#ACT
dec D0 5
CALCVAR HUMAN 元宝 - 250
SAVEVAR HUMAN 元宝 ..\QuestDiary\数据文件\变量.txt
goto @元宝换灵符
[@减十张]
#ACT
dec D0 10
CALCVAR HUMAN 元宝 - 500
SAVEVAR HUMAN 元宝 ..\QuestDiary\数据文件\变量.txt
goto @元宝换灵符
[@确定兑换]
#if
small D0 1
#ACT
break
#SAY
兑换灵符只能在1至1000之间
#if
large D0 1000
#ACT
break
#SAY
兑换灵符只能在1至1000之间
#IF
CHECKGAMEGOLD < <$STR(D0)>
#ACT
break
#SAY
请进步前辈行元宝充值。\
\ \
<离开/@exit>
#IF
random 1
#ACT
GameGold - <$HUMAN(元宝)>
GAMEGIRD + <$STR(D0)>
Calcvar HUMAN SDLF + <$STR(D0)>
SAVEVAR HUMAN SDLF ..\QuestDiary\数据文件\圣殿灵符.txt
SendMSG 6 你获得了<$STR(D0)>张灵符
SendMSG 6 你获得了<$STR(D0)>张圣殿灵符
CALCVAR HUMAN 元宝 = 0
SAVEVAR HUMAN 元宝 ..\QuestDiary\数据文件\变量.txt
#SAY
元宝兑换成功!
}

页: [1]
查看完整版本: 传奇灵符仙子脚本