架设沙城附加奖励脚本教程

ipad

[@沙城捐献]
{
#IF
#SAY
捐献元宝以200为单位起捐,所有玩家捐赠元宝总额为本届沙城的　\
最终奖金，届时成功抢沙行会将可以拥有该奖金池中的所有元宝!　\
<说明:/SCOLOR=254>攻沙结束奖金池元宝被城主领取后,一切捐赠数据即可归零!　　\
您本人已经捐献了{<$HUMAN(捐献元宝)>/SCOLOR=250}个元宝,目前{<$STR(S13)>/SCOLOR=253}　\
个人捐献元宝只要累计达到<5000元宝/SCOLOR=249>以上就可以进入前六名排位内　\
　\
<注意/SCOLOR=249>：第六名无人数限制　　　　　　　　<点击查看六大爵位待遇/@查看待遇>　\
　　\
<点击输入所要捐赠元宝数[url=]/@@InPutInteger88[/url]>　　　　　　　　<查看现在六大爵位排名/@沙城捐献1>

[@查看待遇]
沙城捐献:所有捐献的元宝累积将作为攻沙奖励,根据捐献元宝的数量　\
来排行爵位,爵位越高获赠属性就越高!共分为以下六级:　\
第一名：总统→属性额外增加<600-600/SCOLOR=250>点　\
第二名：公爵→属性额外增加<500-500/SCOLOR=253>点　　<查看自己是否在排名中/@查看是否排名>　\
第三名：侯爵→属性额外增加<400-400/SCOLOR=253>点　\
第四名：伯爵→属性额外增加<300-300/SCOLOR=253>点　\
第五名：子爵→属性额外增加<200-200/SCOLOR=253>点　　  <捐够1000以上可进排名/SCOLOR=249>　\
第六名：少爵→属性额外增加<100-100/SCOLOR=254>点　\
<当前沙城受赠元宝总额为/SCOLOR=70>→{<$GLOBAL(捐献总额)>/SCOLOR=250}个.　　　　　　　<返回上页/@沙城捐献>

[@沙城捐献1]
#ACT
#CALL [\\登陆\捐献排名.txt] @开始捐献排名
#CALL [\\封号文件\封号系统.txt] @封号检测
MOV S0
MOV S1
MOV S2
MOV S3
MOV S4
GetRandomText .\QuestDiary\抽取数据\系统限制\空格限制.txt S5 1
INC S0 <$GLOBAL(捐献第一名名字)>
INC S0 <$STR(S5)>
INC S1 <$GLOBAL(捐献第二名名字)>
INC S1 <$STR(S5)>
INC S2 <$GLOBAL(捐献第三名名字)>
INC S2 <$STR(S5)>
INC S3 <$GLOBAL(捐献第四名名字)>
INC S3 <$STR(S5)>
INC S4 <$GLOBAL(捐献第五名名字)>
INC S4 <$STR(S5)>
DEC S0 16 50
DEC S1 16 50
DEC S2 16 50
DEC S3 16 50
DEC S4 16 50
#SAY
第一名<属性600-600/SCOLOR=253>→<总统/SCOLOR=70>：{<$STR(S0)>/SCOLOR=253} 所捐献元宝数：{<$GLOBAL(捐献第一名个数)>/SCOLOR=250}\
第二名<属性500-500/SCOLOR=249>→<公爵/SCOLOR=70>：{<$STR(S1)>/SCOLOR=253} 所捐献元宝数：{<$GLOBAL(捐献第二名个数)>/SCOLOR=250}\
第三名<属性400-400/SCOLOR=249>→<侯爵/SCOLOR=70>：{<$STR(S2)>/SCOLOR=253} 所捐献元宝数：{<$GLOBAL(捐献第三名个数)>/SCOLOR=250}\
第四名<属性300-300/SCOLOR=249>→<伯爵/SCOLOR=70>：{<$STR(S3)>/SCOLOR=253} 所捐献元宝数：{<$GLOBAL(捐献第四名个数)>/SCOLOR=250}\
第五名<属性200-200/SCOLOR=249>→<子爵/SCOLOR=70>：{<$STR(S4)>/SCOLOR=253} 所捐献元宝数：{<$GLOBAL(捐献第五名个数)>/SCOLOR=250}\
第六名<属性100-100/SCOLOR=254>→<少爵/SCOLOR=70>：　　　　　　　　<查看自己是否在第六名/@查看是否排名>\
<当前沙城受赠元宝总额为/SCOLOR=70>→{<$GLOBAL(捐献总额)>/SCOLOR=254}个.\　\
<开始捐献[url=]/@@InPutInteger88[/url]>　　　　　　　　<查看待遇/@查看待遇>　　　　　　　　<返回上页/@沙城捐献>

[@CALLInPutInteger88]
#if
small N88 200
#ACT
MESSAGEBOX ぐ【失败】：最少捐献200元宝!
GOTO @沙城捐献1
BREAK
#IF
CHECKGAMEGOLD < <$STR(N88)>
#ACT
MESSAGEBOX ぐ【失败】：您身上元宝不足<$STR(N88)>个!
GOTO @沙城捐献1
BREAK
#ELSEACT
GAMEGOLD - <$STR(N88)>
CALCVAR HUMAN 捐献元宝 + <$STR(N88)>
SAVEVAR HUMAN 捐献元宝 ..\QuestDiary\数据文件\捐献元宝.txt
CALCVAR GLOBAL 捐献总额 + <$STR(N88)>
SAVEVAR GLOBAL 捐献总额 ..\QuestDiary\数据文件\捐献排名数据.txt
GOTO @沙城捐献1
BREAK
[@查看是否排名]
#IF
CHECKVAR HUMAN 捐献元宝 > 999
#ACT
MESSAGEBOX ぐ恭喜：您在第六名排名内...
BREAK
#elseact
MESSAGEBOX ぐ抱歉：您不在第六名排名内....
BREAK
}

单机斗地主

留个脚印```````

密会

去市场买东西，杀价先杀四分之三，现在杀一半行不通了。