诚信脚本发布：捐献爵位

ipad · 发表于 2014-6-27 14:34:55

(@@InPutInteger @@InPutString )
[@main]
拥有无与伦比的力量之外，更暗含着某种<COLOR=clLime 神秘特权属性> \
属<COLOR=clLime 爵位>玩家专享奖励，游戏内无其他任何途径获得。 \
只有来我这捐助救济玛法大陆上平穷的人。 \
把握机会，让玛法大陆上的人们全部用羡慕的眼光看者您关注您！ \
<注意:捐助完了后，需要小退再上才可以享受爵位超级属性> \  \
<我要捐助[url=]/@juanzhu[/url]>          <捐助排名[url=]/@paiming[/url]>    您当前捐助了<$HUMAN(YBJZ)>元宝\    \
<捐助奖励及捐款说明[url=]/@shuomin>\[/url]
;VAR INTEGER HUMAN YBJZ
;LOADVAR HUMAN YBJZ ..\QuestDiary\重要数据\YBJZSave.tx
;变量 A41 A42 A43 A44 A45 A46
;变量 G31 G32 G33 G34 G35 G36
;变量 M36
;最少捐献 5000元宝替换5000 跟4999  为你想要的
;变量直接用字符替换器替换

[@juanzhu]
使用说明:在输入框内输入<捐助数量>\
每次捐助最少为100元宝！\ \
<输入要捐助的数量[url=]/@@InPutInteger36[/url]>
[@@InPutInteger36]
#IF
CHECKGAMEGOLD > 0
#Act
DelayGoto 1 @InPutInteger36
#ELSEAct
MessageBox 你的元宝数量不足！请冲值。
[@InPutInteger36]
#If
CHECKGAMEGOLD > <$STR(M36)>
LARGE M36 100
#ACT
GameGold - <$STR(M36)>
mov G36 <$STR(M36)>
INC G36 <$HUMAN(YBJZ)>
mov A46 <$USERNAME>
goto @mingdan
#ELSEsay
捐助的元宝数量必须大于100,或者你元宝数量不足.
[@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
您好,【亲王】阁下,您现在享受的是多加40%伤害的神秘特权属性`!
#ACT
break
#IF
equal A42 <$USERNAME>
#say
您好,【公爵】阁下,您现在享受的是多加35%伤害的神秘特权属性`!，
#ACT
break
#IF
equal A43 <$USERNAME>
#say
您好,【侯爵】阁下,您现在享受的是多加30%伤害的神秘特权属性`!，
#ACT
break
#IF
equal A44 <$USERNAME>
#say
您好,【伯爵】阁下,您现在享受的是多加25%伤害的神秘特权属性`!
#ACT
break
#IF
equal A45 <$USERNAME>
#say
您好,【子爵】阁下,您现在享受的是多加20%伤害的神秘特权属性`!
#ACT
break
#IF
CHECKVAR HUMAN YBJZ > 500
#say
您好,【男爵】阁下,您现在享受的是多加10%伤害的神秘特权属性`!
#ACT
break
#IF
#say
你好，，你未进入排名，
#ACT
break
[@shuomin]
<COLOR=cllime 第一名:物理攻击伤害+40% >\
<COLOR=cllime 第二名:物理攻击伤害+35% >\
<COLOR=cllime 第三名:物理攻击伤害+30% >\
<COLOR=clYellow 第四名:物理攻击伤害+25% >\
<COLOR=clYellow 第五名:物理攻击伤害+20% >\
<COLOR=clYellow 第六名:物理攻击伤害+10% >\
<COLOR=clSkyBlue 第六名无限额.只要元宝超过500都可以排到第六名>\
<返回[url=]/@main[/url]>