:2.377KB : :1 :2021-03-08 18:25:05
.如果 (取文本中间 (当前代码, 当前线号, 1) = “1”)
.如果 (是否画线 = 真)
画板1.画笔粗细 = 码宽 × 3
当前横座标 = 当前横座标 + 画板1.画笔粗细 ÷ 2 ' 因为画笔起笔点为线条的中间
画板1.画直线 (当前横座标, 0, 当前横座标, 码高)
当前横座标 = 当前横座标 + 画板1.画笔粗细 ÷ 2
是否画线 = 假
.否则
当前横座标 = 当前横座标 + 码宽 × 3
是否画线 = 真
易语言画条形码技术例子。