code = 取空白文本 (100)
OCR (bin, 取字节集长度 (bin), code)
arr = 分割文本 (code, “|”, )
.如果真 (取数组成员数 (arr) = 3)
.计次循环首 (取数组成员数 (arr), i)
arr2 = 分割文本 (arr [i], “,”, )
返回值 = 返回值 + “{\'x\':” + arr2 [1] + “,\'y\':” + arr2 [2] + “}”
.如果真 (i ≠ 取数组成员数 (arr))
返回值 = 返回值 + “,”
.如果真结束
.计次循环尾 ()
.子程序 合并图片, 字节集
.参数 大图, 字节集
.参数 小图, 字节集
.局部变量 位图, 位图
.局部变量 位图_大图, 位图
.局部变量 位图_小图, 位图
位图_大图.载入数据 (大图)
位图_小图.载入数据 (转换正规格式bmp (小图))
位图.创建 (位图_大图.取宽度 (), 位图_大图.取高度 () + 位图_小图.取高度 (), 24, #白色)
位图_大图.复制到 (0, 0, 位图_大图.取宽度 (), 位图_大图.取高度 (), 位图, 0, 0, )
位图_小图.复制到 (0, 0, 位图_小图.取宽度 (), 位图_小图.取高度 (), 位图, 0, 位图_大图.取高度 (), )
上一篇 配合sqlite类对象代码生成器