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

📄 parallel port.lst

📁 基于51的DS18B20_1Wire温度控制等C,ASM源程序
💻 LST
📖 第 1 页 / 共 4 页
字号:
018B 1201FA          267                 LCALL SEND_I
018E 22              268                 RET
                     269     
                     270     ;**********************************************************
                     271     
                     272     ; 写入显示坐标子程序
                     273     
                     274     ;**********************************************************
018F                 275     WR_ZB:
018F 7434            276                 MOV A,#34H
0191 1201FA          277                 LCALL SEND_I
0194 E531            278                 MOV A,LCD_Y
0196 1201FA          279                 LCALL SEND_I
0199 E530            280                 MOV A,LCD_X
019B 1201FA          281                 LCALL SEND_I
019E 7430            282                 MOV A,#30H
01A0 1201FA          283                 LCALL SEND_I
01A3 22              284                 RET
                     285     
                     286     ;**********************************************************
                     287     
                     288     ; 闪烁子程序
                     289     
                     290     ;**********************************************************
01A4                 291     FLASH:
01A4 7408            292                 MOV  A,#08H       ;关闭显示
01A6 1201FA          293                 LCALL SEND_I
01A9 120252          294                 LCALL  DELAY5
01AC 740C            295                 MOV  A,#0CH   ;开显示,关光标,不闪烁
01AE 1201FA          296                 LCALL SEND_I
01B1 120252          297                 LCALL  DELAY5
01B4 7408            298                 MOV  A,#08H       ;关闭显示
01B6 1201FA          299                 LCALL SEND_I
01B9 120252          300                 LCALL  DELAY5
01BC 740C            301                 MOV  A,#0CH   ;开显示,关光标,不闪烁
01BE 1201FA          302                 LCALL SEND_I
01C1 120252          303                 LCALL  DELAY5
01C4 7408            304                 MOV  A,#08H       ;关闭显示
01C6 1201FA          305                 LCALL SEND_I
01C9 120252          306                 LCALL  DELAY5
01CC 22              307                     RET
                     308     ;**********************************************************
                     309     
                     310     ;清屏
                     311     
                     312     ;**********************************************************
01CD                 313     CLEAR_P:
01CD 7401            314                 MOV A,#01H           ;清屏
01CF 1201FA          315                 LCALL SEND_I
01D2 7434            316                 MOV A,#34H
01D4 1201FA          317                 LCALL SEND_I
01D7 7430            318                 MOV A,#30H
01D9 1201FA          319                 LCALL SEND_I
01DC 22              320                 RET
                     321     
                     322     ;**********************************************************
A51 MACRO ASSEMBLER  PARALLEL_PORT                                                        12/19/2006 20:55:17 PAGE     6

                     323     
                     324     ;查表取数据送显示
                     325     
                     326     ;**********************************************************
01DD                 327     QUSHU:
01DD E4              328                 CLR A
01DE 93              329                 MOVC A,@A+DPTR       ;查表取数据
01DF 1201EA          330                 LCALL SEND_D          ;送显示
01E2 A3              331                 INC DPTR
01E3 120249          332                 LCALL DELAY4           ;延时80ms,
01E6 D532F4          333                 DJNZ COUNT,QUSHU
01E9 22              334                 RET
                     335     
                     336     ;**********************************************************
                     337     
                     338     ;写数据子程序
                     339     ;RS=1,RW=0,E=高脉冲,D0-D7=数据
                     340     
                     341     ;**********************************************************
01EA                 342     SEND_D:
01EA 12021B          343                 LCALL       CHK_BUSY    ;写数据子程序
01ED D2A0            344                 SETB        RS
01EF C2A1            345                 CLR RW
01F1 F580            346                 MOV P0,A
01F3 D2A2            347                 SETB        E
01F5 00              348                 NOP
01F6 00              349                 NOP
01F7 C2A2            350                 CLR E
01F9 22              351                 RET
                     352     
                     353     ;**********************************************************
                     354     
                     355     ;写指令子程序
                     356     ;RS=0,RW=0,E=高脉冲,D0-D7=指令码
                     357     
                     358     ;**********************************************************
01FA                 359     SEND_I:
01FA 12021B          360                 LCALL CHK_BUSY
01FD C2A0            361                 CLR RS
01FF C2A1            362                 CLR RW
0201 F580            363                 MOV P0,A
0203 D2A2            364                 SETB E
0205 00              365                 NOP
0206 00              366                 NOP
0207 C2A2            367                 CLR E
0209 22              368                 RET
                     369     ;**********************************************************
                     370     
                     371     ;读数据子程序
                     372     ;RS=1,RW=1,E=H,D0-D7=数据
                     373     
                     374     ;**********************************************************
020A                 375     READ_D:
020A 12021B          376                LCALL CHK_BUSY    ;读数据子程序
020D D2A0            377                SETB RS
020F D2A1            378                SETB RW
0211 D2A2            379                SETB E
0213 00              380                NOP
0214 E580            381                MOV  A,P0
0216 C2A2            382                CLR  E
0218 F539            383                MOV  STORE,A
021A 22              384                RET
                     385     
                     386     ;**********************************************************
                     387     
                     388     ;测忙碌子程序
A51 MACRO ASSEMBLER  PARALLEL_PORT                                                        12/19/2006 20:55:17 PAGE     7

                     389     ;RS=0,RW=1,E=H,D0-D7=状态字
                     390     
                     391     ;**********************************************************
021B                 392     CHK_BUSY:
021B 7580FF          393                MOV  P0,#0FFH    ;测忙碌子程序
021E C2A0            394                CLR  RS
0220 D2A1            395                SETB RW
0222 D2A2            396                SETB E
0224 2087FD          397                JB   P0.7,$
0227 C2A2            398                CLR  E
0229 22              399                RET
                     400     
                     401     ;**********************************************************
                     402     
                     403     ;延时子程序
                     404     
                     405     ;**********************************************************
022A                 406     DELAY3:
022A 7D16            407                MOV  R5,#16H
022C 7EFF            408     DEL31:     MOV  R6,#0FFH
022E 7FFF            409     DEL32:     MOV  R7,#0FFH
0230 DFFE            410     DEL33:     DJNZ R7,DEL33
0232 DEFA            411                DJNZ R6,DEL32
0234 DDF6            412                DJNZ R5,DEL31
0236 22              413                RET
                     414     
0237                 415     DELAY2:
0237 7E0C            416                MOV  R6,#0CH
0239 7F18            417     DEL21:     MOV  R7,#18H
023B DFFE            418     DEL22:     DJNZ R7,DEL22
023D DEFA            419                DJNZ R6,DEL21
023F 22              420                RET
                     421     
0240                 422     DELAY1:
0240 7E06            423                MOV  R6,#06H
0242 7F08            424     DEL11:     MOV  R7,#08H
0244 DFFE            425     DEL12:     DJNZ R7,DEL12
0246 DEFA            426                DJNZ R6,DEL11
0248 22              427                RET
                     428     
0249                 429     DELAY4:
0249 7EC8            430                MOV  R6,#200
024B 7FC8            431     DEL41:     MOV  R7,#200
024D DFFE            432     DEL42:     DJNZ R7,DEL42
024F DEFA            433                DJNZ R6,DEL41
0251 22              434                RET
                     435     
0252                 436     DELAY5:
0252 7D05            437                MOV  R5,#05H
0254 7EFF            438     DEL51:     MOV  R6,#0FFH
0256 7FFF            439     DEL52:     MOV  R7,#0FFH
0258 DFFE            440     DEL53:     DJNZ R7,DEL53
025A DEFA            441                DJNZ R6,DEL52
025C DDF6            442                DJNZ R5,DEL51
025E 22              443                RET
                     444     ;**********************************************************
                     445     
025F                 446     TAB1:
025F 20202020        447     TAB1A:     DB  '    伟纳电子    '    ;显示在第一行
0263 CEB0C4C9                
0267 B5E7D7D3                
026B 20202020                
026F B5A5C6AC        448     TAB1C:     DB  '单片机学习开发板'    ;显示在第三行
0273 BBFAD1A7                
0277 CFB0BFAA                
027B B7A2B0E5                
A51 MACRO ASSEMBLER  PARALLEL_PORT                                                        12/19/2006 20:55:17 PAGE     8

