Blue引擎脚本-爵位系统

m12345666

(@@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]
使用说明:在输入框内输入<捐助数量>\
每次捐助最少为10000元宝！\   \
<输入要捐助的数量/@@InPutInteger36>

[@@InPutInteger36]
#IF
CHECKGAMEGOLD > 0
#Act
DelayGoto 1 @InPutInteger36
#ELSEAct
MessageBox 你的元宝数量不足！请冲值。
[@InPutInteger36]
#If
CHECKGAMEGOLD > <$STR(M36)>
LARGE M36 9999
#ACT
GameGold - <$STR(M36)>
mov G36 <$STR(M36)>
INC G36 <$HUMAN(YBJZ)>
mov A46 <$USERNAME>
mov M37 <$STR(M36)>
DIV M37 10000
CREDITPOINT + <$STR(M37)>
goto @mingdan
#ELSEsay
捐助的元宝数量必须大于10000,或者你元宝数量不足.
[@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，1.07倍攻击特权属性`!
#ACT
break
#IF
equal A42 <$USERNAME>
#say
您好,【公爵】阁下,您现在享受的是战士+600HP、道士+300HP、法师+200HP，1.06倍攻击特权属性`!，
#ACT
break
#IF
equal A43 <$USERNAME>
#say
您好,【侯爵】阁下,您现在享受的是战士+500HP、道士+250HP、法师+150HP，1.05倍攻击特权属性`!，
#ACT
break
#IF
equal A44 <$USERNAME>
#say
您好,【伯爵】阁下,您现在享受的是400HP、道士+200HP、法师+110HP，1.04倍攻击特权属性`!
#ACT
break
#IF
equal A45 <$USERNAME>
#say
您好,【子爵】阁下,您现在享受的是战士+300HP、道士+150HP、法师+80HP，1.03倍攻击特权属性`!
#ACT
break
#IF
CHECKVAR HUMAN YBJZ > 500
#say
您好,【男爵】阁下,您现在享受的是战士+200HP、道士+100HP、法师+60HP，1.02倍攻击特权属性`!
#ACT
break
#IF
#say
你好，，你未进入排名，
#ACT
break

[@shuomin]
<COLOR=cllime 第一名:战士+1000HP、道士+500HP、法师+360HP，1.07倍攻击>\
<COLOR=cllime 第二名:战士+600HP、道士+300HP、法师+200HP，1.06倍攻击>\
<COLOR=cllime 第三名:战士+500HP、道士+250HP、法师+150HP，1.05倍攻击>\
<COLOR=clYellow 第四名:战士+400HP、道士+200HP、法师+110HP，1.04倍攻击>\
<COLOR=clYellow 第五名:战士+300HP、道士+150HP、法师+80HP，1.03倍攻击>\
<COLOR=clYellow 第六名:战士+200HP、道士+100HP、法师+60HP，1.02倍攻击>\
<COLOR=clSkyBlue 第六名无限额.只要元宝超过10000都可以排到第六名>\
<上述属性，主号英雄共享，捐助后小退生效>\
<返回/@main>

流落世间的天使

纯粹路过，没任何兴趣，仅仅是看在老用户份上回复一下

港城之星

玩传奇的时候是多么的幸福,多么热闹.从早到晚有的只是快乐.希望Gm版本库能够一直坚持做下去。

大嵋

向楼主学习

王婆卖瓜

楼猪V5啊

冠头

为了三千积分！

唔诚

我也顶起出售广告位

柔式御足足疗会所

楼猪V5啊

鞠俊

看帖要回，回帖才健康，在踩踩，楼主辛苦了！

彩云南

我们来说,或许一些没落的版本更能勾起回忆