📄 firsts.asm
字号:
lcall para_disp
;*******************
lcall parazbt
;*****************
inc r0
djnz r7,loopt3
ret
loopt3: ljmp loopt
numt7: cjne a,#7,numt8
mov dptr,#numtab7
lcall para_disp
;**********************
lcall parazbt
;************************
inc r0
djnz r7,loopt4
ret
loopt4: ljmp loopt
numt8: cjne a,#8,numt9
mov dptr,#numtab8
lcall para_disp
;***********************
lcall parazbt
;**********************
inc r0
djnz r7,loopt5
ret
loopt5: ljmp loopt
numt9: cjne a,#9,loopt1
mov dptr,#numtab9
lcall para_disp
;*******************
lcall parazbt
;*********************
inc r0
djnz r7,loopt6
ret
loopt6: ljmp loopt
;****************第三行参数显示坐标计算***********
parazbt: mov disp_x,#0BCH
mov r2,a
mov a,disp_y
add a,#08h
mov disp_y,a
mov a,r2
ret
;***************第四行参数显示*****************
parafr: mov r7,#06h
mov r0,#62h
loopfr: mov a,@r0
numfr0: cjne a,#0,numfr1
mov dptr,#numtab0
lcall para_disp
;*************************
lcall parazbfr
;***********************
inc r0
djnz r7,loopfr
ret
numfr1: cjne a,#1,numfr2
mov dptr,#numtab1
lcall para_disp
;*********************
lcall parazbfr
;*********************
inc r0
djnz r7,loopfr
ret
numfr2: cjne a,#2,numfr3
mov dptr,#numtab2
lcall para_disp
;*******************
lcall parazbfr
;********************
inc r0
djnz r7,loopfr
ret
numfr3: cjne a,#3,numfr4
mov dptr,#numtab3
lcall para_disp
;********************
lcall parazbfr
;********************
inc r0
djnz r7,loopfr
ret
numfr4: cjne a,#4,numfr5
mov dptr,#numtab4
lcall para_disp
;********************
lcall parazbfr
;********************
inc r0
djnz r7,loopfr1
ret
loopfr1: ljmp loopfr
numfr5: cjne a,#5,numfr6
mov dptr,#numtab5
lcall para_disp
;**********************
lcall parazbfr
;******************
inc r0
djnz r7,loopfr2
ret
loopfr2: ljmp loopfr
numfr6: cjne a,#6,numfr7
mov dptr,#numtab6
lcall para_disp
;*******************
lcall parazbfr
;*****************
inc r0
djnz r7,loopfr3
ret
loopfr3: ljmp loopfr
numfr7: cjne a,#7,numfr8
mov dptr,#numtab7
lcall para_disp
;**********************
lcall parazbfr
;************************
inc r0
djnz r7,loopfr4
ret
loopfr4: ljmp loopfr
numfr8: cjne a,#8,numfr9
mov dptr,#numtab8
lcall para_disp
;***********************
lcall parazbfr
;**********************
inc r0
djnz r7,loopfr5
ret
loopfr5: ljmp loopfr
numfr9: cjne a,#9,loopfr1
mov dptr,#numtab9
lcall para_disp
;*******************
lcall parazbfr
;*********************
inc r0
djnz r7,loopfr6
ret
loopfr6: ljmp loopfr
;****************第四行参数显示坐标计算***********
parazbfr: mov disp_x,#0BEH
mov r2,a
mov a,disp_y
add a,#08h
mov disp_y,a
mov a,r2
ret
;------------------------------------------------------
para_DISP: LCALL DISP ;显示LONGxWIDE大小的图形,本例为光标
MOV COUNTER1,WIDE
para_DISP1: LCALL WR_ZB
MOV COUNTER2,LONG
para_DISP2: CLR A
MOVC A,@A+DPTR
LCALL WR_DATA
INC DPTR
DJNZ COUNTER2,para_DISP2
INC DISP_X
DJNZ COUNTER1,para_DISP1
RET
;**************************************************************
WR_ZB: MOV A,DISP_X ;写坐标
LCALL WR_INT
MOV A,DISP_Z
LCALL WR_INT
MOV A,DISP_Y
LCALL WR_INT
RET
;----------------------------------------------
DISP: MOV A,#3EH
LCALL WR_INT
MOV A,#3FH
LCALL WR_INT
RET
;**********************************************
WR_INT: LCALL CHE_BUSY ;WRITE INSTRUCTION
CLR D_I
CLR R_W
MOV P0,A
NOP
SETB E
NOP
NOP
CLR E
RET
;----------------------------------------------
WR_DATA: LCALL CHE_BUSY ;WRITE DATA
SETB D_I
CLR R_W
MOV P0,A
NOP
SETB E
NOP
NOP
CLR E
RET
;----------------------------------------------
CHE_BUSY: CLR D_I ;CHECK STATIU
SETB R_W
ANL p0,#0B0H
ORL p0,#80H
NOP
SETB E
JB p0.7,$
JB p0.4,$
CLR E
RET
;**********************************************
DELAY1: MOV COUNTER1,#0FH
DEL11: MOV COUNTER2,#0FFH
DEL12: MOV COUNTER3,#0FFH
DEL13: DJNZ COUNTER3,DEL13
DJNZ COUNTER2,DEL12
DJNZ COUNTER1,DEL11
RET
DELAY2: MOV COUNTER1,#04H
DEL21: MOV COUNTER2,#23H
DEL22: DJNZ COUNTER2,DEL22
DJNZ COUNTER1,DEL21
RET
para11:
;电压:
;db 000h,000h,0F8h,048h,048h,048h,048h,0FFh,048h,048h,048h,048h,0F8h,000h,000h,000h
;db 000h,000h,0FEh,002h,042h,042h,042h,042h,0FAh,042h,042h,042h,062h,042h,002h,000h
;db 000h,000h,000h,0C0h,0C0h,000h,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,000h,000h
;db 000h,000h,00Fh,004h,004h,004h,004h,03Fh,044h,044h,044h,044h,04Fh,040h,070h,000h
;db 020h,018h,027h,020h,020h,020h,020h,020h,03Fh,020h,021h,02Eh,024h,020h,020h,000h
;db 000h,000h,000h,030h,030h,000h,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,000h,000h,000
;-电压:
db 000h,000h,000h,000h,000h,000h,000h,000h,000h,000h,0F8h,048h,048h,048h,048h,0FFh
db 048h,048h,048h,048h,0F8h,000h,000h,000h,000h,000h,0FEh,002h,042h,042h,042h,042h
db 0FAh,042h,042h,042h,062h,042h,002h,000h,000h,000h,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,001h,001h,001h,001h,001h,001h,001h,000h,000h,00Fh,004h,004h,004h,004h,03Fh
db 044h,044h,044h,044h,04Fh,040h,070h,000h,020h,018h,027h,020h,020h,020h,020h,020h
db 03Fh,020h,021h,02Eh,024h,020h,020h,000h,000h,000h,036h,036h,000h,000h,000h,000h
;db 000h,000h,000h,000h,000h,000h,000h,000h,000h,000h,000h,000h,000h,000h,000h,000h,000
para21:
;电流:
;db 000h,000h,0F8h,048h,048h,048h,048h,0FFh,048h,048h,048h,048h,0F8h,000h,000h,000h
;db 010h,060h,001h,086h,060h,004h,044h,064h,055h,04Eh,044h,064h,0C4h,004h,004h,000h
;db 000h,000h,000h,0C0h,0C0h,000h,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,000h,000h
;db 000h,000h,00Fh,004h,004h,004h,004h,03Fh,044h,044h,044h,044h,04Fh,040h,070h,000h
;db 004h,004h,0FCh,003h,040h,030h,00Fh,000h,000h,07Fh,000h,03Fh,040h,040h,070h,000h
;db 000h,000h,000h,030h,030h,000h,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,000h,000h,000
;电流A:
db 000h,000h,0F8h,048h,048h,048h,048h,0FFh,048h,048h,048h,048h,0F8h,000h,000h,000h
db 010h,060h,001h,086h,060h,004h,044h,064h,055h,04Eh,044h,064h,0C4h,004h,004h,000h
db 000h,000h,0C0h,038h,0E0h,000h,000h,000h,000h,000h,000h,0C0h,0C0h,000h,000h,000h
;db 000h,000h,000h,000h,000h,000h,000h,000h,000h,000h,000h,000h,000h,000h,000h,000h
db 000h,000h,00Fh,004h,004h,004h,004h,03Fh,044h,044h,044h,044h,04Fh,040h,070h,000h
db 004h,004h,0FCh,003h,040h,030h,00Fh,000h,000h,07Fh,000h,03Fh,040h,040h,070h,000h
db 020h,03Ch,023h,002h,002h,027h,038h,020h,000h,000h,000h,030h,030h,000h,000h,000h
;db 000h,000h,000h,000h,000h,000h,000h,000h,000h,000h,000h,000h,000h,000h,000h,000h,000
para31:
;功率:
;db 000h,004h,004h,004h,0FCh,004h,014h,014h,010h,090h,07Fh,010h,010h,0F0h,000h,000h
;db 000h,00Ch,014h,0A4h,004h,064h,035h,0AEh,064h,024h,014h,0A4h,014h,004h,004h,000h
;db 000h,000h,000h,0C0h,0C0h,000h,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,000h,000h
;db 004h,00Ch,004h,004h,003h,042h,022h,011h,00Ch,023h,020h,060h,020h,01Fh,000h,000h
;db 008h,00Ah,009h,008h,008h,00Ah,00Bh,0FEh,00Ah,00Bh,00Ch,008h,009h,00Ah,008h,000h
;db 000h,000h,000h,030h,030h,000h,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,000h,000h,000
;电流B:
db 000h,000h,0F8h,048h,048h,048h,048h,0FFh,048h,048h,048h,048h,0F8h,000h,000h,000h
db 010h,060h,001h,086h,060h,004h,044h,064h,055h,04Eh,044h,064h,0C4h,004h,004h,000h
db 008h,0F8h,088h,088h,088h,070h,000h,000h,000h,000h,000h,0C0h,0C0h,000h,000h,000h
;db 000h,000h,000h,000h,000h,000h,000h,000h,000h,000h,000h,000h,000h,000h,000h,000h
db 000h,000h,00Fh,004h,004h,004h,004h,03Fh,044h,044h,044h,044h,04Fh,040h,070h,000h
db 004h,004h,0FCh,003h,040h,030h,00Fh,000h,000h,07Fh,000h,03Fh,040h,040h,070h,000h
db 020h,03Fh,020h,020h,020h,011h,00Eh,000h,000h,000h,000h,030h,030h,000h,000h,000h
;db 000h,000h,000h,000h,000h,000h,000h,000h,000h,000h,000h,000h,000h,000h,000h,000h,000
para41:
;电流C:
db 000h,000h,0F8h,048h,048h,048h,048h,0FFh,048h,048h,048h,048h,0F8h,000h,000h,000h
db 010h,060h,001h,086h,060h,004h,044h,064h,055h,04Eh,044h,064h,0C4h,004h,004h,000h
db 0C0h,030h,008h,008h,008h,008h,038h,000h,000h,000h,000h,0C0h,0C0h,000h,000h,000h
;db 000h,000h,000h,000h,000h,000h,000h,000h,000h,000h,000h,000h,000h,000h,000h,000h
db 000h,000h,00Fh,004h,004h,004h,004h,03Fh,044h,044h,044h,044h,04Fh,040h,070h,000h
db 004h,004h,0FCh,003h,040h,030h,00Fh,000h,000h,07Fh,000h,03Fh,040h,040h,070h,000h
db 007h,018h,020h,020h,020h,010h,008h,000h,000h,000h,000h,030h,030h,000h,000h,000h
;db 000h,000h,000h,000h,000h,000h,000h,000h,000h,000h,000h,000h,000h,000h,000h,000h,000
numtab1:
;1
db 000h,010h,010h,0F8h,000h,000h,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,000h,000h,
;db 000h,000h,000h,000h,000h,000h,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,000h,000h,
db 000h,020h,020h,03Fh,020h,020h,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,000h,000h,
;db 000h,000h,000h,000h,000h,000h,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,000h,000h,000
numtab2:
;2
db 000h,070h,008h,008h,008h,088h,070h,000h;,000h,000h,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,000h,000h,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,000h,000h,
db 000h,030h,028h,024h,022h,021h,030h,000h;,000h,000h,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,000h,000h,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,000h,000h,000
numtab3:
;3
db 000h,030h,008h,088h,088h,048h,030h,000h;,000h,000h,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,000h,000h,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,000h,000h,
db 000h,018h,020h,020h,020h,011h,00Eh,000h;000h,000h,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,000h,000h,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,000h,000h,000
numtab4:
;4
db 000h,000h,0C0h,020h,010h,0F8h,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,000h,000h,
;db 000h,000h,000h,000h,000h,000h,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,000h,000h,
db 000h,007h,004h,024h,024h,03Fh,024h,000h;,000h,000h,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,000h,000h,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,000h,000h,000
numtab5:
;5
db 000h,0F8h,008h,088h,088h,008h,008h,000h;,000h,000h,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,000h,000h,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,000h,000h,
db 000h,019h,021h,020h,020h,011h,00Eh,000h;,000h,000h,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,000h,000h,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,000h,000h,000
numtab6:
;6
db 000h,0E0h,010h,088h,088h,018h,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,000h,000h,
;db 000h,000h,000h,000h,000h,000h,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,000h,000h,
db 000h,00Fh,011h,020h,020h,011h,00Eh,000h;,000h,000h,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,000h,000h,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,000h,000h,000
numtab7:
;7
db 000h,038h,008h,008h,0C8h,038h,008h,000h;,000h,000h,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,000h,000h,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,000h,000h,
db 000h,000h,000h,03Fh,000h,000h,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,000h,000h,
;db 000h,000h,000h,000h,000h,000h,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,000h,000h,000
numtab8:
;8
db 000h,070h,088h,008h,008h,088h,070h,000h;,000h,000h,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,000h,000h,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,000h,000h,
db 000h,01Ch,022h,021h,021h,022h,01Ch,000h;,000h,000h,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,000h,000h,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,000h,000h,000
numtab9:
;9
db 000h,0E0h,010h,008h,008h,010h,0E0h,000h;,000h,000h,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,000h,000h,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,000h,000h,
db 000h,000h,031h,022h,022h,011h,00Fh,000h;,000h,000h,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,000h,000h,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,000h,000h,000
numtab0:
;0
db 000h,0E0h,010h,008h,008h,010h,0E0h,000h;,000h,000h,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,000h,000h,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,000h,000h,
db 000h,00Fh,010h,020h,020h,010h,00Fh,000h;,000h,000h,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,000h,000h,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,000h,000h,000
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -