⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 12864zk.lst

📁 51单片机实验例程
💻 LST
📖 第 1 页 / 共 5 页
字号:
                     235     ;==================================================
                     236     ;清屏
                     237     ;==================================================
025F                 238     CLEAR_P:
025F 7401            239                 MOV A,#01H           ;清屏
0261 12028C          240          LCALL SEND_I
0264 7434            241                 MOV A,#34H
0266 12028C          242          LCALL SEND_I
0269 7430            243          MOV A,#30H
026B 12028C          244          LCALL SEND_I
026E 22              245                 RET
                     246     ;==================================================
                     247     ;查表取数据送显示
                     248     ;==================================================
026F                 249     QUSHU:
026F E4              250                 CLR A
0270 93              251          MOVC A,@A+DPTR       ;查表取数据
0271 12027C          252          LCALL SEND_D          ;送显示
0274 A3              253          INC DPTR
0275 1202DB          254                 LCALL DELAY4           ;延时80ms,
0278 D532F4          255                 DJNZ COUNT,QUSHU
027B 22              256          RET
A51 MACRO ASSEMBLER  12864ZK                                                              08/02/2009 18:45:31 PAGE     5

                     257     
                     258     ;===============================================
                     259     ;写数据子程序
                     260     ;RS=1,RW=0,E=高脉冲,D0-D7=数据
                     261     ;===============================================
027C                 262     SEND_D:
027C 1202AD          263          LCALL CHK_BUSY    ;写数据子程序
027F D2A6            264          SETB RS
0281 C2A5            265          CLR RW
0283 F580            266          MOV P0,A
0285 D2A7            267          SETB E
0287 00              268          NOP
0288 00              269          NOP
0289 C2A7            270          CLR E
028B 22              271          RET
                     272     ;===============================================
                     273     ;写指令子程序
                     274     ;RS=0,RW=0,E=高脉冲,D0-D7=指令码
                     275     ;===============================================
028C                 276     SEND_I:
028C 1202AD          277          LCALL CHK_BUSY
028F C2A6            278          CLR RS
0291 C2A5            279          CLR RW
0293 F580            280          MOV P0,A
0295 D2A7            281          SETB E
0297 00              282          NOP
0298 00              283          NOP
0299 C2A7            284          CLR E
029B 22              285          RET
                     286     ;================================================
                     287     ;读数据子程序
                     288     ;RS=1,RW=1,E=H,D0-D7=数据
                     289     ;================================================
029C                 290     READ_D:
029C 1202AD          291         LCALL CHK_BUSY    ;读数据子程序
029F D2A6            292         SETB RS
02A1 D2A5            293         SETB RW
02A3 D2A7            294         SETB E
02A5 00              295         NOP
02A6 E580            296         MOV A,P0
02A8 C2A7            297         CLR E
02AA F539            298         MOV STORE,A
02AC 22              299         RET
                     300     ;================================================
                     301     ;;测忙碌子程序
                     302     ;RS=0,RW=1,E=H,D0-D7=状态字
                     303     ;================================================
02AD                 304     CHK_BUSY:
02AD 7580FF          305             MOV P0,#0FFH    ;测忙碌子程序
02B0 C2A6            306         CLR RS
02B2 D2A5            307         SETB RW
02B4 D2A7            308         SETB E
02B6 2087FD          309         JB P0.7,$
02B9 C2A7            310         CLR E
02BB 22              311         RET
                     312     ;================================================
                     313     ;延时子程序
                     314     
02BC                 315     DELAY3:
02BC 7D16            316         MOV R5,#16H
02BE 7E64            317     DEL31:    MOV R6,#100
02C0 7FFF            318     DEL32:    MOV R7,#0FFH
02C2 DFFE            319     DEL33:    DJNZ R7,DEL33
02C4 DEFA            320         DJNZ R6,DEL32
02C6 DDF6            321         DJNZ R5,DEL31
02C8 22              322         RET
A51 MACRO ASSEMBLER  12864ZK                                                              08/02/2009 18:45:31 PAGE     6

                     323     
