传奇教程 传奇开区一条龙常用的沙城带捐献功能脚本明文版 传奇版本

传奇教程 传奇开区一条龙常用的沙城带捐献功能脚本明文版 传奇版本

学习教程tuzi2022-09-05 10:07:06A+A-

[@main]
#if
CheckContainsText <$SERVERNAME> 测试
#act
MESSAGEBOX 测试区不支持此功能!!!
break

#IF
checklevelex > 0
#say
<>\ \
<PlayImg:15:2269:30:100:0:-5:0>  <沙城捐献/SCOLOR=253>   <查看沙城捐献资金分配说明|251#开启沙城捐献的资金50%为攻城奖励^-^251#20%为及时雨奖池奖金^-^251#沙奖励具体奖励方法请看“沙城奖励”/SCOLOR=250>     <奖池总计:/SCOLOR=251><$STR(N$显示总金额)><RMB点/SCOLOR=251>\
<PlayImg:15:2269:30:100:0:-5:0>  <捐献说明: 首次捐献合区之后属性清除,永久捐献为永久保留属性/SCOLOR=251>\
<PlayImg:15:2269:30:100:0:-5:0>  <首次捐献: 怪物爆率+30%,HP+1000,攻击+88,刀刀吸血+100/SCOLOR=254>\
<PlayImg:15:2269:30:100:0:-5:0>            <,刀刀切割+900,增加30%杀怪经验/SCOLOR=254>  <捐献费用:30万RMB点/SCOLOR=243>\
<PlayImg:15:2269:30:100:0:-5:0>  <永久捐献: 怪物爆率+50%,HP+1500,攻击+150,刀刀吸血+200/SCOLOR=254>\
<PlayImg:15:2269:30:100:0:-5:0>            <刀刀切割+1500,增加50%杀怪经验/SCOLOR=254>  <捐献费用:60万RMB点/SCOLOR=243>\
<PlayImg:15:2269:30:100:0:-5:0>  <今日一区/SCOLOR=254> <已经累计沙城奖励    [金额]:/SCOLOR=95><$STR(S$捐献金额0)><RMB点/SCOLOR=95>\
<PlayImg:15:2269:30:100:0:-5:0>  <今日二区/SCOLOR=254> <已经累计沙城奖励    [金额]:/SCOLOR=95><$STR(S$捐献金额1)><RMB点/SCOLOR=95>\
<PlayImg:15:2269:30:100:0:-5:0>  <今日三区/SCOLOR=254> <已经累计沙城奖励    [金额]:/SCOLOR=95><$STR(S$捐献金额2)><RMB点/SCOLOR=95>\
<PlayImg:15:2269:30:100:0:-5:0>  <沙城捐献者福利/@个人沙捐领奖>        <[首次捐献]/@首次沙城捐献>        <[永久捐献]/@永久沙城捐献>      
;<PlayImg:15:2269:30:100:0:-5:0>  <沙城捐献者福利/@个人沙捐领奖>  <每次捐献费用:30万RMB点/SCOLOR=243> <[我要捐献]/@开启沙城捐献>  <我已捐献/SCOLOR=250><$STR(U39)><次/SCOLOR=250>
#ACT
OPENMERCHANTBIGDLG 15 2225 1 4 10 -100 1 446 0
GetListString ..\..\..\..\通区捐献\<$STR(A100)>\当前01区.txt 0 S$当前一区 S$捐献金额0
GetListString ..\..\..\..\通区捐献\<$STR(A100)>\当前02区.txt 0 S$当前二区 S$捐献金额1
GetListString ..\..\..\..\通区捐献\<$STR(A100)>\当前03区.txt 0 S$当前三区 S$捐献金额2
GetListString ..\..\..\..\通区捐献\<$STR(A100)>\当前04区.txt 0 S$当前四区 S$捐献金额3
GetListString ..\..\..\..\通区捐献\<$STR(A100)>\当前05区.txt 0 S$当前五区 S$捐献金额4
GetListString ..\..\..\..\通区捐献\<$STR(A100)>\当前06区.txt 0 S$当前六区 S$捐献金额5
GetListString ..\..\..\..\通区捐献\<$STR(A100)>\当前战区.txt 0 S$当前战区 S$捐献金额6
GetListString ..\..\..\..\通区捐献\<$STR(A100)>\当前合区.txt 0 S$当前合区 S$捐献金额7
MOV N$总金额 0
INC N$总金额 <$str(S$捐献金额0)>
INC N$总金额 <$str(S$捐献金额1)>
INC N$总金额 <$str(S$捐献金额2)>
INC N$总金额 <$str(S$捐献金额3)>
INC N$总金额 <$str(S$捐献金额4)>
INC N$总金额 <$str(S$捐献金额5)>
INC N$总金额 <$str(S$捐献金额6)>
INC N$总金额 <$str(S$捐献金额7)>
;DIV N$显示总金额 <$str(N$总金额)> 10
;MUL N$显示总金额 7
MOV N$显示总金额 <$str(N$总金额)>
SetStringBlank S$捐献金额0 15 1
SetStringBlank S$捐献金额1 15 1
SetStringBlank S$捐献金额2 15 1
SetStringBlank S$捐献金额3 15 1
SetStringBlank S$捐献金额4 15 1
SetStringBlank S$捐献金额5 15 1
SetStringBlank S$捐献金额6 15 1
SetStringBlank S$捐献金额7 15 1
break

