传奇版本灵符仙子脚本

GM部落 · 发表于 2014-7-28 13:38:28

[@灵符仙子]
{
#ACT
MOV D0 0
CALCVAR HUMAN 元宝 = 0
SAVEVAR HUMAN 元宝 ..\QuestDiary\数据文件\变量.txt
#SAY
在进入天关通道的瞬间，使用1张灵符将可以隐身遁形。\
此时，天关通道内的怪物将无法看到你，\
你就可以直接穿越通道，闯入天关！\
通过我，我可以将您的元宝兑换成灵符\
进入庄园后，等待一分钟后就可以兑换灵符\
<前往天庭闯天关/@前往天庭>\
<查询灵符数量/@查询灵符>\
<了解闯天关的规则/@天关规则> <使用元宝兑换灵符/@元宝换灵符>\
<回土城/@去四周> <离开[url=]/@exit[/url]>
[@去四周]
#IF
checkgold 1000
#ACT
take 金币 1000
close
mapmove 3 334 333
#ELSESAY
[@前往天庭]
#act
map 0122A
[@查询灵符]
你当前的灵符总数是：<$GAMEGIRD>
[@查询元宝]
你当前的元宝总数是：<$GAMEGOLD>
[@天关规则]
<为什么提示我“天关通道已经满员，请稍后再试”/@满员提示>\
<天关通道是否就是天关/@天关通道>\
\ \
<返回[url=]/@main[/url]>
[@满员提示]
如果玩家对自己的实力有信心，可以[选择消灭怪物]
在没有灵符的保护下进入天关通道\
玩家必须只身消灭完天关通道里的所有怪物，才能进入天关夺宝\
这里的通道一共有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
请进步前辈行元宝充值。\
\ \
<离开[url=]/@exit[/url]>
#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
元宝兑换成功！
}

dojunho · 发表于 2017-11-22 06:32:15

哪个正常的人能崇拜一只蟑螂呢?

dojunho · 发表于 2017-11-22 06:38:09

能告诉我丫挺什么意思吗?赐教

dojunho · 发表于 2017-11-22 06:44:25

我~~~~~~~~~~~~~~~ 真~~~~~~~~~~ 挫~~~~~~~~~

dojunho · 发表于 2017-11-22 06:50:22

要不我崇拜你?行吗?

dojunho · 发表于 2017-11-22 06:56:14

一个个全都骑到老大头上来了...

dojunho · 发表于 2017-11-22 07:02:05

每天靠搜索能有500-900的ip

dojunho · 发表于 2017-11-22 07:07:55

你还想说什么啊....

dojunho · 发表于 2017-11-22 07:14:04

我怎么就踩不死你呢??

dojunho · 发表于 2017-11-22 07:19:58

哦...这个...偶昨天就看了....

		自动登录	找回密码
密码			立即注册