📄 64zhi.asm
字号:
MOV A,HS_JCH
ADDC A,#0
MOV HS_JCH,A
INC LSCAN
djnz R6,XS_Y1Y4_300
XS_Y1Y4_350:
MOV A,Y4
MOV R6,Y4
CJNE A,#0,XS_Y1Y4_400
LJMP XS_Y1Y4_450
XS_Y1Y4_400:
SETB XS_B
MOV ZJS,#32
LCALL XS1L
MOV ZJS,#32
MOV A,HS_JCL
ADD A,ZJS
MOV HS_JCL,A
MOV A,HS_JCH
ADDC A,#0
MOV HS_JCH,A
INC LSCAN
djnz R6,XS_Y1Y4_400
XS_Y1Y4_450:
RET
xs1l:
MOV ZJS,#32
CLR CLK595
MOV DPH,HS_JCH
MOV DPL,HS_JCL
XS1L_50:
MOVX A,@DPTR
JNB XS_B,XS1L_100
MOV A,#0
XS1L_100:
CPL A
jnb cp_b,xs1l_200
lcall xs1l_300
ljmp xs1l_400
xs1l_200:
RLC A
MOV DA595,c
SETB CLK595
CLR CLK595
RLC A
MOV DA595,c
SETB CLK595
CLR CLK595
RLC A
MOV DA595,c
SETB CLK595
CLR CLK595
RLC A
MOV DA595,c
SETB CLK595
CLR CLK595
RLC A
MOV DA595,c
SETB CLK595
CLR CLK595
RLC A
MOV DA595,c
SETB CLK595
CLR CLK595
RLC A
MOV DA595,c
SETB CLK595
CLR CLK595
RLC A
MOV DA595,c
SETB CLK595
CLR CLK595
xs1l_400:
INC DPTR
DJNZ ZJS,XS1L_50
SETB LE4514
lcall ys01ms
SETB SC595
cpl wg
nop
CLR SC595
MOV A,LSCAN
MOV DPTR,#8400h
MOVX @DPTR,A
clr le4514
SETB LE4514
ret
xs1l_300:
RLC A
cpl c
MOV DA595,c
SETB CLK595
CLR CLK595
RLC A
cpl c
MOV DA595,c
SETB CLK595
CLR CLK595
RLC A
cpl c
MOV DA595,c
SETB CLK595
CLR CLK595
RLC A
cpl c
MOV DA595,c
SETB CLK595
CLR CLK595
RLC A
cpl c
MOV DA595,c
SETB CLK595
CLR CLK595
RLC A
cpl c
MOV DA595,c
SETB CLK595
CLR CLK595
RLC A
cpl c
MOV DA595,c
SETB CLK595
CLR CLK595
RLC A
cpl c
MOV DA595,c
SETB CLK595
CLR CLK595
ret
xs_x1x2x3x4:
mov hs_jch,ks_jch
mov hs_jcl,ks_jcl
mov lscan,#0
xs_x1x2x3x4_100:
lcall xs1lx
mov a,hs_jcl
add a,#32
mov hs_jcl,a
mov a,hs_jch
addc a,#0
mov hs_jch,a
inc lscan
mov a,lscan
cjne a,#16,xs_x1x2x3x4_100
ret
xs1lx:
MOV ZJS,#32
CLR CLK595
MOV DPH,HS_JCH
MOV DPL,HS_JCL
mov r7,#8
movx a,@dptr
MOV r6,X1
CJNE r6,#0,XS1LX_12
LJMP xs1lx_15
XS1LX_12:
lcall xs1lx_x1
xs1lx_15:
mov r6,x2
cjne r6,#0,xs1lx_18
ljmp xs1lx_20
xs1lx_18:
lcall xs1lx_x2
xs1lx_20:
mov r6,x3
cjne r6,#0,xs1lx_24
ljmp xs1lx_26
xs1lx_24:
lcall xs1lx_x1
xs1lx_26:
mov r6,x4
cjne r6,#0,xs1lx_28
ljmp xs1lx_re
xs1lx_28:
lcall xs1lx_x2
xs1lx_re:
SETB LE4514
lcall ys01ms
SETB SC595
nop
nop
CPL WG
nop
CLR SC595
MOV A,LSCAN
MOV DPTR,#8400h
MOVX @DPTR,A
clr le4514
ret
xs1lx_x1:
CJNE R7,#0,XS1LX_x1_100
INC DPTR
MOVX A,@DPTR
cpl a
MOV R7,#8
XS1Lx_x1_100:
RLC A
cpl c
mov da595,c
SETB CLK595
CLR CLK595
DEC R7
DJNZ r6,XS1LX_x1
ret
xs1lx_x2:
CJNE R7,#0,XS1LX_x2_100
INC DPTR
MOVX A,@DPTR
MOV R7,#8
XS1Lx_x2_100:
RLC A
setb da595
SETB CLK595
CLR CLK595
DEC R7
DJNZ r6,XS1LX_x2
ret
ys5s:
mov r3,#25
ys5s1:
lcall ys20ms
djnz r3,ys5s1
ret
ys20ms:
mov r1,#10
ys20ms2:
mov r2,#255
ys20ms4:
nop
CPL WG
nop
nop
nop
djnz r2,ys20ms4
djnz r1,ys20ms2
ret
ys01ms:
mov r1,#2
ys01ms2:
mov r2,#10
ys01ms4:
nop
nop
nop
djnz r2,ys01ms4
djnz r1,ys01ms2
ret
LTIME:
CLR LE4514
RET
HTIME:
SETB LE4514
RET
DATA_TEST:
MOV DPTR,#0000H
LCALL SETUP_DATA
MOV DPTR,#0200H
LCALL SETUP_DATA
MOV DPTR,#0400H
LCALL SETUP_DATA
MOV DPTR,#0600H
LCALL SETUP_DATA
MOV DPTR,#0800H
LCALL SETUP_DATA
MOV DPTR,#0A00H
LCALL SETUP_DATA
MOV DPTR,#0C00H
LCALL SETUP_DATA
MOV DPTR,#0E00H
LCALL SETUP_DATA
MOV DPTR,#1000H
LCALL SETUP_DATA
MOV DPTR,#1200H
LCALL SETUP_DATA
MOV DPTR,#1400H
LCALL SETUP_DATA
MOV DPTR,#1600H
LCALL SETUP_DATA
MOV DPTR,#1800H
LCALL SETUP_DATA
MOV DPTR,#1A00H
LCALL SETUP_DATA
MOV DPTR,#1C00H
LCALL SETUP_DATA3P
MOV DPTR,#2100H
LCALL SETUP_DATA3P
MOV DPTR,#2600H
LCALL SETUP_DATA_ZY
LCALL SETUP_XSXL
RET
SETUP_DATA:
CPL WG
MOV A,#0
MOVX @DPTR,A
INC DPTR
MOVX @DPTR,A
INC DPTR
MOVX @DPTR,A
INC DPTR
MOV A,#24
MOVX @DPTR,A
MOV A,#0
INC DPTR
MOVX @DPTR,A
INC DPTR
MOVX @DPTR,A
INC DPTR
MOV A,#HIGH(384)
MOVX @DPTR,A
INC DPTR
MOV A,#LOW(384)
movx @dptr,a
mov r7,#16
MOV A,#00H
data_test050:
mov r6,#24
inc a
DATA_TEST100:
INC DPTR
MOVX @DPTR,A
CPL WG
djnz r6,data_test100
djnz r7,data_test050
RET
SETUP_DATA3P:
CPL WG
MOV A,#0
MOVX @DPTR,A
INC DPTR
MOVX @DPTR,A
INC DPTR
MOVX @DPTR,A
INC DPTR
MOV A,#24
MOVX @DPTR,A
MOV A,#0
INC DPTR
MOVX @DPTR,A
INC DPTR
MOVX @DPTR,A
INC DPTR
MOV A,#HIGH(1152)
MOVX @DPTR,A
INC DPTR
MOV A,#LOW(1152)
movx @dptr,a
MOV R7,#16
MOV A,#0
DATA_TEST005:
MOV R6,#24
DATA_TEST010:
INC DPTR
MOVX @DPTR,A
CPL WG
DJNZ R6,DATA_TEST010
DJNZ R7,DATA_TEST005
mov r7,#16
MOV A,#00H
data_test105:
mov r6,#24
inc a
DATA_TEST110:
INC DPTR
MOVX @DPTR,A
CPL WG
djnz r6,data_test110
djnz r7,data_test105
MOV R7,#16
MOV A,#0
DATA_TEST205:
MOV R6,#24
DATA_TEST210:
INC DPTR
MOVX @DPTR,A
CPL WG
DJNZ R6,DATA_TEST210
DJNZ R7,DATA_TEST205
RET
SETUP_DATA_ZY:
CPL WG
MOV A,#0
MOVX @DPTR,A
INC DPTR
MOVX @DPTR,A
INC DPTR
MOVX @DPTR,A
INC DPTR
MOV A,#240
MOVX @DPTR,A
MOV A,#0
INC DPTR
MOVX @DPTR,A
INC DPTR
MOVX @DPTR,A
INC DPTR
MOV A,#HIGH(1152)
MOVX @DPTR,A
INC DPTR
MOV A,#LOW(1152)
movx @dptr,a
MOV R7,#16
MOV A,#0
DATA_TEST505:
MOV R6,#240
INC A
DATA_TEST510:
INC DPTR
MOVX @DPTR,A
CPL WG
DJNZ R6,DATA_TEST510
DJNZ R7,DATA_TEST505
RET
SETUP_XSXL:
MOV DPTR,#7F81H
MOV A,#0
MOVX @DPTR,A
INC DPTR
MOV A,#2
MOVX @DPTR,A
INC DPTR
MOV A,#0
MOVX @DPTR,A
INC DPTR
MOV A,#3
MOVX @DPTR,A
INC DPTR
MOV A,#0
MOVX @DPTR,A
INC DPTR
MOV A,#6
MOVX @DPTR,A
INC DPTR
MOV A,#0
MOVX @DPTR,A
INC DPTR
MOV A,#7
MOVX @DPTR,A
INC DPTR
MOV A,#0
MOVX @DPTR,A
INC DPTR
MOV A,#8
MOVX @DPTR,A
INC DPTR
MOV A,#0
MOVX @DPTR,A
INC DPTR
MOV A,#9
MOVX @DPTR,A
INC DPTR
MOV A,#0
MOVX @DPTR,A
INC DPTR
MOV A,#10
MOVX @DPTR,A
INC DPTR
MOV A,#0
MOVX @DPTR,A
INC DPTR
MOV A,#11
MOVX @DPTR,A
INC DPTR
MOV A,#0
MOVX @DPTR,A
INC DPTR
MOV A,#12
MOVX @DPTR,A
INC DPTR
MOV A,#0
MOVX @DPTR,A
INC DPTR
MOV A,#13
MOVX @DPTR,A
INC DPTR
MOV A,#0
MOVX @DPTR,A
INC DPTR
MOV A,#14
MOVX @DPTR,A
INC DPTR
MOV A,#0
MOVX @DPTR,A
INC DPTR
MOV A,#15
MOVX @DPTR,A
INC DPTR
MOV A,#0
MOVX @DPTR,A
INC DPTR
MOV A,#16
MOVX @DPTR,A
INC DPTR
MOV A,#255
MOVX @DPTR,A
RET
INITW:
MOV A,#8EH
MOV R6,#0
LCALL WRI
MOV A,#80H
MOV R6,#80H
LCALL WRI
MOV A,#82H
MOV R6,#0
LCALL WRI
MOV A,#84H
MOV R6,#0
LCALL WRI
MOV A,#90H
MOV R6,#0A5H
LCALL WRI
MOV A,#80H
MOV R6,#0
LCALL WRI
MOV A,#8EH
MOV R6,#80H
LCALL WRI
ret
WRI:
CLR SCLK
CLR RST
MOV R7,#08H
WRI1:
RRC A
MOV IO,C
SETB SCLK
CLR SCLK
DJNZ R7,WRI1
MOV R7,#08H
MOV A,R6
WRI2:
RRC A
MOV IO,C
SETB SCLK
CLR SCLK
DJNZ R7,WRI2
SETB RST
RET
bianhao:
inc bh
mov bh1, a
LCALL RXD1BYTE
JB RXBZ,RXCCLRE11
mov bh2, a
LCALL RXD1BYTE
JB RXBZ,RXCCLRE11
mov bh3, a
LCALL RXD1BYTE
JB RXBZ,RXCCLRE11
mov bh4, a
lclbh:
mov a, bh1
rrc a
mov bh1, a
mov a, bh2
rrc a
mov bh2, a
mov a, bh3
rrc a
mov bh3, a
mov a, bh4
rrc a
mov bh4, a
djnz bh, lclbh
mov bhbz, c
ljmp lclbh2
rxcclre11:
ljmp rxcclre
TAB_ADDR:
DB 00H,03H,06H,09H,0cH,0fH,012H,015H,18H,1bH,1eH,21H,24H,27H,2AH,2FH,34H,7DH
DB 00H,02H,04H,06H,08H,0AH,0CH,0EH,10H,12H,14H,16H,18H,1AH,1CH,21H,26H,7DH
END
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -