RS EQU P3.3
RW EQU P3.1
EN EQU P3.0
CS1 EQU P3.5
CS2 EQU P3.4
DATBUS EQU P1
COM EQU 30H
DAT EQU 31H
OX EQU 32H
OY EQU 33H
XPAGE EQU 34H
CODER EQU 35H
COUNT EQU 36H
DOT EQU 37H
CONT EQU 38H
START:
MAIN:
MOV SP,#60H
LCALL DEL_20MS
MOV P3,#0F8H ;CS1=H,CS2=H,无关脚置高 LCALL INI
MOV DPTR,#PIC1
LCALL WPIC
MOV DPTR,#PIC2
LCALL WPIC
MOV DPTR,#PIC3
LCALL WPIC
LJMP MAIN
INI:
MOV COM,#0C0H
LCALL WC1
LCALL WC2
MOV COM,#3FH
LCALL WC1
LCALL WC2
RET
WPIC:
MOV XPAGE,#00H
MOV R3,#8
WP1:
MOV A,XPAGE
ORL A,#0B8H
PUSH ACC
MOV COM,A
LCALL WC1
MOV COM,#40H
LCALL WC1
MOV R2,#64
WP2:
MOV A,#00H
MOVC A,@A+DPTR
MOV DAT,A
INC DPTR
LCALL WD1
DJNZ R2,WP2
POP ACC
MOV COM,A
LCALL WC2
MOV COM,#40H
LCALL WC2
MOV R2,#64
WP3:
MOV A,#00H
MOVC A,@A+DPTR
MOV DAT,A
INC DPTR
LCALL WD2
DJNZ R2,WP3
INC XPAGE
DJNZ R3,WP1
LCALL DEL_1500MS
RET
WC1:
CLR CS1
SETB CS2
CLR RS
SETB RW
WC11:
MOV P1,#0FFH
JB ACC.7,WC11 CLR RW
MOV P1,COM
SETB EN
CLR EN
RET
WC2:
SETB CS1
CLR CS2
CLR RS
SETB RW
WC21:
MOV P1,#0FFH SETB EN
MOV A,P1
CLR EN
JB ACC.7,WC21 CLR RW
MOV P1,COM
SETB EN
CLR EN
RET
WD1:
CLR CS1
SETB CS2
CLR RS
SETB RW
WD11:
MOV P1,#0FFH SETB EN
MOV A,P1
CLR EN
JB ACC.7,WD11 SETB RS
CLR RW
MOV P1,DAT
SETB EN
CLR EN
RET
WD2:
SETB CS1
CLR CS2
CLR RS
SETB RW
WD21:
MOV P1,#0FFH SETB EN
MOV A,P1
CLR EN
JB ACC.7,WD21 SETB RS
CLR RW
MOV P1,DAT
SETB EN
CLR EN
RET
DEL_20MS:
MOV R0,#20
D2:
MOV R1,#200
D1:
NOP
NOP
NOP
RET
DEL_100MS:
LCALL DEL_20MS
LCALL DEL_20MS
LCALL DEL_20MS
LCALL DEL_20MS
LCALL DEL_20MS
RET
DEL_500MS:
LCALL DEL_100MS
LCALL DEL_100MS
LCALL DEL_100MS
LCALL DEL_100MS
LCALL DEL_100MS
RET
DEL_1500MS:
LCALL DEL_500MS
LCALL DEL_500MS
LCALL DEL_500MS
RET
PIC1: DB 0FFH,0FFH,003H,003H,003H,003H,003H,003H,003H,003H,003H,003H,003H,003H,003H,003H, DB 003H,003H,003H,003H,003H,003H,003H,003H,003H,003H,003H,003H,003H,003H,003H,003H, DB 003H,003H,083H,083H,003H,003H,003H,003H,003H,003H,003H,003H,003H,003H,003H,003H, DB 003H,003H,003H,003H,003H,003H,003H,003H,003H,043H,0C3H,0C3H,003H,003H,003H,003H, DB 003H,003H,003H,083H,083H,003H,003H,003H,003H,003H,003H,003H,003H,003H,003H,003H, DB 003H,003H,003H,003H,003H,003H,003H,003H,003H,003H,003H,003H,003H,003H,003H,003H, DB 003H,003H,003H,003H,003H,003H,003H,003H,003H,003H,003H,003H,003H,003H,003H,003H, DB 003H,003H,003H,003H,003H,003H,003H,003H,003H,003H,003H,003H,003H,003H,0FFH,0FFH, DB 0FFH,0FFH,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H, DB 000H,000H,000H,010H,030H,031H,0A3H,0C3H,040H,00EH,02FH,0B1H,0BDH,0EDH,0E1H,085H, DB 08DH,0D9H,0D3H,083H,001H,000H,000H,000H,000H,000H,000H,000H,040H,060H,0FFH,0FFH, DB 021H,020H,000H,0FEH,0FEH,000H,0FCH,0FCH,000H,000H,0FFH,0FFH,000H,000H,000H,000H, DB 000H,010H,030H,030H,021H,0C3H,0C3H,00AH,01AH,072H,0E2H,0C2H,0F2H,07FH,03FH,007H, DB 000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,03EH,0FEH,0CAH,0CAH,0CAH, DB 0CAH,04AH,0CAH,0CAH,0FEH,03EH,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H, DB 000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,0FFH,0FFH, DB 0FFH,0FFH,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H, DB 000H,000H,000H,010H,038H,03CH,01FH,043H,060H,031H,019H,00DH,007H,0FFH,0FFH,006H, DB 00CH,01CH,038H,030H,030H,020H,020H,000H,000H,000H,008H,008H,00CH,00CH,007H,007H, DB 042H,073H,03DH,00FH,003H,000H,00FH,00FH,000H,0C0H,0FFH,0FFH,000H,000H,000H,000H, DB 000H,010H,038H,03CH,03FH,033H,010H,018H,00CH,006H,007H,003H,007H,00EH,01CH,01CH, DB 018H,010H,010H,010H,000H,000H,000H,000H,084H,084H,0C4H,065H,03DH,01FH,007H,004H, DB 004H,004H,07FH,07FH,004H,004H,004H,004H,000H,000H,000H,000H,000H,000H,000H,000H, DB 000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,0FFH,0FFH, DB 0FFH,0FFH,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,080H, DB 0C0H,040H,040H,068H,038H,0B0H,0A0H,020H,060H,060H,000H,000H,000H,000H,000H,000H, DB 000H,000H,000H,0E0H,0E0H,000H,0F0H,0F0H,000H,000H,000H,000H,000H,000H,000H,000H, DB 040H,040H,040H,040H,0C0H,0E0H,078H,058H,060H,020H,020H,020H,020H,020H,000H,000H, DB 000H,0C0H,0E0H,0A0H,0E0H,060H,0E0H,0E0H,0A0H,0B0H,0F0H,0F0H,000H,000H,000H,000H, DB 000H,000H,000H,000H,000H,0C0H,0C0H,010H,010H,070H,0E0H,080H,000H,000H,000H,000H, DB 000H,000H,000H,000H,000H,000H,020H,0A0H,0A0H,0B0H,090H,010H,010H,0F0H,0F0H,000H, DB 000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,0FFH,0FFH, DB 0FFH,0FFH,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,021H, DB 021H,024H,0ADH,0FBH,072H,03FH,05FH,0C8H,088H,088H,008H,000H,000H,000H,000H,080H, DB 082H,08EH,08CH,0FFH,0FFH,040H,07FH,07FH,04CH,046H,043H,043H,040H,000H,000H,020H, DB 030H,018H,00CH,006H,0FFH,0FFH,02AH,02BH,029H,0FFH,0FFH,000H,000H,000H,000H,000H, DB 000H,0FFH,0FFH,005H,007H,006H,0FFH,0FFH,0CEH,05AH,03BH,06DH,064H,040H,040H,040H, DB 000H,010H,018H,00CH,0C7H,0E3H,0B0H,09CH,0CCH,050H,070H,0E1H,0C3H,006H,006H,004H, DB 004H,000H,000H,000H,01CH,03DH,025H,025H,036H,01EH,01EH,080H,080H,0FFH,0FFH,000H, DB 000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,0FFH,0FFH, DB 0FFH,0FFH,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,002H, DB 002H,003H,001H,000H,000H,000H,000H,000H,001H,001H,000H,000H,000H,000H,000H,000H, DB 000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H,000H, DB 000H,000H,000H,000H,003H,003H,000H,001H,003H,003H,001H,000H,000H,000H,000H,000H,
|
QQ好友和群
QQ空间
腾讯微博
腾讯朋友
收藏
淘帖
顶
踩
