📄 zg595.lst
字号:
页 1
08-20-06
07:59:14
航天汇编器 V3.00 Copyright (c) 2000, 02 by ZJH
地址 机器码 源程序
;调试已经成功，很好
RCKSHUJU EQU P2.0
RCKLIE EQU P0.0
SJK EQU P0.4
LYW EQU P2.1
LV EQU P0.6
HONG EQU P0.7
SCLK EQU P0.1
ORG 00H
0000 7A00 MOV R2,#0
0002 7B00 MOV R3,#0
0004 757A96 MOV 7AH,#150
START:
0007 120010 LCALL ST1
000A 12002F lcall st2
000D 020007 ljmp start
0010 9000EA ST1: MOV DPTR,#TAB1
0013 12004E LCALL SSJ1
0016 9000CA MOV DPTR,#TAB
0019 12005E LCALL LSM1
001C 1200BD LCALL DL2MS
001F 0A INC R2
0020 0B INC R3
0021 BB20EC CJNE R3,#32,ST1
0024 7B00 mov R3,#0
0026 7A00 mov r2,#0
0028 D57AE5 djnz 7Ah,st1
002B 757A96 MOV 7AH,#150
002E 22 RET
002F 90010A st2: MOV DPTR,#TAB2
0032 12004E lcall ssj1
0035 9000CA MOV DPTR,#TAB
0038 120071 call lsm2
003B 1200BD LCALL DL2MS
003E 0A INC R2
003F 0B INC R3
0040 BB20EC CJNE R3,#32,ST2
0043 7B00 mov R3,#0
0045 7A00 mov r2,#0
0047 D57AE5 djnz 7Ah,st2
004A 757A96 MOV 7AH,#150
004D 22 RET
004E EA ssj1: MOV A,R2
004F 93 MOVC A,@A+DPTR
0050 F52A MOV 2AH,A
C:\DOCUMENTS AND SETTINGS\吕碧\桌面\单片机练习\LB\595点阵\ZG595.ASM
页 2
08-20-06
07:59:14
航天汇编器 V3.00 Copyright (c) 2000, 02 by ZJH
地址 机器码 源程序
0052 120090 LCALL WRITE5950_0
0055 0A INC R2
0056 EA MOV A,R2
0057 93 MOVC A,@A+DPTR
0058 F52A MOV 2AH,A
005A 120090 LCALL WRITE5950_0
005D 22 ret
005E EB LSM1: MOV A,R3
005F 93 MOVC A,@A+DPTR
0060 F52A MOV 2AH,A
0062 1200AE LCALL WRITE5952_2
0065 0B INC R3
0066 EB MOV A,R3
0067 93 MOVC A,@A+DPTR
0068 F52A MOV 2AH,A
006A 1200AE LCALL WRITE5952_2
006D 120084 CALL SYX
0070 22 RET
0071 EB LSM2: MOV A,R3
0072 93 MOVC A,@A+DPTR
0073 F52A MOV 2AH,A
0075 12009F LCALL WRITE5951_1
0078 0B INC R3
0079 EB MOV A,R3
007A 93 MOVC A,@A+DPTR
007B F52A MOV 2AH,A
007D 12009F LCALL WRITE5951_1
0080 120084 CALL SYX
0083 22 RET
0084 C2A0 SYX: CLR RCKSHUJU
0086 00 NOP
0087 D2A0 SETB RCKSHUJU
0089 00 NOP
008A C280 CLR RCKLIE
008C 00 NOP
008D D280 SETB RCKLIE
008F 22 ret
;---------------------WRITE5950--------------------------
0090 7D08 WRITE5950_0: MOV R5,#08H
0092 E52A MOV A,2AH
0094 33 LOOP: RLC A
0095 9284 MOV SJK,C
0097 C281 CLR SCLK
0099 00 NOP
009A D281 SETB SCLK
C:\DOCUMENTS AND SETTINGS\吕碧\桌面\单片机练习\LB\595点阵\ZG595.ASM
页 3
08-20-06
07:59:14
航天汇编器 V3.00 Copyright (c) 2000, 02 by ZJH
地址 机器码 源程序
009C DDF6 DJNZ R5,LOOP
009E 22 RET
;---------------------WRITE5951---------------------------
009F 7D08 WRITE5951_1: MOV R5,#08H
00A1 E52A MOV A,2AH
00A3 13 LOOP1: RRC A
00A4 9286 MOV LV,C ;绿色
00A6 C2A1 CLR LYW
00A8 00 NOP
00A9 D2A1 SETB LYW
00AB DDF6 DJNZ R5,LOOP1
00AD 22 RET
;---------------------WRITE5952---------------------------
00AE 7D08 WRITE5952_2: MOV R5,#08H
00B0 E52A MOV A,2AH
00B2 13 LOOP2: RRC A
00B3 9287 MOV HONG,C ;红色
00B5 C2A1 CLR LYW
00B7 00 NOP
00B8 D2A1 SETB LYW
00BA DDF6 DJNZ R5,LOOP2
00BC 22 RET
;----------------------DL2MS-------------------------------
00BD 754314 DL2MS: MOV 43H,#14H ; every LED(2ms)
00C0 754414 DL2: MOV 44H,#14H
DL1:
00C3 D544FD DJNZ 44H,DL1
00C6 D543F7 DJNZ 43H,DL2
00C9 22 RET
;----------------------TAB--------------------------------
00CA FF7F
00CC FFBF
00CE FFDF
00D0 FFEF
00D2 FFF7
00D4 FFFB
00D6 FFFD
00D8 FFFE
00DA 7FFF
00DC BFFF
00DE DFFF
00E0 EFFF
00E2 F7FF
00E4 FBFF
00E6 FDFF
00E8 FEFF TAB:DW 0FF7FH,0FFBFH,0FFDFH,0FFEFH,0FFF7H,0FFFBH,0FFFDH,0FFFEH,7FFFH,0BFFFH,0DFFFH,0EFFFH,0F7FFH,0FBFFH,0FDFFH,0FEFFH
;----------------------TAB1-------------------------------
TAB1:
C:\DOCUMENTS AND SETTINGS\吕碧\桌面\单片机练习\LB\595点阵\ZG595.ASM
页 4
08-20-06
07:59:14
航天汇编器 V3.00 Copyright (c) 2000, 02 by ZJH
地址 机器码 源程序
;第1屏爱;*****************
00EA 004040
00ED 20B2A0
00F0 9690 DB 00H 40H 40H 20H 0B2H 0A0H 96H 90H
00F2 9A4C92
00F5 47F62A
00F8 9A2A DB 9AH 4CH 92H 47H 0F6H 2AH 9AH 2AH
00FA 931291
00FD 1A9926
0100 9722 DB 93H 12H 91H 1AH 99H 26H 97H 22H
0102 914090
0105 C03040
0108 0000 DB 91H 40H 90H 0C0H 30H 40H 00H 00H
TAB2:
;第1屏你;***********************************
010A 800040
010D 00F07F
0110 2C00 DB 80H 00H 40H 00H 0F0H 7FH 2CH 00H
0112 431020
0115 0C9803
0118 0F21 DB 43H 10H 20H 0CH 98H 03H 0FH 21H
011A 0A40E8
011D 3F0800
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -