2个NPC捐献不了。点了没反应

asd11asd · 发表于 2020-2-24 03:23:00

论坛下的版本。沙巴克和富豪捐献不了，请问有大佬帮助下吗？
一下为内容。
[@main]
#IF
NOT CHECKTEXTLIST ..\..\..\..\..\喵喵制作\捐献文本\<$STR(A321)>\检测是否已经创建目录.txt 已创建目录
#act
ForceDirectories  ..\..\..\..\..\喵喵制作\捐献文本\
ForceDirectories  ..\..\..\..\..\喵喵制作\捐献文本\<$STR(A321)>\
CreateFile ..\..\..\..\..\喵喵制作\捐献文本\<$STR(A321)>\检测是否已经创建目录.txt
AddTextListEx  ..\..\..\..\..\喵喵制作\捐献文本\<$STR(A321)>\检测是否已经创建目录.txt 已创建目录 0
CreateFile ..\..\..\..\..\喵喵制作\捐献文本\<$STR(A321)>\01区.txt
CreateFile ..\..\..\..\..\喵喵制作\捐献文本\<$STR(A321)>\02区.txt
CreateFile ..\..\..\..\..\喵喵制作\捐献文本\<$STR(A321)>\03区.txt
CreateFile ..\..\..\..\..\喵喵制作\捐献文本\<$STR(A321)>\04区.txt
CreateFile ..\..\..\..\..\喵喵制作\捐献文本\<$STR(A321)>\05区.txt
CreateFile ..\..\..\..\..\喵喵制作\捐献文本\<$STR(A321)>\06区.txt

#IF
#ACT
;MOV  N$捐献界面_名字列长度  14
;MOV  N$捐献界面_数量列长度  10
;MOV  N$捐献界面_读取排名 0
;MOV  N$捐献_数据后标       1
;GOTO @捐献_数据读取
GOTO @捐献界面优化
GOTO @捐献界面

[@捐献_数据读取]
#IF
SMALL  N$捐献界面_读取排名 6
#ACT
GetRandomText ..\QuestDiary\天道捐献\捐献排名.txt          S$玩家名字    <$STR(N$捐献界面_读取排名)>
GetRandomText ..\QuestDiary\天道捐献\捐献排名.txt          S$玩家名字_排版  <$STR(N$捐献界面_读取排名)>
GetRandomText ..\QuestDiary\天道捐献\捐献排名_捐献数量.txt  N$捐献数量    <$STR(N$捐献界面_读取排名)>
GetRandomText ..\QuestDiary\天道捐献\捐献排名_捐献数量.txt  S$捐献数量_排版  <$STR(N$捐献界面_读取排名)>
GOTO @捐献界面优化

#IF
EQUAL  N$捐献_数据后标  1
#ACT
MOV S$玩家1_排版       <$STR(S$玩家名字_排版)>
MOV S$捐献数量1_排版    <$STR(S$捐献数量_排版)>
MOV A101                <$STR(S$玩家名字)>
MOV G101                <$STR(N$捐献数量)>

#IF
EQUAL  N$捐献_数据后标  2
#ACT
MOV S$玩家2_排版       <$STR(S$玩家名字_排版)>
MOV S$捐献数量2_排版    <$STR(S$捐献数量_排版)>
MOV A102                <$STR(S$玩家名字)>
MOV G102                <$STR(N$捐献数量)>

#IF
EQUAL  N$捐献_数据后标  3
#ACT
MOV S$玩家3_排版       <$STR(S$玩家名字_排版)>
MOV S$捐献数量3_排版    <$STR(S$捐献数量_排版)>
MOV A103                <$STR(S$玩家名字)>
MOV G103                <$STR(N$捐献数量)>

#IF
EQUAL  N$捐献_数据后标  4
#ACT
MOV S$玩家4_排版       <$STR(S$玩家名字_排版)>
MOV S$捐献数量4_排版    <$STR(S$捐献数量_排版)>
MOV A104                <$STR(S$玩家名字)>
MOV G104                <$STR(N$捐献数量)>

#IF
EQUAL  N$捐献_数据后标  5
#ACT
MOV S$玩家5_排版       <$STR(S$玩家名字_排版)>
MOV S$捐献数量5_排版    <$STR(S$捐献数量_排版)>
MOV A105                <$STR(S$玩家名字)>
MOV G105                <$STR(N$捐献数量)>

#IF
EQUAL  N$捐献_数据后标  6
#ACT
MOV S$玩家6_排版       <$STR(S$玩家名字_排版)>
MOV S$捐献数量6_排版    <$STR(S$捐献数量_排版)>
MOV A106                <$STR(S$玩家名字)>
MOV G106                <$STR(N$捐献数量)>

#IF
NOT EQUAL N$捐献_数据后标  6
#ACT
INC N$捐献_数据后标    1
INC N$捐献界面_读取排名 1
GOTO  @捐献_数据读取

#IF
EQUAL  N$捐献_数据后标  6
#ACT
MOV N$捐献_数据后标    1
MOV N$捐献界面_读取排名 0
GOTO @捐献界面

