12232f_p.lst

基于msc单片机仿真机的仿真程序

A51 MACRO ASSEMBLER  12232F_P                                                             09/16/2006 15:20:50 PAGE     1


MACRO ASSEMBLER A51 V7.08a
OBJECT MODULE PLACED IN 12232f_p.OBJ
ASSEMBLER INVOKED BY: D:\Keil\C51\BIN\A51.EXE 12232f_p.asm SET(SMALL) DEBUG EP

LOC  OBJ            LINE     SOURCE

                       1     ;This program is for 12232-9  并行
                       2     ; RS--------P2.0
                       3     ; R/W-------P2.1
                       4     ; E---------P2.2
                       5     ; DB0~7-----P0
  00A0                 6             RS EQU P2.0
  00A1                 7             RW EQU P2.1
  00A2                 8             E EQU P2.2
0000                   9             ORG 0000H
0000 0110             10             AJMP START
0010                  11             ORG 0010H
0010                  12     START:
0010 1200F2           13             LCALL SETUP
0013 120165           14             LCALL DEF_CHAR
0016 7480             15             MOV A,#80H
0018 12011F           16             LCALL WRITE_COM
001B 7B08             17             MOV R3,#8
001D                  18     TEST11:
001D 9001F1           19             MOV DPTR,#CGRAM1 ;CGRAM TEST
0020 1201D5           20             LCALL WRITE_CGRAM
0023 DBF8             21             DJNZ R3,TEST11
0025 7490             22             MOV A,#90H
0027 12011F           23             LCALL WRITE_COM
002A 7B08             24             MOV R3,#8
002C                  25     TEST12:
002C 9001F1           26             MOV DPTR,#CGRAM1
002F 1201D5           27             LCALL WRITE_CGRAM
0032 DBF8             28             DJNZ R3,TEST12
0034 12015C           29             LCALL DELAY
0037 12015C           30             LCALL DELAY
003A 12015C           31             LCALL DELAY
003D 12015C           32             LCALL DELAY
0040 12015C           33             LCALL DELAY
0043 7480             34             MOV A,#80H
0045 12011F           35             LCALL WRITE_COM
0048 7B08             36             MOV R3,#8
004A                  37     TEST21:
004A 9001F3           38             MOV DPTR,#CGRAM2
004D 1201D5           39             LCALL WRITE_CGRAM
0050 DBF8             40             DJNZ R3,TEST21
0052 7490             41             MOV A,#90H
0054 12011F           42             LCALL WRITE_COM
0057 7B08             43             MOV R3,#8
0059                  44     TEST22:
0059 9001F3           45             MOV DPTR,#CGRAM2
005C 1201D5           46             LCALL WRITE_CGRAM
005F DBF8             47             DJNZ R3,TEST22
0061 12015C           48             LCALL DELAY
0064 12015C           49             LCALL DELAY
0067 12015C           50             LCALL DELAY
006A 12015C           51             LCALL DELAY
006D 12015C           52             LCALL DELAY
0070 7480             53             MOV A,#80H
0072 12011F           54             LCALL WRITE_COM
0075 7B08             55             MOV R3,#8
0077                  56     TEST31:
0077 9001F5           57             MOV DPTR,#CGRAM3
007A 1201D5           58             LCALL WRITE_CGRAM
A51 MACRO ASSEMBLER  12232F_P                                                             09/16/2006 15:20:50 PAGE     2