02C9                 324     DELAY2:
02C9 7E0C            325                MOV R6,#0CH
02CB 7F18            326     DEL21:    MOV R7,#18H
02CD DFFE            327     DEL22:    DJNZ R7,DEL22
02CF DEFA            328         DJNZ R6,DEL21
02D1 22              329         RET
                     330     
02D2                 331     DELAY1:
02D2 7E06            332                MOV R6,#06H
02D4 7F08            333     DEL11:    MOV R7,#08H
02D6 DFFE            334     DEL12:    DJNZ R7,DEL12
02D8 DEFA            335         DJNZ R6,DEL11
02DA 22              336                RET
                     337     
02DB                 338     DELAY4:
02DB 7E64            339                MOV R6,#100
02DD 7FC8            340     DEL41:    MOV R7,#200
02DF DFFE            341     DEL42:    DJNZ R7,DEL42
02E1 DEFA            342         DJNZ R6,DEL41
02E3 22              343         RET
                     344     
02E4                 345     DELAY5:
02E4 7D05            346                MOV R5,#05H
02E6 7E64            347     DEL51:    MOV R6,#100
02E8 7FFF            348     DEL52:    MOV R7,#0FFH
02EA DFFE            349     DEL53:    DJNZ R7,DEL53
02EC DEFA            350         DJNZ R6,DEL52
02EE DDF6            351         DJNZ R5,DEL51
02F0 22              352         RET
                     353     ;***********************************************
02F1                 354     TAB1:
02F1 20202020        355     TAB1A:     DB  '    普中科技    '    ;显示在第一行
02F5 C6D5D6D0                
02F9 BFC6BCBC                
02FD 20202020                
0301 D7D4D1A7        356     TAB1C:     DB  '自学单片机第一站'    ;显示在第三行
0305 B5A5C6AC                
0309 BBFAB5DA                
030D D2BBD5BE                
0311 7777772E        357     TAB1B:     DB  'www.prechin.com '    ;显示在第二行
0315 70726563                
0319 68696E2E                
031D 636F6D20                
0321 54454C3A        358     TAB1D:     DB  'TEL:755-29325187'    ;显示在第四行
0325 3735352D                
0329 32393332                
032D 35313837                
                     359     
                     360     
                     361     ;*-------------------------------------------------------------------- *
                     362     ;* Bitmap点阵数据表                                                    *
                     363     ;* 图片: E:\图形8.bmp,横向取模左高位,数据排列:从左到右从上到下         *
                     364     ;* 图片尺寸: 128 * 64                                                  *
                     365     ;*-------------------------------------------------------------------- *
0331                 366     TU_TAB1:                                   ; 数据表
                     367     ;--  宽度x高度=128x64  --
0331 00000000        368     DB  00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H
0335 00000000                
0339 00000000                
033D 00000000                
0341 00000000        369     DB  00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H
0345 00000000                
0349 00000000                
034D 00000000                
0351 00000000        370     DB  00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,3FH,00H
A51 MACRO ASSEMBLER  12864ZK                                                              08/02/2009 18:45:31 PAGE     7