BREAK

[@捐献界面优化]
#IF
EQUAL S$玩家名字_排版
#ACT
MOV S$玩家名字_排版暂无
MOV S$捐献数量_排版暂无
MOV N$捐献数量    0

#IF
#ACT
SetStringBlank <$STR(S$玩家名字_排版)>    <$str(N$捐献界面_名字列长度)> 1
SetStringBlank <$STR(S$捐献数量_排版)>    <$str(N$捐献界面_数量列长度)> 1

#if
#act
GetRandomText ..\..\..\..\..\喵喵制作\捐献文本\<$STR(A321)>\01区.txt n60 0
GetRandomText ..\..\..\..\..\喵喵制作\捐献文本\<$STR(A321)>\02区.txt n61 0
GetRandomText ..\..\..\..\..\喵喵制作\捐献文本\<$STR(A321)>\03区.txt n62 0
GetRandomText ..\..\..\..\..\喵喵制作\捐献文本\<$STR(A321)>\04区.txt n63 0
GetRandomText ..\..\..\..\..\喵喵制作\捐献文本\<$STR(A321)>\05区.txt n64 0
GetRandomText ..\..\..\..\..\喵喵制作\捐献文本\<$STR(A321)>\06区.txt n65 0
#IF
#act
MOV N16 0
INC N16 <$STR(n60)>
INC N16 <$STR(n61)>
INC N16 <$STR(n62)>
INC N16 <$STR(n63)>
INC N16 <$STR(n64)>
INC N16 <$STR(n65)>

[@捐献界面]
#IF
#ACT
OPENMERCHANTBIGDLG 28 2023 1 4 1 1 1 600 10
#SAY
\ \ \ \ \  \

<  沙城捐献:/SCOLOR=249}> <所有的捐献金额都会记录沙巴克奖池/SCOLOR=249}>                      <你当前的RMB:/SCOLOR=7> [<$GamePoint>] \
<  最低捐献:/SCOLOR=250>  <捐献3000RMB点(30元),即可获得属性加成/SCOLOR=228>  \ \  \
;< [捐献排名]/SCOLOR=249}> <[玩家名称]/SCOLOR=249}>             <[捐献数量]/SCOLOR=249}>       <[属性加成]/SCOLOR=249}>\
;< N0.1/SCOLOR=249> {    <$STR(S$玩家1_排版)>/SCOLOR=249}{          <$STR(S$捐献数量1_排版)>/SCOLOR=249}       <点击查看第一名属性加成|^250#攻击力上限提升30%^250#生命上限提升30%^250#神力倍数提升100%^250#爆率倍数叠加500%^250#打怪伤害+500%^250#攻击吸血+10%^251#几率切割怪物血量5%^250#攻击吸血+10%^70#第一名专属地图> \
;< N0.2/SCOLOR=251> {    <$STR(S$玩家2_排版)>/SCOLOR=251}{          <$STR(S$捐献数量2_排版)>/SCOLOR=251}       <点击查看第二名属性加成|^250#攻击力上限提升15%^250#生命上限提升15%^250#神力倍数提升50%^250#爆率倍数叠加200%^250#打怪伤害+300%^250#攻击吸血+9%^251#几率切割怪物血量3%>\
;< N0.3/SCOLOR=116> {    <$STR(S$玩家3_排版)>/SCOLOR=116}{          <$STR(S$捐献数量3_排版)>/SCOLOR=116}       <点击查看第三名属性加成|^250#攻击力上限提升13%^250#生命上限提升13%^250#神力倍数提升30%^250#爆率倍数叠加170%^250#打怪伤害+250%^250#攻击吸血+8%^251#几率切割怪物血量1%>\
;< N0.4/SCOLOR=244> {    <$STR(S$玩家4_排版)>/SCOLOR=244}{          <$STR(S$捐献数量4_排版)>/SCOLOR=244}       <点击查看第四名属性加成|^250#攻击力上限提升12%^250#生命上限提升12%^250#神力倍数提升20%^250#爆率倍数叠加140%^250#打怪伤害+200%^250#攻击吸血+7%>\
;< N0.5/SCOLOR=146> {    <$STR(S$玩家5_排版)>/SCOLOR=146}{          <$STR(S$捐献数量5_排版)>/SCOLOR=146}       <点击查看第五名属性加成|^250#攻击力上限提升11%^250#生命上限提升11%^250#神力倍数提升10%^250#爆率倍数叠加120%^250#打怪伤害+150%^250#攻击吸血+6%>\
<  凡是累计捐献达到3000RMB点(30元),即可获得以下属性:/SCOLOR=250>  <你当前累计捐献金额:/SCOLOR=250> <$human(天道捐献)>\
<  1.爆率提升300% 打怪伤害提升100% /SCOLOR=251> \
<  2.最大攻击力提升10% 最大生命值提升10% 攻击吸血+5%/SCOLOR=70> \
<  3.赠送技能群体施毒术/SCOLOR=146> \
<  4.自动8X8范围秒捡物品，配合自动回收金币元宝嗷嗷涨/SCOLOR=249>\
<  沙城奖池：/SCOLOR=249}>  \
<>  <■》神之领域今日01区累计金额:/SCOLOR=243> <[<$STR(n60)>]/SCOLOR=251> <RMB/SCOLOR=251>\
<>  <■》神之领域今日02区累计金额:/SCOLOR=243> <[<$STR(n61)>]/SCOLOR=251> <RMB/SCOLOR=251>\
<>  <■》神之领域今日03区累计金额:/SCOLOR=243> <[<$STR(n62)>]/SCOLOR=251> <RMB/SCOLOR=251>\
<>  <■》神之领域今日04区累计金额:/SCOLOR=243> <[<$STR(n63)>]/SCOLOR=251> <RMB/SCOLOR=251>\
<>  <■》神之领域今日05区累计金额:/SCOLOR=243> <[<$STR(n64)>]/SCOLOR=251> <RMB/SCOLOR=251>\  \
<>                                     <点击开始进行捐献/@开始捐献>\
<>    <累计沙巴克奖励金额:/SCOLOR=249><[<$STR(n16)>]/SCOLOR=251><RMB/SCOLOR=251>             \  \
<>  <沙城奖励说明:> <1.沙城捐献所有金额的/SCOLOR=7><70%/SCOLOR=251><将纳入沙巴克奖池,合区攻沙胜利行会获得/SCOLOR=7><70%/SCOLOR=249><,失败行会获得/SCOLOR=7><30%/SCOLOR=250>\
<>             <2.合区后所有捐献数据会清零,请玩家们理性捐献！/SCOLOR=228>\
<>             <3.合区后属性保留/SCOLOR=253>

