欢迎登录八尾狐交易平台!
帮助中心   |    曝光台

八尾狐

热门搜索: 单职业    沉默    仙剑    复古    商业    品牌    打金   

传奇烈焰之城自动担保交易系统脚本

  • 时间:2020-01-30 20:07 编辑:八尾狐 来源:八尾狐 阅读:415
  • 扫一扫,手机访问
摘要:烈焰之城自动担保交易系统,欢迎使用游戏帐号自助交易系统,在这里您可以【出售】自己帐号,或购买其他帐号,上架帐号时需填写/验证密保生日、问题、答案1分钟内系统处理完毕,整个交易过程中,接收灵符成功后需要扣除“10%”担保手续费。

烈焰之城自动担保交易系统,欢迎使用游戏帐号自助交易系统,在这里您可以【出售】自己帐号,或购买其他帐号,上架帐号时需填写/验证密保生日、问题、答案1分钟内系统处理完毕,整个交易过程中,接收灵符成功后需要扣除“10%”担保手续费。

(@@InPutString @@InPutInteger)

 

[@main]

 

 

 

#IF

#ACT

mov S$生日变量 <$BIRTHDAT>

ANSIREPLACETEXT <$STR(S$生日变量)> / -

ANSIREPLACETEXT <$STR(S$生日变量)> / -

MOV T44 <$STR(S$生日变量)>

MOV T45 <$QUIZ1>

MOV T36 <$ANSWER1>

MOV T37 <$QUIZ2>

MOV T48 <$ANSWER2>

 

 

#IF

#ACT

MOV S20 

MOV S21 

MOV S22 

MOV S23 

MOV S24 

MOV S25 

MOV N26 

CloseBigDialogBox

OPENMERCHANTBIGDLG 53 592 1 0 0 20 1 423 5

MOV S$账号交易账号 <$USERID> 

MOV S$账号交易角色 <$USERNAME>

MOV S$账号交易元宝 <$GAMEGOLD>

MOV S$账号交易人民币 <$GAMEPOINT>

MOV S$账号交易遮天币 <$GameGlory>

MOV S$账号交易充值数 <$GAMEDIAMOND>

 

 

SetStringBlank <$STR(S$账号交易账号)> 16 1

SetStringBlank <$STR(S$账号交易角色)> 16 1

SetStringBlank <$STR(S$账号交易元宝)> 16 1

SetStringBlank <$STR(S$账号交易人民币)> 16 1

SetStringBlank <$STR(S$账号交易遮天币)> 16 1

SetStringBlank <$STR(S$账号交易充值数)> 16 1

 

#SAY

    

              <《烈焰之城自动担保交易系统》/FCOLOR=249>  

<PlayImg:10:304:1:200:460:-30:0/@exit>      

<   /FCOLOR=242>  <出售列表/@出售列表>         <领取出售货款/@领取货款>

 

<   /FCOLOR=242><欢迎使用游戏帐号自助交易系统,在这里您可以/FCOLOR=250><【出售】/FCOLOR=70><自己帐号,或/FCOLOR=250><【购买】/FCOLOR=253><其他帐号/FCOLOR=250>

<   /FCOLOR=242><上架帐号时需填写/FCOLOR=250><验证密保生日、问题、答案/FCOLOR=242><,1分钟内系统处理完毕。/FCOLOR=250>

<   /FCOLOR=242><购买帐号前,您可以在帐号交易处查看/FCOLOR=250><离线人物/FCOLOR=22><的装备、货币等信息。/FCOLOR=250>

<   /FCOLOR=242><_______________________________________________________________________________/FCOLOR=40>

 

<   /FCOLOR=242><以下是您的帐号信息,出售后将以/FCOLOR=125><“灵符/FCOLOR=22><的形式发放至您的/FCOLOR=125><“接收帐号”/FCOLOR=22><中,/FCOLOR=125>

<   /FCOLOR=242><整个交易过程中,接收灵符成功后需要扣除“10%”担保手续费/FCOLOR=125>

 

<   /FCOLOR=242><账 号/FCOLOR=242}> {<$STR(S$账号交易账号)>/FCOLOR=70}

<   /FCOLOR=242><角 色/FCOLOR=242}> {<$STR(S$账号交易角色)>/FCOLOR=70}

<   /FCOLOR=242><元 宝/FCOLOR=242}> {<$STR(S$账号交易元宝)>/FCOLOR=70}

<   /FCOLOR=242><灵 符/FCOLOR=242}> {<$STR(S$账号交易人民币)>/FCOLOR=70}

<   /FCOLOR=242><烈焰币/FCOLOR=242}> {<$STR(S$账号交易充值数)>/FCOLOR=70}

 

 

<   /FCOLOR=242><开始出售账号/@开始出售账号>     <查询所购买的帐号,只能查询最近购买的一个帐号/@查询出售账号>  

<   /FCOLOR=242><开始下架账号|254#接受账号格式:^_^250#烈焰之城01区zha123/@账号交易下架111>    <合区后账号自动下架!/FCOLOR=125>

 

 

 

[@开始出售账号]

#if

CHECKLEVELEX < 65

#act

messagebox <等级达到65级才能上架账号!!>

break

 

#IF 

#act

CloseBigDialogBox

OPENMERCHANTBIGDLG 53 592 1 0 0 20 1 423 5

#say

           

<   /FCOLOR=242><出售账号/@main>  <出售列表/@出售列表>  <领取出售货款/@领取货款>

 

<   /FCOLOR=242><请输入准确的密码保护问题核对通过后才可出售角色>

 

<   /FCOLOR=242><[点击输入您的账号生日 ]|250#生日请严格按照右边的格式输入!!^-^253#如果不按格式输入!后果自负{FCOLOR=151}/@@InPutString20(输入生日请严格按照此格式:1999-1-1)>:<$STR(S20)>    输入格式:1999-1-1 

<   /FCOLOR=242><[点击输入您的密码问题1]|151#请填写您的密码问题1^-^{FCOLOR=151}/@@InPutString21>:<$STR(S21)>

<   /FCOLOR=242><[点击输入您的密码回答1]|151#请填写您的密码回答1^-^{FCOLOR=151}/@@InPutString22>:<$STR(S22)> 

<   /FCOLOR=242><[点击输入您的密码问题2]|151#请填写您的密码问题2^-^{FCOLOR=151}/@@InPutString23>:<$STR(S23)>

<   /FCOLOR=242><[点击输入您的密码回答2]|151#请填写您的密码回答2^-^{FCOLOR=151}/@@InPutString24>:<$STR(S24)>

<   /FCOLOR=242><[点击输入您的接收账号 ]|151#请填写您的接收账号^-^250#账号只能是当前分区的其他账号,^250#请截图保存,以免忘记。{FCOLOR=151}/@@InPutString25>:<$STR(S25)>

<   /FCOLOR=242><[点击输入您的出售价格 ]|151#请填写您的出售价格^-^250#请输入100-99999之间的灵符点数,^-^250#至少出售100W灵符点^-^250#至少出售100W灵符点^-^250#最低卖号价格为100W灵符点{FCOLOR=151}/@@InPutInteger26>:<$STR(N26)>         

 

                 <确定出售角色|154#请输入准确的密码保护问题核对通过后才可出售/@开始出售账号555>

;<$str(T44)>  <$str(T45)>  <$str(T36)>  <$str(T37)>    <$str(T48)>

 

 

[@InPutString20]

#IF

NOT EQUAL S20 <$str(T44)>

#ACT

Messagebox 输入的密保生日错误,请重新输入....

MOV S20 

break

#ELSEACT

goto @开始出售账号

break

 

 

 

#IF

CHECKTEXTLIST ..QuestDiary自动担保系统\密保年份.txt <$STR(S$密保年份)>

CHECKTEXTLIST ..QuestDiary自动担保系统\密保月份.txt <$STR(S$密保月份)>

CHECKTEXTLIST ..QuestDiary自动担保系统\密保日期.txt <$STR(S$密保日期)>

#ACT

GetStringPos ..QuestDiary自动担保系统\月份日期1.txt <$STR(S$密保月份)>

INC N0 1

GetListString ..QuestDiary自动担保系统\月份日期1.txt <$STR(N0)> S$最高日期

MOV N$检测日期 <$STR(S$密保日期)>

#ELSEACT

messagebox 请确认生日填写正确!年份在1960-2020年之间!月份在1-12月之间!日期在1-30之间!