0355 00000000                
0359 00000000                
035D 00003F00                
0361 00000000        371     DB  00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,40H,80H
0365 00000000                
0369 00000000                
036D 00004080                
0371 00000000        372     DB  00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,01H,0FEH,60H
0375 00000000                
0379 00000000                
037D 0001FE60                
0381 00000000        373     DB  00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,01H,63H,20H
0385 00000000                
0389 00000000                
038D 00016320                
0391 00000000        374     DB  00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,02H,63H,10H
0395 00000000                
0399 00000000                
039D 00026310                
03A1 00000000        375     DB  00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,04H,63H,08H
03A5 00000000                
03A9 00000000                
03AD 00046308                
03B1 00000000        376     DB  00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,04H,7EH,08H
03B5 00000000                
03B9 00000000                
03BD 00047E08                
03C1 00000000        377     DB  00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,04H,6CH,08H
03C5 00000000                
03C9 00000000                
03CD 00046C08                
03D1 1FF83FF8        378     DB  1FH,0F8H,3FH,0F8H,7FH,0F0H,0FH,0F9H,0F1H,0F0H,0FFH,87H,0C3H,0C4H,6CH,08H
03D5 7FF00FF9                
03D9 F1F0FF87                
03DD C3C46C08                
03E1 0E7C1EFC        379     DB  0EH,7CH,1EH,0FCH,38H,0F8H,3EH,0F8H,0E0H,0E0H,1CH,03H,0C1H,84H,66H,08H
03E5 38F83EF8                
03E9 E0E01C03                
03ED C1846608                
03F1 0E1E1C3C        380     DB  0EH,1EH,1CH,3CH,38H,38H,38H,38H,0E0H,0E0H,1CH,03H,0E1H,84H,66H,08H
03F5 38383838                
03F9 E0E01C03                
03FD E1846608                
0401 0E1E1C1C        381     DB  0EH,1EH,1CH,1CH,38H,18H,78H,38H,0E0H,0E0H,1CH,03H,0E1H,82H,63H,10H
0405 38187838                
0409 E0E01C03                
040D E1826310                
0411 0E0E1C1C        382     DB  0EH,0EH,1CH,1CH,38H,00H,0F0H,18H,0E0H,0E0H,1CH,03H,0F1H,81H,0F3H,0A0H
0415 3800F018                
0419 E0E01C03                
041D F181F3A0                
0421 0E0E1C3C        383     DB  0EH,0EH,1CH,3CH,38H,0C0H,0F0H,00H,0E0H,0E0H,1CH,03H,0F1H,81H,80H,60H
0425 38C0F000                
0429 E0E01C03                
042D F1818060                
0431 0E1E1C3C        384     DB  0EH,1EH,1CH,3CH,38H,0C0H,0F0H,00H,0E0H,0E0H,1CH,03H,79H,80H,40H,80H
0435 38C0F000                
0439 E0E01C03                
043D 79804080                
0441 0E1E1CF8        385     DB  0EH,1EH,1CH,0F8H,39H,0C0H,0E0H,00H,0E0H,0E0H,1CH,03H,79H,80H,3FH,00H
0445 39C0E000                
0449 E0E01C03                
044D 79803F00                
0451 0E7C1FF0        386     DB  0EH,7CH,1FH,0F0H,3FH,0C0H,0E0H,00H,0FFH,0E0H,1CH,03H,3DH,80H,00H,00H
0455 3FC0E000                
0459 FFE01C03                
A51 MACRO ASSEMBLER  12864ZK                                                              08/02/2009 18:45:31 PAGE     8

045D 3D800000                
0461 0FF81DE0        387     DB  0FH,0F8H,1DH,0E0H,39H,0C0H,0E0H,00H,0E0H,0E0H,1CH,03H,3DH,80H,00H,00H
0465 39C0E000                
0469 E0E01C03                
046D 3D800000                
0471 0E001DE0        388     DB  0EH,00H,1DH,0E0H,38H,0C0H,0E0H,00H,0E0H,0E0H,1CH,03H,1FH,80H,00H,00H
0475 38C0E000                
0479 E0E01C03                
047D 1F800000                
0481 0E001CF0        389     DB  0EH,00H,1CH,0F0H,38H,0C0H,0F0H,00H,0E0H,0E0H,1CH,03H,1FH,80H,00H,00H
0485 38C0F000                
0489 E0E01C03                
048D 1F800000                
0491 0E001CF0        390     DB  0EH,00H,1CH,0F0H,38H,00H,0F0H,00H,0E0H,0E0H,1CH,03H,0FH,80H,00H,00H
0495 3800F000                
0499 E0E01C03                
049D 0F800000                
04A1 0E001C78        391     DB  0EH,00H,1CH,78H,38H,00H,0F0H,18H,0E0H,0E0H,1CH,03H,0FH,80H,00H,00H
04A5 3800F018                
04A9 E0E01C03                
04AD 0F800000                

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -