六星萝卜
- 萝卜币
- 9236
- 交易币
- 0
- 星盾币
- 0
- 威望
- 5
- 在线时间
- 531 小时
|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有账号?立即注册
x
本帖最后由 kylmofashi520 于 2021-9-10 02:03 编辑
二楼是剩余部分
[@main]
#IF
#ACT
MOV N$捐献金额1 0
MOV N$捐献金额2 0
MOV N$捐献金额3 0
MOV N$捐献金额4 0
MOV N$捐献金额5 0
MOV N$捐献金额6 0
MOV N$捐献总金额 0
mov N$合区捐献总金额 0
GETRANDOMLINETEXT ..\..\..\..\..\地下城配置文件\通区文本\沙城捐献\<$STR(A1)>沙城捐献\1区捐献文本.txt <$STR(N$捐献金额1)> 0
GETRANDOMLINETEXT ..\..\..\..\..\地下城配置文件\通区文本\沙城捐献\<$STR(A1)>沙城捐献\2区捐献文本.txt <$STR(N$捐献金额2)> 0
GETRANDOMLINETEXT ..\..\..\..\..\地下城配置文件\通区文本\沙城捐献\<$STR(A1)>沙城捐献\3区捐献文本.txt <$STR(N$捐献金额3)> 0
GETRANDOMLINETEXT ..\..\..\..\..\地下城配置文件\通区文本\沙城捐献\<$STR(A1)>沙城捐献\4区捐献文本.txt <$STR(N$捐献金额4)> 0
GETRANDOMLINETEXT ..\..\..\..\..\地下城配置文件\通区文本\沙城捐献\<$STR(A1)>沙城捐献\5区捐献文本.txt <$STR(N$捐献金额5)> 0
GETRANDOMLINETEXT ..\..\..\..\..\地下城配置文件\通区文本\沙城捐献\<$STR(A1)>沙城捐献\6区捐献文本.txt <$STR(N$捐献金额6)> 0
GETRANDOMLINETEXT ..\..\..\..\..\地下城配置文件\通区文本\沙城捐献\<$STR(A1)>沙城捐献\捐献总记录.txt <$STR(N$捐献总金额)> 0
GETRANDOMLINETEXT ..\..\..\..\..\地下城配置文件\通区文本\沙城捐献\<$STR(A1)>沙城捐献\合区捐献.txt <$STR(N$合区捐献总金额)> 0
GETRANDOMLINETEXT ..\..\..\..\..\地下城配置文件\通区文本\沙城捐献\<$STR(A1)>沙城捐献\上次合区捐献.txt <$STR(N$合区捐献总金额1)> 0
MOV S$捐献金额1 <$STR(N$捐献金额1)>
MOV S$捐献金额2 <$STR(N$捐献金额2)>
MOV S$捐献金额3 <$STR(N$捐献金额3)>
MOV S$捐献金额4 <$STR(N$捐献金额4)>
MOV S$捐献金额5 <$STR(N$捐献金额5)>
MOV S$捐献金额6 <$STR(N$捐献金额6)>
MOV S$捐献总金额 <$STR(N$捐献总金额)>
MOV S$合区捐献总金额 <$STR(N$合区捐献总金额)>
MOV S$合区捐献总金额1 <$STR(N$合区捐献总金额1)>
;------------------------------------------------------------------------------------------------
SORTHUMVARTOLISTEX JK ..\QuestDiary\RMB点捐款\RMB点捐款.txt 1 ..\QuestDiary\RMB点捐款\RMB点捐款排名.txt 1
GetListString ..\QuestDiary\RMB点捐款\RMB点捐款排名.txt 0 A70 S$金额1
GetListString ..\QuestDiary\RMB点捐款\RMB点捐款排名.txt 1 A71 S$金额2
GetListString ..\QuestDiary\RMB点捐款\RMB点捐款排名.txt 2 A72 S$金额3
GetListString ..\QuestDiary\RMB点捐款\RMB点捐款排名.txt 3 A73 S$金额4
GetListString ..\QuestDiary\RMB点捐款\RMB点捐款排名.txt 4 A74 S$金额5
GetListString ..\QuestDiary\RMB点捐款\RMB点捐款排名.txt 5 A75 S$金额6
MOV S$排名1 <$STR(A70)>
MOV S$排名2 <$STR(A71)>
MOV S$排名3 <$STR(A72)>
MOV S$排名4 <$STR(A73)>
MOV S$排名5 <$STR(A74)>
SetStringBlank <$STR(S$排名1)> 15 1
SetStringBlank <$STR(S$排名2)> 15 1
SetStringBlank <$STR(S$排名3)> 15 1
SetStringBlank <$STR(S$排名4)> 15 1
SetStringBlank <$STR(S$排名5)> 15 1
SetStringBlank <$STR(S$金额1)> 7 1
SetStringBlank <$STR(S$金额2)> 7 1
SetStringBlank <$STR(S$金额3)> 7 1
SetStringBlank <$STR(S$金额4)> 7 1
SetStringBlank <$STR(S$金额5)> 7 1
OPENMERCHANTBIGDLG 3 142 1 4 10 -50 1 578 19 1
MOV N$新金额分配 <$STR(N$捐献总金额)>
MOV N$手续金额分配 <$STR(N$捐献总金额)>
DIV N$手续金额分配 100
MUL N$手续金额分配 30
DEC N$新金额分配 <$STR(N$手续金额分配)>
MOV N$新利方金额 <$STR(N$新金额分配)>
MOV N$新败方金额 <$STR(N$新金额分配)>
DIV N$新利方金额 100
DIV N$新败方金额 100
MUL N$新利方金额 60
MUL N$新败方金额 40
#IF
#SAY
<>\ \ \ \
<> <所有捐献的点券都会累计在沙城奖金做为攻城激情奖励!/SCOLOR=103>\
<> <合区清理捐献数据,请玩家理性捐献!合区后只需要捐献150点券就可获得属性。/SCOLOR=103>\
<> <新区首次捐献最低300点券,过后可捐献任意点券争夺排名,获得更高属性!/SCOLOR=103>\
<> <【捐献排名】/SCOLOR=146> <【捐献数量】/SCOLOR=146> <【捐献属性】/SCOLOR=146>\
<> <第一名:/SCOLOR=245><$STR(S$排名1)> <捐献点券:/SCOLOR=151>{<$STR(S$金额1)>/SCOLOR=70} <查看第一名属性|151#力量、体力+40{(1点力量=0.01倍攻击,1点体力=0.01倍生命)|250}^-^151#杀怪爆率+300%^-^151#附加伤害+30%^-^243#攻击速度 +3%/SCOLOR=250> \
<> <第二名:/SCOLOR=161><$STR(S$排名2)> <捐献点券:/SCOLOR=151>{<$STR(S$金额2)>/SCOLOR=70} <查看第二名属性|151#力量、体力+20{(1点力量=0.01倍攻击,1点体力=0.01倍生命)|250}^-^151#杀怪爆率+200%^-^151#附加伤害+18%/SCOLOR=161>\
<> <第三名:/SCOLOR=161><$STR(S$排名3)> <捐献点券:/SCOLOR=151>{<$STR(S$金额3)>/SCOLOR=70} <查看第三名属性|151#力量、体力+15{(1点力量=0.01倍攻击,1点体力=0.01倍生命)|250}^-^151#杀怪爆率+150%^-^151#附加伤害+15%/SCOLOR=161>\
<> <第四名:/SCOLOR=161><$STR(S$排名4)> <捐献点券:/SCOLOR=151>{<$STR(S$金额4)>/SCOLOR=70} <查看第四名属性|151#力量、体力+10{(1点力量=0.01倍攻击,1点体力=0.01倍生命)|250}^-^151#杀怪爆率+120%^-^151#附加伤害+11%/SCOLOR=161>\
<> <第五名:/SCOLOR=161><$STR(S$排名5)> <捐献点券:/SCOLOR=151>{<$STR(S$金额5)>/SCOLOR=70} <查看第五名属性|151#力量、体力+5{(1点力量=0.01倍攻击,1点体力=0.01倍生命)|250}^-^151#杀怪爆率+80%^-^151#附加伤害+8%/SCOLOR=161>\
<> <您当前捐献累计:/SCOLOR=146><$HUMAN(JK)><点券/SCOLOR=151>\
<> <捐献累计达到300点券获得以下属性:↓/SCOLOR=146>\
<> <附加伤害+5%.杀怪爆率+50%.回收增益+20%/SCOLOR=245>\ \
<> <【地下城】/SCOLOR=218><今日一区已累计沙城奖金:[/SCOLOR=250><$STR(N$捐献金额1)><]点券/SCOLOR=250>\
<> <【地下城】/SCOLOR=218><今日二区已累计沙城奖金:[/SCOLOR=250><$STR(N$捐献金额2)><]点券/SCOLOR=250>\
<> <【地下城】/SCOLOR=218><今日三区已累计沙城奖金:[/SCOLOR=250><$STR(N$捐献金额3)><]点券/SCOLOR=250>\
<> <【地下城】/SCOLOR=218><今日四区已累计沙城奖金:[/SCOLOR=250><$STR(N$捐献金额4)><]点券/SCOLOR=250>\
<> <【地下城】/SCOLOR=218><今日五区已累计沙城奖金:[/SCOLOR=250><$STR(N$捐献金额5)><]点券/SCOLOR=250>\
<> <【地下城】/SCOLOR=218><今日六区已累计沙城奖金:[/SCOLOR=250><$STR(N$捐献金额6)><]点券/SCOLOR=250>\
<> <【地下城】/SCOLOR=218><今日所有区沙城奖金总额:/SCOLOR=249><[><$STR(N$捐献总金额)><]> <点券/SCOLOR=249>\
<> <【地下城】/SCOLOR=218><上次合区沙城奖金总额:/SCOLOR=249><[><$STR(N$合区捐献总金额1)><]> <点券/SCOLOR=249>\
<> <【地下城】/SCOLOR=218><合区后沙城奖金总额:/SCOLOR=249><[><$STR(N$合区捐献总金额)><]> <点券/SCOLOR=249>\
<> <攻城胜利方行会获得沙城奖金60%金额:/SCOLOR=69><(失败方只允许1个人数最多的行会)/SCOLOR=218>\
<> <攻城失败方行会获得沙城奖金40%金额:/SCOLOR=69><(如出现2个失败方,按实力来划分!)/SCOLOR=218>\
<> <沙城奖金官方收取20%运营费+10%平台结算费,攻城后沙城奖金以微信群红包形式发放!/SCOLOR=69>\
<> <ImgEx:22:2003:2005:2005:314:-208/@@InPutInteger15>\
<> <注:个人捐献达到20000点券均可享受第一名的额外属性 合区后属性也永久保留./SCOLOR=31>\
<> <沙巴克攻城已经开始.不拿沙或者无激情奖励扣除.激情一边倒奖励减半!/SCOLOR=250>\
[@InPutInteger15]
#IF
#ACT
MOV N$捐献检测吧 300
#IF
CHECKCONTAINSTEXT <$SERVERNAME> 合区
#ACT
MOV N$捐献检测吧 150
#IF
EQUAL N15
#ACT
messagebox 请输入捐献点券数量!
GOTO @main
BREAK
#IF
SMALL N15 10
#ACT
messagebox 捐献最低需要10点券!
GOTO @main
BREAK
#IF
CHECKGAMEGIRD < <$STR(N15)>
#ACT
messagebox 您没有那么多的点券!
BREAK
#IF
SMALL N15 <$STR(N$捐献检测吧)>
NOT CHECKNAMELIST ..\QuestDiary\RMB点捐款\第六排名.txt
#ACT
messagebox 首次捐献最低<$STR(N$捐献检测吧)>点券!
GOTO @main
BREAK
#IF
CHECKCONTAINSTEXT <$SERVERNAME> 测试
#ACT
GAMEGIRD - <$STR(N15)>
CALCVAR HUMAN JK + <$STR(N15)>
SAVEVAR HUMAN JK ..\QuestDiary\RMB点捐款\RMB点捐款.txt
Addnamelist ..\QuestDiary\RMB点捐款\第六排名.txt
GOTO @main
#CALL [\总属性刷新.txt] @属性刷新
gmexecute 全服触发 @捐献重置
MESSAGEBOX 感谢您对沙城奖金提供赞助支持!break
#IF
CHECKCONTAINSTEXT <$SERVERNAME> 合区
#ACT
INC G44 <$STR(N15)>
INC U48 <$STR(N15)>
GAMEGIRD - <$STR(N15)>
CALCVAR HUMAN JK + <$STR(N15)>
SAVEVAR HUMAN JK ..\QuestDiary\RMB点捐款\RMB点捐款.txt
Addnamelist ..\QuestDiary\RMB点捐款\第六排名.txt
GETRANDOMLINETEXT ..\..\..\..\..\地下城配置文件\通区文本\沙城捐献\<$STR(A1)>沙城捐献\合区捐献.txt <$STR(N$合区捐献总金额)> 0
DELTEXTLIST ..\..\..\..\..\地下城配置文件\通区文本\沙城捐献\<$STR(A1)>沙城捐献\合区捐献.txt <$STR(N$合区捐献总金额)>
INC N$合区捐献总金额 <$STR(N15)>
AddTextListEx ..\..\..\..\..\地下城配置文件\通区文本\沙城捐献\<$STR(A1)>沙城捐献\合区捐献.txt <$STR(N$合区捐献总金额)>
GOTO @main
#CALL [\总属性刷新.txt] @属性刷新
gmexecute 全服触发 @捐献重置
MESSAGEBOX 感谢您对沙城奖金提供赞助支持!
SENDMOVEMSG 0 249 251 250 1 ≮系统公告≯:[<$USERNAME>]成为捐献玩家,一起来期待他的表现吧!
break
我知道答案
回答被采纳将会获得 1 + 500 萝卜币 已有0人回答
|
|