8031并口连接间接访问方式程序
; ST7920C JCM12864M
; CPU ST7920C 内置英文字符库及汉字字符库
;2008-01-08该程序在液晶显示模块JCM12864M,JCM89S52上进行调试运行OK
;4行都显示:锦昌电子测试程序
;*************************************************************
RS EQU P3.0
RW EQU P3.1
E EQU P3.3
PSB EQU P3.4
RST EQU P3.6
LCD_X EQU 30H
LCD_Y EQU 31H
COUNT EQU 32H
COUNT1 EQU 33H
COUNT2 EQU 34H
COUNT3 EQU 35H
LCD_DATA EQU 36H
LCD_DATA1 EQU 37H
LCD_DATA2 EQU 38H
STORE EQU 39H
;********************************************************
ORG 0000H
LJMP MAIN
ORG 0003H
LJMP PAUSE
MAIN:
MOV SP,#60H
MOV IE,#81H
MOV IP,#01H
MOV TCON,#00H
CLR RST
LCALL DELAY4 ;T=4084US=4MS
SETB RST
NOP
SETB PSB
INT:
MOV A,#34H
LCALL SEND_I
MOV A,#30H
LCALL SEND_I
MOV A,#01H
LCALL SEND_I
MOV A,#06H
LCALL SEND_I
MOV A,#0CH
LCALL SEND_I
DISPLAY:
MOV A,#01H
LCALL SEND_I
MOV LCD_DATA1,#0CCH
MOV LCD_DATA2,#0CCH
LCALL DISP
LCALL DELAY3
LCALL DELAY3
LCALL DELAY3
LCALL DELAY3
DISPLAY1:
LCALL CLEAR_P
DISPLAY1A:
MOV DPTR,#TAB1A ;第1行
MOV COUNT,#10H
MOV A,#80H
LCALL SEND_I
LCALL QUSHU
DISPLAY1B:
MOV DPTR,#TAB1B ;第2行
MOV COUNT,#10H
MOV A,#90H
LCALL SEND_I
LCALL QUSHU
DISPLAY1C:
MOV DPTR,#TAB1C ;第3行
MOV COUNT,#10H
MOV A,#88H
LCALL SEND_I
LCALL QUSHU
DISPLAY1D:
MOV DPTR,#TAB1D ;第4行
MOV COUNT,#10H
MOV A,#98H
LCALL SEND_I
LCALL QUSHU
LCALL DELAY3
LCALL DELAY3
LCALL DELAY3
LCALL DELAY3
LCALL DELAY3
LJMP DISPLAY
;****************************************************
DISP:
MOV COUNT3,#02H
MOV LCD_X,#80H
DISP1:
MOV LCD_Y,#80H
CLR F0
MOV COUNT2,#20H
DISP2:
MOV COUNT1,#10H
LCALL WR_ZB
DISP3:
JB F0,DISP32
MOV LCD_DATA,LCD_DATA1
AJMP DISP31
DISP32:
MOV LCD_DATA,LCD_DATA2
DISP31:
MOV A,LCD_DATA
LCALL SEND_D
DJNZ COUNT1,DISP31
INC LCD_Y
CPL F0
DJNZ COUNT2,DISP2
MOV LCD_X,#88H
DJNZ COUNT3,DISP1
MOV A,#36H
LCALL SEND_I
MOV A,#30H
LCALL SEND_I
RET
WR_ZB:
MOV A,#34H
LCALL SEND_I
MOV A,LCD_Y
LCALL SEND_I
MOV A,LCD_X
LCALL SEND_I
MOV A,#30H
LCALL SEND_I
RET
;***********************
CLEAR_P:
MOV A,#01H
LCALL SEND_I
MOV A,#34H
LCALL SEND_I
MOV A,#30H
LCALL SEND_I
RET
;*************************
QUSHU:
CLR A
MOVC A,@A+DPTR
LCALL SEND_D
INC DPTR
LCALL DELAY4
DJNZ COUNT,QUSHU
RET
;*************************
SEND_D:
LCALL CHK_BUSY
SETB RS
CLR RW
MOV P1,A
SETB E
NOP
NOP
CLR E
RET
;**************************
SEND_I:
LCALL CHK_BUSY
CLR RS
CLR RW
MOV P1,A
SETB E
NOP
NOP
CLR E
RET
;**************************
READ_D:
LCALL CHK_BUSY
SETB RS
SETB RW
SETB E
NOP
MOV A,P1
CLR E
MOV STORE,A
RET
;*******************************
CHK_BUSY:
MOV P1,#0FFH
CLR RS
SETB RW
SETB E
JB P1.7,$
CLR E
RET
;*******************************
DELAY3:
MOV R5,#16H
DEL31: MOV R6,#100
DEL32: MOV R7,#0FFH
DEL33: DJNZ R7,DEL33
DJNZ R6,DEL32
DJNZ R5,DEL31
RET
DELAY4: ;延时80ms,
MOV R6,#100
DEL41: MOV R7,#200
DEL42: DJNZ R7,DEL42
DJNZ R6,DEL41
RET
;********************************
PAUSE:
SETB P3.2
SETB P3.2
LCALL DELAY4
MOV C,P3.2
MOV C,P3.2
JNC PAUSE
PAUSE1:
MOV C,P3.2
MOV C,P3.2
LCALL DELAY4
JC PAUSE1
PAUSE2:
SETB P3.2
SETB P3.2
MOV C,P3.2
MOV C,P3.2
JNC PAUSE2
NOP
RETI
TAB1A: DB 0BDH,0F5H,0B2H,0FDH,0B5H,0E7H,0D7H,0D3H,0B2H,0E2H,0CAH,0D4H,
0B3H,0CCH,0D0H,0F2H ; 1
TAB1B: DB 0BDH,0F5H,0B2H,0FDH,0B5H,0E7H,0D7H,0D3H,0B2H,0E2H,0CAH,0D4H,
0B3H,0CCH,0D0H,0F2H ; 2
TAB1C: DB 0BDH,0F5H,0B2H,0FDH,0B5H,0E7H,0D7H,0D3H,0B2H,0E2H,0CAH,0D4H,
0B3H,0CCH,0D0H,0F2H ; 3
TAB1D: DB 0BDH,0F5H,0B2H,0FDH,0B5H,0E7H,0D7H,0D3H,0B2H,0E2H,0CAH,0D4H,
0B3H,0CCH,0D0H,0F2H ; 4
end
没有合适的资源?快使用搜索试试~ 我知道了~
基于C语言实现12864生产厂程序(含源代码+使用说明).zip
![preview](https://csdnimg.cn/release/downloadcmsfe/public/img/white-bg.ca8570fa.png)
共44个文件
dot:11个
bmp:9个
lcm:5个
![preview-icon](https://csdnimg.cn/release/downloadcmsfe/public/img/scale.ab9e0183.png)
0 下载量 42 浏览量
2024-04-28
03:29:12
上传
评论
收藏 3.99MB ZIP 举报
温馨提示
【项目资源】:包含前端、后端、移动开发、操作系统、人工智能、物联网、信息化管理、数据库、硬件开发、大数据、课程资源、音视频、网站开发等各种技术项目的源码。包括STM32、ESP8266、PHP、QT、Linux、iOS、C++、Java、python、web、C#、EDA、proteus、RTOS等项目的源码。【项目质量】:所有源码都经过严格测试,可以直接运行。功能在确认正常工作后才上传。【适用人群】:适用于希望学习不同技术领域的小白或进阶学习者。可作为毕设项目、课程设计、大作业、工程实训或初期项目立项。【附加价值】:项目具有较高的学习借鉴价值,也可直接拿来修改复刻。对于有一定基础或热衷于研究的人来说,可以在这些基础代码上进行修改和扩展,实现其他功能。【沟通交流】:有任何使用上的问题,欢迎随时与博主沟通,博主会及时解答。鼓励下载和使用,并欢迎大家互相学习,共同进步。
资源推荐
资源详情
资源评论
![zip](https://img-home.csdnimg.cn/images/20210720083736.png)
![zip](https://img-home.csdnimg.cn/images/20210720083736.png)
![zip](https://img-home.csdnimg.cn/images/20210720083736.png)
![zip](https://img-home.csdnimg.cn/images/20210720083736.png)
![pdf](https://img-home.csdnimg.cn/images/20210720083512.png)
![pdf](https://img-home.csdnimg.cn/images/20210720083512.png)
![doc](https://img-home.csdnimg.cn/images/20210720083327.png)
![pdf](https://img-home.csdnimg.cn/images/20210720083512.png)
![rar](https://img-home.csdnimg.cn/images/20210720083606.png)
![pdf](https://img-home.csdnimg.cn/images/20210720083512.png)
![zip](https://img-home.csdnimg.cn/images/20210720083736.png)
![zip](https://img-home.csdnimg.cn/images/20210720083736.png)
![pdf](https://img-home.csdnimg.cn/images/20210720083512.png)
![pdf](https://img-home.csdnimg.cn/images/20210720083512.png)
![xlsx](https://img-home.csdnimg.cn/images/20210720083732.png)
收起资源包目录
![package](https://csdnimg.cn/release/downloadcmsfe/public/img/package.f3fc750b.png)
![folder](https://csdnimg.cn/release/downloadcmsfe/public/img/folder.005fa2e5.png)
![file-type](https://csdnimg.cn/release/download/static_files/pc/images/minetype/TXT.png)
![folder](https://csdnimg.cn/release/downloadcmsfe/public/img/folder.005fa2e5.png)
![file-type](https://csdnimg.cn/release/download/static_files/pc/images/minetype/UNKNOWN.png)
![file-type](https://csdnimg.cn/release/download/static_files/pc/images/minetype/BMP.png)
![file-type](https://csdnimg.cn/release/download/static_files/pc/images/minetype/BMP.png)
![file-type](https://csdnimg.cn/release/download/static_files/pc/images/minetype/TXT.png)
![file-type](https://csdnimg.cn/release/download/static_files/pc/images/minetype/UNKNOWN.png)
![file-type](https://csdnimg.cn/release/download/static_files/pc/images/minetype/BMP.png)
![file-type](https://csdnimg.cn/release/download/static_files/pc/images/minetype/UNKNOWN.png)
![file-type](https://csdnimg.cn/release/download/static_files/pc/images/minetype/UNKNOWN.png)
![file-type](https://csdnimg.cn/release/download/static_files/pc/images/minetype/UNKNOWN.png)
![file-type](https://csdnimg.cn/release/download/static_files/pc/images/minetype/TXT.png)
![file-type](https://csdnimg.cn/release/download/static_files/pc/images/minetype/UNKNOWN.png)
![file-type](https://csdnimg.cn/release/download/static_files/pc/images/minetype/BMP.png)
![file-type](https://csdnimg.cn/release/download/static_files/pc/images/minetype/BMP.png)
![file-type](https://csdnimg.cn/release/download/static_files/pc/images/minetype/UNKNOWN.png)
![file-type](https://csdnimg.cn/release/download/static_files/pc/images/minetype/BMP.png)
![file-type](https://csdnimg.cn/release/download/static_files/pc/images/minetype/UNKNOWN.png)
![file-type](https://csdnimg.cn/release/download/static_files/pc/images/minetype/UNKNOWN.png)
![file-type](https://csdnimg.cn/release/download/static_files/pc/images/minetype/UNKNOWN.png)
![file-type](https://csdnimg.cn/release/download/static_files/pc/images/minetype/UNKNOWN.png)
![file-type](https://csdnimg.cn/release/download/static_files/pc/images/minetype/BMP.png)
![file-type](https://csdnimg.cn/release/download/static_files/pc/images/minetype/UNKNOWN.png)
![file-type](https://csdnimg.cn/release/download/static_files/pc/images/minetype/UNKNOWN.png)
![file-type](https://csdnimg.cn/release/download/static_files/pc/images/minetype/UNKNOWN.png)
![file-type](https://csdnimg.cn/release/download/static_files/pc/images/minetype/UNKNOWN.png)
![file-type](https://csdnimg.cn/release/download/static_files/pc/images/minetype/UNKNOWN.png)
![file-type](https://csdnimg.cn/release/download/static_files/pc/images/minetype/UNKNOWN.png)
![file-type](https://csdnimg.cn/release/download/static_files/pc/images/minetype/EXE.png)
![file-type](https://csdnimg.cn/release/download/static_files/pc/images/minetype/UNKNOWN.png)
![file-type](https://csdnimg.cn/release/download/static_files/pc/images/minetype/UNKNOWN.png)
![file-type](https://csdnimg.cn/release/download/static_files/pc/images/minetype/BMP.png)
![file-type](https://csdnimg.cn/release/download/static_files/pc/images/minetype/EXE.png)
![file-type](https://csdnimg.cn/release/download/static_files/pc/images/minetype/EXE.png)
![file-type](https://csdnimg.cn/release/download/static_files/pc/images/minetype/UNKNOWN.png)
![file-type](https://csdnimg.cn/release/download/static_files/pc/images/minetype/BMP.png)
![file-type](https://csdnimg.cn/release/download/static_files/pc/images/minetype/UNKNOWN.png)
![file-type](https://csdnimg.cn/release/download/static_files/pc/images/minetype/UNKNOWN.png)
![file-type](https://csdnimg.cn/release/download/static_files/pc/images/minetype/UNKNOWN.png)
![file-type](https://csdnimg.cn/release/download/static_files/pc/images/minetype/PDF.png)
![file-type](https://csdnimg.cn/release/download/static_files/pc/images/minetype/PDF.png)
![file-type](https://csdnimg.cn/release/download/static_files/pc/images/minetype/UNKNOWN.png)
![file-type](https://csdnimg.cn/release/download/static_files/pc/images/minetype/UNKNOWN.png)
![file-type](https://csdnimg.cn/release/download/static_files/pc/images/minetype/TXT.png)
![file-type](https://csdnimg.cn/release/download/static_files/pc/images/minetype/UNKNOWN.png)
共 44 条
- 1
资源评论
![avatar-default](https://csdnimg.cn/release/downloadcmsfe/public/img/lazyLogo2.1882d7f4.png)
![avatar](https://profile-avatar.csdnimg.cn/e2fc6dee0fd84fc490fad585ae24d5a7_qq_67153941.jpg!1)
大黄鸭duck.
- 粉丝: 3294
- 资源: 1万+
上传资源 快速赚钱
我的内容管理 展开
我的资源 快来上传第一个资源
我的收益
登录查看自己的收益我的积分 登录查看自己的积分
我的C币 登录后查看C币余额
我的收藏
我的下载
下载帮助
![voice](https://csdnimg.cn/release/downloadcmsfe/public/img/voice.245cc511.png)
![center-task](https://csdnimg.cn/release/downloadcmsfe/public/img/center-task.c2eda91a.png)
最新资源
- 305建筑结构水电欧式6套(14.5x20.2)\施工设计说明-02.dwg
- 305建筑结构水电欧式6套(14.5x20.2)\施工目录材料表-01.dwg
- FFmpeg简易封装格式处理指南 1.2版
- 305建筑结构水电欧式6套(14.5x20.2)\施工图\目录材料表-00.dwg
- 305建筑结构水电欧式6套(14.5x20.2)\施工图\二层、三层空调平面图(一)-05.dwg
- dotNetFx40_Full_x86_x64.zip
- 人脸数据集总览:包含多个大型人脸数据库,如CMU PIE、ORL、PF01等,涉及多种姿态、光照和表情
- 最新Xiaomi HyperOS系统刷机工具.zip
- C语言编程经典案例900集
- 实现求后缀表达式和对后缀表达式求值.zip
资源上传下载、课程学习等过程中有任何疑问或建议,欢迎提出宝贵意见哦~我们会及时处理!
点击此处反馈
![feedback](https://img-home.csdnimg.cn/images/20220527035711.png)
![feedback](https://img-home.csdnimg.cn/images/20220527035711.png)
![feedback-tip](https://img-home.csdnimg.cn/images/20220527035111.png)
安全验证
文档复制为VIP权益,开通VIP直接复制
![dialog-icon](https://csdnimg.cn/release/downloadcmsfe/public/img/green-success.6a4acb44.png)