此脚本自己未对亲测，在线转移账号角色应用脚本使合区后的人物名字不再加a，大家可能退出游戏中测试下看看
1.建设一个NPC
()
%100
[@main]
尊崇的骨灰玩家您好.我能帮你在线转移等级,元宝,积分<$HEROLEVEL>。\
(首先请您注册一个新的游戏帐号,建一个新的游戏角色)\
请将新游戏角色登陆游戏后末尾仔细读取以下转移条件：\
1."<$USERNAME>"被称为“旧角色”，您的新角色被称“新角色”。\
2.“旧角色”和“新角色”加单方英雄肯定要同时在线。\
3.“旧角色”和“新角色”的IP要一样。(您的IP：<$IPADDR>)\
4.转移后,“新角色”将会获得“旧角色”的等级,元宝,积分.\
5.转移后,“旧角色”的等级,元宝,积分,会变成0。\
<[设置转移明码]/@设置英雄删除明码>  <[末尾转移等级,元宝,积分数据给另一个新角色]/@末尾转移等级> 
[@设置英雄删除明码]
1.请不要把删除英雄的明码设置的和登陆明码一样\
2.合区之后就会清算您的英雄删除明码.\
3.请不要相信游戏中的骗子，顺便不要下载盗号的游戏辅助工具\
4.设置英雄删除明码后不可能更改,请您肯定要牢记\
5.<明码请利用8位以下的数字/FCOLOR=222> \
<揭示：本明码和英雄删除明码分歧>\
<假设您设置过英雄删除明码。那就毋庸设置了/FCOLOR=250> \ \
<[确定设置转移明码]/@@InPutInteger71|Title=请设置一个明码(8位以下的数字)>  <[前往上页]/@main>
[@@InPutInteger71]
#IF
CHECKVAR HUMAN 英雄删除明码 = 0
#Act
DelayGoto 500 ~InPutInteger71
#ELSEsay
您已经设置过删除明码了,请合区后再点我重新设置！  <[前往上页]/@main>
[~InPutInteger71]
#IF
CHECKVAR HUMAN 英雄删除明码 = 0
LARGE N71 0
SMALL N71 100000000
#Act
CALCVAR HUMAN 英雄删除明码 = <$STR(N71)>
SAVEVAR HUMAN 英雄删除明码 ..\QuestDiary\正本地图\能否开启.txt
#say
设置胜利!       <[前往上页]/@main>
#ELSEact
messagebox 只能输入8位以下的纯数字！
goto @设置英雄删除明码
break
[@末尾转移等级]
请您输入转移明码\ \
<[输入转移明码]/@@InPutInteger72|Title=请输入您的转移明码>\
<[前往上页]/@main>\
[@@InPutInteger72]
#IF
CHECKVAR HUMAN 英雄删除明码 > 0
#Act
DelayGoto 500 ~InPutInteger72
#ELSEsay
您并没有设置过删除明码，请您先设置删除明码后再来  <[前往上页]/@main>
[~InPutInteger72]
#IF
CHECKVAR HUMAN 英雄删除明码 = <$STR(N72)>
#Act
goto @末尾转移等级1
break
#ELSEact
messagebox 明码输入谬误！
goto @main
break
[@末尾转移等级1]
祝贺您,明码输入正确。\
您好,您必须清楚本人在做什么再利用本性能.否则结果请自傲.\ \
<[输入新角色的名字]/@@InPutString1|Title=请输入您的新角色名字>\
<[前往上页]/@main>\
[@@InPutString1]
#IF
checklevelex < 190
#Act
close
MESSAGEBOX 对不起,您的等级无余190级,无奈操作。
BREAK
#IF
#Act
DelayGoto 500 ~InPutString1
BREAK
[~InPutString1]
#IF
EQUAL S1
#ACT
MESSAGEBOX [谬误]:输入内容为空,请重新输入!
GOTO @main
BREAK
#IF
EQUAL S1 <$USERNAME>
#ACT
MESSAGEBOX 我日。“<$USERNAME>”是旧角色，您必须输入新角色的名字。
GOTO @main
BREAK
#ELSESAY
请您确认一下。\ \ \
您的新角色名字为：<$STR(s1)>\ \
您确定将“<$USERNAME>”的数据转移给“<$STR(s1)>”吗？\ \
为了避免恶意转移,每转移1次需求支付10万元宝\
<[确定支付10万元宝停止转移]/@确定转移111>   <[前往上页]/@main>\
[@确定转移111]
#if
HAVEHERO
#act
#ELSEACT
MESSAGEBOX 对不起，您还没有央求英雄！
goto @main
BREAK
#if
CHECKHEROONLINE
#act
#ELSEACT
close
MESSAGEBOX 对不起，您的英雄不在线！
BREAK
#IF
CHECKHEROLEVEL > 189
#ACT
#ELSEact
messagebox 对不起,您的英雄没有190级。无奈操作
break
#IF
CHECKGAMEGOLD > 99999
#act
#ELSEact
messagebox 对不起,您的元宝无余10万个。
DelayGoto 100 ~InPutString1
break
#IF
CheckOnline <$STR(s1)>
#ACT
#ELSEact
messagebox 对不起,“<$STR(s1)>”不在线,操作失败。
DelayGoto 100 ~InPutString1
break
#IF
#ACT
mov a230
inc a230 <$USERNAME>
mov a231
inc a231 <$STR(s1)>
mov a232
inc a232 <$IPADDR>
mov g246 <$LEVEL>
mov g241 <$GOLDCOUNT>
mov g242 <$GAMEGOLD>
mov g243 <$GAMEPOINT>
mov g244 <$GAMEDIAMOND>
mov g245 <$GAMEGIRD>
GAMEGOLD - 100000
HCall <$STR(a231)> @转移检测IP
break

==============================宰割线===================================
2.QManage.txt中增加以下内容