break

 

#IF

LARGE N$检测日期 <$STR(S$最高日期)>

#ACT

MOV S20

messagebox 日期填写错误,你填写的<$STR(S$密保年份)>年<$STR(S$密保月份)>月有<$STR(N$检测日期)>天?

#ELSEACT

goto @开始出售账号

break

 

[@InPutString21]

#IF

NOT EQUAL S21

#ACT

goto @开始出售账号

#ELSEACT

Messagebox 输入的错误,请重新输入....

MOV S21 

 

 

 

[@InPutString22]

#IF

NOT EQUAL S22

#ACT

goto @开始出售账号

#ELSEACT

Messagebox 输入的错误,请重新输入....

MOV S22 

 

 

 

 

[@InPutString23]

#IF

NOT EQUAL S23

#ACT

goto @开始出售账号

#ELSEACT

Messagebox 输入的错误,请重新输入....

MOV S23 

 

 

 

[@InPutString24]

#IF

NOT EQUAL S24

#ACT

goto @开始出售账号

#ELSEACT

Messagebox 输入的错误,请重新输入....

MOV S24 

 

 

[@InPutString25]

#IF

NOT EQUAL S25

#ACT

goto @开始出售账号

#ELSEACT

Messagebox 输入的错误,请重新输入....

MOV S25 

 

 

 

 

[@InPutInteger26]

#IF

#ACT

MOV N$最低出售人民币 1000000

 

 

#IF

NOT SMALL N26 1000000

#ACT

goto @开始出售账号

#ELSEACT

Messagebox 输入的错误,本服担保交易至少出售100W灵符点....

MOV N26 0

 

 

[@开始出售账号555]

#IF

#ACT

MOV S$验证问题1 <$str(S21)>a

MOV S$验证答案1 <$str(S22)>a

MOV S$验证问题2 <$str(S23)>a

MOV S$验证答案2 <$str(S24)>a

 

#OR

NOT EQUAL S20 <$str(T44)>

NOT EQUAL S$验证问题1 <$str(T45)>a

NOT EQUAL S$验证答案1 <$str(T36)>a

NOT EQUAL S$验证问题2 <$str(T37)>a

NOT EQUAL S$验证答案2 <$str(T48)>a

#ACT

Messagebox 请输入完整的密码保护资料!或者有密码保护资料提交错误!\多次输入还是提示错误,请小退后重新尝试!

break

 

 

#IF

EQUAL A888 测试区

#ACT

Messagebox 当前为测试区,不能卖号...

break

 

 

#OR

EQUAL S25 

EQUAL N26 0

#ACT

Messagebox 请输入接收账号和出售的灵符数!

break

 

#IF

NOT INSAFEZONE

#ACT

MESSAGEBOX 请返回安全区再进行操作!

BREAK

 

 

#IF

#ACT

MOV S$担保_帐号 <$SERVERNAME><$USERID>

MOV N$担保_金额 <$STR(N26)>

MOV S$担保_接收 <$STR(S25)>

MESSAGEBOX 确认将您当前帐号角色以<$STR(N26)>个灵符进行出售吗?出售所得将以<灵符>发放至帐号:<$STR(S25)>,请保证该帐号无误!! @确认卖帐号 @取消

 

[@确认卖帐号]

#IF

#ACT

AddTextListEx ........账号交易\<$SERVERNAME>帐号交易列表.txt <$STR(S$担保_帐号)> 0 1

AddTextList ........账号交易\<$SERVERNAME>已售账号列表.txt <$STR(S$担保_帐号)> 

AddTextListEx ..AutoLoadOffline.txt <$USERNAME>##<$USERID> 0

CREATEFILE  ........账号交易\账号数据<$STR(S$担保_帐号)>.txt

ClearNameList ........账号交易\账号数据<$STR(S$担保_帐号)>.txt

AddTextList ........账号交易\账号数据<$STR(S$担保_帐号)>.txt  <$SERVERNAME> 

AddTextList ........账号交易\账号数据<$STR(S$担保_帐号)>.txt  <$USERID>

AddTextList ........账号交易\账号数据<$STR(S$担保_帐号)>.txt  <$USERNAME>

AddTextList ........账号交易\账号数据<$STR(S$担保_帐号)>.txt <$STR(N26)>

AddTextList ........账号交易\账号数据<$STR(S$担保_帐号)>.txt AA<$STR(S25)>

AddTextList ........账号交易\账号数据<$STR(S$担保_帐号)>.txt <$LEVEL>级

AddTextList ........账号交易\账号数据<$STR(S$担保_帐号)>.txt 天赋反射:<$STR(U31)>

AddTextList ........账号交易\账号数据<$STR(S$担保_帐号)>.txt <$GAMEGIRD>

AddTextList ........账号交易\账号数据<$STR(S$担保_帐号)>.txt 天赋穿透:<$STR(U47)>

AddTextList ........账号交易\账号数据<$STR(S$担保_帐号)>.txt <$GAMEGOLD>

AddTextList ........账号交易\账号数据<$STR(S$担保_帐号)>.txt 天赋伤害:<$STR(U48)>

AddTextList ........账号交易\账号数据<$STR(S$担保_帐号)>.txt <$GAMEPOINT>

AddTextList ........账号交易\账号数据<$STR(S$担保_帐号)>.txt <$X>

AddTextList ........账号交易\账号数据<$STR(S$担保_帐号)>.txt <$Y>

AddTextList ........账号交易\账号数据<$STR(S$担保_帐号)>.txt 天赋暴击:<$STR(U8)>

GetRandomText ........账号交易\<$SERVERNAME>账号出售数量.txt N$全区卖号数量 0 1

INC N$全区卖号数量 1

ClearNameList ........账号交易\<$SERVERNAME>账号出售数量.txt 1

AddTextListEx ........账号交易\<$SERVERNAME>账号出售数量.txt <$STR(N$全区卖号数量)> 0 1

MESSAGEBOX 帐号上架成功,此帐号卖出或下架前无法继续登录!卖出前可联系担保客服进行下架!

AddTextListEx  ..QuestDiary自动担保系统\卖号日志记录.txt   【<$USERID>】角色【<$USERNAME>】在<$DATETIME>提交卖号

DELAYGOTO 20 @离线

break

 

 

 

[@离线]

#ACT

map zhjy 

OFFLINEPLAY 1000

break

 

 

 

 

 

[@查询出售账号]

 

 

#IF

NOT equal T49

#ACT

MESSAGEBOX 查询成功,请重新登录查收您购买的帐号[<$STR(T49)>],请记录下来!!!

#ELSEACT

MESSAGEBOX 你还没购买过帐号呢!!!

 

[@账号交易下架111]

#IF 

#act

CloseBigDialogBox

#say

<    /FCOLOR=242><出售账号/@main>  <出售列表/@出售列表>  <领取出售货款/@领取货款>

 

<   /FCOLOR=242><以下为账号下架,请输入区名+账户(合区后自动下架账号)/FCOLOR=242>

<   /FCOLOR=242><该账号为上架出售的账号,非接收货款的账号)/FCOLOR=242>

<   /FCOLOR=242>{正确格式:区名+账号,例:<$SERVERNAME>zha123:区名+账号/FCOLOR=242}

                    <我要下架账号|254#接受账号格式:^ ^250#烈焰之城首战22号1区123/@@InPutString17>

 

 

[@InPutString17]

#IF

CHECKTextList ........账号交易\<$SERVERNAME>帐号交易列表.txt <$STR(S17)>

#ACT

GetRandomText ........账号交易\<$SERVERNAME>账号出售数量.txt N$全区卖号数量 0 1

Dec N$全区卖号数量 1

ClearNameList ........账号交易\<$SERVERNAME>账号出售数量.txt 1

AddTextListEx ........账号交易\<$SERVERNAME>账号出售数量.txt <$STR(N$全区卖号数量)> 0 1

DelTextList ........账号交易\<$SERVERNAME>帐号交易列表.txt <$STR(S17)>

DelTextList ........账号交易\<$SERVERNAME>已售账号列表.txt <$STR(S17)>

AddTextListEx  ..QuestDiary自动担保系统\卖号日志记录.txt   【<$USERID>】角色【<$USERNAME>】在<$DATETIME>提交<$STR(S17)>下架卖号

Messagebox 【<$STR(S17)>】已经成功下架,可以上号游戏了

Goto @main

