(@@InPutInteger @@InPutString )
[@main]
拥有无与伦比的力量之外,更暗含着某种<COLOR=clLime 神秘特权属性> \
属<COLOR=clLime 爵位>玩家专享奖励, 游戏内无其他任何途径获得。 \
只有来我这捐助救济玛法大陆上平穷的人。 \
把握机会,让玛法大陆上的人们全部用羡慕的眼光看者您关注您! \
<注意:捐助完了后,需要小退再上才可以享受爵位超级属性> \ \
<我要捐助/@juanzhu> <捐助排名/@paiming> 您当前捐助了<$HUMAN(YBJZ)>元宝\ \
<捐助奖励及捐款说明/@shuomin>\
;VAR INTEGER HUMAN YBJZ
;LOADVAR HUMAN YBJZ ..\QuestDiary\重要数据\YBJZSave.tx
;变量 A41 A42 A43 A44 A45 A46
;变量 G31 G32 G33 G34 G35 G36
;变量 M36
;最少捐献 500元宝 替换500 跟499 为你想要的
;变量 直接用字符替换器 替换
[@juanzhu]
使用说明:在输入框内输入<捐助数量>\
每次捐助最少为500元宝!\ \
<输入要捐助的数量/@@InPutInteger36>
[@@InPutInteger36]
#IF
CHECKGAMEGOLD > 0
#Act
DelayGoto 1 @InPutInteger36
#ELSEAct
MessageBox 你的元宝数量不足!请冲值。
[@InPutInteger36]
#If
CHECKGAMEGOLD > <$STR(M36)>
LARGE M36 499
#ACT
GameGold - <$STR(M36)>
mov G36 <$STR(M36)>
INC G36 <$HUMAN(YBJZ)>
mov A46 <$USERNAME>
mov M37 <$STR(M36)>
DIV M37 500
CREDITPOINT + <$STR(M37)>
goto @mingdan
#ELSEsay
捐助的元宝数量必须大于500,或者你元宝数量不足.
[@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
[@paiming]
<COLOR=clLime 爵位排名> <COLOR=clLime 累计捐助元宝> \
第一名:亲王:<$STR(A41)> 所捐助数量<$STR(G31)> \
第二名:公爵:<$STR(A42)> 所捐助数量<$STR(G32)> \
第三名:侯爵:<$STR(A43)> 所捐助数量<$STR(G33)> \
第四名:伯爵:<$STR(A44)> 所捐助数量<$STR(G34)> \
第五名:子爵:<$STR(A45)> 所捐助数量<$STR(G35)> \
第六名:男爵:<查看是否在排名内/@检测男爵> 您当前捐助元宝[<$HUMAN(YBJZ)>]\
[@检测男爵]
#IF
equal A41 <$USERNAME>
#say
您好,【亲王】阁下,您现在享受的是战士+1000HP、道士+500HP、法师+360HP特权属性`!
#ACT
break
#IF
equal A42 <$USERNAME>
#say
您好,【公爵】阁下,您现在享受的是战士+ 600HP、道士+300HP、法师+200HP特权属性`!,
#ACT
break
#IF
equal A43 <$USERNAME>
#say
您好,【侯爵】阁下,您现在享受的是战士+500HP、道士+250HP、法师+150HP特权属性`!,
#ACT
break
#IF
equal A44 <$USERNAME>
#say
您好,【伯爵】阁下,您现在享受的是400HP、道士+200HP、法师+110HP特权属性`!
#ACT
break
#IF
equal A45 <$USERNAME>
#say
您好,【子爵】阁下,您现在享受的是战士+300HP、道士+150HP、法师+80HP特权属性`!
#ACT
break
#IF
CHECKVAR HUMAN YBJZ > 500
#say
您好,【男爵】阁下,您现在享受的是战士+200HP、道士+100HP、法师+60HP特权属性`!
#ACT
break
#IF
#say
你好,,你未进入排名,
#ACT
break
[@shuomin]
<COLOR=cllime 第一名:战士+1000HP、道士+500HP、法师+360HP>\
<COLOR=cllime 第二名:战士+ 600HP、道士+300HP、法师+200HP>\
<COLOR=cllime 第三名:战士+500HP、道士+250HP、法师+150HP>\
<COLOR=clYellow 第四名:战士+400HP、道士+200HP、法师+110HP>\
<COLOR=clYellow 第五名:战士+300HP、道士+150HP、法师+80HP>\
<COLOR=clYellow 第六名:战士+200HP、道士+100HP、法师+60HP>\
<COLOR=clSkyBlue 第六名无限额.只要元宝超过500都可以排到第六名>\
<上述属性,主号英雄共享,捐助后小退生效>\
<返回/@main>
回复下载:
|
上一篇:赌博坐庄带税完整脚本-Legendm2引擎下一篇:GOM引擎拾取装备自动鉴定脚本-支持20150525以后引擎
|