Legendm2引擎-亲王爵位竞拍脚本
(@@InPutInteger @@InPutString )
[@main]
拥有无与伦比的力量之外，更暗含着某种<COLOR=clLime 神秘特权属性> \
属<COLOR=clLime 爵位>玩家专享奖励， 游戏内无其他任何途径获得。 \
把握机会，让玛法大陆上的人们全部用羡慕的眼光看者您关注您！ \
<注意:捐助完了后，需要小退再上才可以享受爵位超级属性> \
目前:亲王位:<$STR(A41)> 所捐助数量<$STR(G31)> \\
<我要竞拍/@juanzhu> 您当前捐助了<$HUMAN(YBJZ)>元宝\ \
<捐助奖励及捐款说明/@shuomin>\
;VAR INTEGER HUMAN YBJZ
;LOADVAR HUMAN YBJZ ..\QuestDiary\重要数据\YBJZSave.tx
;变量 A41
;变量 G31
;变量 M36
;最少捐献 1000元宝 替换1000 跟999为你想要的
;变量 直接用字符替换器 替换
[@juanzhu]
\ \
使用说明:在输入框内输入<捐助数量>\
每次捐助最少为1000元宝！\ \
<输入要捐助的数量/@@InPutInteger36>
[@@InPutInteger36]
#IF
CHECKGAMEGOLD > 0
#Act
DelayGoto 1 @InPutInteger36
#ELSEAct
MessageBox 你的元宝数量不足！请冲值。
[@InPutInteger36]
#If
CHECKGAMEGOLD > <$STR(M36)>
LARGE M36 999
#ACT
GameGold - <$STR(M36)>
mov G36 <$STR(M36)>
INC G36 <$HUMAN(YBJZ)>
mov A46 <$USERNAME>
mov M37 <$STR(M36)>
DIV M37 1000
CREDITPOINT + <$STR(M37)>
goto @mingdan
#ELSEsay
捐助的元宝数量必须大于1000,或者你元宝数量不足.
[@mingdan]
#IF
checknamelist ..\QuestDiary\重要数据\捐助名单.txt
#ACT
CALCVAR HUMAN YBJZ + <$STR(M36)>
SAVEVAR HUMAN YBJZ ..\QuestDiary\重要数据\YBJZSave.txt
#CALL [\\重要数据\捐助系统.txt] @捐助检测
#elseact
goto @canshu2
[@canshu2]
#ACT
CALCVAR HUMAN YBJZ = <$STR(M36)>
SAVEVAR HUMAN YBJZ ..\QuestDiary\重要数据\YBJZSave.txt
addnamelist ..\QuestDiary\重要数据\捐助名单.txt
#CALL [\\重要数据\捐助系统.txt] @捐助检测
break
[@shuomin]
\ \ \
<COLOR=cllime 第一名:战士+1000HP、道士+500HP、法师+360HP>\ \
<COLOR=cllime 攻击魔法道术30-30>\ \
<上述属性，主号英雄共享，捐助后小退生效>\ \
<返回/@main>
回复下载：
**** Hidden Message *****
站位支持 支持支持再支持 为毛老子总也抢不到沙发？！！ 有竞争才有进步嘛 占坑编辑ing 6666666666666 Legendm2引擎-亲王爵位竞拍 csdcesrfdrfdrfdrfdrsfdrfsdrf 完善叫把呢大苏打