字符串轮询或者罗列，有没有优雅的写法？

dangerace

举个例子，我想要列出从“aaaaaa”到“zzzzzz”的所有字符串，除了6层循环嵌套的写法之外，有没有其他更加优雅的写法了？


补充内容 (2024-8-14 16:38):
可能原题没有解释清楚，不是输出aaaa,bbbb,cccc这几个字符串，而是aaaa,aaab,aaac....yzzz,zzzz这样的，每个位置上都循序增长轮换。

真冬

  

子程序名	返回值类型	公开	备 注
子程序2分裂法	字节集
参数名	类 型	参考	可空	数组	备 注
参数1_起始	文本型
参数2_结尾	文本型

变量名	类 型	静态	数组	备 注
模板_起始	字节集
模板_结尾	字节集
位长度	整数型
i1写入位置	整数型
i2进制	整数型
i3位	整数型
结果	字节集
分裂上一个结果	字节集

模板_起始 ＝ 到字节集 (参数1_起始)
模板_结尾 ＝ 到字节集 (参数2_结尾)
位长度 ＝ 取字节集长度 (模板_起始)
结果 ＝ 模板_起始 ＋ { 13, 10 }
变量循环首 (0, 位长度 － 1, 1, i3位)
分裂上一个结果 ＝ 结果
变量循环首 (模板_起始 [1] ＋ 1, 模板_结尾 [1], 1, i2进制)
变量循环首 (1 ＋ i3位, 取字节集长度 (分裂上一个结果), 位长度 ＋ 2, i1写入位置)
分裂上一个结果 [i1写入位置] ＝ i2进制
变量循环尾 ()
结果 ＝ 结果 ＋ 分裂上一个结果
变量循环尾 ()
变量循环尾 ()
返回 (结果)

.版本 2<br /> <br /> .子程序 子程序2分裂法, 字节集<br /> .参数 参数1_起始, 文本型<br /> .参数 参数2_结尾, 文本型<br /> .局部变量 模板_起始, 字节集<br /> .局部变量 模板_结尾, 字节集<br /> .局部变量 位长度, 整数型<br /> .局部变量 i1写入位置, 整数型<br /> .局部变量 i2进制, 整数型<br /> .局部变量 i3位, 整数型<br /> .局部变量 结果, 字节集<br /> .局部变量 分裂上一个结果, 字节集<br /> <br /> 模板_起始 ＝ 到字节集 (参数1_起始)<br /> 模板_结尾 ＝ 到字节集 (参数2_结尾)<br /> 位长度 ＝ 取字节集长度 (模板_起始)<br /> 结果 ＝ 模板_起始 ＋ { 13, 10 }<br /> .变量循环首 (0, 位长度 － 1, 1, i3位)<br />     分裂上一个结果 ＝ 结果<br />     .变量循环首 (模板_起始 [1] ＋ 1, 模板_结尾 [1], 1, i2进制)<br />         .变量循环首 (1 ＋ i3位, 取字节集长度 (分裂上一个结果), 位长度 ＋ 2, i1写入位置)<br />             分裂上一个结果 [i1写入位置] ＝ i2进制<br />         .变量循环尾 ()<br />         结果 ＝ 结果 ＋ 分裂上一个结果<br />     .变量循环尾 ()<br /> .变量循环尾 ()<br /> 返回 (结果)

LEOONL

你说的像是M取N  https://bbs.125.la/forum.php?mod ... ghlight=M%E5%8F%96N

无敌小爱

  

变量名	类 型	静态	数组	备 注
循环标	整数型

