传世服务端凝功宝鼎全功能脚本

传世服务端凝功宝鼎全功能脚本

出处：本站整理作者：佚名发布时间：2014-02-27阅读次数：

[@main]
    即日起，勇士可在我这里<color=green 通过灵符作为媒介进行自动修>\
<color=green 炼，以达到实力快速成长之效！>\
    快速修炼分为<高级修炼/@gaojieshao>与<低级修炼/@dijieshao>两种，<color=orange 每种修炼都提>\
<color=orange 供三种方式供选择>，<color=green 修炼时将一次扣除存放在祝福老人处相>\
<color=green 应数量的灵符，修炼开始后每分钟都将获得一次><丰厚奖励/@jiangli>！\
    当日<color=orange 使用高级凝功修炼“5400个灵符自动修炼”达20>\
<color=orange 次者>，当日可领取1个<color=green 海神融合凭证。> 剩余灵符:<$HUMAN(灵符数量)>\
    <高级凝功修炼/@AutoPractice1>   <低级凝功修炼/@AutoPractice2>       <购买灵符/@BUY灵符>\
    <高级贴心修炼/@挂机修炼>   <今日高级凝功好礼/@getNLHL>   <贴心修炼物品领取/@贴心美女>\

[@贴心美女]
#if
CheckTxt ..\QuestDiary\数据文件\凝功宝鼎\<$USERNAME>.txt
#ACT
MOV S0
READRANDOMSTR ..\QuestDiary\数据文件\凝功宝鼎\<$USERNAME>.txt S0
#ELSEACT
BREAK
#ELSESAY
    年轻人，你无奖励可以领取！
#IF
EQUAL S0
#ACT
MESSAGEBOX 你的奖励已经领取完了
BREAK
#ELSEACT
DELVARLIST $STR(S0) ..\QuestDiary\数据文件\凝功宝鼎\<$USERNAME>.txt
GIVE $STR(S0)
BREAK

[@BUY灵符]
#ACT
QUERYVAL 1 0 6 @很多美女 请你要购买的灵符数量(最少1，最大999999！)

[@很多美女]
#IF
EQUAL S1
#ACT
BREAK
#ELSEACT
MOV M9 $STR(S1)
#IF
SMALL M9 1
#ACT
SENDMSG 6 输入次数不正确
BREAK
#IF
LARGE M9 999999
#ACT
SENDMSG 6 输入次数不正确
BREAK
#IF
CHECKGAMEGOLD \ $STR(M9)
#ACT
GAMEGOLD - $STR(M9)
CALCVAR HUMAN 灵符数量 + $STR(M9)
SAVEVAR HUMAN 灵符数量 ..\QuestDiary\数据文件\灵符数量.txt
SENDMSG 6 你成功购买了<$STR(M9)>个灵符
goto @main
break
#ELSEACT
MESSAGEBOX 你没有足够的元宝！

[@挂机修炼]
    <color=orange 高级凝功修炼每60秒消耗120个灵符>，可获得1.5亿经\
验。<COLOR=GREEN 由于是挂机，注意：我们会将你获得的物品保存在我这>\
<COLOR=GREEN 你可以来你方便的时间来取你的物品！>\
<COLOR=GREEN 当你开启此功能后，战歌网dj，就可以找个安全区放心的睡大觉了！>\
<COLOR=GREEN 每次挂机修炼最多可以修炼9999次！每次需要灵符120个>\
<COLOR=GREEN 此种修炼适合游戏时间不充裕的玩家，从此告别熬夜！>\
    <开启贴心修炼/@贴心修炼>          <返回/@main>\

[@贴心修炼]
#IF
CHECKVAR HUMAN 灵符数量 < 0
#ACT
MESSAGEBOX 你的灵符数量不足，凝功失败！
BREAK
#IF
CHECKVAR HUMAN 凝功次数 > 0
#ACT
BREAK
#SAY
\\
    勇士，检测到你正在<color=orange 凝功修炼中>，请不要重复修炼。\
以免造成不必要的损失！\\
    <继续修炼！/@exit>
#ELSEACT
QUERYVAL 1 0 4 @贴心检测 请你要贴心修炼的次数(最少1，最大9999)
break

[@贴心检测]
#IF
CHECKVAR HUMAN 灵符数量 \ 120
#ACT
MOV M6 $STR(S1)
#ELSEACT
SENDMSG 5 灵符不足！
BREAK
#IF
SMALL M6 1
#ACT
SENDMSG 6 输入次数不正确
BREAK
#IF
LARGE M6 9999
#ACT
SENDMSG 6 输入次数不正确
BREAK
#IF
TRUE
#ACT
MOV M7 $STR(M6)
MULT M6 120
#IF
CHECKVAR HUMAN 灵符数量 \ $STR(M6)
#SAY
恭喜你，修炼现在开始, 历时{Color=Green <$STR(M7)>分钟}！\\
　　<谢谢！/@exit>\
#ACT
CALCVAR HUMAN 灵符数量 - $STR(M6)
SAVEVAR HUMAN 灵符数量 ..\QuestDiary\数据文件\灵符数量.txt
CALCVAR HUMAN 凝功次数 + $STR(M7)
SAVEVAR HUMAN 凝功次数 ..\QUESTDIARY\数据文件\个人变量.txt
SetTimerEx $USERNAME 60 @贴心修炼 $STR(M7)
ADDNAMELIST ..\QuestDiary\数据文件\凝功宝鼎\3.txt
DELNAMELIST ..\QuestDiary\数据文件\凝功宝鼎\1.txt
DELNAMELIST ..\QuestDiary\数据文件\凝功宝鼎\2.txt
SENDMSG 5 开始自动修炼<$STR(M6)>个灵符，<$STR(M7)>次，每分钟修炼一次。
#ELSEACT
MessageBox 勇士您的灵符数目不够低级修炼的啊！！！
break

[@jiangli]
    <color=orange 凝功修炼期间每60秒消耗120个灵符>，可获得巨额经验\
同时低级修炼可获得8-10个勇者之心、高级修炼必可获得18个\
勇者之心，同时还有几率获得<color=green 圣王上品、炎神首饰、火影项链、>\
<color=green 极品神铁>等高级装备奖励。\
    为了方便勇士，勇者之心和装备奖励请在<color=green 中州巡捕或直接>\
<color=green 在我这里>领取。\
    <color=red 友情提醒>：活动道具仅限每次活动期间有效，请勇士及\
时领取，逾期领取的活动道具将不可上交，后果自负。\
    <返回/@main>                            <离开/@exit>