[@首次沙城捐献]
#IF
CHECKGAMEPOINT < 300000
#ACT
MESSAGEBOX 你的RMB点不够!
break

#if
NOT CHECKGAMEPOINT < 300000
#ACT
MESSAGEBOX 你确定要花30万RMB点开首次沙城捐献吗?\ \可以直接60万RMB点开永久捐献!!!! @开个临时 @exit
break

[@开个临时]
#IF
LARGE U39 0
#ACT
MESSAGEBOX 请点击永久捐献!!!!!
break

#IF
CHECKGAMEPOINT < 300000
#ACT
MESSAGEBOX 你的RMB点不够!
break


#IF
EQUAL U39 0
CheckContainsText <$SERVERNAME> 号区
CHECKGAMEPOINT > 299999
#ACT
GAMEPOINT - 300000
INC G211 150000
INC G212 60000
INC U39 1
#CALL [\登陆\属性给予.TXT] @人物属性
#CALL [\登陆\属性给予.TXT] @切割计算
#CALL [\登陆\属性给予.TXT] @吸血计算
#CALL [\登陆\属性给予.TXT] @爆率计算
;#CALL [\登陆\属性给予.TXT] @经验计算
AddTextListEx ..\QuestDiary\临时数据\沙捐临时记录.txt <$USERNAME>
CLEARNAMELIST ..\..\..\..\通区捐献\<$STR(A100)>\当前合区.txt
AddTextListEx ..\..\..\..\通区捐献\<$STR(A100)>\当前合区.txt 当前合区:<$STR(G211)> 0
AddTextListEx ..\..\..\..\通区捐献\<$STR(A100)>\捐献数据.txt <$USERNAME> 0
GOTO @红包雨计算
break

#IF
EQUAL U39 0
CheckContainsText <$SERVERNAME> 01区
CHECKGAMEPOINT > 299999
#ACT
GAMEPOINT - 300000
INC G211 150000
INC G212 60000
INC U39 1
#CALL [\登陆\属性给予.TXT] @人物属性
#CALL [\登陆\属性给予.TXT] @切割计算
#CALL [\登陆\属性给予.TXT] @吸血计算
#CALL [\登陆\属性给予.TXT] @爆率计算
;#CALL [\登陆\属性给予.TXT] @经验计算
AddTextListEx ..\QuestDiary\临时数据\沙捐临时记录.txt <$USERNAME>
CLEARNAMELIST ..\..\..\..\通区捐献\<$STR(A100)>\当前01区.txt
AddTextListEx ..\..\..\..\通区捐献\<$STR(A100)>\当前01区.txt 当前一区:<$STR(G211)> 0
AddTextListEx ..\..\..\..\通区捐献\<$STR(A100)>\捐献数据.txt <$USERNAME> 0
GOTO @红包雨计算
break


#IF
EQUAL U39 0
CheckContainsText <$SERVERNAME> 02区
CHECKGAMEPOINT > 299999
#ACT
GAMEPOINT - 300000
INC G211 150000
INC G212 60000
INC U39 1
#CALL [\登陆\属性给予.TXT] @人物属性
#CALL [\登陆\属性给予.TXT] @切割计算
#CALL [\登陆\属性给予.TXT] @吸血计算
#CALL [\登陆\属性给予.TXT] @爆率计算
;#CALL [\登陆\属性给予.TXT] @经验计算
AddTextListEx ..\QuestDiary\临时数据\沙捐临时记录.txt <$USERNAME>
CLEARNAMELIST ..\..\..\..\通区捐献\<$STR(A100)>\当前02区.txt
AddTextListEx ..\..\..\..\通区捐献\<$STR(A100)>\当前02区.txt 当前二区:<$STR(G211)> 0
AddTextListEx ..\..\..\..\通区捐献\<$STR(A100)>\捐献数据.txt <$USERNAME> 0
GOTO @红包雨计算
break

#IF
EQUAL U39 0
CheckContainsText <$SERVERNAME> 03区
CHECKGAMEPOINT > 299999
#ACT
GAMEPOINT - 300000
INC G211 150000
INC G212 60000
INC U39 1
#CALL [\登陆\属性给予.TXT] @人物属性
#CALL [\登陆\属性给予.TXT] @切割计算
#CALL [\登陆\属性给予.TXT] @吸血计算
#CALL [\登陆\属性给予.TXT] @爆率计算
;#CALL [\登陆\属性给予.TXT] @经验计算
AddTextListEx ..\QuestDiary\临时数据\沙捐临时记录.txt <$USERNAME>
CLEARNAMELIST ..\..\..\..\通区捐献\<$STR(A100)>\当前03区.txt
AddTextListEx ..\..\..\..\通区捐献\<$STR(A100)>\当前03区.txt 当前三区:<$STR(G211)> 0
AddTextListEx ..\..\..\..\通区捐献\<$STR(A100)>\捐献数据.txt <$USERNAME> 0
GOTO @红包雨计算
break

#IF
EQUAL U39 0
CheckContainsText <$SERVERNAME> 04区
CHECKGAMEPOINT > 299999
#ACT
GAMEPOINT - 300000
INC G211 150000
INC G212 60000
INC U39 1
#CALL [\登陆\属性给予.TXT] @人物属性
#CALL [\登陆\属性给予.TXT] @切割计算
#CALL [\登陆\属性给予.TXT] @吸血计算
#CALL [\登陆\属性给予.TXT] @爆率计算
;#CALL [\登陆\属性给予.TXT] @经验计算
AddTextListEx ..\QuestDiary\临时数据\沙捐临时记录.txt <$USERNAME>
CLEARNAMELIST ..\..\..\..\通区捐献\<$STR(A100)>\当前04区.txt
AddTextListEx ..\..\..\..\通区捐献\<$STR(A100)>\当前04区.txt 当前四区:<$STR(G211)> 0
AddTextListEx ..\..\..\..\通区捐献\<$STR(A100)>\捐献数据.txt <$USERNAME> 0
GOTO @红包雨计算
break

