来个老哥帮忙看看这是什么图片解密方法

真白

  

子程序名	返回值类型	公开	备 注
gen_image
参数名	类 型	参考	可空	数组	备 注
buffer	字节集
output	字节集

变量名	类 型	静态	数组	备 注
length	整数型
bytes	字节集
i	整数型
j	整数型
a	字节型
b	字节型
x	字节型
y	字节型
c	字节型
d	字节型
fd	整数型
hbitmap	整数型

length ＝ 2 × _canvas.width × _canvas.height
i ＝ 1
j ＝ 1
判断循环首 (真)
x ＝ 取字节集数据 (buffer, #字节型, i)
y ＝ 取字节集数据 (buffer, #字节型, i)
a ＝ 到字节 (位与 (x, 15) ＋ 左移 (x, 4))
b ＝ 到字节 (位与 (x, 240) ＋ 右移 (x, 4))
c ＝ 到字节 (位与 (y, 15) ＋ 左移 (y, 4))
d ＝ 到字节 (位与 (y, 240) ＋ 右移 (y, 4))
bytes ＝ 字节集替换 (bytes, 取字节集长度 (bytes) ＋ 1, 0, 到字节集 (a))
bytes ＝ 字节集替换 (bytes, 取字节集长度 (bytes) ＋ 1, 0, 到字节集 (b))
bytes ＝ 字节集替换 (bytes, 取字节集长度 (bytes) ＋ 1, 0, 到字节集 (c))
bytes ＝ 字节集替换 (bytes, 取字节集长度 (bytes) ＋ 1, 0, 到字节集 (d))
如果真 (i ＝ -1)
跳出循环 ()

判断循环尾 ()
' 输出调试文本 (“over”)
hbitmap ＝ CreateBitmap (_canvas.width, _canvas.height, 1, 32, bytes)
output ＝ SaveBitmapToImage (hbitmap)

.版本 2<br /> <br /> .子程序 gen_image<br /> .参数 buffer, 字节集<br /> .参数 output, 字节集, 参考<br /> .局部变量 length, 整数型<br /> .局部变量 bytes, 字节集<br /> .局部变量 i, 整数型<br /> .局部变量 j, 整数型<br /> .局部变量 a, 字节型<br /> .局部变量 b, 字节型<br /> .局部变量 x, 字节型<br /> .局部变量 y, 字节型<br /> .局部变量 c, 字节型<br /> .局部变量 d, 字节型<br /> .局部变量 fd, 整数型<br /> .局部变量 hbitmap, 整数型<br /> <br /> length ＝ 2 × _canvas.width × _canvas.height<br /> i ＝ 1<br /> j ＝ 1<br /> .判断循环首 (真)<br />     x ＝ 取字节集数据 (buffer, #字节型, i)<br />     y ＝ 取字节集数据 (buffer, #字节型, i)<br />     a ＝ 到字节 (位与 (x, 15) ＋ 左移 (x, 4))<br />     b ＝ 到字节 (位与 (x, 240) ＋ 右移 (x, 4))<br />     c ＝ 到字节 (位与 (y, 15) ＋ 左移 (y, 4))<br />     d ＝ 到字节 (位与 (y, 240) ＋ 右移 (y, 4))<br />     bytes ＝ 字节集替换 (bytes, 取字节集长度 (bytes) ＋ 1, 0, 到字节集 (a))<br />     bytes ＝ 字节集替换 (bytes, 取字节集长度 (bytes) ＋ 1, 0, 到字节集 (b))<br />     bytes ＝ 字节集替换 (bytes, 取字节集长度 (bytes) ＋ 1, 0, 到字节集 (c))<br />     bytes ＝ 字节集替换 (bytes, 取字节集长度 (bytes) ＋ 1, 0, 到字节集 (d))<br />     .如果真 (i ＝ -1)<br />         跳出循环 ()<br />     .如果真结束<br /> <br /> .判断循环尾 ()<br /> <br /> ' 输出调试文本 (“over”)<br /> hbitmap ＝ CreateBitmap (_canvas.width, _canvas.height, 1, 32, bytes)<br /> output ＝ SaveBitmapToImage (hbitmap)

使用这个子程序的时候,发现在处理大图片时非常的慢,有懂哥知道这段代码是什么解密方法么?要怎么样才能提高解密的速度呢

伊人独醉

  

子程序名	返回值类型	公开	备 注
gen_image2
参数名	类 型	参考	可空	数组	备 注
buffer	字节集
output	字节集

变量名	类 型	静态	数组	备 注
bytes	字节集
i	整数型
x	字节型
y	字节型
a	字节型
b	字节型
c	字节型
d	字节型

计次循环首 (取字节集长度 (buffer) ÷ 2, i)  ' 个人建议用变量循环
. ' 变量循环首 (1, 取字节集长度 (buffer), 2, i)
' x ＝ buffer [i]
' x ＝ buffer [i ＋ 1]
. ' 变量循环尾 ()
x ＝ buffer [ (i － 1) × 2 ＋ i]
y ＝ buffer [ (i － 1) × 2 ＋ i ＋ 1]
a ＝ 位与 (x, 15) ＋ 左移 (x, 4)
b ＝ 位与 (x, 240) ＋ 右移 (x, 4)
c ＝ 位与 (y, 15) ＋ 左移 (y, 4)
d ＝ 位与 (y, 240) ＋ 右移 (y, 4)
bytes ＝ bytes ＋ 到字节集 (a) ＋ { 0, 0, 0 } ＋ 到字节集 (b) ＋ { 0, 0, 0 } ＋ 到字节集 (c) ＋ { 0, 0, 0 } ＋ 到字节集 (d) ＋ { 0, 0, 0 }
计次循环尾 ()

子程序名	返回值类型	公开	备 注
gen_image
参数名	类 型	参考	可空	数组	备 注
buffer	字节集
output	字节集

变量名	类 型	静态	数组	备 注
length	整数型
bytes	字节集
i	整数型
j	整数型
a	字节型
b	字节型
x	字节型
y	字节型
c	字节型
d	字节型
fd	整数型
hbitmap	整数型

' length ＝ 2 × _canvas.width × _canvas.height
i ＝ 1
j ＝ 1
' 如果 i = -1 则跳出循环 i 取字节集数据 取的是字节型 也就是 1 字节 所以每次调用都会对 i+1 如果超出长度返回 -1
' 也就是说 这个判断循环等于 buffer / 2 字节集的长度 可以用替换计次循环 或者变量循环 循环都一样的 只是不用取字节集数据 那么i的值就需要自己赋值
判断循环首 (真)
' 相当于取 buffer 的第 i 位 取一次后 i = i+1 那么用计次循环完全可以用 x = buffer[i] 代替 y 同理 y = buffer[i+1]
x ＝ 取字节集数据 (buffer, #字节型, i)
y ＝ 取字节集数据 (buffer, #字节型, i)
' 位与 (x, 15) 15二进制=1111 位与 同为 1 则为 1 也就是说这段代码相当于把 x 的低4位保存 舍弃高四位 1字节=8比特 比特=位 可以转换为数学 x % 16 （%=取余()）就是x÷16的余数 x % 16
' 左移 (x, 4) 相当于在 x 的二进制 后面加了 0000 如 单字节最高表示255 二进制 =  1111 1111 左移后 = 1111 1111 0000 相当于 乘了 二进制 1 0000 等于十进制 16 相当于   x * 16
' 位与 (x, 15) ＋ 左移 (x, 4) 因为 x 是字节型 只占8位 所以 x = 0000 0000 xxxx xxxx 先左移等于 0000 xxxx xxxx 0000 上面说了 位与 就是取低四位
' 所以 两个相加就等于 整个x + x的后四位 然后又用了一个到字节 到字节等于取 低八位 也就是说 这一段算法 相当于把 x 的前四位 替换为 后四位 相当于 xxxx yyyy 转换为 yyyy yyyy
' 知道算法后可以优化为 a = x % 16 + x * 16 问了一下AI 无法优化了 转为位运算就是原写法 兜兜转转回到原点  把 a 改为字节型便可不用到字节 或者用 a ＝ 位与 (位与 (x, 15) ＋ 左移 (x, 4), 255)
' 这段代码应该没什么可以优化的 看看下面代码需要什么类型来决定用什么算法 240 = 1111 0000
' b的算法也差不多 只不过是取高位  相当于把 b 的后四位 替换为 前四位 相当于 xxxx yyyy 转换为 xxxx xxxx 也是没啥优化的 但是下面这一段就写的很拉跨了
a ＝ 到字节 (位与 (x, 15) ＋ 左移 (x, 4))
b ＝ 到字节 (位与 (x, 240) ＋ 右移 (x, 4))
c ＝ 到字节 (位与 (y, 15) ＋ 左移 (y, 4))
d ＝ 到字节 (位与 (y, 240) ＋ 右移 (y, 4))
' 取字节集长度 (bytes) ＋ 1 相当于在 bytes 的末尾
' 到字节集 (a)) a 是整数型变量 但是只存进去了一个字节  可以优化为 a ＋ { 0, 0, 0 }
' 好像也没啥优化 只是可以把 字节集替换（） 这个命令换成 简单的字节集拼接
bytes ＝ 字节集替换 (bytes, 取字节集长度 (bytes) ＋ 1, 0, 到字节集 (a))
bytes ＝ 字节集替换 (bytes, 取字节集长度 (bytes) ＋ 1, 0, 到字节集 (b))
bytes ＝ 字节集替换 (bytes, 取字节集长度 (bytes) ＋ 1, 0, 到字节集 (c))
bytes ＝ 字节集替换 (bytes, 取字节集长度 (bytes) ＋ 1, 0, 到字节集 (d))
如果真 (i ＝ -1)
跳出循环 ()

判断循环尾 ()
输出调试文本 (“over”)
hbitmap ＝ CreateBitmap (_canvas.width, _canvas.height, 1, 32, bytes)
output ＝ SaveBitmapToImage (hbitmap)

.版本 2<br /> <br /> .子程序 gen_image2<br /> .参数 buffer, 字节集<br /> .参数 output, 字节集, 参考<br /> .局部变量 bytes, 字节集<br /> .局部变量 i, 整数型<br /> .局部变量 x, 字节型<br /> .局部变量 y, 字节型<br /> .局部变量 a, 字节型<br /> .局部变量 b, 字节型<br /> .局部变量 c, 字节型<br /> .局部变量 d, 字节型<br /> <br /> .计次循环首 (取字节集长度 (buffer) ÷ 2, i)  ' 个人建议用变量循环<br />     .' 变量循环首 (1, 取字节集长度 (buffer), 2, i)<br />         ' x ＝ buffer <i><br />         ' x ＝ buffer [i ＋ 1]<br />     .' 变量循环尾 ()<br /> <br />     x ＝ buffer [(i － 1) × 2 ＋ i]<br />     y ＝ buffer [(i － 1) × 2 ＋ i ＋ 1]<br />     a ＝ 位与 (x, 15) ＋ 左移 (x, 4)<br />     b ＝ 位与 (x, 240) ＋ 右移 (x, 4)<br />     c ＝ 位与 (y, 15) ＋ 左移 (y, 4)<br />     d ＝ 位与 (y, 240) ＋ 右移 (y, 4)<br />     bytes ＝ bytes ＋ 到字节集 (a) ＋ { 0, 0, 0 } ＋ 到字节集 (b) ＋ { 0, 0, 0 } ＋ 到字节集 (c) ＋ { 0, 0, 0 } ＋ 到字节集 (d) ＋ { 0, 0, 0 }<br /> .计次循环尾 ()<br /> <br /> .子程序 gen_image<br /> .参数 buffer, 字节集<br /> .参数 output, 字节集, 参考<br /> .局部变量 length, 整数型<br /> .局部变量 bytes, 字节集<br /> .局部变量 i, 整数型<br /> .局部变量 j, 整数型<br /> .局部变量 a, 字节型<br /> .局部变量 b, 字节型<br /> .局部变量 x, 字节型<br /> .局部变量 y, 字节型<br /> .局部变量 c, 字节型<br /> .局部变量 d, 字节型<br /> .局部变量 fd, 整数型<br /> .局部变量 hbitmap, 整数型<br /> <br /> ' length ＝ 2 × _canvas.width × _canvas.height<br /> i ＝ 1<br /> j ＝ 1<br /> ' 如果 i = -1 则跳出循环 i 取字节集数据 取的是字节型 也就是 1 字节 所以每次调用都会对 i+1 如果超出长度返回 -1<br /> ' 也就是说 这个判断循环等于 buffer / 2 字节集的长度 可以用替换计次循环 或者变量循环 循环都一样的 只是不用取字节集数据 那么i的值就需要自己赋值<br /> .判断循环首 (真)<br /> <br />     ' 相当于取 buffer 的第 i 位 取一次后 i = i+1 那么用计次循环完全可以用 x = buffer<i> 代替 y 同理 y = buffer[i+1]<br />     x ＝ 取字节集数据 (buffer, #字节型, i)<br />     y ＝ 取字节集数据 (buffer, #字节型, i)<br /> <br />     ' 位与 (x, 15) 15二进制=1111 位与 同为 1 则为 1 也就是说这段代码相当于把 x 的低4位保存 舍弃高四位 1字节=8比特 比特=位 可以转换为数学 x % 16 （%=取余()）就是x÷16的余数 x % 16<br />     ' 左移 (x, 4) 相当于在 x 的二进制 后面加了 0000 如 单字节最高表示255 二进制 =  1111 1111 左移后 = 1111 1111 0000 相当于 乘了 二进制 1 0000 等于十进制 16 相当于   x * 16<br />     ' 位与 (x, 15) ＋ 左移 (x, 4) 因为 x 是字节型 只占8位 所以 x = 0000 0000 xxxx xxxx 先左移等于 0000 xxxx xxxx 0000 上面说了 位与 就是取低四位<br />     ' 所以 两个相加就等于 整个x + x的后四位 然后又用了一个到字节 到字节等于取 低八位 也就是说 这一段算法 相当于把 x 的前四位 替换为 后四位 相当于 xxxx yyyy 转换为 yyyy yyyy<br />     ' 知道算法后可以优化为 a = x % 16 + x * 16 问了一下AI 无法优化了 转为位运算就是原写法 兜兜转转回到原点  把 a 改为字节型便可不用到字节 或者用 a ＝ 位与 (位与 (x, 15) ＋ 左移 (x, 4), 255)<br />     ' 这段代码应该没什么可以优化的 看看下面代码需要什么类型来决定用什么算法 240 = 1111 0000<br />     ' b的算法也差不多 只不过是取高位  相当于把 b 的后四位 替换为 前四位 相当于 xxxx yyyy 转换为 xxxx xxxx 也是没啥优化的 但是下面这一段就写的很拉跨了<br />     a ＝ 到字节 (位与 (x, 15) ＋ 左移 (x, 4))<br />     b ＝ 到字节 (位与 (x, 240) ＋ 右移 (x, 4))<br />     c ＝ 到字节 (位与 (y, 15) ＋ 左移 (y, 4))<br />     d ＝ 到字节 (位与 (y, 240) ＋ 右移 (y, 4))<br /> <br />     ' 取字节集长度 (bytes) ＋ 1 相当于在 bytes 的末尾<br />     ' 到字节集 (a)) a 是整数型变量 但是只存进去了一个字节  可以优化为 a ＋ { 0, 0, 0 }<br />     ' 好像也没啥优化 只是可以把 字节集替换（） 这个命令换成 简单的字节集拼接<br />     bytes ＝ 字节集替换 (bytes, 取字节集长度 (bytes) ＋ 1, 0, 到字节集 (a))<br />     bytes ＝ 字节集替换 (bytes, 取字节集长度 (bytes) ＋ 1, 0, 到字节集 (b))<br />     bytes ＝ 字节集替换 (bytes, 取字节集长度 (bytes) ＋ 1, 0, 到字节集 (c))<br />     bytes ＝ 字节集替换 (bytes, 取字节集长度 (bytes) ＋ 1, 0, 到字节集 (d))<br />     .如果真 (i ＝ -1)<br />         跳出循环 ()<br />     .如果真结束<br /> <br /> .判断循环尾 ()<br /> 输出调试文本 (“over”)<br /> hbitmap ＝ CreateBitmap (_canvas.width, _canvas.height, 1, 32, bytes)<br /> output ＝ SaveBitmapToImage (hbitmap)

应该是有点效果 不知道效果大不大

阿白不爱吃菜

嗯..j是干嘛用的?

真白

阿白不爱吃菜 发表于 2024-8-26 22:07
嗯..j是干嘛用的?

j好像没用到

7ian

不复杂，逆着写

伊人独醉

这个代码应该位图转其他格式图片，具体什么就不清楚了，还有俩个关键函数没看到不清楚
他只去了RGBA的 RG 应该是去除了蓝色和透明度然后算法就不知道干嘛的了
hbitmap ＝ CreateBitmap (_canvas.width, _canvas.height, 1, 32, bytes)
output ＝ SaveBitmapToImage (hbitmap)
他这个字节集操作有点画蛇添足，可优化具体看源代码。可加QQ3086048754

伊人独醉

x ＝ buffer [ (i － 1) × 2 ＋ i]
y ＝ buffer [ (i － 1) × 2 ＋ i ＋ 1]
这里算法应该错了 应该是
x ＝ buffer [ (i － 1) × 2 ＋ 1]
y ＝ buffer [ (i － 1) × 2 ＋ 2]

伊人独醉

x ＝ buffer [ (i － 1) × 2 ＋ i]
y ＝ buffer [ (i － 1) × 2 ＋ i ＋ 1]
这里算法应该错了 应该是
x ＝ buffer [ (i － 1) × 2 ＋ 1]
y ＝ buffer [ (i － 1) × 2 ＋ 2]
然后又可以优化

x ＝ buffer [ (i － 1) × 2 ＋ i]
y ＝ buffer [ (i － 1) × 2 ＋ i ＋ 1]
这里算法应该错了 应该是
x ＝ buffer [ i  × 2 - 1]
y ＝ buffer [ i × 2]

伊人独醉

OK 我也是真TM无聊 搞了半天研究出来了 这个就是把图片红化了 gdi模块直接有 而且他这个写法很误导人，破案了 一秒不到转换

花好s月圆

明显是调用了 dll 命令嘛