027F 20575757        449     TAB1B:     DB  ' WWW.WILLAR.COM '    ;显示在第二行
0283 2E57494C                
0287 4C41522E                
028B 434F4D20                
028F 54454C3A        450     TAB1D:     DB  'TEL:077584867757'    ;显示在第四行
0293 30373735                
0297 38343836                
029B 37373537                
                     451     
                     452     ;**********************************************************************************
                     453     
                     454     ; 伟纳电子图片数据
                     455     
                     456     ;**********************************************************************************
029F                 457     TU_TAB1: 
                     458                 
029F FFFFFFFF        459     DB  0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH,0FFH
02A3 FFFFFFFF                
02A7 FFFFFFFF                
02AB FFFFFFFF                
02AF 80000000        460     DB  080H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,001H
02B3 00000000                
02B7 00000000                
02BB 00000001                
02BF 80000000        461     DB  080H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,001H
02C3 00000000                
02C7 00000000                
02CB 00000001                
02CF 80000000        462     DB  080H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,001H
02D3 00000000                
02D7 00000000                
02DB 00000001                
02DF 80000040        463     DB  080H,000H,000H,040H,000H,000H,000H,008H,010H,000H,000H,002H,000H,002H,000H,001H
02E3 00000008                
02E7 10000002                
02EB 00020001                
02EF 80003F87        464     DB  080H,000H,03FH,087H,0E2H,004H,080H,088H,011H,0E1H,0FFH,01AH,041H,0FCH,010H,041H
02F3 E2048088                
02F7 11E1FF1A                
02FB 41FC1041                
02FF 88BE0501        465     DB  088H,0BEH,005H,001H,00AH,01FH,0E0H,088H,011H,020H,048H,012H,040H,028H,013H,0F1H
0303 0A1FE088                
0307 11204812                
030B 402813F1                
030F 88A00981        466     DB  088H,0A0H,009H,081H,00AH,012H,020H,088H,03DH,020H,048H,03FH,0F0H,04CH,02CH,081H
0313 0A122088                
0317 3D20483F                
031B F04C2C81                
031F 8DA01E02        467     DB  08DH,0A0H,01EH,002H,0CAH,01FH,0E0H,0F6H,011H,020H,048H,004H,000H,0F0H,039H,021H
0323 CA1FE0F6                
0327 11204804                
032B 00F03921                
032F 8DBC08C2        468     DB  08DH,0BCH,008H,0C2H,04AH,012H,020H,080H,019H,023H,0FFH,007H,0E0H,046H,013H,0F1H
0333 4A122080                
0337 1923FF07                
033B E04613F1                
033F 8AA03FE5        469     DB  08AH,0A0H,03FH,0E5H,04AH,01FH,0E0H,0FCH,035H,020H,048H,00AH,041H,0FFH,021H,041H
0343 4A1FE0FC                
0347 3520480A                
034B 41FF2141                
034F 8AA00240        470     DB  08AH,0A0H,002H,040H,0CAH,002H,000H,084H,031H,020H,048H,01AH,040H,012H,039H,041H
0353 CA020084                
0357 3120481A                
035B 40123941                
035F 8AA012C0        471     DB  08AH,0A0H,012H,0C0H,082H,03FH,0F1H,004H,012H,020H,088H,031H,080H,096H,001H,041H
0363 823FF104                
A51 MACRO ASSEMBLER  PARALLEL_PORT                                                        12/19/2006 20:55:17 PAGE     9

0367 12208831                
036B 80960141                
036F 8ABE6261        472     DB  08AH,0BEH,062H,061H,002H,002H,001H,004H,012H,031H,088H,023H,0C3H,013H,03DH,051H
0373 02020104                
0377 12318823                
037B C3133D51                
037F 80000602        473     DB  080H,000H,006H,002H,006H,002H,003H,004H,016H,031H,008H,01CH,030H,030H,006H,071H
0383 06020304                
0387 1631081C                
038B 30300671                
038F 80000000        474     DB  080H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,001H
0393 00000000                
0397 00000000                
039B 00000001                
039F 80000000        475     DB  080H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,001H
03A3 00000000                
03A7 00000000                
03AB 00000001                
03AF 80000000        476     DB  080H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,001H
03B3 00000000                
03B7 00000000                

⌨️ 快捷键说明

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