《led点阵汉字生成器 点阵式led汉字广告屏的设计与制作毕业设计.doc》由会员分享，可在线阅读，更多相关《led点阵汉字生成器 点阵式led汉字广告屏的设计与制作毕业设计.doc（9页珍藏版）》请在三一文库上搜索。
1、led点阵汉字生成器 点阵式led汉字广告屏的设计与制作毕业设计_图文 导读：就爱阅读网友为您分享以下“点阵式led汉字广告屏的设计与制作毕业设计_图文的资讯，希望对您有所帮助，感谢您对92to 的支持!64 上位机软件关键算法实现 6. 4. 1 PC机串口操作 VB程序中，通过MSCOMM控件，可对PC机串行口进行方便、灵活的操作。为使程序模块化，结构化。在程序中把对COM口操作的指令封装为一个公共子过程，极大地方便了其它过程的调用。 单字节发送子程序： Public Sub Sendbit(ByVal a As Integer) ；a为要发送的单字节数据 If a > 255 Th
2、en a = 255 End If If a < 0 Then a = 0 End If If MSComm1.PortOpen = False Then MSComm1.PortOpen = True End If Dim mm(0 To 0) As Byte mm(0) = a MSComm1.OutBufferCount = 0 MSComm1.InBufferCount = 0 If MSComm1.PortOpen = True Then MSComm1.Output = mm() Else MSComm1.PortOpen = True MSComm1.Output = mm
3、() End If End Sub n字节接收子程序： Private Sub MSComm1_OnComm() Dim Buffer As Variant Dim R(0 To n) As Integer ;n为接收字节数 j = 0 Buffer = MSComm1.Input For il = LBound(Buffer) To UBound(Buffer) R(j) = Buffer(il) j = j + 1 Next il j = 0 Dim R0 As Integer Dim R1 As Integer Dim R2 As Integer Dim R3 As Integer Di
4、m Rn As Integer R0 = R(0) ;首字节 R1 = R(1) R2 = R(2) R3 = R(3) Rn = R(n) ;末字节 End Sub 6. 4. 2 字符转为GB2312内码的算法 在以下算法中，s为字符串变量，ss为生成的内码串。 s = Text1.Text For i = 1 To Len(s) If Mid(s, i, 1) <= Chr(&H7F) And Mid(s, i, 1) >= Chr(&H20) Then ss = ss + "00" End If If Mid(s, i, 1) >=
5、 Chr(&HA1) And Mid(s, i, 1) >= Chr(&H20) Then ss = ss + Hex(Asc(Mid(s, i, 1) End If Next 65 上位机软件使用方法及运行环境 651 控件功能及使用方法 图6. 3 上位机软件运行后的界面 图6. 3为上位机软件运行后的界面。各控件的使用方法及功能如下： 1文字编辑区：在文字编辑区中可输入小于1024个待显示的汉字或字母，数字等。 2内码窗：显示字符串对应的内码串。 3点击“清空文字编辑区内容清空。 4点击“保存将文字编辑区当前内容以文本文件方式保存在指定路径。 5“字符数表示文字编辑
6、区中当前的字符数 6修改“LED刷新率可以改变LED行扫描过程中每一行暂留的时间，值越小，暂留 7时间越长，视觉亮度越高，但屏幕会出现闪烁。 8修改“左移速度可以改变LED在左滚屏显示的时候的移动速度。值越大，移动越 快。需要同时调节“LED刷新率来获得最正确的视觉效果。 9修改“定格时间可以改变在定格显示模式时候的每帧暂停时间。 10修改“背景模式可选择汉字是以阴字或是阳字方式显示。 11修改“显示模式中的单项选择按钮，可以改变显示方式。 左滚屏：连续的显示，所有汉字显示完后从第一个字开始重复。 左暂停：逐位左移96点阵后暂停一段时间，一直到所有汉字显示完。重头开始 定 格：没有移动，静止显示一帧字符后换下一帧字符显示。 12点击“翻开文件：将指定目录中的文本文件载入文字编辑区 13点击“开始下载：将设置信息及内码串发送到下位机。在此之前，需要先按住下 位机的DownLoad键，再翻开下位机电源，以使下位机进入下载模式。 14“相关信息显示的是当前上位机软件运行状态。