精易论坛

标题: 易语言通讯陶晶驰串口屏例子 [打印本页]

---

作者: yuanjianglhl    时间: 2024-11-26 17:32
标题: 易语言通讯陶晶驰串口屏例子
易语言通讯陶晶驰串口屏例子，可以实时显示出数据，程序都在易语言，串口屏不需要程序，只需要刷个白的页面和字体进去就行。测试屏幕是 TJC4832T135_011N_F

  

子程序名	返回值类型	公开	备 注
屏幕数据组合	文本型
参数名	类 型	参考	可空	数组	备 注
序号	文本型
零时数据类型	文本型
零时数据X位置	文本型
零时数据Y位置	文本型
零时数据Z位置	文本型
行数	整数型
是否选中	逻辑型

变量名	类 型	静态	数组	备 注
文本1	文本型

如果真 (行数 ＝ 1)
如果 (序号 ≠ “”)
文本1 ＝ “xstr 30,51,480,31,0,” ＋ #文字颜色 ＋ “,” ＋ #底色 ＋ “,0,1,1,” ＋ #引号 ＋ 序号 ＋ “:” ＋ 零时数据类型 ＋ “ X” ＋ 零时数据X位置 ＋ “ Y” ＋ 零时数据Y位置 ＋ “ Z” ＋ 零时数据Z位置 ＋ #引号 ＋ “\xff\xff\xff”
文本1 ＝ “fill 30,51,480,31,” ＋ #底色 ＋ “\xff\xff\xff”
如果 (是否选中 ＝ 真)
文本1 ＝ 文本1 ＋ “cirs 15,67,10,255\xff\xff\xff”
文本1 ＝ 文本1 ＋ “cirs 15,67,10,16777215\xff\xff\xff”


如果真 (行数 ＝ 2)
如果 (序号 ≠ “”)
文本1 ＝ “xstr 30,83,480,31,0,” ＋ #文字颜色 ＋ “,” ＋ #底色 ＋ “,0,1,1,” ＋ #引号 ＋ 序号 ＋ “:” ＋ 零时数据类型 ＋ “ X” ＋ 零时数据X位置 ＋ “ Y” ＋ 零时数据Y位置 ＋ “ Z” ＋ 零时数据Z位置 ＋ #引号 ＋ “\xff\xff\xff”

文本1 ＝ “fill 30,83,480,31,” ＋ #底色 ＋ “\xff\xff\xff”
如果 (是否选中 ＝ 真)
文本1 ＝ 文本1 ＋ “cirs 15,99,10,255\xff\xff\xff”
文本1 ＝ 文本1 ＋ “cirs 15,99,10,16777215\xff\xff\xff”

如果真 (行数 ＝ 3)
如果 (序号 ≠ “”)
文本1 ＝ “xstr 30,115,480,31,0,” ＋ #文字颜色 ＋ “,” ＋ #底色 ＋ “,0,1,1,” ＋ #引号 ＋ 序号 ＋ “:” ＋ 零时数据类型 ＋ “ X” ＋ 零时数据X位置 ＋ “ Y” ＋ 零时数据Y位置 ＋ “ Z” ＋ 零时数据Z位置 ＋ #引号 ＋ “\xff\xff\xff”

文本1 ＝ “fill 30,115,480,31,” ＋ #底色 ＋ “\xff\xff\xff”
如果 (是否选中 ＝ 真)
文本1 ＝ 文本1 ＋ “cirs 15,131,10,255\xff\xff\xff”
文本1 ＝ 文本1 ＋ “cirs 15,131,10,16777215\xff\xff\xff”


如果真 (行数 ＝ 4)
如果 (序号 ≠ “”)
文本1 ＝ “xstr 30,147,480,31,0,” ＋ #文字颜色 ＋ “,” ＋ #底色 ＋ “,0,1,1,” ＋ #引号 ＋ 序号 ＋ “:” ＋ 零时数据类型 ＋ “ X” ＋ 零时数据X位置 ＋ “ Y” ＋ 零时数据Y位置 ＋ “ Z” ＋ 零时数据Z位置 ＋ #引号 ＋ “\xff\xff\xff”

文本1 ＝ “fill 30,147,480,31,” ＋ #底色 ＋ “\xff\xff\xff”
如果 (是否选中 ＝ 真)
文本1 ＝ 文本1 ＋ “cirs 15,163,10,255\xff\xff\xff”
文本1 ＝ 文本1 ＋ “cirs 15,163,10,16777215\xff\xff\xff”


如果真 (行数 ＝ 5)
如果 (序号 ≠ “”)
文本1 ＝ “xstr 30,179,480,31,0,” ＋ #文字颜色 ＋ “,” ＋ #底色 ＋ “,0,1,1,” ＋ #引号 ＋ 序号 ＋ “:” ＋ 零时数据类型 ＋ “ X” ＋ 零时数据X位置 ＋ “ Y” ＋ 零时数据Y位置 ＋ “ Z” ＋ 零时数据Z位置 ＋ #引号 ＋ “\xff\xff\xff”

文本1 ＝ “fill 30,179,480,31,” ＋ #底色 ＋ “\xff\xff\xff”
如果 (是否选中 ＝ 真)
文本1 ＝ 文本1 ＋ “cirs 15,195,10,255\xff\xff\xff”
文本1 ＝ 文本1 ＋ “cirs 15,195,10,16777215\xff\xff\xff”


如果真 (行数 ＝ 6)
如果 (序号 ≠ “”)
文本1 ＝ “xstr 30,211,480,31,0,” ＋ #文字颜色 ＋ “,” ＋ #底色 ＋ “,0,1,1,” ＋ #引号 ＋ 序号 ＋ “:” ＋ 零时数据类型 ＋ “ X” ＋ 零时数据X位置 ＋ “ Y” ＋ 零时数据Y位置 ＋ “ Z” ＋ 零时数据Z位置 ＋ #引号 ＋ “\xff\xff\xff”

文本1 ＝ “fill 30,211,480,31,” ＋ #底色 ＋ “\xff\xff\xff”
如果 (是否选中 ＝ 真)
文本1 ＝ 文本1 ＋ “cirs 15,227,10,255\xff\xff\xff”
文本1 ＝ 文本1 ＋ “cirs 15,227,10,16777215\xff\xff\xff”


如果真 (行数 ＝ 7)
如果 (序号 ≠ “”)
文本1 ＝ “xstr 30,243,480,31,0,” ＋ #文字颜色 ＋ “,” ＋ #底色 ＋ “,0,1,1,” ＋ #引号 ＋ 序号 ＋ “:” ＋ 零时数据类型 ＋ “ X” ＋ 零时数据X位置 ＋ “ Y” ＋ 零时数据Y位置 ＋ “ Z” ＋ 零时数据Z位置 ＋ #引号 ＋ “\xff\xff\xff”

文本1 ＝ “fill 30,243,480,31,” ＋ #底色 ＋ “\xff\xff\xff”
如果 (是否选中 ＝ 真)
文本1 ＝ 文本1 ＋ “cirs 15,259,10,255\xff\xff\xff”
文本1 ＝ 文本1 ＋ “cirs 15,259,10,16777215\xff\xff\xff”

返回 (文本1)