#ELSEACT

Messagebox 输入的出售账号错误,请重新输入....

break

 

 

[@领取货款]

#IF

CHECKTextList ........账号交易\<$SERVERNAME>待取款变量.txt <$SERVERNAME>AA<$USERID>

#ACT

GetStringPos ........账号交易\<$SERVERNAME>待取款变量.txt <$SERVERNAME>AA<$USERID>

INC N0 1

GetListString ........账号交易\<$SERVERNAME>待取款变量.txt <$STR(N0)> <$STR(S$我的金额)>

MOV N$我的金额 <$STR(S$我的金额)>

#ELSEACT

MOV N$我的金额 0

 

 

#IF

Large N$我的金额 0

#ACT

MUL N$我的金额 9

DIV N$我的金额 10

GAMEPOINT + <$STR(N$我的金额)>

MESSAGEBOX 成功领取<$STR(N$我的金额)>灵符!

DelTextList ........账号交易\<$SERVERNAME>待取款变量.txt <$SERVERNAME>AA<$USERID>

break

#ELSEACT

MESSAGEBOX 没有可领取的人民币!

BREAK

 

 

 

[@出售列表]

#IF

#ACT

GetRandomText ........账号交易\<$SERVERNAME>账号出售数量.txt N$全区卖号数量 0 1

 

#IF

SMALL N$全区卖号数量 1

#ACT

MESSAGEBOX 暂时没有正在出售的帐号!

break

 

 

#IF

#ACT

MOV N$编号0 0

MOV N$编号1 1

MOV N$编号2 2

MOV N$编号3 3

MOV N$编号4 4

MOV N$编号5 5

MOV N$编号6 6

MOV N$编号7 7

MOV N$出售列表页数 1

Goto @出售列表2

 

[@出售列表2]

#IF

#ACT

MOV S$记录0

MOV S$记录1

MOV S$记录2

MOV S$记录3

MOV S$记录4

MOV S$记录5

MOV S$记录6

MOV S$记录7

 

#IF

#ACT

GetListString ........账号交易\<$SERVERNAME>帐号交易列表.txt <$STR(N$编号0)> S$记录0 

GetListString ........账号交易\<$SERVERNAME>帐号交易列表.txt <$STR(N$编号1)> S$记录1 

GetListString ........账号交易\<$SERVERNAME>帐号交易列表.txt <$STR(N$编号2)> S$记录2 

GetListString ........账号交易\<$SERVERNAME>帐号交易列表.txt <$STR(N$编号3)> S$记录3 

GetListString ........账号交易\<$SERVERNAME>帐号交易列表.txt <$STR(N$编号4)> S$记录4 

GetListString ........账号交易\<$SERVERNAME>帐号交易列表.txt <$STR(N$编号5)> S$记录5 

GetListString ........账号交易\<$SERVERNAME>帐号交易列表.txt <$STR(N$编号6)> S$记录6 

GetListString ........账号交易\<$SERVERNAME>帐号交易列表.txt <$STR(N$编号7)> S$记录7 

 

#IF

NOT EQUAL S$记录0  

#ACT

GetListString ........账号交易\账号数据<$STR(S$记录0)>.txt 0 S$卖家区名0

GetListString ........账号交易\账号数据<$STR(S$记录0)>.txt 1 S$卖家账号0

GetListString ........账号交易\账号数据<$STR(S$记录0)>.txt 2 S$卖家角色0

GetListString ........账号交易\账号数据<$STR(S$记录0)>.txt 3 S$卖家价格0

GetListString ........账号交易\账号数据<$STR(S$记录0)>.txt 4 S$卖家接收0

GetListString ........账号交易\账号数据<$STR(S$记录0)>.txt 5 S$卖家等级0

GetListString ........账号交易\账号数据<$STR(S$记录0)>.txt 6 S$卖家幸运0

GetListString ........账号交易\账号数据<$STR(S$记录0)>.txt 7 S$卖家抽奖0

GetListString ........账号交易\账号数据<$STR(S$记录0)>.txt 8 S$卖家切割0

GetListString ........账号交易\账号数据<$STR(S$记录0)>.txt 9 S$卖家元宝0

GetListString ........账号交易\账号数据<$STR(S$记录0)>.txt 10 S$卖家遮天币0

GetListString ........账号交易\账号数据<$STR(S$记录0)>.txt 11 S$卖家人民币0

GetListString ........账号交易\账号数据<$STR(S$记录0)>.txt 12 S$卖家坐X0

GetListString ........账号交易\账号数据<$STR(S$记录0)>.txt 13 S$卖家坐Y0

GetListString ........账号交易\账号数据<$STR(S$记录0)>.txt 14 S$卖家暴击0

#IF

NOT EQUAL S$记录1  

#ACT

GetListString ........账号交易\账号数据<$STR(S$记录1)>.txt 0 S$卖家区名1

GetListString ........账号交易\账号数据<$STR(S$记录1)>.txt 1 S$卖家账号1

GetListString ........账号交易\账号数据<$STR(S$记录1)>.txt 2 S$卖家角色1

GetListString ........账号交易\账号数据<$STR(S$记录1)>.txt 3 S$卖家价格1

GetListString ........账号交易\账号数据<$STR(S$记录1)>.txt 4 S$卖家接收1

GetListString ........账号交易\账号数据<$STR(S$记录1)>.txt 5 S$卖家等级1

GetListString ........账号交易\账号数据<$STR(S$记录1)>.txt 6 S$卖家幸运1

GetListString ........账号交易\账号数据<$STR(S$记录1)>.txt 7 S$卖家抽奖1

GetListString ........账号交易\账号数据<$STR(S$记录1)>.txt 8 S$卖家切割1

GetListString ........账号交易\账号数据<$STR(S$记录1)>.txt 9 S$卖家元宝1

GetListString ........账号交易\账号数据<$STR(S$记录1)>.txt 10 S$卖家遮天币1

GetListString ........账号交易\账号数据<$STR(S$记录1)>.txt 11 S$卖家人民币1

GetListString ........账号交易\账号数据<$STR(S$记录1)>.txt 12 S$卖家坐X1

GetListString ........账号交易\账号数据<$STR(S$记录1)>.txt 13 S$卖家坐Y1

GetListString ........账号交易\账号数据<$STR(S$记录0)>.txt 14 S$卖家暴击1

#IF

NOT EQUAL S$记录2  

#ACT

GetListString ........账号交易\账号数据<$STR(S$记录2)>.txt 0 S$卖家区名2

GetListString ........账号交易\账号数据<$STR(S$记录2)>.txt 1 S$卖家账号2

GetListString ........账号交易\账号数据<$STR(S$记录2)>.txt 2 S$卖家角色2

GetListString ........账号交易\账号数据<$STR(S$记录2)>.txt 3 S$卖家价格2

GetListString ........账号交易\账号数据<$STR(S$记录2)>.txt 4 S$卖家接收2

GetListString ........账号交易\账号数据<$STR(S$记录2)>.txt 5 S$卖家等级2

GetListString ........账号交易\账号数据<$STR(S$记录2)>.txt 6 S$卖家幸运2

GetListString ........账号交易\账号数据<$STR(S$记录2)>.txt 7 S$卖家抽奖2

GetListString ........账号交易\账号数据<$STR(S$记录2)>.txt 8 S$卖家切割2

GetListString ........账号交易\账号数据<$STR(S$记录2)>.txt 9 S$卖家元宝2

GetListString ........账号交易\账号数据<$STR(S$记录2)>.txt 10 S$卖家遮天币2

GetListString ........账号交易\账号数据<$STR(S$记录2)>.txt 11 S$卖家人民币2

GetListString ........账号交易\账号数据<$STR(S$记录2)>.txt 12 S$卖家坐X2

GetListString ........账号交易\账号数据<$STR(S$记录2)>.txt 13 S$卖家坐Y2

GetListString ........账号交易\账号数据<$STR(S$记录0)>.txt 14 S$卖家暴击2

 

#IF

NOT EQUAL S$记录3

#ACT

GetListString ........账号交易\账号数据<$STR(S$记录3)>.txt 0 S$卖家区名3

GetListString ........账号交易\账号数据<$STR(S$记录3)>.txt 1 S$卖家账号3

GetListString ........账号交易\账号数据<$STR(S$记录3)>.txt 2 S$卖家角色3

GetListString ........账号交易\账号数据<$STR(S$记录3)>.txt 3 S$卖家价格3

GetListString ........账号交易\账号数据<$STR(S$记录3)>.txt 4 S$卖家接收3

GetListString ........账号交易\账号数据<$STR(S$记录3)>.txt 5 S$卖家等级3

GetListString ........账号交易\账号数据<$STR(S$记录3)>.txt 6 S$卖家幸运3

GetListString ........账号交易\账号数据<$STR(S$记录3)>.txt 7 S$卖家抽奖3

GetListString ........账号交易\账号数据<$STR(S$记录3)>.txt 8 S$卖家切割3

GetListString ........账号交易\账号数据<$STR(S$记录3)>.txt 9 S$卖家元宝3

GetListString ........账号交易\账号数据<$STR(S$记录3)>.txt 10 S$卖家遮天币3

GetListString ........账号交易\账号数据<$STR(S$记录3)>.txt 11 S$卖家人民币3

GetListString ........账号交易\账号数据<$STR(S$记录3)>.txt 12 S$卖家坐X3

GetListString ........账号交易\账号数据<$STR(S$记录3)>.txt 13 S$卖家坐Y3

GetListString ........账号交易\账号数据<$STR(S$记录0)>.txt 14 S$卖家暴击3

#IF

NOT EQUAL S$记录4  

#ACT

GetListString ........账号交易\账号数据<$STR(S$记录4)>.txt 0 S$卖家区名4

GetListString ........账号交易\账号数据<$STR(S$记录4)>.txt 1 S$卖家账号4

GetListString ........账号交易\账号数据<$STR(S$记录4)>.txt 2 S$卖家角色4

GetListString ........账号交易\账号数据<$STR(S$记录4)>.txt 3 S$卖家价格4

GetListString ........账号交易\账号数据<$STR(S$记录4)>.txt 4 S$卖家接收4

GetListString ........账号交易\账号数据<$STR(S$记录4)>.txt 5 S$卖家等级4

GetListString ........账号交易\账号数据<$STR(S$记录4)>.txt 6 S$卖家幸运4

GetListString ........账号交易\账号数据<$STR(S$记录4)>.txt 7 S$卖家抽奖4

GetListString ........账号交易\账号数据<$STR(S$记录4)>.txt 8 S$卖家切割4

GetListString ........账号交易\账号数据<$STR(S$记录4)>.txt 9 S$卖家元宝4

GetListString ........账号交易\账号数据<$STR(S$记录4)>.txt 10 S$卖家遮天币4

GetListString ........账号交易\账号数据<$STR(S$记录4)>.txt 11 S$卖家人民币4

GetListString ........账号交易\账号数据<$STR(S$记录4)>.txt 12 S$卖家坐X4

GetListString ........账号交易\账号数据<$STR(S$记录4)>.txt 13 S$卖家坐Y4

GetListString ........账号交易\账号数据<$STR(S$记录0)>.txt 14 S$卖家暴击4

#IF

NOT EQUAL S$记录5  

#ACT

GetListString ........账号交易\账号数据<$STR(S$记录5)>.txt 0 S$卖家区名5

GetListString ........账号交易\账号数据<$STR(S$记录5)>.txt 1 S$卖家账号5

GetListString ........账号交易\账号数据<$STR(S$记录5)>.txt 2 S$卖家角色5

GetListString ........账号交易\账号数据<$STR(S$记录5)>.txt 3 S$卖家价格5

GetListString ........账号交易\账号数据<$STR(S$记录5)>.txt 4 S$卖家接收5

GetListString ........账号交易\账号数据<$STR(S$记录5)>.txt 5 S$卖家等级5

GetListString ........账号交易\账号数据<$STR(S$记录5)>.txt 6 S$卖家幸运5

GetListString ........账号交易\账号数据<$STR(S$记录5)>.txt 7 S$卖家抽奖5

GetListString ........账号交易\账号数据<$STR(S$记录5)>.txt 8 S$卖家切割5

GetListString ........账号交易\账号数据<$STR(S$记录5)>.txt 9 S$卖家元宝5

GetListString ........账号交易\账号数据<$STR(S$记录5)>.txt 10 S$卖家遮天币5

GetListString ........账号交易\账号数据<$STR(S$记录5)>.txt 11 S$卖家人民币5

GetListString ........账号交易\账号数据<$STR(S$记录5)>.txt 12 S$卖家坐X5

GetListString ........账号交易\账号数据<$STR(S$记录5)>.txt 13 S$卖家坐Y5

GetListString ........账号交易\账号数据<$STR(S$记录0)>.txt 14 S$卖家暴击5

 

#IF

NOT EQUAL S$记录6  

#ACT

GetListString ........账号交易\账号数据<$STR(S$记录6)>.txt 0 S$卖家区名6

GetListString ........账号交易\账号数据<$STR(S$记录6)>.txt 1 S$卖家账号6

GetListString ........账号交易\账号数据<$STR(S$记录6)>.txt 2 S$卖家角色6

GetListString ........账号交易\账号数据<$STR(S$记录6)>.txt 3 S$卖家价格6

GetListString ........账号交易\账号数据<$STR(S$记录6)>.txt 4 S$卖家接收6

GetListString ........账号交易\账号数据<$STR(S$记录6)>.txt 5 S$卖家等级6

GetListString ........账号交易\账号数据<$STR(S$记录6)>.txt 6 S$卖家幸运6

GetListString ........账号交易\账号数据<$STR(S$记录6)>.txt 7 S$卖家抽奖6

GetListString ........账号交易\账号数据<$STR(S$记录6)>.txt 8 S$卖家切割6

GetListString ........账号交易\账号数据<$STR(S$记录6)>.txt 9 S$卖家元宝6

GetListString ........账号交易\账号数据<$STR(S$记录6)>.txt 10 S$卖家遮天币6

GetListString ........账号交易\账号数据<$STR(S$记录6)>.txt 11 S$卖家人民币6

GetListString ........账号交易\账号数据<$STR(S$记录6)>.txt 12 S$卖家坐X6

GetListString ........账号交易\账号数据<$STR(S$记录6)>.txt 13 S$卖家坐Y6

GetListString ........账号交易\账号数据<$STR(S$记录0)>.txt 14 S$卖家暴击6

#IF

NOT EQUAL S$记录7  

#ACT

GetListString ........账号交易\账号数据<$STR(S$记录7)>.txt 0 S$卖家区名7

GetListString ........账号交易\账号数据<$STR(S$记录7)>.txt 1 S$卖家账号7

GetListString ........账号交易\账号数据<$STR(S$记录7)>.txt 2 S$卖家角色7

GetListString ........账号交易\账号数据<$STR(S$记录7)>.txt 3 S$卖家价格7

GetListString ........账号交易\账号数据<$STR(S$记录7)>.txt 4 S$卖家接收7

GetListString ........账号交易\账号数据<$STR(S$记录7)>.txt 5 S$卖家等级7

GetListString ........账号交易\账号数据<$STR(S$记录7)>.txt 6 S$卖家幸运7

GetListString ........账号交易\账号数据<$STR(S$记录7)>.txt 7 S$卖家抽奖7

GetListString ........账号交易\账号数据<$STR(S$记录7)>.txt 8 S$卖家切割7

GetListString ........账号交易\账号数据<$STR(S$记录7)>.txt 9 S$卖家元宝7

GetListString ........账号交易\账号数据<$STR(S$记录7)>.txt 10 S$卖家遮天币7

GetListString ........账号交易\账号数据<$STR(S$记录7)>.txt 11 S$卖家人民币7

GetListString ........账号交易\账号数据<$STR(S$记录7)>.txt 12 S$卖家坐X7

GetListString ........账号交易\账号数据<$STR(S$记录7)>.txt 13 S$卖家坐Y7

GetListString ........账号交易\账号数据<$STR(S$记录0)>.txt 14 S$卖家暴击7

 

 

#IF

#ACT

DelayGoto 10 @去显示担保列表

break

 

[@账号交易飞到玩家]

#IF

#ACT

map zhjy 

 

 

[@账号交易飞玩家]

#IF

#ACT

map zhjy 

 

 

[@账号交易购买0]

#IF

EQUAL S$卖家账号0

#ACT

MESSAGEBOX 暂时无出售的账号!

break

#ELSEACT

MOV S$购买的区名 <$STR(S$卖家区名0)>

MOV S$购买的账号 <$STR(S$卖家账号0)>

