LEG/BLUE/GOB引擎账号回收系统脚本

此脚本需要配合防扫号网关使用,请右侧下载完整版脚本和网关,文章区脚本只为展示,非完整脚本!

防扫号激活码,YWHW3-13VHQ-RTNFX-F359E-7B7E9(永久免费卡支持LEG/BLUE/GOB)引擎

LEG/BLUE/GOB引擎账号回收系统脚本插图

[@Mir2000_帐号回收NPC]

{
#IF
CHECKLEVELEX > 0
#ACT
MOV P1 <$$(帐号回收充值变量)>
MUL P1 $(帐号回收充值折算)
DIV P1 100
DIV P1 $(帐号回收充值比列)
MOV N$帐号回收金额 <$STR(P1)>
MOV P1 0
INI_READ_INTEGER .\QuestDiary\Mir2000_帐号回收\Mir2000_帐号回收参数.ini Mir2000_帐号回收等级 <$LEVEL> P1
INC N$帐号回收金额 <$STR(P1)>
MOV S19 <$STR(N$帐号回收金额)>
FillText S19 6
SetMerchantDlgImgName dk6.png
#SAY
    <COLOR=clLime ·¨∴※><COLOR=$00FF92 ≡≡><COLOR=$00FFA3 M><COLOR=$00FFB4 I><COLOR=$00FFD6 R><COLOR=$00FFE7 2000><COLOR=$00FFF8 *><COLOR=$00E4FF 最><COLOR=$00D3FF 新><COLOR=$00C2FF 独><COLOR=$00B1FF 家><COLOR=$00A0FF 脚><COLOR=$0079FF 本≡≡><COLOR=clLime ※∴¨·>\
\
<COLOR=clYellow ╭─╮◢━━━━━━━━━━━━━━━━━━━━━━━━━◣>\
<COLOR=clYellow │><COLOR=$00FF92 ☆><COLOR=clYellow │┃><COLOR=clAqua 说明1:><COLOR=$00FF00 在本服的帐号充值、等级70级以上可回收充值。><COLOR=clYellow ┃>\
<COLOR=clYellow │><COLOR=$00FFA3 帐><COLOR=clYellow │┃><COLOR=clAqua 说明2:><COLOR=$FF00FF 充值折算30%、回收装备折算80%,转移新区。><COLOR=clYellow ┃>\
<COLOR=clYellow │><COLOR=$00FFB4 号><COLOR=clYellow │┃><COLOR=clAqua 说明3:><COLOR=$008CFF 回收帐号后、本服帐号永久封停,不接受赎回。><COLOR=clYellow ┃>\
<COLOR=clYellow │><COLOR=$00FFE7 回><COLOR=clYellow │┃><COLOR=clAqua 说明3:><COLOR=$00FFFF 设置回收帐号,需要验证注册问题与答案信息。><COLOR=clYellow ┃>\
<COLOR=clYellow │><COLOR=$00FFF8 收><COLOR=clYellow │┃><COLOR=clAqua 说明4:><COLOR=$C0DCC0 独立设置领取码,新区凭此码在本处领取充值。><COLOR=clYellow ┃>\
<COLOR=clYellow │><COLOR=$00F5FF ☆><COLOR=clYellow │┃>        <COLOR=$0000FF ★★★独家帐号回收系统★★★>         <COLOR=clYellow ┃>\
<COLOR=clYellow ╰─╯◥━━━━━━━━━━━━━━━━━━━━━━━━━◤>\ 
\
<注册名字  /@Mir2000_注册名字>:<$STR(S$帐号回收名字)>\
<注册生日  /@Mir2000_注册生日>:<$STR(S$帐号回收生日)>\
<注册问题1/@Mir2000_注册问题1>:<$STR(S$帐号回收问题1)>\
<注册答案1/@Mir2000_注册答案1>:<$STR(S$帐号回收答案1)>\
<注册问题2/@Mir2000_注册问题2>:<$STR(S$帐号回收问题2)>\
<注册答案2/@Mir2000_注册答案2>:<$STR(S$帐号回收答案2)>\
<设置领取码/@Mir2000_设置领取码>:<$STR(S$帐号回收领取码)>\
\
<确认回收充值/@Mir2000_确认回收充值>        <领取回收充值/@Mir2000_领取回收充值>\
\
<COLOR=clAqua 帐号回收价:><$STR(S19)><COLOR=$0000FF 元><COLOR=clAqua ,请先处理掉其他资财再回收!!!>

;———————————————————————
[@Mir2000_注册名字]
#IF
CHECKLEVELEX > 0
#ACT
QUERYVALUE 20 0 10 @Mir2000_注册名字A 输入注册时填写的名字(非帐号):
BREAK
[@Mir2000_注册名字A]
#IF
SMALL <$LENGTH[$STR(S20)]> 1
#ACT
MESSAGEBOX [提示]:\ \输入错误,请重新输入!
BREAK
#ELSEACT
MOV S$帐号回收名字 <$STR(S20)>
GOTO @Mir2000_帐号回收NPC
BREAK
[@Mir2000_注册生日]
#IF
CHECKLEVELEX > 0
#ACT
QUERYVALUE 20 0 10 @Mir2000_注册生日A 输入注册时填写的生日:
BREAK
[@Mir2000_注册生日A]
#IF
SMALL <$LENGTH[$STR(S20)]> 1
#ACT
MESSAGEBOX [提示]:\ \输入错误,请重新输入!
BREAK
#ELSEACT
MOV S$帐号回收生日 <$STR(S20)>
GOTO @Mir2000_帐号回收NPC
BREAK
[@Mir2000_注册问题1]
#IF
CHECKLEVELEX > 0
#ACT
QUERYVALUE 20 0 20 @Mir2000_注册问题1A 输入注册时填写的问题1:
BREAK
[@Mir2000_注册问题1A]
#IF
SMALL <$LENGTH[$STR(S20)]> 1
#ACT
MESSAGEBOX [提示]:\ \输入错误,请重新输入!
BREAK
#ELSEACT
MOV S$帐号回收问题1 <$STR(S20)>
GOTO @Mir2000_帐号回收NPC
BREAK
[@Mir2000_注册答案1]
#IF
CHECKLEVELEX > 0
#ACT
QUERYVALUE 20 0 10 @Mir2000_注册答案1A 输入注册时填写的答案1:
BREAK
[@Mir2000_注册答案1A]
#IF
SMALL <$LENGTH[$STR(S20)]> 1
#ACT
MESSAGEBOX [提示]:\ \输入错误,请重新输入!
BREAK
#ELSEACT
MOV S$帐号回收答案1 <$STR(S20)>
GOTO @Mir2000_帐号回收NPC
BREAK
[@Mir2000_注册问题2]
#IF
CHECKLEVELEX > 0
#ACT
QUERYVALUE 20 0 20 @Mir2000_注册问题2A 输入注册时填写的问题2:
BREAK
[@Mir2000_注册问题2A]
#IF
SMALL <$LENGTH[$STR(S20)]> 1
#ACT
MESSAGEBOX [提示]:\ \输入错误,请重新输入!
BREAK
#ELSEACT
MOV S$帐号回收问题2 <$STR(S20)>
GOTO @Mir2000_帐号回收NPC
BREAK
[@Mir2000_注册答案2]
#IF
CHECKLEVELEX > 0
#ACT
QUERYVALUE 20 0 10 @Mir2000_注册答案2A 输入注册时填写的答案2:
BREAK
[@Mir2000_注册答案2A]
#IF
SMALL <$LENGTH[$STR(S20)]> 1
#ACT
MESSAGEBOX [提示]:\ \输入错误,请重新输入!
BREAK
#ELSEACT
MOV S$帐号回收答案2 <$STR(S20)>
GOTO @Mir2000_帐号回收NPC
BREAK
[@Mir2000_设置领取码]
#IF
CHECKLEVELEX > 0
#ACT
QUERYVALUE 20 0 20 @Mir2000_设置领取码A 请设置回收帐号领取码,必须同台电脑才能在新区领出!
BREAK
[@Mir2000_设置领取码A]
#IF
SMALL <$LENGTH[$STR(S20)]> 1
#ACT
MESSAGEBOX [提示]:\ \输入错误,请重新输入!
BREAK
#ELSEACT
MOV S$帐号回收领取码 <$STR(S20)>
GOTO @Mir2000_帐号回收NPC
MESSAGEBOX [提示]:\ \输入的领取码为【<$STR(S20)>】,请牢记!!!
BREAK
;———————————————————————
[@Mir2000_确认回收充值]
#IF
CHECK$(帐号回收充值变量) < $(帐号回收最低充值)
#ACT
MESSAGEBOX [提示]:\ \你在本服的充值低于[$(帐号回收最低充值)积分],不能回收帐号,
BREAK

#IF
CHECKLEVELEX < $(帐号回收最低等级)
#ACT
MESSAGEBOX [提示]:\ \你的等级低于[$(帐号回收最低等级)级],不能回收帐号,
BREAK

#IF
CHECKLEVELEX > 0
#ACT
MOV S20
INI_READ_STRING ..\..\..\..\Mir2000_跨服数据\Mir2000_帐号回收\Mir2000_帐号回收数据.ini Mir2000_帐号回收数据 <$HWID> S20
#IF
EQUAL S20
#ACT
QUERYVALUE 2 2 2 @Mir2000_确认回收充值A 注册名字 :<$STR(S$帐号回收名字)>\注册生日 :<$STR(S$帐号回收生日)>\注册问题1:<$STR(S$帐号回收问题1)>\注册答案1:<$STR(S$帐号回收答案1)>\注册问题2:<$STR(S$帐号回收问题2)>\注册答案2:<$STR(S$帐号回收答案2)>\充值领取码:<$STR(S$帐号回收领取码)>\
#ELSEACT
MESSAGEBOX [提示]:\ \该电脑有帐号回收金额没有领取,请先领取了再回收。
BREAK

[@Mir2000_确认回收充值A]
#IF
CHECKLEVELEX > 0
#ACT
QUERYUSERINFO UserName S21
QUERYUSERINFO BirthDay S22
QUERYUSERINFO Quiz S23
QUERYUSERINFO Answer S24
QUERYUSERINFO Quiz2 S25
QUERYUSERINFO Answer2 S26
DELAYGOTO 100 @Mir2000_确认回收检查
MESSAGEBOX [提示]:\ \正在效验信息,请稍等。。。
BREAK

[@Mir2000_确认回收检查]
#IF
EQUAL S21 <$STR(S$帐号回收名字)>
EQUAL S22 <$STR(S$帐号回收生日)>
EQUAL S23 <$STR(S$帐号回收问题1)>
EQUAL S24 <$STR(S$帐号回收答案1)>
EQUAL S25 <$STR(S$帐号回收问题2)>
EQUAL S26 <$STR(S$帐号回收答案2)>
#ACT
MOV S21 <$SERVERNAME>
FillText S21 40
MOV S22 <$YEAR>年<$MONTH>月<$DAY>日
FillText S22 14
MOV S23 <$USERNAME>
FillText S23 14
INI_WRITE_STRING ..\..\..\..\Mir2000_跨服数据\Mir2000_帐号回收\Mir2000_帐号回收数据.ini Mir2000_帐号回收数据 <$HWID> <$STR(S$帐号回收领取码)>|<$STR(N$帐号回收金额)>
INSERTLINE ..\..\..\..\Mir2000_跨服数据\Mir2000_帐号回收\Mir2000_帐号回收记录.ini 0 <$STR(S21)>|<$STR(S22)>|<$STR(S23)>|<$STR(N$帐号回收金额)>元
MESSAGEBOX [提示]:\ \回收成功,本帐号已清理完成。\ \回收充值金额[<$STR(N$帐号回收金额)>元]。\ \请在回收电脑、凭[<$STR(S$帐号回收领取码)>]获得充值。
SET [19] 1
KICK
BREAK

[@Mir2000_领取回收充值]
#IF
CHECKLEVELEX > 0
#ACT
QUERYVALUE 20 0 20 @Mir2000_领取回收充值A 输入回收时设置的领取码,获得回收充值:
BREAK

[@Mir2000_领取回收充值A]
#IF
SMALL <$LENGTH[$STR(S20)]> 1
#ACT
MESSAGEBOX [提示]:\ \输入错误,请重新输入!
BREAK
#ELSEACT
MOV S21
MOV S22
MOV S23
INI_READ_STRING ..\..\..\..\Mir2000_跨服数据\Mir2000_帐号回收\Mir2000_帐号回收数据.ini Mir2000_帐号回收数据 <$HWID> S21
SPLIT <$STR(S21)> | S21
#IF
EQUAL S21
#ACT
MESSAGEBOX [提示]:\ \没有该领取码,或者回收与领取未在同一台电脑上。
BREAK
#IF
EQUAL S20 <$STR(S21)>
#ACT
MOV P1 <$STR(S22)>
MOV P2 <$STR(S22)>
MUL P1 $(帐号回收充值比列)
MUL P2 $(帐号回收充值元宝)
$(帐号回收充值变量) + <$STR(P1)>
GAMEGOLD + <$STR(P2)>
DELETEINI ..\..\..\..\Mir2000_跨服数据\Mir2000_帐号回收\Mir2000_帐号回收数据.ini Mir2000_帐号回收数据 <$HWID>
MESSAGEBOX [提示]:\ \恭喜领取帐号回收充值[<$STR(S22)>元]成功!
SENDMSG 0 恭喜【%s】,成功领取帐号回收充值[<$STR(S22)>元],获得充值积分[<$STR(P1)>点]、元宝[<$STR(P2)>个]!!!
BREAK

[@Mir2000_帐号回收常量记载]
#CALL [\Mir2000_帐号回收\Mir2000_帐号回收常量.ini] @Mir2000_帐号回收常量
BREAK
}

打击盗版支持正版游戏,任何组织或个人未经同意,不得使用和传播盗版游戏.
免责声明:本站所有软件均来源网友提供.仅作为学习交流使用.严禁用于商业用途.请务必下载后24小时内删除.
由此产生不良后果和法律责任与本站无关,如果侵犯了您的版权,请来信告知 260027402@qq.com 本站将及时更正和删除.
传奇大学 » LEG/BLUE/GOB引擎账号回收系统脚本