StringSub函数执行次数限制问题

枪兵打巨像 发表于 2020-8-25 23:09:27

本帖最后由枪兵打巨像于 2020-10-19 19:05 编辑

最近我在做 Bad Apple!! 高清版地图，想把分辨率从之前的 24×18 提高到 48×36。

[*]原帖链接：https://bbs.islga.org/read-htm-tid-5486762-page-1-fpage-1.html

[*]24×18分辨率视频效果：https://www.bilibili.com/video/BV1y54y1U7A8/

为了实现这个目标，我将编码表导入算法从数组赋值算法改为了字符串导入算法，用一个字符串存储每一帧中所有像素点的编码信息。
字符串导入算法需要用到 StringSub函数处理字符串，遍历字符串中的每一个字符，读取"0"或"1"的编码（对应 Bad Apple!!中 "白色" 或 "黑色" 像素点）。
在使用 StringSub函数的过程中，我发现 StringSub函数存在执行次数的限制，每场游戏不能超过 59546 次。
如果 StringSub函数的执行次数超过了 59546 次，就会出现溢出。报错如下图所示：

因为这个限制，我只能导入 5% 的编码表。Bad Apple!! 视频全长220秒，我只能播放前10秒。
如果要完成这个作品，我必须突破 StringSub函数执行次数的限制。我已经为此DeBug了两天了，可还是一筹莫展。
我尝试了N种方法想绕过这个限制，可是 59546 次的限制就像冷酷无情的真空光速一样，绝对不可撼动，超过1次都不行。

所以，求教论坛的大神们，如何突破 StringSub函数执行次数 59546 次的限制？

Bad Apple!! 实现过程：
(1) 导入编码表字符串。
(2) 使用 StringSub函数遍历字符串，读取编码。
(3) 将"0"或"1"编码转化为布尔值，并将布尔值存入二维数组。
(4) 以单位作为像素点，以第 (3) 步中的布尔值作为逻辑判定依据，使用 "替换单位"函数播放 Bad Apple!!

Galaxy代码：
(1) 导入编码表字符串：
p="111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111";
// 第1帧

// ......
// 第2帧到第2796帧省略

p="111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111";
// 第2797帧
(2) 使用 StringSub函数遍历字符串，读取编码：
for(i=1;i<2798;i+=1){
for(j=1;j<433;j+=1){
   px=StringSub(p,j,j);
}
}
(3) 将"0"或"1"编码转化为布尔值，并将布尔值存入二维数组：
for(i=1;i<2798;i+=1){
for(j=1;j<433;j+=1){
   if(px=="1"){
         judge=false;
   }
   else{
         judge=true;
   }
}
}
(4) 以单位作为像素点，以第 (3) 步中的布尔值作为逻辑判定依据，使用 "替换单位"函数播放 Bad Apple!!
t1=0.08;
// 每一帧停留时间
for(i=1;i<2798;i+=1){
for(j=1;j<433;j+=1){
   if(judge==true){
         libNtve_gf_ReplaceUnit(RegionGetAttachUnit(RegionFromId(j)), "ZakoomCrystalFragment", libNtve_ge_ReplaceUnitOptions_NewUnitsDefault);
         RegionAttachToUnit(RegionFromId(j), libNtve_gf_LastReplacedUnit(), Point(0.0, 0.0));
   }
   else{
         libNtve_gf_ReplaceUnit(RegionGetAttachUnit(RegionFromId(j)), "KorhalKeystone", libNtve_ge_ReplaceUnitOptions_NewUnitsDefault);
         RegionAttachToUnit(RegionFromId(j), libNtve_gf_LastReplacedUnit(), Point(0.0, 0.0));
   }
}
Wait(t1, c_timeReal);
}

枪兵打巨像 发表于 2020-8-27 00:19:14

本帖最后由枪兵打巨像于 2020-10-19 19:06 编辑

经过3天艰苦deBug，问题已解决！

StringSub函数不存在执行次数的限制，
但是存在赋值次数的限制，具体数值是 59546 次！超过这个限制就会溢出。