MOV S$购买的角色 <$STR(S$卖家角色0)>

MOV S$购买的价格 <$STR(S$卖家价格0)>

MOV S$购买的接收 <$STR(S$卖家接收0)>

MOV S$显示购买的区名 <$STR(S$卖家区名0)>

MOV S$显示购买的价格 <$STR(S$卖家价格0)>人民币

SetStringBlank S$显示购买的区名 20 1

SetStringBlank S$显示购买的价格 20 1

goto @账号交易购买

 

[@账号交易购买1]

#IF

EQUAL S$卖家账号1

#ACT

MESSAGEBOX 暂时无出售的账号!

break

#ELSEACT

MOV S$购买的区名 <$STR(S$卖家区名1)>

MOV S$购买的账号 <$STR(S$卖家账号1)>

MOV S$购买的角色 <$STR(S$卖家角色1)>

MOV S$购买的价格 <$STR(S$卖家价格1)>

MOV S$购买的接收 <$STR(S$卖家接收1)>

MOV S$显示购买的区名 <$STR(S$卖家区名1)>

MOV S$显示购买的价格 <$STR(S$卖家价格1)>人民币

SetStringBlank S$显示购买的区名 20 1

SetStringBlank S$显示购买的价格 20 1

goto @账号交易购买

 

[@账号交易购买2]

#IF

EQUAL S$卖家账号2

#ACT

MESSAGEBOX 暂时无出售的账号!

break

#ELSEACT

MOV S$购买的区名 <$STR(S$卖家区名2)>

MOV S$购买的账号 <$STR(S$卖家账号2)>

MOV S$购买的角色 <$STR(S$卖家角色2)>

MOV S$购买的价格 <$STR(S$卖家价格2)>

MOV S$购买的接收 <$STR(S$卖家接收2)>

MOV S$显示购买的区名 <$STR(S$卖家区名2)>

MOV S$显示购买的价格 <$STR(S$卖家价格2)>人民币

SetStringBlank S$显示购买的区名 20 1

SetStringBlank S$显示购买的价格 20 1

goto @账号交易购买

 

[@账号交易购买3]

#IF

EQUAL S$卖家账号3

#ACT

MESSAGEBOX 暂时无出售的账号!

break

#ELSEACT

MOV S$购买的区名 <$STR(S$卖家区名3)>

MOV S$购买的账号 <$STR(S$卖家账号3)>

MOV S$购买的角色 <$STR(S$卖家角色3)>

MOV S$购买的价格 <$STR(S$卖家价格3)>

MOV S$购买的接收 <$STR(S$卖家接收3)>

MOV S$显示购买的区名 <$STR(S$卖家区名3)>

MOV S$显示购买的价格 <$STR(S$卖家价格3)>人民币

SetStringBlank S$显示购买的区名 20 1

SetStringBlank S$显示购买的价格 20 1

goto @账号交易购买

 

[@账号交易购买4]

#IF

EQUAL S$卖家账号4

#ACT

MESSAGEBOX 暂时无出售的账号!

break

#ELSEACT

MOV S$购买的区名 <$STR(S$卖家区名4)>

MOV S$购买的账号 <$STR(S$卖家账号4)>

MOV S$购买的角色 <$STR(S$卖家角色4)>

MOV S$购买的价格 <$STR(S$卖家价格4)>

MOV S$购买的接收 <$STR(S$卖家接收4)>

MOV S$显示购买的区名 <$STR(S$卖家区名4)>

MOV S$显示购买的价格 <$STR(S$卖家价格4)>人民币

SetStringBlank S$显示购买的区名 20 1

SetStringBlank S$显示购买的价格 20 1

goto @账号交易购买

 

[@账号交易购买5]

#IF

EQUAL S$卖家账号5

#ACT

MESSAGEBOX 暂时无出售的账号!

break

#ELSEACT

MOV S$购买的区名 <$STR(S$卖家区名5)>

MOV S$购买的账号 <$STR(S$卖家账号5)>

MOV S$购买的角色 <$STR(S$卖家角色5)>

MOV S$购买的价格 <$STR(S$卖家价格5)>

MOV S$购买的接收 <$STR(S$卖家接收5)>

MOV S$显示购买的区名 <$STR(S$卖家区名5)>

MOV S$显示购买的价格 <$STR(S$卖家价格5)>人民币

SetStringBlank S$显示购买的区名 20 1

SetStringBlank S$显示购买的价格 20 1

goto @账号交易购买

 

[@账号交易购买6]

#IF

EQUAL S$卖家账号6

#ACT

MESSAGEBOX 暂时无出售的账号!

break

#ELSEACT

MOV S$购买的区名 <$STR(S$卖家区名6)>

MOV S$购买的账号 <$STR(S$卖家账号6)>

MOV S$购买的角色 <$STR(S$卖家角色6)>

MOV S$购买的价格 <$STR(S$卖家价格6)>

MOV S$购买的接收 <$STR(S$卖家接收6)>

MOV S$显示购买的区名 <$STR(S$卖家区名6)>

MOV S$显示购买的价格 <$STR(S$卖家价格6)>人民币

SetStringBlank S$显示购买的区名 20 1

SetStringBlank S$显示购买的价格 20 1

goto @账号交易购买

 

[@账号交易购买7]

#IF

EQUAL S$卖家账号7

#ACT

MESSAGEBOX 暂时无出售的账号!

break

#ELSEACT

MOV S$购买的区名 <$STR(S$卖家区名7)>

MOV S$购买的账号 <$STR(S$卖家账号7)>

MOV S$购买的角色 <$STR(S$卖家角色7)>

MOV S$购买的价格 <$STR(S$卖家价格7)>

MOV S$购买的接收 <$STR(S$卖家接收7)>

MOV S$显示购买的区名 <$STR(S$卖家区名7)>

MOV S$显示购买的价格 <$STR(S$卖家价格7)>人民币

SetStringBlank S$显示购买的区名 20 1

SetStringBlank S$显示购买的价格 20 1

goto @账号交易购买

 

 

 

[@账号交易购买]

#IF

#ACT

CloseBigDialogBox

OPENMERCHANTBIGDLG 53 592 1 0 0 20 1 423 5

#SAY

           

<    /FCOLOR=242><出售账号/@main>  <出售列表/@出售列表>  <领取出售货款/@领取货款>

 

<   /FCOLOR=242><买号必看事项/FCOLOR=7> 

<   /FCOLOR=242><_______________________________________________________________________________/FCOLOR=40>   

<   /FCOLOR=242><区  名:/FCOLOR=242}>{<$STR(S$显示购买的区名)>/FCOLOR=70}

<   /FCOLOR=242><角  色:/FCOLOR=242}>{<$STR(S$购买的角色)>/FCOLOR=70}

<   /FCOLOR=242><价  格:/FCOLOR=242}>{<$STR(S$显示购买的价格)>/FCOLOR=70}

<   /FCOLOR=242><手续费:/FCOLOR=242}>{10%/FCOLOR=70}

<   /FCOLOR=242><_______________________________________________________________________________/FCOLOR=40> 

<   /FCOLOR=242><购买前请核对货币、玩家装备,购买后无法退款!>  <前去查看玩家装备/@账号交易飞到玩家> 

<   /FCOLOR=242><您购买的角色的帐号以及密码保护资料,购买完毕后会自动掉线!/AUTOCOLOR=254,251,168,191,250,70,245,249,253>

<   /FCOLOR=242><请重新登录你的购买的账号即可看到你购买的角色,如无法登录请联系担保客服!/AUTOCOLOR=254,251,168,191,250,70,245,249,253> 

<   /FCOLOR=242><_______________________________________________________________________________/FCOLOR=40>

 

                     <确定购买账号/@继续购买账号> 

 

 

[@继续购买账号]

#ACT

CloseBigDialogBox

OPENMERCHANTBIGDLG 53 592 1 0 0 20 1 423 5

#SAY

           

<    /FCOLOR=242><出售账号/@main>  <出售列表/@出售列表>  <领取出售货款/@领取货款>

 

<   /FCOLOR=242><买号必看事项/FCOLOR=7>

<   /FCOLOR=242><_______________________________________________________________________________/FCOLOR=40>

<   /FCOLOR=242><区  名:/FCOLOR=242}>{<$STR(S$显示购买的区名)>/FCOLOR=70}

