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

[@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 当你开启此功能后，就可以找个安全区放心的睡大觉了！>
<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>

[@gaojieshao]
    <color=orange 高级凝功修炼每60秒消耗120个灵符>，可获得1.5亿经
验，同时<color=green 必得海量经验>还有几率获得各种高级装备奖
励。经验奖励将直接获得，为了方便勇士，活动道具、装备
奖励请在<color=green 中州巡捕或直接在我这里>领取。
    高级凝功修炼提供三种模式选择：
    1)使用<color=orange 1800个灵符自动修炼15次>。（持续15分钟）
    2)使用<color=orange 3600个灵符自动修炼30次>。（持续30分钟）
    3)使用<color=orange 5400个灵符自动修炼45次>。（持续45分钟）
    <返回/@main>                            <离开/@exit>

[@dijieshao]
    <color=orange 低级凝功修炼每60秒消耗120个灵符>，可获得2.2亿经
验，同时<color=green 必得海量经验>还有几率获得各种高级装备奖
励。经验奖励将直接获得，为了方便勇士，活动道具、装备
奖励请在<color=green 中州巡捕或直接在我这里>领取。
    初级凝功修炼提供三种模式选择：
    1)使用<color=orange 240个灵符自动修炼2次>。（持续2分钟）
    2)使用<color=orange 600个灵符自动修炼5次>。（持续5分钟）
    3)使用<color=orange 1200个灵符自动修炼10次>。（持续10分钟）
    <返回/@main>                            <离开/@exit>

[@AutoPractice1]
#IF
CHECKVAR HUMAN 凝功次数 > 0
#SAY
\
    勇士，检测到你正在<color=orange 凝功修炼中>，请不要重复修炼。
以免造成不必要的损失！\
    <继续修炼！/@exit>
#ELSESAY
勇士你目前在祝福老人处存有灵符{Color=Green <$HUMAN(灵符数量)>个}！
灵符高级凝功修炼提供三种模式，请选择：
1）使用1800个灵符自动修炼15次。（持续15分钟）<我要修炼/@gaoji1>
2）使用3600个灵符自动修炼30次。（持续30分钟）<我要修炼/@gaoji2>
3）使用5400个灵符自动修炼45次。（持续45分钟）<我要修炼/@gaoji3>

[@AutoPractice2]
#IF
CHECKVAR HUMAN 凝功次数 > 0
#SAY
\
    勇士，检测到你正在<color=orange 凝功修炼中>，请不要重复修炼。
以免造成不必要的损失！\
    <继续修炼！/@exit>
#ELSESAY
勇士你目前在祝福老人处存有灵符{Color=Green <$HUMAN(灵符数量)>个}！
灵符低级凝功修炼提供三种模式，请选择：
1）使用240个灵符自动修炼2次。（持续2分钟）  <我要修炼/@diji1>
2）使用600个灵符自动修炼5次。（持续5分钟）  <我要修炼/@diji2>
3）使用1200个灵符自动修炼10次。（持续10分钟）<我要修炼/@diji3>

[@diji1]
#IF
CHECKVAR HUMAN 灵符数量 240
#SAY
恭喜你，修炼现在开始, 历时<Color=Green 2分钟>！\
　　<谢谢！/@exit>
#ACT
CALCVAR HUMAN 灵符数量 - 240
SAVEVAR HUMAN 灵符数量 ..QuestDiary数据文件灵符数量.txt
CALCVAR HUMAN 凝功次数 + 2
SAVEVAR HUMAN 凝功次数 ..QUESTDIARY数据文件个人变量.txt
SetTimerEx $USERNAME 60 @低凝经验 2
ADDNAMELIST ..QuestDiary数据文件凝功宝鼎1.txt
DELNAMELIST ..QuestDiary数据文件凝功宝鼎2.txt
DELNAMELIST ..QuestDiary数据文件凝功宝鼎3.txt
SENDMSG 5 开始自动修炼240个灵符，2次，每分钟修炼一次。
#ELSEACT
MessageBox 勇士您的灵符数目不够低级修炼的啊！！！
break

[@diji2]
#IF
CHECKVAR HUMAN 灵符数量 600
#SAY
恭喜你，修炼现在开始, 历时<Color=Green 5分钟>！\
　　<谢谢！/@exit>
#ACT
CALCVAR HUMAN 灵符数量 - 600
SAVEVAR HUMAN 灵符数量 ..QuestDiary数据文件灵符数量.txt
CALCVAR HUMAN 凝功次数 + 5
SAVEVAR HUMAN 凝功次数 ..QUESTDIARY数据文件个人变量.txt
SetTimerEx $USERNAME 60 @低凝经验 5
ADDNAMELIST ..QuestDiary数据文件凝功宝鼎1.txt
DELNAMELIST ..QuestDiary数据文件凝功宝鼎2.txt
DELNAMELIST ..QuestDiary数据文件凝功宝鼎3.txt
SENDMSG 5 开始自动修炼600个灵符，5次，每分钟修炼一次。
#ELSEACT
MessageBox 勇士您的灵符数目不够低级修炼的啊！！！
break

[@diji3]
#IF
CHECKVAR HUMAN 灵符数量 1200
#SAY
恭喜你，修炼现在开始, 历时<Color=Green 10分钟>！\
　　<谢谢！/@exit>
#ACT
CALCVAR HUMAN 灵符数量 - 1200
SAVEVAR HUMAN 灵符数量 ..QuestDiary数据文件灵符数量.txt
CALCVAR HUMAN 凝功次数 + 10
SAVEVAR HUMAN 凝功次数 ..QUESTDIARY数据文件个人变量.txt
SetTimerEx $USERNAME 60 @低凝经验 10
ADDNAMELIST ..QuestDiary数据文件凝功宝鼎1.txt
DELNAMELIST ..QuestDiary数据文件凝功宝鼎2.txt
DELNAMELIST ..QuestDiary数据文件凝功宝鼎3.txt
SENDMSG 5 开始自动修炼1200个灵符，10次，每分钟修炼一次。
#ELSEACT
MessageBox 勇士您的灵符数目不够低级修炼的啊！！！
break