007D DBF8             59             DJNZ R3,TEST31
007F 7490             60             MOV A,#90H
0081 12011F           61             LCALL WRITE_COM
0084 7B08             62             MOV R3,#8
0086                  63     TEST32:
0086 9001F5           64             MOV DPTR,#CGRAM3
0089 1201D5           65             LCALL WRITE_CGRAM
008C DBF8             66             DJNZ R3,TEST32
008E 12015C           67             LCALL DELAY
0091 12015C           68             LCALL DELAY
0094 12015C           69             LCALL DELAY
0097 12015C           70             LCALL DELAY
009A 12015C           71             LCALL DELAY
009D 7480             72             MOV A,#80H
009F 12011F           73             LCALL WRITE_COM
00A2 7B08             74             MOV R3,#8
00A4                  75     TEST41:
00A4 9001F7           76             MOV DPTR,#CGRAM4
00A7 1201D5           77             LCALL WRITE_CGRAM
00AA DBF8             78             DJNZ R3,TEST41
00AC 7490             79             MOV A,#90H
00AE 12011F           80             LCALL WRITE_COM
00B1 7B08             81             MOV R3,#8
00B3                  82     TEST42:
00B3 9001F7           83             MOV DPTR,#CGRAM4
00B6 1201D5           84             LCALL WRITE_CGRAM
00B9 DBF8             85             DJNZ R3,TEST42
00BB 12015C           86             LCALL DELAY
00BE 12015C           87             LCALL DELAY
00C1 12015C           88             LCALL DELAY
00C4 12015C           89             LCALL DELAY
00C7 12015C           90             LCALL DELAY
00CA 7480             91             MOV A,#80H ;WORD TEST
00CC 12011F           92             LCALL WRITE_COM
00CF 9001F9           93             MOV DPTR,#CHINESE
00D2 1201C4           94             LCALL WRITE_HZ
00D5 7490             95             MOV A,#90H
00D7 12011F           96             LCALL WRITE_COM
00DA 9001E1           97             MOV DPTR,#TABLE1
00DD 1201B9           98             LCALL WRITE_ASCII       
00E0 12015C           99             LCALL DELAY
00E3 12015C          100             LCALL DELAY
00E6 12015C          101             LCALL DELAY
00E9 12015C          102             LCALL DELAY
00EC 12015C          103             LCALL DELAY
00EF 020010          104     AAA:    LJMP START
00F2                 105     SETUP:
00F2 12015C          106             LCALL DELAY
00F5 12015C          107             LCALL DELAY
00F8 12015C          108             LCALL DELAY
00FB 7401            109             MOV A,#01H ;CLEAR DISPLAY
00FD 12011F          110             LCALL WRITE_COM
0100 7430            111             MOV A,#00110000B ;FUNCTION SETTING
0102 12011F          112             LCALL WRITE_COM
0105 7402            113             MOV A,#00000010B ;DDRAM SET TO '00H'
0107 12011F          114             LCALL WRITE_COM
010A 7404            115             MOV A,#00000100B ;
010C 12011F          116             LCALL WRITE_COM
010F 740C            117             MOV A,#00001100B ;DISPLAY ON
0111 12011F          118             LCALL WRITE_COM
0114 7401            119             MOV A,#00000001B ;CLEARING SCREEN
0116 12011F          120             LCALL WRITE_COM
0119 7480            121             MOV A,#10000000B ;SET DDRAM ADDRESS
011B 12011F          122             LCALL WRITE_COM
011E 22              123             RET
011F                 124     WRITE_COM: ;WRIT///cv
A51 MACRO ASSEMBLER  12232F_P                                                             09/16/2006 15:20:50 PAGE     3

                     125     ;WRITE COMMANDS TO ST7920
011F 120153          126             LCALL DELAY1 ;INSTEAD OF CHECKING BF STATE
0122 C2A0            127             CLR RS
0124 C2A0            128             CLR RS
0126 C2A1            129             CLR RW
0128 C2A1            130             CLR RW
012A F580            131             MOV P0,A
012C F580            132             MOV P0,A
012E D2A2            133             SETB E
0130 D2A2            134             SETB E
0132 00              135             NOP
0133 00              136             NOP
0134 C2A2            137             CLR E
0136 C2A2            138             CLR E
                     139     ;LCALL DELAY1
0138 22              140             RET
0139                 141     WRITE_DAT: ;WRITE DISPLAY DATAS TO ST79220
0139 120153          142             LCALL DELAY1
013C D2A0            143             SETB RS
013E D2A0            144             SETB RS
0140 C2A1            145             CLR RW
0142 C2A1            146             CLR RW
0144 F580            147             MOV P0,A
0146 F580            148             MOV P0,A