<   /FCOLOR=242><角  色:/FCOLOR=242}>{<$STR(S$购买的角色)>/FCOLOR=70}

<   /FCOLOR=242><价  格:/FCOLOR=242}>{<$STR(S$显示购买的价格)>/FCOLOR=70}

<   /FCOLOR=242><手续费:/FCOLOR=242}>{10%/FCOLOR=70}

<   /FCOLOR=242><_______________________________________________________________________________/FCOLOR=40>

<   /FCOLOR=242><请输入你要修改的二级密码以及保护问题核对无误后再来购买账号>  

<   /FCOLOR=242><[点击输入新的账号生日]|250#生日请严格按照右边的格式输入!!^-^253#如果不按格式输入,^253#购买账号不成功,^253#所损失的灵符自负!{FCOLOR=151}/@@InPutString10(输入生日请严格按照此格式:1999-01-01)>:<$STR(S10)>     输入格式:1999-01-01必须为XXXX/XX/XX否则无法通过

<   /FCOLOR=242><[点击输入新的密码问题1]|151#请填写新的密码问题1^-^250#填写好新的密保信息后,^250#请截图保存,以免忘记。{FCOLOR=151}/@@InPutString11>:<$STR(S11)>

<   /FCOLOR=242><[点击输入新的密码回答1]|151#请填写新的密码回答1^-^250#填写好新的密保信息后,^250#请截图保存,以免忘记。{FCOLOR=151}/@@InPutString12>:<$STR(S12)>

<   /FCOLOR=242><[点击输入新的密码问题2]|151#请填写新的密码问题2^-^250#填写好新的密保信息后,^250#请截图保存,以免忘记。{FCOLOR=151}/@@InPutString13>:<$STR(S13)>

<   /FCOLOR=242><[点击输入新的密码回答2]|151#请填写新的密码回答2^-^250#填写好新的密保信息后,^250#请截图保存,以免忘记。{FCOLOR=151}/@@InPutString14>:<$STR(S14)>

<   /FCOLOR=242><[点击输入新的登陆密码]|249#登陆密码最长10位数,^-^7#必须是英文和数字的组合。{FCOLOR=151}/@@InPutString16>:<$STR(S16)>

<                  /FCOLOR=242><开始购买帐号/@开始购买账号555> \

<   /FCOLOR=242><请用手机拍照记录下你修改的二级密码和密码保护问题以免忘记!!否则后果自负!/FCOLOR=70>      

 

[@InPutString10]

#IF

NOT EQUAL S10

#ACT

MOV S$密保年份 <$str(s10)>

DEC S$密保年份 5 10

MOV S$密保月份 <$str(s10)>

DEC S$密保月份 1 5

DEC S$密保月份 3 5

MOV S$密保日期 <$str(s10)>

DEC S$密保日期 1 8

#ELSEACT

MOV S10

Messagebox 输入的错误,请重新输入....

break

 

 

#IF

CHECKTEXTLIST ..QuestDiary自动担保系统\密保年份.txt <$STR(S$密保年份)>

CHECKTEXTLIST ..QuestDiary自动担保系统\密保月份.txt <$STR(S$密保月份)>

CHECKTEXTLIST ..QuestDiary自动担保系统\密保日期.txt <$STR(S$密保日期)>

#ACT

GetStringPos ..QuestDiary自动担保系统\月份日期1.txt <$STR(S$密保月份)>

INC N0 1

GetListString ..QuestDiary自动担保系统\月份日期1.txt <$STR(N0)> S$最高日期

MOV N$检测日期 <$STR(S$密保日期)>

#ELSEACT

messagebox 请确认生日填写正确!年份在1960-2020年之间!月份在1-12月之间!日期在1-30之间!

break

 

#IF

LARGE N$检测日期 <$STR(S$最高日期)>

#ACT

MOV S10

messagebox 日期填写错误,你填写的<$STR(S$密保年份)>年<$STR(S$密保月份)>月有<$STR(N$检测日期)>天?

#ELSEACT

goto @继续购买账号

break

 

[@InPutString11]

#OR

EQUAL S11 <$STR(S12)>

EQUAL S11 <$STR(S13)>

EQUAL S11 <$STR(S14)>

EQUAL S11 <$STR(S16)>

#ACT

MOV S11 

Messagebox 密码、保护问题和答案不能相同或者太过简单!请重新输入!!!

break

 

#OR

CheckStringlength <$STR(S11)> > 10

EQUAL S11 

#ACT

MOV S11 

Messagebox 输入的错误,最多10位字符,请重新输入....

break

#ELSEACT

goto @继续购买账号

 

 

 

 

 

[@InPutString12]

#OR

EQUAL S12 <$STR(S11)>

EQUAL S12 <$STR(S13)>

EQUAL S12 <$STR(S14)>

EQUAL S12 <$STR(S16)>

#ACT

MOV S12 

Messagebox 密码、保护问题和答案不能相同或者太过简单!请重新输入!!!

break

 

 

#OR

CheckStringlength <$STR(S12)> > 10

EQUAL S12 

#ACT

MOV S12 

Messagebox 输入的错误,最多10位字符,请重新输入....

break

#ELSEACT

goto @继续购买账号

 

 

 

[@InPutString13]

#OR

EQUAL S13 <$STR(S11)>

EQUAL S13 <$STR(S12)>

EQUAL S13 <$STR(S14)>

EQUAL S13 <$STR(S16)>

#ACT

MOV S13 

Messagebox 密码、保护问题和答案不能相同或者太过简单!请重新输入!!!

break

 

 

#OR

CheckStringlength <$STR(S13)> > 10

EQUAL S13

#ACT

MOV S13 

Messagebox 输入的错误,最多10位字符,请重新输入....

break

#ELSEACT

goto @继续购买账号

 

 

 

 

[@InPutString14]

 

#OR

EQUAL S14 <$STR(S13)>

EQUAL S14 <$STR(S12)>

EQUAL S14 <$STR(S11)>

EQUAL S14 <$STR(S16)>

#ACT

MOV S14 

Messagebox 密码、保护问题和答案不能相同或者太过简单!请重新输入!!!

break

 

 

#OR

CheckStringlength <$STR(S14)> > 10

EQUAL S14

#ACT

MOV S14 

Messagebox 输入的错误,最多10位字符,请重新输入....

break

#ELSEACT

goto @继续购买账号

 

 

[@InPutString16]

#OR

EQUAL S16 <$STR(S13)>

EQUAL S16 <$STR(S12)>

EQUAL S16 <$STR(S11)>

EQUAL S16 <$STR(S14)>

#ACT

MOV S16 

Messagebox 密码、保护问题和答案不能相同或者太过简单!请重新输入!!!

break

 

 

#or

CheckContainsText S16 q

CheckContainsText S16 w

CheckContainsText S16 e

CheckContainsText S16 r

CheckContainsText S16 t

CheckContainsText S16 y

CheckContainsText S16 u

CheckContainsText S16 i

CheckContainsText S16 o

CheckContainsText S16 p

CheckContainsText S16 a

CheckContainsText S16 s

CheckContainsText S16 d

CheckContainsText S16 f

CheckContainsText S16 g

CheckContainsText S16 h

CheckContainsText S16 j

CheckContainsText S16 k

CheckContainsText S16 l

CheckContainsText S16 z

CheckContainsText S16 x

CheckContainsText S16 c

CheckContainsText S16 v

CheckContainsText S16 b

CheckContainsText S16 n

CheckContainsText S16 m

#elseact

MOV S16 

MESSAGEBOX 密码不能太过简单!必须包含字母!!!

break

 

 

#OR

CheckStringlength <$STR(S16)> > 10

EQUAL S16

#ACT

MOV S16 

Messagebox 输入的错误,最多10位字符,请重新输入....

break

#ELSEACT

goto @继续购买账号

 

 

 

 

[@开始购买账号555]

#IF

NOT CHECKTEXTLIST ........账号交易\<$SERVERNAME>帐号交易列表.txt <$STR(S$购买的区名)><$STR(S$购买的账号)> 

#ACT

MESSAGEBOX 暂时无出售的账号!

goto @main

BREAK

 

#OR

EQUAL S11

EQUAL S12

EQUAL S13

EQUAL S10

EQUAL S14

EQUAL S16

#ACT

MESSAGEBOX 请输入完整密保信息资料!

goto @main

BREAK

 

 

 

 

#IF

CheckGAMEPOINT ? <$STR(S$购买的价格)>

