;16X16LED点阵
;逐列、逆向（低位开始）扫描
ORG 0000H
AJMP MAIN
ORG 0030H
MAIN:MOV DPTR,#TAB ;存子码表
MOV R1,#00H ;列控制码
MOV R3,#16 ;列数共16列
MOV R2,#0 ;取码指针（初始值）
C16:MOV P2,#00H ;关闭显示，去鬼影
SETB P3.0 ;P3.0为高电平，U2选通
MOV A,R2
MOVC A,@A+DPTR ;取当前列显示字码的第一个字节
MOV P2,A ;送1~8行控制口
INC R2 ;取吗指针加1，指向下半段
CLR P3.0 ;关闭U2
MOV P2,#00H ;关显示
SETB P3.1 ;开启U3
MOV A,R2
MOVC A,@A+DPTR ;取当前列的显示字码的第二个字节
MOV P2,A ;送9~15行控制口
INC R2
CLR P3.1
MOV P1,R1 ;送列控制码
INC R1
ACALL D1MS ;显示2MS
DJNZ R3,C16 ;一屏16列是否显示完
AJMP MAIN ;96列移动完，返回，重新从" "开始显示D1MS: MOV R6,#2
MOV R7,#248
DJNZ R7,$
DJNZ R6,$-4
RET
TAB:
DB 000H, 000H, 000H, 040H, 021H, 038H, 01DH, 001H;
DB 081H, 03CH, 041H, 040H, 031H, 041H, 00FH, 042H;
DB 081H, 04CH, 081H, 044H, 081H, 041H, 081H, 070H;
DB 07FH, 002H, 000H, 01CH, 000H, 008H, 000H, 000H;"忍",0
END
