用画板画出波形显示器例程

画板1.画直线 (温度刻度.线 [100].起点X, 温度刻度.线 [100].结束y, 温度刻度.线 [100].起点X ＋ 画板1.宽度, 温度刻度.线 [100].结束y)
.如果 (指定刻度 ＝ 0)
.计次循环首 (取数组成员数 (时间刻度.线), i)
画板1.画直线 (时间刻度.线 [i].起点X, 时间刻度.线 [i].起点Y, 时间刻度.线 [i].结束X, 时间刻度.线 [i].结束y)
.计次循环尾 ()
.否则
画板1.画直线 (时间刻度.线 [指定刻度].起点X, 时间刻度.线 [指定刻度].起点Y, 时间刻度.线 [指定刻度].结束X, 时间刻度.线 [指定刻度].结束y)

.如果真 (目前点所处线_温度 ＞ 0)
.如果真 (原来点所处线_温度 ＞ 0)
.如果 (原来点所处线_温度 ＝ 100)
画板1.画笔粗细 ＝ 1
画板1.画笔颜色 ＝ #天蓝
.否则
画板1.画笔粗细 ＝ 1
画板1.画笔颜色 ＝ #银白
.如果结束
画板1.画直线 (0, 温度刻度.线 [原来点所处线_温度].起点Y, 画板1.宽度, 温度刻度.线 [原来点所处线_温度].起点Y)
画温度刻度 (原来点所处线_温度)
.如果真结束
画板1.画笔粗细 ＝ 1
画板1.画笔颜色 ＝ #橙黄
画板1.画直线 (0, 温度刻度.线 [目前点所处线_温度].起点Y, 画板1.宽度, 温度刻度.线 [目前点所处线_温度].起点Y)
原来点所处线_温度 ＝ 目前点所处线_温度
标签1.标题 ＝ “温度(℃)：” ＋ 到文本 (目前点所处线_温度)
是否有炒操作 ＝ 真