以下举例说明：
(1) 会出现溢出的代码，说明 StringSub函数存在赋值次数的限制：
for(i=1;i<2798;i+=1){
for(j=1;j<433;j+=1){
   px=StringSub(p,j,j);
}
}
(2) 不会出现溢出的代码1，说明 StringSub函数不存在执行次数的限制：
for(i=1;i<2798;i+=1){
for(j=1;j<433;j+=1){
   StringSub(p,j,j);
}
}
(3) 不会出现溢出的代码2，说明 StringSub函数不存在返回值逻辑判断次数的限制：
//--------------------------------------------------------------------------------
// 以单位作为像素点，使用 "替换单位"函数播放 Bad Apple!!
//--------------------------------------------------------------------------------
t1=0.0625;
// 每一帧停留时间
for(i=1;i<2798;i+=1){
for(j=1;j<433;j+=1){
   if(StringSub(p,j,j)=="0"){
// 直接使用 StringSub函数的返回值进行逻辑判断，不再使用一个二维数组作为媒介，避免在赋值给二维数组时溢出
         libNtve_gf_ReplaceUnit(RegionGetAttachUnit(RegionFromId(j)), "ZakoomCrystalFragment", libNtve_ge_ReplaceUnitOptions_NewUnitsDefault);
         RegionAttachToUnit(RegionFromId(j), libNtve_gf_LastReplacedUnit(), Point(0.0, 0.0));
   }
   else{
         libNtve_gf_ReplaceUnit(RegionGetAttachUnit(RegionFromId(j)), "KorhalKeystone", libNtve_ge_ReplaceUnitOptions_NewUnitsDefault);
         RegionAttachToUnit(RegionFromId(j), libNtve_gf_LastReplacedUnit(), Point(0.0, 0.0));
   }
}
Wait(t1, c_timeReal);
}

Nostalie 发表于 2020-8-26 13:03:11

本帖最后由 Nostalie 于 2020-8-26 13:26 编辑

应该是超时了。（超步数）随便啥动作都有执行次数限制。不是stringsub的问题。
分割一下。
用多个触发器执行或者用同个触发器执行多次。（i的起始值和结束值用全局变量替代。每次加就行了）（不要调用函数写。因为调用函数的时间会算在主触发器里。）

Nostalie 发表于 2020-8-26 13:23:51

本帖最后由 Nostalie 于 2020-8-26 13:28 编辑

其实我很好奇。你编码表咋搞的。
用啥工具怎么搞的
可以教我嘛，，，

yxxiaobin 发表于 2020-8-26 19:45:52

显然并不是全局有执行次数限制，应该是其他地方出了问题，比如超时之类的。

yxxiaobin 发表于 2020-8-26 20:01:10

另，建议每两帧时间间隔是0.0625游戏时间秒，也就是说每秒16帧，否则会和游戏运算周期不吻合。间隔0.125游戏时间秒也行，但是帧率太低，画面看起来会跳。

麦德三世 发表于 2020-8-28 00:42:17

顺便一提的是，使用等待真实时间并无法让你跳过游戏周期的限制。在触发器里无论你怎么等待，最少也得等待半个周期也就是0.03125秒

枪兵打巨像 发表于 2020-9-6 14:36:42

本帖最后由枪兵打巨像于 2020-9-6 22:41 编辑

Nostalie 发表于 2020-8-26 13:23
其实我很好奇。你编码表咋搞的。
用啥工具怎么搞的
可以教我嘛，，，
编码表获取方法：

1、用PR或者AE把《Bad Apple!!》原版视频输出为图片序列。由于PR只支持常规帧率输出，不支持16帧的特殊帧率输出，所以以下以AE举例说明：

(1) 将视频拖入AE渲染轨道内，点击输出模式，输出格式选择"JPEG Sequence"，分辨率设定为80*60（根据实际需要设定）↓↓↓

(2) 点击渲染设置，将帧率设定为16（根据实际需要设定）↓↓↓

(3) 设定图片序列命名规则，选择图片输出路径，最后点击"Render"输出图片序列 ↓↓↓

(4) 输出的图片序列如下所示，按16帧的帧率，最终输出了3504张帧画面 ↓↓↓