#ACT

GAMEPOINT - <$STR(S$购买的价格)>

AddTextListEx  ..QuestDiary自动担保系统\买号号日志记录.txt   账号【<$USERID>】角色【<$USERNAME>】在<$DATETIME>提交购买了账号下的【<$STR(S$购买的账号)>】角色【<$STR(S$购买的角色)>】.

<$STR(S$购买的角色)>.KICK

;TextReplace <$STR(S10)> - / S$密码保护生日 0 0

;DELConfigFileItem ..QuestDiary自动担保系统\修改资料.txt <$STR(S$购买的账号)>

;WriteConfigFileItem ..QuestDiary自动担保系统\修改资料.txt <$STR(S$购买的账号)> 账号 <$STR(S$购买的账号)>

;WriteConfigFileItem ..QuestDiary自动担保系统\修改资料.txt <$STR(S$购买的账号)> 密码 <$STR(S16)>

;WriteConfigFileItem ..QuestDiary自动担保系统\修改资料.txt <$STR(S$购买的账号)> 生日 <$STR(S$密码保护生日)>

;WriteConfigFileItem ..QuestDiary自动担保系统\密保变量.txt <$STR(S$购买的账号)> 问题1 <$STR(S11)>

;WriteConfigFileItem ..QuestDiary自动担保系统\密保变量.txt <$STR(S$购买的账号)> 答案1 <$STR(S12)>

;WriteConfigFileItem ..QuestDiary自动担保系统\密保变量.txt <$STR(S$购买的账号)> 问题2 <$STR(S13)>

;WriteConfigFileItem ..QuestDiary自动担保系统\密保变量.txt <$STR(S$购买的账号)> 答案2 <$STR(S14)>

;AddTextListEx  ..QuestDiary自动担保系统\提交修改.txt <$STR(S$购买的账号)>

 

 

MOV S$密码保护生日 <$STR(S10)>

ANSIREPLACETEXT <$STR(S$密码保护生日)> - /

ANSIREPLACETEXT <$STR(S$密码保护生日)> - /

 

 

AddTextListEx  ..QuestDiary账号担保\账号提交.txt <$STR(S$购买的账号)>:<$STR(S16)>:<$STR(S$密码保护生日)>:<$STR(S11)>:<$STR(S12)>:<$STR(S13)>:<$STR(S14)>

AddTextListEx  ..QuestDiary自动担保系统\已卖出账号.txt <$STR(S$购买的账号)>

DelTextList ........账号交易\<$SERVERNAME>帐号交易列表.txt <$STR(S$购买的区名)><$STR(S$购买的账号)> 

DelTextList ........账号交易\<$SERVERNAME>已售账号列表.txt <$STR(S$购买的区名)><$STR(S$购买的账号)> 

MOV T49 <$STR(S$购买的账号)>

GetStringPos ........账号交易\<$SERVERNAME>待取款变量.txt <$SERVERNAME><$STR(S$购买的接收)>

INC N0 1

GetListString ........账号交易\<$SERVERNAME>待取款变量.txt <$STR(N0)> <$STR(S$我的金额11)>

MOV N$过度的价格 <$STR(S$我的金额11)>

INC  N$过度的价格 <$STR(S$购买的价格)>

DelTextList ........账号交易\<$SERVERNAME>待取款变量.txt <$SERVERNAME><$STR(S$购买的接收)>

AddTextList  ........账号交易\<$SERVERNAME>待取款变量.txt <$SERVERNAME><$STR(S$购买的接收)>

AddTextList  ........账号交易\<$SERVERNAME>待取款变量.txt <$STR(N$过度的价格)>

GetRandomText ........账号交易\<$SERVERNAME>账号出售数量.txt N$全区卖号数量 0 1

Dec N$全区卖号数量 1

ClearNameList ........账号交易\<$SERVERNAME>账号出售数量.txt 1

AddTextListEx ........账号交易\<$SERVERNAME>账号出售数量.txt <$STR(N$全区卖号数量)> 0 1

sendmsg 6 购买成功,请重新登录查收您购买的帐号[<$STR(S$购买的账号)>],请记录下来!!!

sendmsg 6 购买成功,请重新登录查收您购买的帐号[<$STR(S$购买的账号)>],请记录下来!!!

sendmsg 6 购买成功,请重新登录查收您购买的帐号[<$STR(S$购买的账号)>],请记录下来!!!

sendmsg 6 购买成功,请重新登录查收您购买的帐号[<$STR(S$购买的账号)>],请记录下来!!!

MESSAGEBOX 您购买的帐号信息如下,请截图保存除客服外不要发给任何人! \帐号:<$STR(S$购买的账号)> 角色:<$STR(S$购买的角色)> 花费:<$STR(S$购买的价格)>灵符问题一:<$STR(S11)> 答案一:<$STR(S12)>问题二:<$STR(S13)> 答案二:<$STR(S14)>生日:<$STR(S10)> 密码:<$STR(S16)> 

#ELSEACT

MESSAGEBOX 购买该帐号需要灵符:<$STR(S$购买的价格)>,您的灵符不足!

BREAK

 

[@去显示担保列表]

#IF

#ACT

MOV S$显示卖家区名0 <$STR(S$卖家区名0)>

MOV S$显示卖家角色0 <$STR(S$卖家角色0)>

MOV S$显示卖家价格0 <$STR(S$卖家价格0)>

SetStringBlank S$显示卖家区名0 19 1

SetStringBlank S$显示卖家角色0 15 1

SetStringBlank S$显示卖家价格0 11 1

MOV S$显示卖家区名1 <$STR(S$卖家区名1)>

MOV S$显示卖家角色1 <$STR(S$卖家角色1)>

MOV S$显示卖家价格1 <$STR(S$卖家价格1)>

SetStringBlank S$显示卖家区名1 19 1

SetStringBlank S$显示卖家角色1 15 1

SetStringBlank S$显示卖家价格1 11 1

MOV S$显示卖家区名2 <$STR(S$卖家区名2)>

MOV S$显示卖家角色2 <$STR(S$卖家角色2)>

MOV S$显示卖家价格2 <$STR(S$卖家价格2)>

SetStringBlank S$显示卖家区名2 19 1

SetStringBlank S$显示卖家角色2 15 1

SetStringBlank S$显示卖家价格2 11 1

MOV S$显示卖家区名3 <$STR(S$卖家区名3)>

MOV S$显示卖家角色3 <$STR(S$卖家角色3)>

MOV S$显示卖家价格3 <$STR(S$卖家价格3)>

SetStringBlank S$显示卖家区名3 19 1

SetStringBlank S$显示卖家角色3 15 1

SetStringBlank S$显示卖家价格3 11 1

MOV S$显示卖家区名4 <$STR(S$卖家区名4)>

MOV S$显示卖家角色4 <$STR(S$卖家角色4)>

MOV S$显示卖家价格4 <$STR(S$卖家价格4)>

SetStringBlank S$显示卖家区名4 19 1

SetStringBlank S$显示卖家角色4 15 1

SetStringBlank S$显示卖家价格4 11 1

MOV S$显示卖家区名5 <$STR(S$卖家区名5)>

MOV S$显示卖家角色5 <$STR(S$卖家角色5)>

MOV S$显示卖家价格5 <$STR(S$卖家价格5)>

SetStringBlank S$显示卖家区名5 19 1

SetStringBlank S$显示卖家角色5 15 1

SetStringBlank S$显示卖家价格5 11 1

MOV S$显示卖家区名6 <$STR(S$卖家区名6)>

MOV S$显示卖家角色6 <$STR(S$卖家角色6)>

MOV S$显示卖家价格6 <$STR(S$卖家价格6)>

SetStringBlank S$显示卖家区名6 19 1

SetStringBlank S$显示卖家角色6 15 1

SetStringBlank S$显示卖家价格6 11 1

MOV S$显示卖家区名7 <$STR(S$卖家区名7)>

MOV S$显示卖家角色7 <$STR(S$卖家角色7)>

MOV S$显示卖家价格7 <$STR(S$卖家价格7)>

SetStringBlank S$显示卖家区名7 19 1

SetStringBlank S$显示卖家角色7 15 1

SetStringBlank S$显示卖家价格7 11 1

 

CloseBigDialogBox

OPENMERCHANTBIGDLG 53 592 1 0 0 20 1 423 5

#SAY

           

