3K引擎人物转职+重新分配属性脚本

()
%100
[@main]
欢迎光临：你对你的职业不满意或想要更多的属性就找我吧？\
我这里可以帮你，但是要收取一定费用。\ \
╔═════╗╔═════╗╔═════╗╔═════╗\
║ <转职服务/@zhuanzhi> ║║ <转生服务/@zhuansheng> ║║ <重分属性/@qdfp6> ║║ <游戏信息/@游戏信息> ║\
╚═════╝╚═════╝╚═════╝╚═════╝\
<当前服务期时间/FCOLOR=222>：<$DATETIME>\\
[@qdfp6]
<尊敬的玩家：/FCOLOR=3> <$USERNAME> 你好，<欢迎来到：/FCOLOR=3><$SERVERNAME>\
<是否在为转身时获得的属性点分配不好为惆怅吗?/FCOLOR=222>\
<是否想要重新分配一次属性点呢?/FCOLOR=222>\
如果你能给我提供<100000元宝>的话我可以帮你哦\
\ \
< /FCOLOR=107>         ╔══════╗\
< /FCOLOR=107>         ║<我想重新分配/@fp6>║\\
< /FCOLOR=107>         ╚══════╝\
[@fp6]
#if
CHECKGAMEGOLD > 99999
#act
GAMEGOLD - 100000
RESTBONUSPOINT
#say
你的属性点已经重新分配
#ELSESAY
你还没有准备好东西呢！！\
[@zhuanzhi]
╔═══════════════════════════╗\
║               请选择你所需要的转职服务               ║\
╚═══════════════════════════╝\
╔═══════════════════════════╗\
║                       <改性服务/@改性服务>                       ║\
║     <人物转职/@renwuzhuanzhiley>                             <英雄转职/@yingxiongzhuanzhigaga>    ║\
║                                                      ║\
║               <每次转职需要50000元宝费用/FCOLOR=222>               ║\
╚═══════════════════════════╝\
[@yingxiongzhuanzhigaga]
┏━━━━━━━━━━━━━━━━━━━━━━━━━━┓\
┃  <你在转职前请阅读以下说明：>                        ┃\
┃                                                  　┃\
┃  1.改变职业后您的英雄等级及经验不变                ┃\
┃  2.改变职业后您的英雄所学的职业技能将会全部删除    ┃\
┃  3.改变职业后请立即重新佩带职业属性的装备          ┃\
┃             <每次转职需要50000元宝费用/FCOLOR=222>               ┃\
┃  <转职为武士/@herowarr>   <转职为法师/@heroWizArd>   <转职为道士/@herotaos>   <返  回/@main>     ┃\
┗━━━━━━━━━━━━━━━━━━━━━━━━━━┛
[@herowarr]
#If
CHECKGAMEGOLD > 49999
#Act
GAMEGOLD - 50000
CLEARHEROSKILL
CHANGEHEROJOB Warrior
ADDSKILL 白日门剑术 3 Hero
ADDSKILL 白日门攻PK 3 Hero
ADDSKILL 白日门刺PK 3 Hero
ADDSKILL 白日门半月 3 Hero
ADDSKILL 白日门野蛮 3 Hero
ADDSKILL 白日门烈火 3 Hero
ADDSKILL 白日门狮子吼 3 Hero
ADDSKILL 英雄护体神盾 3 Hero
ADDSKILL 白日门酒气 3 Hero
ADDSKILL 白日门元力 3 Hero
ADDSKILL 英雄开天斩 3 Hero
ADDSKILL 白日门逐日 3 Hero
SendMsg 7 提示：你的英雄现在已经是一位伟大的战士了!
Close
Break
#ELSESAY
每次转职需要50000元宝费用
[@heroWizArd]
#If
CHECKGAMEGOLD > 49999
#Act
GAMEGOLD - 50000
CLEARHEROSKILL
CHANGEHEROJOB Wizard
ADDSKILL 白日门抗拒 3 Hero
ADDSKILL 白日门雷电术 3 Hero
ADDSKILL 白日门大火球 3 Hero
ADDSKILL 白日门爆裂 3 Hero
ADDSKILL 白日门火墙 3 Hero
ADDSKILL 白日门疾光 3 Hero
ADDSKILL 白日门雷光 3 Hero
ADDSKILL 白日门魔法盾 3 Hero
ADDSKILL 白日门圣言术 3 Hero
ADDSKILL 白日门冰咆哮 3 Hero
ADDSKILL 白日门灭天火 3 Hero
ADDSKILL 英雄护体神盾 3 Hero
ADDSKILL 白日门酒气 3 Hero
ADDSKILL 白日门元力 3 Hero
ADDSKILL 英雄分身术 3 Hero
ADDSKILL 白日门火雨 3 Hero
SendMsg 7 提示：你的英雄现在已经是一位伟大的魔法师了!
Close
Break
#ELSESAY
每次转职需要50000元宝费用
[@herotaos]
#If
CHECKGAMEGOLD > 49999
#Act
GAMEGOLD - 50000
CLEARHEROSKILL
CHANGEHEROJOB Taoist
ADDSKILL 白日门治愈术 3 Hero
ADDSKILL 白日门战法 3 Hero
ADDSKILL 白日门施毒术 3 Hero
ADDSKILL 白日门火符 3 Hero
ADDSKILL 白日门隐身 3 Hero
ADDSKILL 白日门幽灵盾 3 Hero
ADDSKILL 白日门战甲术 3 Hero
ADDSKILL 白日门群疗 3 Hero
ADDSKILL 白日门神兽术 3 Hero
ADDSKILL 白日门气功波 3 Hero
ADDSKILL 白日门真气 3 Hero
ADDSKILL 英雄护体神盾 3 Hero
ADDSKILL 白日门酒气 3 Hero
ADDSKILL 白日门元力 3 Hero
ADDSKILL 白日门噬血术 3 Hero
ADDSKILL 英雄召唤月灵 3 Hero
SendMsg 7 提示：你的英雄现在已经是一位伟大的道士了!
Close
Break
#ELSESAY
每次转职需要50000元宝费用
[@renwuzhuanzhiley]
┏━━━━━━━━━━━━━━━━━━━━━━━━━━┓\
┃  <你在转职前请阅读以下说明：>                        ┃\
┃                                                  　┃\
┃  1.改变职业后您的等级及经验不变                    ┃\
┃  2.改变职业后您所学的职业技能将会全部删除          ┃\
┃  3.改变职业后请立即重新佩带职业属性的装备          ┃\
┃             <每次转职需要50000元宝费用/FCOLOR=222>               ┃\
┃  <转职为武士/@warr>   <转职为法师/@wizard>   <转职为道士/@taos>   <返  回/@main>     ┃\
┗━━━━━━━━━━━━━━━━━━━━━━━━━━┛
[@warr]
#IF
CHECKLEVELEX > 40
CHECKGAMEGOLD > 49999
#ACT
GAMEGOLD - 50000
CLEARSKILL
CHANGEJOB Warrior
ADDSKILL 基本剑术 3
ADDSKILL 攻PK剑术 3
ADDSKILL 刺PK剑术 3
ADDSKILL 半月弯刀 3
ADDSKILL 野蛮冲撞 3
ADDSKILL 烈火剑法 3
ADDSKILL 狮子吼 3
ADDSKILL 开天斩 3
ADDSKILL 逐日剑法 3
ADDSKILL 护体神盾 3
ADDSKILL 酒气护体 3
ADDSKILL 先天元力 3
GOTO @转职清第一
KICK
#SAY
伟大的传奇之神：亲爱的勇士您已经完成了转职，您现在是\
一位伟大的战士了。转职之后，必须小退上线！\ \
<离开/@exit>
#ELSESAY
每次转职需要50000元宝费用
[@wizard]
#IF
CHECKLEVELEX > 40
CHECKGAMEGOLD > 49999
#ACT
GAMEGOLD - 50000
CLEARSKILL
CHANGEJOB Wizard
ADDSKILL 火球术 3
ADDSKILL 抗拒火环 3
ADDSKILL 雷电术 3
ADDSKILL 大火球 3
ADDSKILL 瞬息移动 3
ADDSKILL 疾光电影 3
ADDSKILL 爆裂火焰 3
ADDSKILL 火墙 3
ADDSKILL 地狱雷光 3
ADDSKILL 魔法盾 3
ADDSKILL 圣言术 3
ADDSKILL 冰咆哮 3
ADDSKILL 灭天火 3
ADDSKILL 寒冰掌 3
ADDSKILL 护体神盾 3
ADDSKILL 酒气护体 3
ADDSKILL 先天元力 3
GOTO @转职清第一
KICK
#SAY
伟大的传奇之神：亲爱的勇士您已经完成了转职，您现在是\
一位伟大的魔法师了。转职之后，必须小退上线！\ \
<离开/@exit>
#ELSESAY
每次转职需要50000元宝费用
[@taos]
#IF
CHECKLEVELEX > 40
CHECKGAMEGOLD > 49999
#ACT
GAMEGOLD - 50000
CLEARSKILL
CHANGEJOB Taoist
ADDSKILL 治愈术 3
ADDSKILL 精神力战法 3
ADDSKILL 施毒术 3
ADDSKILL 灵魂火符 3
ADDSKILL 隐身术 3
ADDSKILL 幽灵盾 3
ADDSKILL 神圣战甲术 3
ADDSKILL 心灵启示 3
ADDSKILL 困魔咒 3
ADDSKILL 集体隐身术 3
ADDSKILL 群体治愈术 3
ADDSKILL 召唤神兽 3
ADDSKILL 无极真气 3
ADDSKILL 气功波 3
ADDSKILL 噬血术 3
ADDSKILL 护体神盾 3
ADDSKILL 召唤月灵 3
ADDSKILL 酒气护体 3
ADDSKILL 先天元力 3
GOTO @转职清第一
KICK
#SAY
伟大的传奇之神：亲爱的勇士您已经完成了转职，您现在是\
一位伟大的道士了。转职之后，必须小退上线！\ \
<离开/@exit>
#ELSESAY
每次转职需要50000元宝费用
[@转职清第一]
#IF
checknamelist ..\QuestDiary\数据文件\男战士.txt
#ACT
CLEARNAMELIST ..\QuestDiary\数据文件\男战士.txt
MOV A6 天下第一男战士
MOV A7 暂无
MOV A8 0
MOV A9 <$DATETIME>
BREAK
#IF
checknamelist ..\QuestDiary\数据文件\女方士.txt
#ACT
CLEARNAMELIST ..\QuestDiary\数据文件\女方士.txt
MOV A26 天下第一女道士
MOV A27 暂无
MOV A28 0
MOV A29 <$DATETIME>
BREAK
#IF
checknamelist ..\QuestDiary\数据文件\女法师.txt
#ACT
CLEARNAMELIST ..\QuestDiary\数据文件\女法师.txt
MOV A22 天下第一女法师
MOV A23 暂无
MOV A24 0
MOV A25 <$DATETIME>
BREAK
#IF
checknamelist ..\QuestDiary\数据文件\男方士.txt
#ACT
CLEARNAMELIST ..\QuestDiary\数据文件\男方士.txt
MOV A14 天下第一男道士
MOV A15 暂无
MOV A16 0
MOV A17 <$DATETIME>
BREAK
#IF
checknamelist ..\QuestDiary\数据文件\男法师.txt
#ACT
CLEARNAMELIST ..\QuestDiary\数据文件\男法师.txt
MOV A10 天下第一男法师
MOV A11 暂无
MOV A12 0
MOV A13 <$DATETIME>
BREAK
#IF
checknamelist ..\QuestDiary\数据文件\女战士.txt
#ACT
CLEARNAMELIST ..\QuestDiary\数据文件\女战士.txt
MOV A18 天下第一女战士
MOV A19 暂无
MOV A20 0
MOV A21 <$DATETIME>
BREAK
[@zhuansheng]
#say
你需要转生么？　\
<转一次需要1000元宝,等级需要达到90！赠送100点属性/FCOLOR=222>\
<转二次需要3000元宝,等级需要达到100！赠送200点属性/FCOLOR=222>\
<转三次需要6000元宝,等级需要达到110！赠送300点属性/FCOLOR=222>\
<转四次需要10000元宝,等级需要达到120！赠送500点属性/FCOLOR=222>\
<转五次需要50000元宝,等级需要达到130！赠送800点属性/FCOLOR=222>\
<转生后名字会变成七彩颜色,你确定么？/FCOLOR=222>\
<【 确 定 】/@确定>\
[@确定]
#IF
CHECKRENEWLEVEL = 0
#ACT
GOTO @确定0
BREAK
#IF
CHECKRENEWLEVEL = 1
#ACT
GOTO @确定1
BREAK
#IF
CHECKRENEWLEVEL = 2
#ACT
GOTO @确定2
BREAK
#IF
CHECKRENEWLEVEL = 3
#ACT
GOTO @确定3
BREAK
#IF
CHECKRENEWLEVEL = 4
#ACT
GOTO @确定4
BREAK
#ELSEACT
MESSAGEBOX 你目前已经五转了，无法再转生了！
[@确定0]
#IF
checkgamegold > 999
CHECKLEVELEX > 89
CHECKRENEWLEVEL < 1
#ACT
gamegold - 1000
RENEWLEVEL 1 0  100
SENDMSG 0 【%S】成功将自己转生，他现在是第1次转生，还有4次转生机会！(有一种心飘飘然的感觉！)
break
#ELSESAY
你目前的转生次数为：0转，需要等级90级，元宝1000个！
[@确定1]
#IF
checkgamegold > 2999
CHECKLEVELEX > 99
CHECKRENEWLEVEL = 1
#ACT
gamegold - 3000
RENEWLEVEL 1 0  200
SENDMSG 0 【%S】成功将自己转生，他现在是第2次转生，还有3次转生机会！(靠！这算什么，劳资等哈就4转！)
break
#ELSESAY
你目前的转生次数为：1转，需要等级100级，元宝3000个！
[@确定2]
#IF
checkgamegold > 5999
CHECKLEVELEX > 109
CHECKRENEWLEVEL = 2
#ACT
gamegold - 6000
RENEWLEVEL 1 0  300
SENDMSG 0 【%S】成功将自己转生，他现在是第3次转生，还有2次转生机会！(靠！这算什么，劳资等哈就4转！)
break
#ELSESAY
你目前的转生次数为：2转，需要等级110级，元宝6000个！
[@确定3]
#IF
checkgamegold > 9999
CHECKLEVELEX > 119
CHECKRENEWLEVEL = 3
#ACT
gamegold - 10000
RENEWLEVEL 1 0  500
SENDMSG 0 【%S】成功将自己转生，他现在是第4次转生，还有1次转生机会！(靠！这算什么，劳资等哈就4转！)
break
#ELSESAY
你目前的转生次数为：3转，需要等级120级，元宝10000个！
[@确定4]
#IF
checkgamegold > 49999
CHECKLEVELEX > 129
CHECKRENEWLEVEL = 4
#ACT
gamegold - 50000
RENEWLEVEL 1 0  800
SENDMSG 0 【%S】成功将自己转生，他现在是第5次转生！(靠！这算什么，劳资已经5转了！)
break
#ELSESAY
你目前的转生次数为：4转，需要等级130级，元宝50000个！
[@游戏信息]
选择你想了解的游戏讯息：\ \
╔┄┄┄┄╗     ╔┄┄┄┄╗     ╔┄┄┄┄╗\
┆<个人信息/@HumInfo>┆     ┆<最高等级/@HighLevelInfo>┆     ┆<罪大恶极/@HighPKCInfo>┆\
╚┄┄┄┄╝     ╚┄┄┄┄╝     ╚┄┄┄┄╝\ \
╔┄┄┄┄╗     ╔┄┄┄┄╗     ╔┄┄┄┄╗\
┆<最高攻击/@HighDCInfo>┆     ┆<最高魔法/@HighMCInfo>┆     ┆<最高道术/@HighSCInfo>┆\
╚┄┄┄┄╝     ╚┄┄┄┄╝     ╚┄┄┄┄╝\ \
[@HumInfo]
以下为当前玩家的信息：\
<人物名称>:<$USERNAME>\
<等    级>:<$LEVEL>\
<经 验 值>:<$EXP>/<$MAXEXP>\
<体 力 值>:<$HP>/<$MAXHP>\
<魔 法 值>:<$MP>/<$MAXMP>\
<ＰＫ点数>:<$PKPOINT>\
<防 御 力>:<$AC>/<$MAXAC>\
<下一页/@HumInfo1> <返回/@main> <关闭/@exit>
[@HumInfo1]
<魔 防 力>:<$MAC>/<$MAXMAC>\
<攻 击 力>:<$DC>/<$MAXDC>\
<魔 法 力>:<$MC>/<$MAXMC>\
<道 术 力>:<$SC>/<$MAXSC>\
<背包重量>:<$BW>/<$MAXBW>\
<负    重>:<$WW>/<$MAXWW>\
<腕    力>:<$HW>/<$MAXHW>\
<能    量>:<$HUNGER> \
<上一页/@HumInfo> <返回/@main> <关闭/@exit>
[@HighLevelInfo]
#IF
#ACT
messagebox 以下为当前在线最高等级人物信息:\<$HIGHLEVELINFO>
[@HighDCInfo]
#IF
#ACT
messagebox 以下为当前在线最高攻击人物信息:\<$HIGHDCINFO>
[@HighMCInfo]
#IF
#ACT
messagebox 以下为当前在线最高魔法人物信息:\<$HIGHMCINFO>
[@HighSCInfo]
#IF
#ACT
messagebox 以下为当前在线最高道术人物信息:\<$HIGHSCINFO>
[@HighPKCInfo]
#IF
#ACT
messagebox 以下为当前在线罪大恶极人物信息:\<$HIGHPKINFO>