[@进入地图]
#IF
EQUAL A101 <$USERNAME>
#ACT
MAP JXDYM
#ELSEACT
MESsAGEBOX 你不是第一名，无法进入...
break

[@刷新]
#IF
#ACT
GOTO @捐献_字符串处理

[@开始捐献]
#IF
CHECKGAMEPOINT < 3000
#ACT
MESsAGEBOX 当前RMB数量不足【3000】...
break

#IF
CHECKTITLE 沙城捐献
#ACT
MESsAGEBOX 你已经参与过沙巴克捐献,无法再次捐献...
break

#IF
CheckContainsText <$SERVERNAME> 01区
#ACT
GamePoint - 3000
INC G63 3000
ADDSKILL 群体施毒术
ADDSKILL 半月弯刀
SKILLLEVEL 半月弯刀 = 3 0
SKILLLEVEL 群体施毒术 = 3 0
CONFERTITLE 沙城捐献
AddTextListEx ..\..\..\..\..\喵喵制作\捐献文本\<$STR(A321)>\01区.txt G63 0
GOTO @检测捐献数量
GOTO @MAIN
messagebox 捐献成功!
break

#IF
CheckContainsText <$SERVERNAME> 02区
#ACT
GamePoint - 3000
INC G63 3000
ADDSKILL 群体施毒术
ADDSKILL 半月弯刀
SKILLLEVEL 半月弯刀 = 3 0
SKILLLEVEL 群体施毒术 = 3 0
CONFERTITLE 沙城捐献
AddTextListEx ..\..\..\..\..\喵喵制作\捐献文本\<$STR(A321)>\02区.txt G63 0
GOTO @检测捐献数量
GOTO @MAIN
messagebox 捐献成功!
break

#IF
CheckContainsText <$SERVERNAME> 03区
#ACT
GamePoint - 3000
INC G63 3000
ADDSKILL 群体施毒术
ADDSKILL 半月弯刀
SKILLLEVEL 半月弯刀 = 3 0
SKILLLEVEL 群体施毒术 = 3 0
CONFERTITLE 沙城捐献
AddTextListEx ..\..\..\..\..\喵喵制作\捐献文本\<$STR(A321)>\03区.txt G63 0
GOTO @检测捐献数量
GOTO @MAIN
messagebox 捐献成功!
break

#IF
CheckContainsText <$SERVERNAME> 04区
#ACT
GamePoint - 3000
INC G63 3000
ADDSKILL 群体施毒术
ADDSKILL 半月弯刀
SKILLLEVEL 半月弯刀 = 3 0
SKILLLEVEL 群体施毒术 = 3 0
CONFERTITLE 沙城捐献
AddTextListEx ..\..\..\..\..\喵喵制作\捐献文本\<$STR(A321)>\04区.txt G63 0
GOTO @检测捐献数量
GOTO @MAIN
messagebox 捐献成功!
break

#IF
CheckContainsText <$SERVERNAME> 05区
#ACT
GamePoint - 3000
INC G63 3000
ADDSKILL 群体施毒术
ADDSKILL 半月弯刀
SKILLLEVEL 半月弯刀 = 3 0
SKILLLEVEL 群体施毒术 = 3 0
CONFERTITLE 沙城捐献
AddTextListEx ..\..\..\..\..\喵喵制作\捐献文本\<$STR(A321)>\05区.txt G63 0
GOTO @检测捐献数量
GOTO @MAIN
messagebox 捐献成功!
break