#IF
EQUAL U39 0
CheckContainsText <$SERVERNAME> 05区
CHECKGAMEPOINT > 299999
#ACT
GAMEPOINT - 300000
INC G211 150000
INC G212 60000
INC U39 1
#CALL [\登陆\属性给予.TXT] @人物属性
#CALL [\登陆\属性给予.TXT] @切割计算
#CALL [\登陆\属性给予.TXT] @吸血计算
#CALL [\登陆\属性给予.TXT] @爆率计算
;#CALL [\登陆\属性给予.TXT] @经验计算
AddTextListEx ..\QuestDiary\临时数据\沙捐临时记录.txt <$USERNAME>
CLEARNAMELIST ..\..\..\..\通区捐献\<$STR(A100)>\当前05区.txt
AddTextListEx ..\..\..\..\通区捐献\<$STR(A100)>\当前05区.txt 当前五区:<$STR(G211)> 0
AddTextListEx ..\..\..\..\通区捐献\<$STR(A100)>\捐献数据.txt <$USERNAME> 0
GOTO @红包雨计算
break


#IF
EQUAL U39 0
CheckContainsText <$SERVERNAME> 06区
CHECKGAMEPOINT > 299999
#ACT
GAMEPOINT - 300000
INC G211 150000
INC G212 60000
INC U39 1
#CALL [\登陆\属性给予.TXT] @人物属性
#CALL [\登陆\属性给予.TXT] @切割计算
#CALL [\登陆\属性给予.TXT] @吸血计算
#CALL [\登陆\属性给予.TXT] @爆率计算
;#CALL [\登陆\属性给予.TXT] @经验计算
AddTextListEx ..\QuestDiary\临时数据\沙捐临时记录.txt <$USERNAME>
CLEARNAMELIST ..\..\..\..\通区捐献\<$STR(A100)>\当前06区.txt
AddTextListEx ..\..\..\..\通区捐献\<$STR(A100)>\当前06区.txt 当前六区:<$STR(G211)> 0
AddTextListEx ..\..\..\..\通区捐献\<$STR(A100)>\捐献数据.txt <$USERNAME> 0
GOTO @红包雨计算
break


#IF
EQUAL U39 0
CheckContainsText <$SERVERNAME> 战区
CHECKGAMEPOINT > 299999
#ACT
GAMEPOINT - 300000
INC G211 150000
INC G212 60000
INC U39 1
#CALL [\登陆\属性给予.TXT] @人物属性
#CALL [\登陆\属性给予.TXT] @切割计算
#CALL [\登陆\属性给予.TXT] @吸血计算
#CALL [\登陆\属性给予.TXT] @爆率计算
;#CALL [\登陆\属性给予.TXT] @经验计算
AddTextListEx ..\QuestDiary\临时数据\沙捐临时记录.txt <$USERNAME>
CLEARNAMELIST ..\..\..\..\通区捐献\<$STR(A100)>\当前战区.txt
AddTextListEx ..\..\..\..\通区捐献\<$STR(A100)>\当前战区.txt 当前战区:<$STR(G211)> 0
AddTextListEx ..\..\..\..\通区捐献\<$STR(A100)>\捐献数据.txt <$USERNAME> 0
GOTO @红包雨计算
break




[@永久沙城捐献]
#IF
equal U39 2
#ACT
MESSAGEBOX 永久捐献只可以捐一次!!!!!
break

#IF
CHECKGAMEPOINT < 600000
#ACT
MESSAGEBOX 你的RMB点不够!
break

#IF
SMALL U39 2
CheckContainsText <$SERVERNAME> 号区
CHECKGAMEPOINT > 599999
#ACT
GAMEPOINT - 600000
INC G211 300000
INC G212 120000
MOV U39 2
#CALL [\登陆\属性给予.TXT] @人物属性
#CALL [\登陆\属性给予.TXT] @切割计算
#CALL [\登陆\属性给予.TXT] @吸血计算
#CALL [\登陆\属性给予.TXT] @爆率计算
;#CALL [\登陆\属性给予.TXT] @经验计算
AddTextListEx ..\QuestDiary\临时数据\沙捐临时记录.txt <$USERNAME>
CLEARNAMELIST ..\..\..\..\通区捐献\<$STR(A100)>\当前合区.txt
AddTextListEx ..\..\..\..\通区捐献\<$STR(A100)>\当前合区.txt 当前合区:<$STR(G211)> 0
AddTextListEx ..\..\..\..\通区捐献\<$STR(A100)>\捐献数据.txt <$USERNAME> 0
GOTO @红包雨计算
break

#IF
SMALL U39 2
CheckContainsText <$SERVERNAME> 01区
CHECKGAMEPOINT > 599999
#ACT
GAMEPOINT - 600000
INC G211 300000
INC G212 120000
MOV U39 2
#CALL [\登陆\属性给予.TXT] @人物属性
#CALL [\登陆\属性给予.TXT] @切割计算
#CALL [\登陆\属性给予.TXT] @吸血计算
#CALL [\登陆\属性给予.TXT] @爆率计算
;#CALL [\登陆\属性给予.TXT] @经验计算
AddTextListEx ..\QuestDiary\临时数据\沙捐临时记录.txt <$USERNAME>
CLEARNAMELIST ..\..\..\..\通区捐献\<$STR(A100)>\当前01区.txt
AddTextListEx ..\..\..\..\通区捐献\<$STR(A100)>\当前01区.txt 当前一区:<$STR(G211)> 0
AddTextListEx ..\..\..\..\通区捐献\<$STR(A100)>\捐献数据.txt <$USERNAME> 0
GOTO @红包雨计算
break


#IF
SMALL U39 2
CheckContainsText <$SERVERNAME> 02区
CHECKGAMEPOINT > 599999
#ACT
GAMEPOINT - 600000
INC G211 300000
INC G212 120000
MOV U39 2
#CALL [\登陆\属性给予.TXT] @人物属性
#CALL [\登陆\属性给予.TXT] @切割计算
#CALL [\登陆\属性给予.TXT] @吸血计算
#CALL [\登陆\属性给予.TXT] @爆率计算
;#CALL [\登陆\属性给予.TXT] @经验计算
AddTextListEx ..\QuestDiary\临时数据\沙捐临时记录.txt <$USERNAME>
CLEARNAMELIST ..\..\..\..\通区捐献\<$STR(A100)>\当前02区.txt
AddTextListEx ..\..\..\..\通区捐献\<$STR(A100)>\当前02区.txt 当前二区:<$STR(G211)> 0
AddTextListEx ..\..\..\..\通区捐献\<$STR(A100)>\捐献数据.txt <$USERNAME> 0
GOTO @红包雨计算
break

#IF
SMALL U39 2
CheckContainsText <$SERVERNAME> 03区
CHECKGAMEPOINT > 599999
#ACT
GAMEPOINT - 600000
INC G211 300000
INC G212 120000
MOV U39 2
#CALL [\登陆\属性给予.TXT] @人物属性
#CALL [\登陆\属性给予.TXT] @切割计算
#CALL [\登陆\属性给予.TXT] @吸血计算
#CALL [\登陆\属性给予.TXT] @爆率计算
;#CALL [\登陆\属性给予.TXT] @经验计算
AddTextListEx ..\QuestDiary\临时数据\沙捐临时记录.txt <$USERNAME>
CLEARNAMELIST ..\..\..\..\通区捐献\<$STR(A100)>\当前03区.txt
AddTextListEx ..\..\..\..\通区捐献\<$STR(A100)>\当前03区.txt 当前三区:<$STR(G211)> 0
AddTextListEx ..\..\..\..\通区捐献\<$STR(A100)>\捐献数据.txt <$USERNAME> 0
GOTO @红包雨计算
break