.版本 2<br /> <br /> .子程序 屏幕数据组合, 文本型<br /> .参数 序号, 文本型<br /> .参数 零时数据类型, 文本型<br /> .参数 零时数据X位置, 文本型<br /> .参数 零时数据Y位置, 文本型<br /> .参数 零时数据Z位置, 文本型<br /> .参数 行数, 整数型<br /> .参数 是否选中, 逻辑型, 可空<br /> .局部变量 文本1, 文本型<br /> <br /> .如果真 (行数 ＝ 1)<br />     .如果 (序号 ≠ “”)<br />         文本1 ＝ “xstr 30,51,480,31,0,” ＋ #文字颜色 ＋ “,” ＋ #底色 ＋ “,0,1,1,” ＋ #引号 ＋ 序号 ＋ “:” ＋ 零时数据类型 ＋ “ X” ＋ 零时数据X位置 ＋ “ Y” ＋ 零时数据Y位置 ＋ “ Z” ＋ 零时数据Z位置 ＋ #引号 ＋ “\xff\xff\xff”<br />     .否则<br />         文本1 ＝ “fill 30,51,480,31,” ＋ #底色 ＋ “\xff\xff\xff”<br />     .如果结束<br />     .如果 (是否选中 ＝ 真)<br />         文本1 ＝ 文本1 ＋ “cirs 15,67,10,255\xff\xff\xff”<br />     .否则<br />         文本1 ＝ 文本1 ＋ “cirs 15,67,10,16777215\xff\xff\xff”<br />     .如果结束<br /> <br /> .如果真结束<br /> <br /> .如果真 (行数 ＝ 2)<br />     .如果 (序号 ≠ “”)<br />         文本1 ＝ “xstr 30,83,480,31,0,” ＋ #文字颜色 ＋ “,” ＋ #底色 ＋ “,0,1,1,” ＋ #引号 ＋ 序号 ＋ “:” ＋ 零时数据类型 ＋ “ X” ＋ 零时数据X位置 ＋ “ Y” ＋ 零时数据Y位置 ＋ “ Z” ＋ 零时数据Z位置 ＋ #引号 ＋ “\xff\xff\xff”<br /> <br />     .否则<br />         文本1 ＝ “fill 30,83,480,31,” ＋ #底色 ＋ “\xff\xff\xff”<br />     .如果结束<br />     .如果 (是否选中 ＝ 真)<br />         文本1 ＝ 文本1 ＋ “cirs 15,99,10,255\xff\xff\xff”<br />     .否则<br />         文本1 ＝ 文本1 ＋ “cirs 15,99,10,16777215\xff\xff\xff”<br />     .如果结束<br /> <br /> .如果真结束<br /> .如果真 (行数 ＝ 3)<br /> <br />     .如果 (序号 ≠ “”)<br /> <br />         文本1 ＝ “xstr 30,115,480,31,0,” ＋ #文字颜色 ＋ “,” ＋ #底色 ＋ “,0,1,1,” ＋ #引号 ＋ 序号 ＋ “:” ＋ 零时数据类型 ＋ “ X” ＋ 零时数据X位置 ＋ “ Y” ＋ 零时数据Y位置 ＋ “ Z” ＋ 零时数据Z位置 ＋ #引号 ＋ “\xff\xff\xff”<br /> <br /> <br /> <br />     .否则<br />         文本1 ＝ “fill 30,115,480,31,” ＋ #底色 ＋ “\xff\xff\xff”<br />     .如果结束<br />     .如果 (是否选中 ＝ 真)<br />         文本1 ＝ 文本1 ＋ “cirs 15,131,10,255\xff\xff\xff”<br />     .否则<br />         文本1 ＝ 文本1 ＋ “cirs 15,131,10,16777215\xff\xff\xff”<br />     .如果结束<br /> <br /> .如果真结束<br /> <br /> .如果真 (行数 ＝ 4)<br />     .如果 (序号 ≠ “”)<br /> <br /> <br />         文本1 ＝ “xstr 30,147,480,31,0,” ＋ #文字颜色 ＋ “,” ＋ #底色 ＋ “,0,1,1,” ＋ #引号 ＋ 序号 ＋ “:” ＋ 零时数据类型 ＋ “ X” ＋ 零时数据X位置 ＋ “ Y” ＋ 零时数据Y位置 ＋ “ Z” ＋ 零时数据Z位置 ＋ #引号 ＋ “\xff\xff\xff”<br /> <br /> <br />     .否则<br />         文本1 ＝ “fill 30,147,480,31,” ＋ #底色 ＋ “\xff\xff\xff”<br />     .如果结束<br />     .如果 (是否选中 ＝ 真)<br />         文本1 ＝ 文本1 ＋ “cirs 15,163,10,255\xff\xff\xff”<br />     .否则<br />         文本1 ＝ 文本1 ＋ “cirs 15,163,10,16777215\xff\xff\xff”<br />     .如果结束<br /> <br /> .如果真结束<br /> <br /> .如果真 (行数 ＝ 5)<br />     .如果 (序号 ≠ “”)<br /> <br />         文本1 ＝ “xstr 30,179,480,31,0,” ＋ #文字颜色 ＋ “,” ＋ #底色 ＋ “,0,1,1,” ＋ #引号 ＋ 序号 ＋ “:” ＋ 零时数据类型 ＋ “ X” ＋ 零时数据X位置 ＋ “ Y” ＋ 零时数据Y位置 ＋ “ Z” ＋ 零时数据Z位置 ＋ #引号 ＋ “\xff\xff\xff”<br /> <br /> <br />     .否则<br />         文本1 ＝ “fill 30,179,480,31,” ＋ #底色 ＋ “\xff\xff\xff”<br />     .如果结束<br />     .如果 (是否选中 ＝ 真)<br />         文本1 ＝ 文本1 ＋ “cirs 15,195,10,255\xff\xff\xff”<br />     .否则<br />         文本1 ＝ 文本1 ＋ “cirs 15,195,10,16777215\xff\xff\xff”<br />     .如果结束<br /> <br /> .如果真结束<br /> <br /> .如果真 (行数 ＝ 6)<br />     .如果 (序号 ≠ “”)<br /> <br />         文本1 ＝ “xstr 30,211,480,31,0,” ＋ #文字颜色 ＋ “,” ＋ #底色 ＋ “,0,1,1,” ＋ #引号 ＋ 序号 ＋ “:” ＋ 零时数据类型 ＋ “ X” ＋ 零时数据X位置 ＋ “ Y” ＋ 零时数据Y位置 ＋ “ Z” ＋ 零时数据Z位置 ＋ #引号 ＋ “\xff\xff\xff”<br /> <br /> <br /> <br />     .否则<br />         文本1 ＝ “fill 30,211,480,31,” ＋ #底色 ＋ “\xff\xff\xff”<br />     .如果结束<br />     .如果 (是否选中 ＝ 真)<br />         文本1 ＝ 文本1 ＋ “cirs 15,227,10,255\xff\xff\xff”<br />     .否则<br />         文本1 ＝ 文本1 ＋ “cirs 15,227,10,16777215\xff\xff\xff”<br />     .如果结束<br /> <br /> .如果真结束<br /> <br /> .如果真 (行数 ＝ 7)<br />     .如果 (序号 ≠ “”)<br />         文本1 ＝ “xstr 30,243,480,31,0,” ＋ #文字颜色 ＋ “,” ＋ #底色 ＋ “,0,1,1,” ＋ #引号 ＋ 序号 ＋ “:” ＋ 零时数据类型 ＋ “ X” ＋ 零时数据X位置 ＋ “ Y” ＋ 零时数据Y位置 ＋ “ Z” ＋ 零时数据Z位置 ＋ #引号 ＋ “\xff\xff\xff”<br /> <br /> <br />     .否则<br />         文本1 ＝ “fill 30,243,480,31,” ＋ #底色 ＋ “\xff\xff\xff”<br />     .如果结束<br />     .如果 (是否选中 ＝ 真)<br />         文本1 ＝ 文本1 ＋ “cirs 15,259,10,255\xff\xff\xff”<br />     .否则<br />         文本1 ＝ 文本1 ＋ “cirs 15,259,10,16777215\xff\xff\xff”<br />     .如果结束<br /> <br /> .如果真结束<br /> 返回 (文本1)

陶晶驰串口屏模拟屏幕.e

2024-11-26 17:21 上传

点击文件名下载附件

下载积分: 精币 -2 枚

33.47 KB, 下载次数: 14, 下载积分: 精币 -2 枚

---

作者: laihobglei    时间: 2024-11-26 17:34
这个更好玩

---

作者: 很安静    时间: 2024-11-27 00:38

---

作者: xfriend360    时间: 2024-11-27 09:40
下来研究下，感谢分享

---

作者: hkfox    时间: 2024-12-2 09:57
学习一下

---

作者: Dream520    时间: 2024-12-24 08:43
好东西，学习一下

---

作者: Esc    时间: 2025-1-24 23:09
感谢分享

---

作者: 涤尘    时间: 2025-4-17 21:47
谢谢分享，学习一下

---

作者: pq9999    时间: 前天 23:51
而饿强强日期

---

作者: pq9999    时间: 昨天 08:07
收到DFF的SF

---

欢迎光临 精易论坛 (https://125.confly.eu.org/)

Powered by Discuz! X3.4