[@gaoji1]
#IF
CHECKVAR HUMAN 灵符数量 1800
#SAY
恭喜你，修炼现在开始, 历时<Color=Green 15分钟>！\
　　<谢谢！/@exit>
#ACT
CALCVAR HUMAN 灵符数量 - 1800
SAVEVAR HUMAN 灵符数量 ..QuestDiary数据文件灵符数量.txt
CALCVAR HUMAN 凝功次数 + 15
SAVEVAR HUMAN 凝功次数 ..QUESTDIARY数据文件个人变量.txt
SetTimerEx $USERNAME 60 @高凝经验 15
ADDNAMELIST ..QuestDiary数据文件凝功宝鼎2.txt
DELNAMELIST ..QuestDiary数据文件凝功宝鼎1.txt
DELNAMELIST ..QuestDiary数据文件凝功宝鼎3.txt
SENDMSG 5 开始自动修炼1800个灵符，15次，每分钟修炼一次。
#ELSEACT
MessageBox 勇士您的灵符数目不够高级修炼的啊！！！
break

[@gaoji2]
#IF
CHECKVAR HUMAN 灵符数量 3600
#SAY
恭喜你，修炼现在开始, 历时<Color=Green 30分钟>！\
　　<谢谢！/@exit>
#ACT
CALCVAR HUMAN 灵符数量 - 3600
SAVEVAR HUMAN 灵符数量 ..QuestDiary数据文件灵符数量.txt
CALCVAR HUMAN 凝功次数 + 30
SAVEVAR HUMAN 凝功次数 ..QUESTDIARY数据文件个人变量.txt
SetTimerEx $USERNAME 60 @高凝经验 30
ADDNAMELIST ..QuestDiary数据文件凝功宝鼎2.txt
DELNAMELIST ..QuestDiary数据文件凝功宝鼎1.txt
DELNAMELIST ..QuestDiary数据文件凝功宝鼎3.txt
SENDMSG 5 开始自动修炼3600个灵符，30次，每分钟修炼一次。
#ELSEACT
MessageBox 勇士您的灵符数目不够高级修炼的啊！！！
break

[@gaoji3]
#IF
CHECKVAR HUMAN 灵符数量 5400
#SAY
恭喜你，修炼现在开始, 历时<Color=Green 45分钟>！\
　　<谢谢！/@exit>
#ACT
CALCVAR HUMAN 灵符数量 - 5400
SAVEVAR HUMAN 灵符数量 ..QuestDiary数据文件灵符数量.txt
CALCVAR HUMAN 凝功次数 + 45
SAVEVAR HUMAN 凝功次数 ..QUESTDIARY数据文件个人变量.txt
CALCVAR HUMAN 高凝总数 + 1
SAVEVAR HUMAN 高凝总数 ..QUESTDIARY数据文件个人变量.txt
SetTimerEx $USERNAME 60 @高凝经验 45
ADDNAMELIST ..QuestDiary数据文件凝功宝鼎2.txt
DELNAMELIST ..QuestDiary数据文件凝功宝鼎1.txt
DELNAMELIST ..QuestDiary数据文件凝功宝鼎3.txt
SENDMSG 5 开始自动修炼5400个灵符，45次，每分钟修炼一次。
#ELSEACT
MessageBox 勇士您的灵符数目不够高级修炼的啊！！！
break

[@getNLHL]
#IF
CHECKVAR HUMAN 高凝总数 > 19
#SAY
　　你今天已使用“5400个灵符自动修炼”：{color=orange <$HUMAN(高凝总数)>次。}
　　即日起，当日<color=orange 使用高级凝功修炼“5400个灵符自动修>
<color=orange 炼”达10次者>，当日可领取1个<color=green 海神融合凭证。>
　　<color=red 注：奖励请于当日领取，次日无法领取。>\
　　<今日高级凝功修炼好礼/@getDB>
　　<离开/@exit>
#ELSESAY
　　您今天使用“高级凝功自动修炼”不足20次，不能领
取奖励！\
    <COLOR=GREEN 只有“使用5400个灵符自动修炼45次。（持续45分钟）”有效>
　　<离开/@exit>

[@getDB]
#IF
checknamelist ..QuestDiary数据文件凝海名单.txt
#SAY
\
　　你今天已经领取过奖励，请不要重复领取！！\
　　<知道了/@exit>
#ACT
break
#IF
CHECKVAR HUMAN 高凝总数 > 19
#SAY
\
    恭喜你，获得了一个<color=orange 海神融合凭证>的奖励！\
　　<谢谢了/@exit>
#ACT
GIVE 海神融合凭证 1
CALCVAR HUMAN 高凝总数 - 20
SAVEVAR HUMAN 高凝总数 ..QUESTDIARY数据文件个人变量.txt
addnamelist ..QuestDiary数据文件凝海名单.txt
SENDMSG 8 恭喜<$USERNAME>在凝功宝鼎处使用高级修炼达20次，获得了一个海神融合凭证的奖励！
BREAK

看到这帖子真是高兴！

感恩无私的分享与奉献

淡定，淡定，淡定……

强烈支持楼主ing……

真是被感动的痛哭流涕……

真是难得给力的帖子啊。

我只是路过打酱油的。

强烈支持楼主ing……

楼主加油，我们都看好你哦。