判断连续调试输出

ygr

有一个9位的文本内容，需要连续判断，第一次出现9位调试输出1，第二次连续出现9位的调试输出2。
只搞判断连续出现9位的，间接出现9位的一直输出1 连续的依次输出2，下次连续输出3

左宁

不知所谓

hxk12349

  

子程序名	返回值类型	公开	备 注
子程序1

变量名	类 型	静态	数组	备 注
文本数组	通用型		0
i	整数型
_9次数	整数型
文本内容	文本型

文本数组 ＝ 分割文本 (文本内容, #换行符, )
计次循环首 (取数组成员数 (文本数组), i)
判断 (取文本长度 (文本数组 [i]) ≠ 9)
调试输出 (1)
_9次数 ＝ 0
_9次数 ＝ _9次数 ＋ 1
调试输出 (_9次数)
处理事件 ()
计次循环尾 ()

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 子程序1<br /> .局部变量 文本数组, 通用型, , "0"<br /> .局部变量 i, 整数型<br /> .局部变量 _9次数, 整数型<br /> .局部变量 文本内容, 文本型<br /> <br /> 文本数组 ＝ 分割文本 (文本内容, #换行符, )<br /> .计次循环首 (取数组成员数 (文本数组), i)<br />     .判断开始 (取文本长度 (文本数组 <i>) ≠ 9)<br />         调试输出 (1)<br />         _9次数 ＝ 0<br />     .默认<br />         _9次数 ＝ _9次数 ＋ 1<br />         调试输出 (_9次数)<br />     .判断结束<br />     处理事件 ()<br /> .计次循环尾 ()

右手胜过左手

  

子程序名	返回值类型	公开	备 注
子程序1

变量名	类 型	静态	数组	备 注
文本	文本型

文本 ＝ 编辑框1.内容
如果 (取文本长度 (文本) ＝ 9)
集连续出现 ＝ 集连续出现 ＋ 1  ' 程序集或全局变量
集间接出现 ＝ 0  ' 程序集或全局变量



集连续出现 ＝ 0
集间接出现 ＝ 1

调试输出 (集连续出现, 集间接出现)

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 子程序1<br /> .局部变量 文本, 文本型<br /> <br /> 文本 ＝ 编辑框1.内容<br /> <br /> .如果 (取文本长度 (文本) ＝ 9)<br />     集连续出现 ＝ 集连续出现 ＋ 1  ' 程序集或全局变量<br />     集间接出现 ＝ 0  ' 程序集或全局变量<br /> <br /> <br /> .否则<br /> <br />     集连续出现 ＝ 0<br />     集间接出现 ＝ 1<br /> .如果结束<br /> <br /> <br /> 调试输出 (集连续出现, 集间接出现)

补充内容 (2020-11-4 23:17):
发出来才看到别人已经发了

若筱涵

  

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

变量名	类 型	静态	数组	备 注
文本	文本型
分割后的数组	文本型		0
i	整数型
j	整数型
k	整数型

文本 ＝ “sai速度那是难道是是的撒大00上到按道理5156da手机电脑上领导秘书的门卡是快递吗收到貌似代码sad”
j ＝ 0
k ＝ 0
文本_逐字分割_汇编 (文本, 分割后的数组)
计次循环首 (取数组成员数 (分割后的数组), i)
如果 (文本_是否为汉字 (分割后的数组 [i], 真))
j ＝ j ＋ 1
j ＝ 0

如果真 (j ＝ 9)
k ＝ k ＋ 1
调试输出 (k)
计次循环尾 ()

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 文本, 文本型<br /> .局部变量 分割后的数组, 文本型, , "0"<br /> .局部变量 i, 整数型<br /> .局部变量 j, 整数型<br /> .局部变量 k, 整数型<br /> <br /> 文本 ＝ “sai速度那是难道是是的撒大00上到按道理5156da手机电脑上领导秘书的门卡是快递吗收到貌似代码sad”<br /> j ＝ 0<br /> k ＝ 0<br /> 文本_逐字分割_汇编 (文本, 分割后的数组)<br /> .计次循环首 (取数组成员数 (分割后的数组), i)<br /> <br />     .如果 (文本_是否为汉字 (分割后的数组 <i>, 真))<br />         j ＝ j ＋ 1<br />     .否则<br />         j ＝ 0<br />     .如果结束<br /> <br />     .如果真 (j ＝ 9)<br />         k ＝ k ＋ 1<br />     .如果真结束<br />     调试输出 (k)<br /> .计次循环尾 ()

补充内容 (2020-11-4 23:18):
是这个意思吗

ygr

yuhan520 发表于 2020-11-4 23:18
[e=0].版本 2
.支持库 spec

不是啊                     

ygr

意思是文本出现第一次出现9位输出一个878连续出现第二次输出1564间接的话就输出878

ygr

萧炎 发表于 2020-11-4 23:15
[e=0].版本 2
.支持库 spec

意思是文本出现第一次出现9位输出一个878连续出现第二次输出1564间接的话就输出878

ygr

hxk12349 发表于 2020-11-4 23:15
[e=3].版本 2
.支持库 spec

意思是文本出现第一次出现9位输出一个878连续出现第二次输出1564间接的话就输出878

hxk12349

ygr 发表于 2020-11-4 23:37
意思是文本出现第一次出现9位输出一个878连续出现第二次输出1564间接的话就输出878
...

什么878   1564， 还有你文本是什么样的也不知道，都搞不懂你在说什么