[@改性服务]
哎，真不明白你们这些年轻人都是怎么想的？\
没事怎么老是喜欢弄个变性。\
你是想改变性别吗，如果改变了我们可不会负责的。\\
改变性别注意事项：你不能在结婚后改变性别，除非你\
有病，同时你的等级必须在50级以上才可以使用本功能\ \
还须要50000元宝 我才能能你随心所欲\
<我同意更改性别/@BB1>     <我还是做个正常人吧/@exit>
[@BB1]
#IF
checkmarry
#SAY
你是在和我开玩笑吧，你都结婚了还改变性别？\
如果真想改变性别，请选去离婚吧。\
如果下次还这样，我会惩罚你的。\
#ACT
break
#IF
gender man
#SAY
做男人没意思了？那就来做个女人吧，哈哈，我来\
帮你实现你长久以来的理想。\ \
<改变性别/@BB3>  <害怕了，还是不改变了/@exit>\
#ELSESAY
做女人没意思了？那就来做个男人吧，哈哈，我来\
帮你实现你长久以来的理想。\ \
<改变性别/@BB4>  <害怕了，还是不改变了/@exit>\
[@BB3]
#IF
CHECKGAMEGOLD > 49999
#ACT
GAMEGOLD - 50000
CHANGEGENDER 1
#SAY
恭喜，你已经变成一位女人了。\ \ \
<离开/@exit>
#ELSESAY
对不起！你没有50000元宝我不能生你转：\
[@BB4]
#IF
CHECKGAMEGOLD > 49999
#ACT
GAMEGOLD - 50000
CHANGEGENDER 0
#SAY
恭喜，你已经变成一位男人了。\ \ \
<离开/@exit>
#ELSESAY
对不起！你没有50000元宝我不能生你转：\