#IF
SMALL U39 2
CheckContainsText <$SERVERNAME> 04区
CHECKGAMEPOINT > 599999
#ACT
GAMEPOINT - 600000
INC G211 300000
INC G212 120000
MOV U39 2
#CALL [\登陆\属性给予.TXT] @人物属性
#CALL [\登陆\属性给予.TXT] @切割计算
#CALL [\登陆\属性给予.TXT] @吸血计算
#CALL [\登陆\属性给予.TXT] @爆率计算
;#CALL [\登陆\属性给予.TXT] @经验计算
AddTextListEx ..\QuestDiary\临时数据\沙捐临时记录.txt <$USERNAME>
CLEARNAMELIST ..\..\..\..\通区捐献\<$STR(A100)>\当前04区.txt
AddTextListEx ..\..\..\..\通区捐献\<$STR(A100)>\当前04区.txt 当前四区:<$STR(G211)> 0
AddTextListEx ..\..\..\..\通区捐献\<$STR(A100)>\捐献数据.txt <$USERNAME> 0
GOTO @红包雨计算
break

#IF
SMALL U39 2
CheckContainsText <$SERVERNAME> 05区
CHECKGAMEPOINT > 599999
#ACT
GAMEPOINT - 600000
INC G211 300000
INC G212 120000
MOV U39 2
#CALL [\登陆\属性给予.TXT] @人物属性
#CALL [\登陆\属性给予.TXT] @切割计算
#CALL [\登陆\属性给予.TXT] @吸血计算
#CALL [\登陆\属性给予.TXT] @爆率计算
;#CALL [\登陆\属性给予.TXT] @经验计算
AddTextListEx ..\QuestDiary\临时数据\沙捐临时记录.txt <$USERNAME>
CLEARNAMELIST ..\..\..\..\通区捐献\<$STR(A100)>\当前05区.txt
AddTextListEx ..\..\..\..\通区捐献\<$STR(A100)>\当前05区.txt 当前五区:<$STR(G211)> 0
AddTextListEx ..\..\..\..\通区捐献\<$STR(A100)>\捐献数据.txt <$USERNAME> 0
GOTO @红包雨计算
break


#IF
SMALL U39 2
CheckContainsText <$SERVERNAME> 06区
CHECKGAMEPOINT > 599999
#ACT
GAMEPOINT - 600000
INC G211 300000
INC G212 120000
MOV U39 2
#CALL [\登陆\属性给予.TXT] @人物属性
#CALL [\登陆\属性给予.TXT] @切割计算
#CALL [\登陆\属性给予.TXT] @吸血计算
#CALL [\登陆\属性给予.TXT] @爆率计算
;#CALL [\登陆\属性给予.TXT] @经验计算
AddTextListEx ..\QuestDiary\临时数据\沙捐临时记录.txt <$USERNAME>
CLEARNAMELIST ..\..\..\..\通区捐献\<$STR(A100)>\当前06区.txt
AddTextListEx ..\..\..\..\通区捐献\<$STR(A100)>\当前06区.txt 当前六区:<$STR(G211)> 0
AddTextListEx ..\..\..\..\通区捐献\<$STR(A100)>\捐献数据.txt <$USERNAME> 0
GOTO @红包雨计算
break


#IF
SMALL U39 2
CheckContainsText <$SERVERNAME> 战区
CHECKGAMEPOINT > 599999
#ACT
GAMEPOINT - 600000
INC G211 300000
INC G212 120000
MOV U39 2
#CALL [\登陆\属性给予.TXT] @人物属性
#CALL [\登陆\属性给予.TXT] @切割计算
#CALL [\登陆\属性给予.TXT] @吸血计算
#CALL [\登陆\属性给予.TXT] @爆率计算
;#CALL [\登陆\属性给予.TXT] @经验计算
AddTextListEx ..\QuestDiary\临时数据\沙捐临时记录.txt <$USERNAME>
CLEARNAMELIST ..\..\..\..\通区捐献\<$STR(A100)>\当前战区.txt
AddTextListEx ..\..\..\..\通区捐献\<$STR(A100)>\当前战区.txt 当前战区:<$STR(G211)> 0
AddTextListEx ..\..\..\..\通区捐献\<$STR(A100)>\捐献数据.txt <$USERNAME> 0
GOTO @红包雨计算
break


[@红包雨计算]
#if
SMALL G212 1000000
#ACT
GOTO @MAIN
break