2、使用Matlab的 rgb2gray函数处理图片序列，遍历每一张帧画面的所有像素点，获取像素点的灰度值，输出编码表。
如果灰度值大于200，则输出"0"，否则输出"1"。Matlab代码如下 ↓↓↓str='C:\\Picture queue\picture queue 4\BA';
FID=fopen('C:\\Pixel\BA4.txt','a+');

for i=1:10
I=imread();
I1=rgb2gray(I);
for i1=1:60
   for i2=1:80
      if(I1(i1,i2)>200)
            fprintf(FID,'0 ');
      else
            fprintf(FID,'1 ');
      end
   end
   fprintf(FID,'\r\n');
end
end

for i=11:100
I=imread();
I1=rgb2gray(I);
for i1=1:60
   for i2=1:80
      if(I1(i1,i2)>200)
            fprintf(FID,'0 ');
      else
            fprintf(FID,'1 ');
      end
   end
   fprintf(FID,'\r\n');
end
end

for i=101:1000
I=imread();
I1=rgb2gray(I);
for i1=1:60
   for i2=1:80
      if(I1(i1,i2)>200)
            fprintf(FID,'0 ');
      else
            fprintf(FID,'1 ');
      end
   end
   fprintf(FID,'\r\n');
end
end

for i=1001:3504
I=imread();
I1=rgb2gray(I);
for i1=1:60
   for i2=1:80
      if(I1(i1,i2)>200)
            fprintf(FID,'0 ');
      else
            fprintf(FID,'1 ');
      end
   end
   fprintf(FID,'\r\n');
end
end

sta=fclose(FID);

3、Matlab输出的文本格式编码表 ↓↓↓

4、将文本格式的编码表导入Excel，进行后续处理 ↓↓↓

5、使用Excel VBA将编码表转化为Galaxy字符串。
由于Galaxy字符串的长度限制为2045个字符，而每一帧有80*60=4800个"0/1"字符编码，所以设定每一个字符串存储每一帧1/3的字符编码，即1600个字符编码。
Excel VBA代码如下 ↓↓↓
Sub GalaxyPixel()

Dim i As Long
Dim j As Long
Dim k As Long
Dim n1 As Long
Dim n2 As Long
Dim n3 As Long
Dim Pixel As Long
Dim PixelArray As String

For k = 1 To 3504
PixelArray = ""
For i = 1 To 20
   For j = 1 To 80
            n1 = 3 * k - 2
            Pixel = Sheet1.Cells((k - 1) * 60 + i, j)
            PixelArray = PixelArray & Pixel
   Next j
Next i
Sheet3.Cells(n1, 1) = "p1[" & k & "]=""" & PixelArray & """;"
Next k

For k = 1 To 3504
PixelArray = ""
For i = 21 To 40
   For j = 1 To 80
            n2 = 3 * k - 1
            Pixel = Sheet1.Cells((k - 1) * 60 + i, j)
            PixelArray = PixelArray & Pixel
   Next j
Next i
Sheet3.Cells(n2, 1) = "p2[" & k & "]=""" & PixelArray & """;"
Next k

For k = 1 To 3504
PixelArray = ""
For i = 41 To 60
   For j = 1 To 80
            n3 = 3 * k
            Pixel = Sheet1.Cells((k - 1) * 60 + i, j)
            PixelArray = PixelArray & Pixel
   Next j
Next i
Sheet3.Cells(n3, 1) = "p3[" & k & "]=""" & PixelArray & """;"
Next k

End Sub

6、Excel VBA输出的Galaxy字符串，可以直接复制到Galaxy编辑器中使用 ↓↓↓

7、最后放一下在星际争霸2上的成品效果吧 ↓↓↓
萨尔那加神器版：https://www.bilibili.com/video/BV1EA411n7dB/
高能瓦斯版：https://www.bilibili.com/video/BV1mT4y1L7ZD/

mic 发表于 2020-9-9 18:18:21

点赞!点赞!点赞!

页: [1]

GA地精研究院's Archiver

StringSub函数执行次数限制问题