合成隐藏图模块，打开会变成另一张图片

.计次循环首 (高 [3], y)
.计次循环首 (宽 [3], x)
.判断开始 (x ％ 2 ＝ 0)
当前图 ＝ 选择 (y ％ 2 ＝ 0, 1, 2)
.默认
当前图 ＝ 选择 (y ％ 2 ＝ 0, 2, 1)
.判断结束
点色 ＝ 选择 (当前图 ＝ 1, #白色, #黑色)
GdipBitmapGetPixel (m_Image [当前图], x － 1, y － 1, 透明值)
透明 ＝ 到字节集 (透明值)
GdipBitmapSetPixel (m_Image [3], x － 1, y － 1, RGB到ARGB (点色, 选择 (当前图 ＝ 1, 透明 [1], 255 － 透明 [1])))
' 调试输出 (透明值)
.计次循环尾 ()
.计次循环尾 ()
局部_CLSID ＝ 文本到GUDI (取图像编码CLSID自图像格式 (“{B96B3CAF-0728-11D3-9D7B-0000F81EF32E}”))
.如果真 (局部_CLSID ＝ { })
返回 ({ })
.如果真结束
IStream [3].创建 ()
GdipSaveImageToStream (m_Image [3], IStream [3].取字节流指针 (), 局部_CLSID, 0)
图片 ＝ IStream [3].取出字节集 ()
GdipDisposeImageAttributes (m_ImageAttribute)
GdipDeleteGraphics (m_Graphics)