#IF
LARGE G212 999999
#ACT
MOV G212 0
ThrowItem HDZS01 32 34 10 红包 20|120
SENDMOVEMSG 0 253 255 300 1 时时红包雨活动已经开启,请通过点击顶部激情活动进入活动地图争夺红包!
SENDMOVEMSG 0 250 255 270 1 时时红包雨活动已经开启,请通过点击顶部激情活动进入活动地图争夺红包!
SENDMOVEMSG 0 252 255 240 1 时时红包雨活动已经开启,请通过点击顶部激情活动进入活动地图争夺红包!
GOTO @MAIN
Gmexecute 开始提问 @红包捡取
break



[@个人沙捐领奖]
#IF
LARGE U47 0
#ACT
MOV N$累积经验 <$STR(U47)>
DIV N$累积经验 10000
#ELSEACT
MOV N$累积经验 0

#IF
checklevelex > 0
#say
<> \ \ \ \ \
;<>            <当前累计幸运:<$STR(U45)>/SCOLOR=254>\
;<>      <ImgEx:21:1499:1500:1501:35:0/@领取幸运累计>\ \ \
<>            <当前累计元宝:<$STR(U46)>/SCOLOR=254>\
<>      <ImgEx:21:1499:1500:1501:35:0/@领取元宝累计>\ \ \
<>            <当前累计经验:<$STR(N$累积经验)>万/SCOLOR=254>\
<>      <ImgEx:21:1499:1500:1501:35:0/@领取经验累计>\ \ \
<>     <沙城捐献者击杀怪物的元宝和/SCOLOR=251>\
<>      <经验可累计到此再领取一次/SCOLOR=251>
#ACT
OPENMERCHANTBIGDLG 21 1502 1 4 10 -100 1 249 6
break




[@领取元宝累计]
#IF
Equal U39 0
#ACT
MESSAGEBOX 你没有捐献,无法领取!!!
break

#if
LARGE U39 0
Large U46 0
#ACT
GAMEGOLD + <$STR(U46)>
MESSAGEBOX 本次提取了<$STR(U46)>个元宝
MOV U46 0
GOTO @个人沙捐领奖
break
#elseact
messagebox 你没有累积到元宝
break

[@领取经验累计]
#IF
Equal U39 0
#ACT
MESSAGEBOX 你没有捐献,无法领取!!!
break

#if
LARGE U39 0
Large U47 0
#ACT
CHANGEEXP + <$STR(U47)>
MESSAGEBOX 本次提取了<$STR(N$累积经验)>万经验值
MOV U47 0
MOV N$累积经验 0
GOTO @个人沙捐领奖
break
#elseact
messagebox 你没有累积到经验值
break

点击这里复制本文地址

声明

本站发布所有广告信息、下载资源,均来自互联网,非本站自制,与本站无关。 如有侵犯您的合法权益请来信告之。我们会在三个工作日内予以清除。


本站中所有资料、资源文件均来自于网络搜索,仅作为技术学习研究之用,请必须在24小时内删除所下载文件,切勿用于商业用途,否则由此引发的法律纠纷及连带责任本站和发布者概不承担。


本站保证站内提供的所有可下载资源(软件等等)都是按“原样”提供,本站未做过任何改动;但本网站不保证本站提供的下载资源的准确性、安全性和完整性;同时本网站也不承担用户因使用这些下载资源对自己和他人造成任何形式的损失或伤害。 


访问本站的用户必须明白,[资源爱好者]对提供下载的软件等不拥有任何权利,其版权归该下载资源的合法拥有者所有。


本站所有资源均不提供相关技术服务,如果源码下载地址失效则请联系站长进行补发。


本站所有资源展现图片仅供参考

资源爱好者 © 本站发布所有资源,均来自互联网,非本站自制,分享目的仅供大家学习与参考,与本站无关。
如有侵犯您的合法权益请来信告之。我们会在三个工作日内予以清除。邮箱:admin?aihao.org
关于我们|广告合作|网站地图|冀ICP备14009590号|冀公网安备 13018302000072号