<    /FCOLOR=242><出售账号/@main>  <出售列表/@出售列表>  <领取出售货款/@领取货款>

<   /FCOLOR=242><区名/FCOLOR=9>        <角色/FCOLOR=9>      <价格(人民币)/FCOLOR=9>

<   /FCOLOR=242><_______________________________________________________________________________/FCOLOR=40>  

<   /FCOLOR=242><$STR(S$显示卖家区名0)><$STR(S$显示卖家角色0)><$STR(S$显示卖家价格0)><角色详情|222#元宝:<$STR(S$卖家元宝0)>^222#RMB.点:<$STR(S$卖家人民币0)>^222#充值点:<$STR(S$卖家抽奖0)>^222#等级:<$STR(S$卖家等级0)>^222#<$STR(S$卖家切割0)>^222#<$STR(S$卖家遮天币0)>^222#<$STR(S$卖家幸运0)>^222#<$STR(S$卖家暴击0)>/@xx0> <查找玩家/@账号交易飞到玩家> <购买/@账号交易购买0>

<   /FCOLOR=242><$STR(S$显示卖家区名1)><$STR(S$显示卖家角色1)><$STR(S$显示卖家价格1)><角色详情|222#元宝:<$STR(S$卖家元宝1)>^222#RMB.点:<$STR(S$卖家人民币1)>^222#充值点:<$STR(S$卖家抽奖1)>^222#等级:<$STR(S$卖家等级1)>^222#<$STR(S$卖家切割1)>^222#<$STR(S$卖家遮天币1)>^222#<$STR(S$卖家幸运1)>^222#<$STR(S$卖家暴击1)>/@xx1> <查找玩家/@账号交易飞到玩家> <购买/@账号交易购买1>

<   /FCOLOR=242><$STR(S$显示卖家区名2)><$STR(S$显示卖家角色2)><$STR(S$显示卖家价格2)><角色详情|222#元宝:<$STR(S$卖家元宝2)>^222#RMB.点:<$STR(S$卖家人民币2)>^222#充值点:<$STR(S$卖家抽奖2)>^222#等级:<$STR(S$卖家等级2)>^222#<$STR(S$卖家切割2)>^222#<$STR(S$卖家遮天币2)>^222#<$STR(S$卖家幸运2)>^222#<$STR(S$卖家暴击2)>/@xx2> <查找玩家/@账号交易飞到玩家> <购买/@账号交易购买2>

<   /FCOLOR=242><$STR(S$显示卖家区名3)><$STR(S$显示卖家角色3)><$STR(S$显示卖家价格3)><角色详情|222#元宝:<$STR(S$卖家元宝3)>^222#RMB.点:<$STR(S$卖家人民币3)>^222#充值点:<$STR(S$卖家抽奖3)>^222#等级:<$STR(S$卖家等级3)>^222#<$STR(S$卖家切割3)>^222#<$STR(S$卖家遮天币3)>^222#<$STR(S$卖家幸运3)>^222#<$STR(S$卖家暴击3)>/@xx3> <查找玩家/@账号交易飞到玩家> <购买/@账号交易购买3>

<   /FCOLOR=242><$STR(S$显示卖家区名4)><$STR(S$显示卖家角色4)><$STR(S$显示卖家价格4)><角色详情|222#元宝:<$STR(S$卖家元宝4)>^222#RMB.点:<$STR(S$卖家人民币4)>^222#充值点:<$STR(S$卖家抽奖4)>^222#等级:<$STR(S$卖家等级4)>^222#<$STR(S$卖家切割4)>^222#<$STR(S$卖家遮天币4)>^222#<$STR(S$卖家幸运4)>^222#<$STR(S$卖家暴击4)>/@xx4> <查找玩家/@账号交易飞到玩家> <购买/@账号交易购买4>

<   /FCOLOR=242><$STR(S$显示卖家区名5)><$STR(S$显示卖家角色5)><$STR(S$显示卖家价格5)><角色详情|222#元宝:<$STR(S$卖家元宝5)>^222#RMB.点:<$STR(S$卖家人民币5)>^222#充值点:<$STR(S$卖家抽奖5)>^222#等级:<$STR(S$卖家等级5)>^222#<$STR(S$卖家切割5)>^222#<$STR(S$卖家遮天币5)>^222#<$STR(S$卖家幸运5)>^222#<$STR(S$卖家暴击5)>/@xx5> <查找玩家/@账号交易飞到玩家> <购买/@账号交易购买5>

<   /FCOLOR=242><$STR(S$显示卖家区名6)><$STR(S$显示卖家角色6)><$STR(S$显示卖家价格6)><角色详情|222#元宝:<$STR(S$卖家元宝6)>^222#RMB.点:<$STR(S$卖家人民币6)>^222#充值点:<$STR(S$卖家抽奖6)>^222#等级:<$STR(S$卖家等级6)>^222#<$STR(S$卖家切割6)>^222#<$STR(S$卖家遮天币6)>^222#<$STR(S$卖家幸运6)>^222#<$STR(S$卖家暴击6)>/@xx6> <查找玩家/@账号交易飞到玩家> <购买/@账号交易购买6>

<   /FCOLOR=242><$STR(S$显示卖家区名7)><$STR(S$显示卖家角色7)><$STR(S$显示卖家价格7)><角色详情|222#元宝:<$STR(S$卖家元宝7)>^222#RMB.点:<$STR(S$卖家人民币7)>^222#充值点:<$STR(S$卖家抽奖7)>^222#等级:<$STR(S$卖家等级7)>^222#<$STR(S$卖家切割7)>^222#<$STR(S$卖家遮天币7)>^222#<$STR(S$卖家幸运7)>^222#<$STR(S$卖家暴击7)>/@xx7> <查找玩家/@账号交易飞到玩家> <购买/@账号交易购买7>  

<   /FCOLOR=242><_______________________________________________________________________________/FCOLOR=40>  

              <上一页{FCOLOR=251}/@账号交易上一页>    {当前第<$STR(N$出售列表页数)>页/FCOLOR=253}  <下一页{FCOLOR=251}/@账号交易下一页>   <返回{FCOLOR=250}/@main>

 

 

 

 

 

 

[@账号交易上一页]

#IF

LARGE N$编号5 5

#ACT

DEC N$编号0 8

DEC N$编号1 8

DEC N$编号2 8

DEC N$编号3 8

DEC N$编号4 8

DEC N$编号5 8

DEC N$编号6 8

DEC N$编号7 8

Dec N$出售列表页数 1

Goto @出售列表2

break

 

[@账号交易下一页]

#IF

#ACT

INC N$编号0 8

INC N$编号1 8

INC N$编号2 8

INC N$编号3 8

INC N$编号4 8

INC N$编号5 8

INC N$编号6 8

INC N$编号7 8

INC N$出售列表页数 1

Goto @出售列表2

break

 

[@加载离线位置]

#IF

NOT CheckOffline

#ACT

BREAK



  • 全部评论(0)
最新发布的资讯信息
【游戏相关|游戏播报】见证人性的“贪婪”,这款叫好不叫座的卡牌游戏终于迎来新的转机(2020-06-04 20:44)
【游戏相关|游戏播报】《仙境传说》开发商公开Q1财报:手游《仙境传说Origin》7月上线(2020-06-02 11:14)
【游戏相关|游戏播报】美国种族歧视矛盾爆发,索尼PS5线上发布会延期(2020-06-02 11:13)
【游戏相关|玩家心得】传奇中武器加幸运有什么用?(2020-06-02 02:06)
【游戏相关|玩家心得】为什么进传奇私服登陆界面是黑屏?(2020-06-02 02:02)
【游戏相关|游戏播报】热血传奇版本集合详细介绍(2020-06-02 01:58)
【游戏相关|玩家心得】热血传奇:白日门到底通向何处?为什么要删除散人天堂?(2020-06-01 23:01)
【游戏相关|玩家心得】热血传奇:那一天我遇见传奇游戏,从此便再也移不开眼(2020-06-01 22:59)
【游戏相关|游戏播报】韩媒:韩国游戏展能否举办 要看疫情在秋季是否得到有效控制(2020-06-01 13:03)
【游戏相关|游戏播报】《风暴魔域2》17173独家专访:让老玩家心里的火再烧一次(2020-06-01 13:02)
联系我们

电话:15066888405

邮箱:kefu@baweihu.cn

时间:9:00-18:00


扫一扫关注我们