循环标 ＝ 97
计次循环首 (26, )
编辑框1.加入文本 ( #换行符 ＋ 到文本 (到字节集 (循环标)) ＋ 到文本 (到字节集 (循环标)) ＋ 到文本 (到字节集 (循环标)) ＋ 到文本 (到字节集 (循环标)))
循环标 ＝ 循环标 ＋ 1
计次循环尾 ()

.版本 2<br /> <br /> <br /> <br /> .局部变量 循环标, 整数型<br /> <br /> <br /> <br /> 循环标 ＝ 97<br /> <br /> .计次循环首 (26, )<br /> <br />     编辑框1.加入文本 (#换行符 ＋ 到文本 (到字节集 (循环标)) ＋ 到文本 (到字节集 (循环标)) ＋ 到文本 (到字节集 (循环标)) ＋ 到文本 (到字节集 (循环标)))<br /> <br />     循环标 ＝ 循环标 ＋ 1<br /> <br /> .计次循环尾 ()

      不是很明白啥意思，是这个效果吗，一行代码的事啊，不用六层叠加啊

无敌小爱

  

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

A ＝ 97
计次循环首 (26, )
计次循环首 (4, )
B ＝ B ＋ 到文本 (到字节集 (A))
计次循环尾 ()
编辑框1.加入文本 ( #换行符 ＋ B)
B ＝ “”
A ＝ A ＋ 1
计次循环尾 ()

.版本 2<br /> <br /> .局部变量 A, 整数型<br /> .局部变量 B, 文本型<br /> <br /> A ＝ 97<br /> .计次循环首 (26, )<br />     .计次循环首 (4, )<br />         B ＝ B ＋ 到文本 (到字节集 (A))<br />     .计次循环尾 ()<br />     编辑框1.加入文本 (#换行符 ＋ B)<br />     B ＝ “”<br />     A ＝ A ＋ 1<br /> .计次循环尾 ()

更简洁一点？？？？？

帅气与大侠

帮你写了个汇编递增字节序的命令，这样就可以将字符串像整数一样从0开始递增
在ascii表中，小写字母a=97，z=122
依次往上递增就可以了

  

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

变量名	类 型	静态	数组	备 注
起始字母	文本型
终止字母	文本型
字母长度	整数型
起始字母指针	整数型
字节下限	整数型
字节上限	整数型
i	整数型

' aaaaaa-aaaaaz
起始字母 ＝ “aaaaaa”
终止字母 ＝ “aaaaaz”
字母长度 ＝ 取文本长度 (起始字母)
起始字母指针 ＝ 取变量数据地址 (起始字母)
字节下限 ＝ 97  ' 97=a 122=z
字节上限 ＝ 122
判断循环首 (起始字母 ≠ 终止字母)
指针_递增字节序 (起始字母指针, 字母长度, 字节下限, 字节上限)
i ＝ i ＋ 1
判断循环尾 ()
调试输出 (起始字母, 终止字母, i)
' aaaaaa-zzzzzz
起始字母 ＝ “aaaaaa”
终止字母 ＝ “zzzzzz”
字母长度 ＝ 取文本长度 (起始字母)
起始字母指针 ＝ 取变量数据地址 (起始字母)
字节下限 ＝ 97  ' 97=a 122=z
字节上限 ＝ 122
循环判断首 ()
i ＝ 指针_递增字节序 (起始字母指针, 字母长度, 字节下限, 字节上限)
' 当i返回1时，表示所有字母都已归位为aaaaaa。
循环判断尾 (i ＝ 0)
调试输出 (起始字母, 终止字母, i)

子程序名	返回值类型	公开	备 注
指针_递增字节序	整数型		递增字节序，与递增整数一样道理。当返回1时，表示所有字节序归位。返回0表示未归为。
参数名	类 型	参考	可空	数组	备 注
数据地址	整数型				数据起始地址
数据长度	整数型				数据长度
字节值下限	整数型				0-255之间
字节值上限	整数型				0-255之间

' __asm{
' ; mov esi,dword [ebp+8]  ;字节集数据起始地址
' ; mov edi,dword [ebp+12]
' ; add edi,esi            ;字节集数据终止地址
' ; mov bl,byte [ebp+16]   ;字节值下限97
' ; mov bh,byte [ebp+20]   ;字节值上限122
' ; xor eax,eax             ;清空eax返回值，0=未到终点，1=已到终点
' ; next_byte:
' ;    cmp esi,edi         ;比较起始指针和终止指针
' ;    je zero             ;如果相等则结束。当符合相等条件，表示进位到终止指针
' ;    mov dh,byte [esi]   ;加载当前字节到dh
' ;    cmp dh,bh           ;检查是否超过上限
' ;    jge yes_carry       ;如果大于等于上限，则跳到进位处理
' ;    inc byte[esi]       ;否则当前字节递增+1
' ;    jmp done            ;跳出循环
' ; yes_carry:
' ;    mov byte[esi],bl    ;当前字节设置为下限
' ;    inc esi             ;当前指针递增+1
' ;    jmp next_byte       ;开始下一个字节
' ; zero:
' ;    mov eax,1
' ; done:
' ;    leave
' ;    retn 16
' }
置入代码 ({ 139, 117, 8, 139, 125, 12, 1, 247, 138, 93, 16, 138, 125, 20, 49, 192, 57, 254, 116, 15, 138, 54, 56, 254, 125, 4, 254, 6, 235, 10, 136, 30, 70, 235, 237, 184, 1, 0, 0, 0, 201, 194, 16, 0 })
返回 (0)

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

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 子程序1<br /> .局部变量 起始字母, 文本型<br /> .局部变量 终止字母, 文本型<br /> .局部变量 字母长度, 整数型<br /> .局部变量 起始字母指针, 整数型<br /> .局部变量 字节下限, 整数型<br /> .局部变量 字节上限, 整数型<br /> .局部变量 i, 整数型<br /> <br /> <br /> ' aaaaaa-aaaaaz<br /> 起始字母 ＝ “aaaaaa”<br /> 终止字母 ＝ “aaaaaz”<br /> 字母长度 ＝ 取文本长度 (起始字母)<br /> 起始字母指针 ＝ 取变量数据地址 (起始字母)<br /> 字节下限 ＝ 97  ' 97=a 122=z<br /> 字节上限 ＝ 122<br /> .判断循环首 (起始字母 ≠ 终止字母)<br />     指针_递增字节序 (起始字母指针, 字母长度, 字节下限, 字节上限)<br />     i ＝ i ＋ 1<br /> .判断循环尾 ()<br /> 调试输出 (起始字母, 终止字母, i)<br /> <br /> ' aaaaaa-zzzzzz<br /> 起始字母 ＝ “aaaaaa”<br /> 终止字母 ＝ “zzzzzz”<br /> 字母长度 ＝ 取文本长度 (起始字母)<br /> 起始字母指针 ＝ 取变量数据地址 (起始字母)<br /> 字节下限 ＝ 97  ' 97=a 122=z<br /> 字节上限 ＝ 122<br /> <br /> .循环判断首 ()<br />     i ＝ 指针_递增字节序 (起始字母指针, 字母长度, 字节下限, 字节上限)<br />     ' 当i返回1时，表示所有字母都已归位为aaaaaa。<br /> .循环判断尾 (i ＝ 0)<br /> 调试输出 (起始字母, 终止字母, i)<br /> <br /> <br /> .子程序 指针_递增字节序, 整数型, 公开, 递增字节序，与递增整数一样道理。当返回1时，表示所有字节序归位。返回0表示未归为。<br /> .参数 数据地址, 整数型, , 数据起始地址<br /> .参数 数据长度, 整数型, , 数据长度<br /> .参数 字节值下限, 整数型, , 0-255之间<br /> .参数 字节值上限, 整数型, , 0-255之间<br /> <br /> ' __asm{<br /> ' ; mov esi,dword [ebp+8]  ;字节集数据起始地址<br /> ' ; mov edi,dword [ebp+12]<br /> ' ; add edi,esi            ;字节集数据终止地址<br /> ' ; mov bl,byte [ebp+16]   ;字节值下限97<br /> ' ; mov bh,byte [ebp+20]   ;字节值上限122<br /> <br /> ' ; xor eax,eax             ;清空eax返回值，0=未到终点，1=已到终点<br /> <br /> ' ; next_byte:<br /> ' ;    cmp esi,edi         ;比较起始指针和终止指针<br /> ' ;    je zero             ;如果相等则结束。当符合相等条件，表示进位到终止指针<br /> <br /> ' ;    mov dh,byte [esi]   ;加载当前字节到dh<br /> ' ;    cmp dh,bh           ;检查是否超过上限<br /> ' ;    jge yes_carry       ;如果大于等于上限，则跳到进位处理<br /> <br /> ' ;    inc byte[esi]       ;否则当前字节递增+1<br /> ' ;    jmp done            ;跳出循环<br /> <br /> ' ; yes_carry:<br /> ' ;    mov byte[esi],bl    ;当前字节设置为下限<br /> ' ;    inc esi             ;当前指针递增+1<br /> ' ;    jmp next_byte       ;开始下一个字节<br /> <br /> ' ; zero:<br /> ' ;    mov eax,1<br /> ' ; done:<br /> ' ;    leave<br /> ' ;    retn 16<br /> ' }<br /> <br /> <br /> 置入代码 ({ 139, 117, 8, 139, 125, 12, 1, 247, 138, 93, 16, 138, 125, 20, 49, 192, 57, 254, 116, 15, 138, 54, 56, 254, 125, 4, 254, 6, 235, 10, 136, 30, 70, 235, 237, 184, 1, 0, 0, 0, 201, 194, 16, 0 })<br /> 返回 (0)

无敌小爱

帅气与大侠 发表于 2024-8-14 00:47
帮你写了个汇编递增字节序的命令，这样就可以将字符串像整数一样从0开始递增
在ascii表中，小写字母a=97，z ...

6 复杂化了

dangerace

无敌小爱 发表于 2024-8-13 20:51
[e=0].版本 2

不是这个意思，而是轮训啊，比如
aaaa
aaab
aaac
aaad
.....
zzzy
zzzz

无敌小爱

dangerace 发表于 2024-8-14 16:35
不是这个意思，而是轮训啊，比如
aaaa
aaab

试了试，数学不好的好像只有嵌套，咱不懂了

真冬

  

变量名	类 型	静态	数组	备 注
q	整数型

q ＝ 取启动时间 ()
写到文件 (“a:\aa-zz.txt”, 子程序1 (“aaaa”, “zzzz”))
调试输出 (取启动时间 () － q)

子程序名	返回值类型	公开	备 注
子程序1	字节集
参数名	类 型	参考	可空	数组	备 注
参数1	文本型
参数2	文本型

变量名	类 型	静态	数组	备 注
a	字节集
b	字节集
i1	整数型
aa	字节集
cd	整数型
wjh	整数型

b ＝ 到字节集 (参数2)
a ＝ 到字节集 (参数1)
aa ＝ a
cd ＝ 取字节集长度 (aa)
wjh ＝ 打开内存文件 ()
写出字节集 (wjh, a, { 13, 10 })
循环判断首 ()
计次循环首 (cd, i1)
a [i1] ＝ a [i1] ＋ 1
判断 (a [i1] ＞ b [i1])
a [i1] ＝ aa [i1]
跳出循环 ()

计次循环尾 ()
写出字节集 (wjh, a, { 13, 10 })
循环判断尾 (a ≠ b)
移到文件首 (wjh)
aa ＝ 读入字节集 (wjh, 取文件长度 (wjh))
关闭文件 (wjh)
返回 (aa)

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

.版本 2<br /> .支持库 spec<br /> <br /> .局部变量 q, 整数型<br /> <br /> q ＝ 取启动时间 ()<br /> 写到文件 (“a:\aa-zz.txt”, 子程序1 (“aaaa”, “zzzz”))<br /> 调试输出 (取启动时间 () － q)<br /> <br /> .子程序 子程序1, 字节集<br /> .参数 参数1, 文本型<br /> .参数 参数2, 文本型<br /> .局部变量 a, 字节集<br /> .局部变量 b, 字节集<br /> .局部变量 i1, 整数型<br /> .局部变量 aa, 字节集<br /> .局部变量 cd, 整数型<br /> .局部变量 wjh, 整数型<br /> <br /> b ＝ 到字节集 (参数2)<br /> a ＝ 到字节集 (参数1)<br /> aa ＝ a<br /> cd ＝ 取字节集长度 (aa)<br /> wjh ＝ 打开内存文件 ()<br /> 写出字节集 (wjh, a, { 13, 10 })<br /> .循环判断首 ()<br />     .计次循环首 (cd, i1)<br />         a [i1] ＝ a [i1] ＋ 1<br />         .判断开始 (a [i1] ＞ b [i1])<br />             a [i1] ＝ aa [i1]<br />         .默认<br />             跳出循环 ()<br />         .判断结束<br /> <br />     .计次循环尾 ()<br />     写出字节集 (wjh, a, { 13, 10 })<br /> .循环判断尾 (a ≠ b)<br /> 移到文件首 (wjh)<br /> aa ＝ 读入字节集 (wjh, 取文件长度 (wjh))<br /> 关闭文件 (wjh)<br /> 返回 (aa)