大漠插件字库点阵算法

.如果真 (字库 ≠ “”)
字库数组 ＝ 分割文本 (字库, “$”, )
点阵 ＝ 字库数组 [1]
行数 ＝ 到整数 (字库数组 [4]) ' 这个行数 没啥卵用
行数 ＝ 11 ' 大漠 只能精确到11行
.如果真结束
.计次循环首 (取文本长度 (点阵), i)
转换结果 ＝ 进制_十到二 (进制_十六到十 (取文本中间 (点阵, i, 1)))
.判断开始 (取文本长度 (转换结果) ＝ 1)
转换结果 ＝ “000” ＋ 转换结果
.判断 (取文本长度 (转换结果) ＝ 2)
转换结果 ＝ “00” ＋ 转换结果
.判断 (取文本长度 (转换结果) ＝ 3)
转换结果 ＝ “0” ＋ 转换结果
.判断 (取文本长度 (转换结果) ＝ 0)
转换结果 ＝ “0000”
.默认

.判断结束
转换字库 ＝ 转换字库 ＋ 转换结果
.计次循环尾 ()
长度 ＝ 取文本长度 (转换字库)
画板1.清除 (0, 0, 160, 80)
.计次循环首 (长度 ÷ 行数, b)
.计次循环首 (行数, a)
计次 ＝ 计次 ＋ 1
.如果真 (取文本中间 (转换字库, 计次, 1) ＝ “1”)
矩形.X ＝ (b － 1) × 3
矩形.Y ＝ (a － 1) × 3
画板1.画渐变矩形 (矩形.X, 矩形.Y, 3, 3, 1, #黑色, #黑色)
.如果真结束

.计次循环尾 ()
.计次循环尾 ()
易语言大漠插件字库点阵算法例子。