📄 12-8input.asm
字号:
lcall parazbif
;*********************
;inc r0
;djnz r7,loopif6
ret
loopif6: ljmp loopif
;****************第一行系统参数显示坐标计算***********
parazbif: mov disp_x,#0b8h
mov r2,a ;暂存键值
mov a,disp_y
add a,#08h
mov r4,a
mov a,r2
ret
;****************第二行系统参数显示坐标计算***********
parazbis: mov disp_x,#0bah
mov r2,a ;暂存键值
mov a,disp_y
add a,#08h
mov disp_y,a
mov a,r2
ret
;****************第三行系统参数显示坐标计算***********
parazbit: mov disp_x,#0bch
mov r2,a ;暂存键值
mov a,disp_y
add a,#08h
mov disp_y,a
mov a,r2
ret
;****************第四行系统参数显示坐标计算***********
parazbifr: mov disp_x,#0beh
mov r2,a ;暂存键值
mov a,disp_y
add a,#08h
mov disp_y,a
mov a,r2
ret
userpara: cLR RESET
NOP
NOP
NOP
SETB RESET
MOV DISP_Z,#0C0H
;*************用户参数名称*************************
SETB CS1
clr CS2
MOV DISP_X,#0B8H
MOV DISP_Y,#40H
MOV LONG,#30H
MOV WIDE,#02H
MOV DPTR,#upara1
LCALL para_DISP
MOV DISP_X,#0BaH
MOV DPTR,#upara2
LCALL para_DISP
MOV DISP_X,#0BcH
MOV DPTR,#upara3
LCALL para_DISP
MOV DISP_X,#0BeH
MOV DPTR,#upara4
LCALL para_DISP
ret
;***********************用户参数值输入************
inpara: SETB CS2 ;输入参数子程序
clr CS1
MOV DISP_X,#0B8H
MOV DISP_Y,r4 ;r4为参数输入时的列坐标
MOV LONG,#08H
MOV WIDE,#02H
lcall ipd
;MOV DISP_X,#0BaH
;MOV DISP_Y,r4
;lcall ipd
;MOV DISP_X,#0BcH
;MOV DISP_Y,r4
;lcall ipd
;MOV DISP_X,#0BeH
;MOV DISP_Y,r4
;lcall ipd
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
upara0:
;参数0:
db 020h,020h,028h,02Ch,0AAh,06Bh,038h,0ACh,024h,064h,0A6h,02Ch,020h,020h,000h,000h
db 010h,092h,054h,038h,0FFh,038h,054h,052h,080h,0F0h,01Fh,012h,010h,0F0h,010h,000h
db 000h,0E0h,010h,008h,008h,010h,0E0h,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 002h,042h,045h,055h,052h,04Ah,029h,024h,024h,012h,012h,009h,00Bh,006h,002h,000h
db 042h,042h,02Ah,02Eh,013h,01Ah,026h,002h,040h,020h,013h,00Ch,033h,060h,020h,000h
db 000h,00Fh,010h,020h,020h,010h,00Fh,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
upara1:
;参数1:
db 020h,020h,028h,02Ch,0AAh,06Bh,038h,0ACh,024h,064h,0A6h,02Ch,020h,020h,000h,000h
db 010h,092h,054h,038h,0FFh,038h,054h,052h,080h,0F0h,01Fh,012h,010h,0F0h,010h,000h
db 000h,010h,010h,0F8h,000h,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 002h,042h,045h,055h,052h,04Ah,029h,024h,024h,012h,012h,009h,00Bh,006h,002h,000h
db 042h,042h,02Ah,02Eh,013h,01Ah,026h,002h,040h,020h,013h,00Ch,033h,060h,020h,000h
db 000h,020h,020h,03Fh,020h,020h,000h,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
upara2:
;参数2:
db 020h,020h,028h,02Ch,0AAh,06Bh,038h,0ACh,024h,064h,0A6h,02Ch,020h,020h,000h,000h
db 010h,092h,054h,038h,0FFh,038h,054h,052h,080h,0F0h,01Fh,012h,010h,0F0h,010h,000h
db 000h,070h,008h,008h,008h,088h,070h,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 002h,042h,045h,055h,052h,04Ah,029h,024h,024h,012h,012h,009h,00Bh,006h,002h,000h
db 042h,042h,02Ah,02Eh,013h,01Ah,026h,002h,040h,020h,013h,00Ch,033h,060h,020h,000h
db 000h,030h,028h,024h,022h,021h,030h,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
upara3:
;参数3:
db 020h,020h,028h,02Ch,0AAh,06Bh,038h,0ACh,024h,064h,0A6h,02Ch,020h,020h,000h,000h
db 010h,092h,054h,038h,0FFh,038h,054h,052h,080h,0F0h,01Fh,012h,010h,0F0h,010h,000h
db 000h,030h,008h,088h,088h,048h,030h,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 002h,042h,045h,055h,052h,04Ah,029h,024h,024h,012h,012h,009h,00Bh,006h,002h,000h
db 042h,042h,02Ah,02Eh,013h,01Ah,026h,002h,040h,020h,013h,00Ch,033h,060h,020h,000h
db 000h,018h,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
upara4:
;参数4:
db 020h,020h,028h,02Ch,0AAh,06Bh,038h,0ACh,024h,064h,0A6h,02Ch,020h,020h,000h,000h
db 010h,092h,054h,038h,0FFh,038h,054h,052h,080h,0F0h,01Fh,012h,010h,0F0h,010h,000h
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 002h,042h,045h,055h,052h,04Ah,029h,024h,024h,012h,012h,009h,00Bh,006h,002h,000h
db 042h,042h,02Ah,02Eh,013h,01Ah,026h,002h,040h,020h,013h,00Ch,033h,060h,020h,000h
db 000h,007h,004h,024h,024h,03Fh,024h,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
upara5:
;参数5:
db 020h,020h,028h,02Ch,0AAh,06Bh,038h,0ACh,024h,064h,0A6h,02Ch,020h,020h,000h,000h
db 010h,092h,054h,038h,0FFh,038h,054h,052h,080h,0F0h,01Fh,012h,010h,0F0h,010h,000h
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 002h,042h,045h,055h,052h,04Ah,029h,024h,024h,012h,012h,009h,00Bh,006h,002h,000h
db 042h,042h,02Ah,02Eh,013h,01Ah,026h,002h,040h,020h,013h,00Ch,033h,060h,020h,000h
db 000h,019h,021h,020h,020h,011h,00Eh,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
upara6:
;参数6:
db 020h,020h,028h,02Ch,0AAh,06Bh,038h,0ACh,024h,064h,0A6h,02Ch,020h,020h,000h,000h
db 010h,092h,054h,038h,0FFh,038h,054h,052h,080h,0F0h,01Fh,012h,010h,0F0h,010h,000h
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 002h,042h,045h,055h,052h,04Ah,029h,024h,024h,012h,012h,009h,00Bh,006h,002h,000h
db 042h,042h,02Ah,02Eh,013h,01Ah,026h,002h,040h,020h,013h,00Ch,033h,060h,020h,000h
db 000h,00Fh,011h,020h,020h,011h,00Eh,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
upara7:
;参数7:
db 020h,020h,028h,02Ch,0AAh,06Bh,038h,0ACh,024h,064h,0A6h,02Ch,020h,020h,000h,000h
db 010h,092h,054h,038h,0FFh,038h,054h,052h,080h,0F0h,01Fh,012h,010h,0F0h,010h,000h
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 002h,042h,045h,055h,052h,04Ah,029h,024h,024h,012h,012h,009h,00Bh,006h,002h,000h
db 042h,042h,02Ah,02Eh,013h,01Ah,026h,002h,040h,020h,013h,00Ch,033h,060h,020h,000h
db 000h,000h,000h,03Fh,000h,000h,000h,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
upara8:
;参数8:
db 020h,020h,028h,02Ch,0AAh,06Bh,038h,0ACh,024h,064h,0A6h,02Ch,020h,020h,000h,000h
db 010h,092h,054h,038h,0FFh,038h,054h,052h,080h,0F0h,01Fh,012h,010h,0F0h,010h,000h
db 000h,070h,088h,008h,008h,088h,070h,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 002h,042h,045h,055h,052h,04Ah,029h,024h,024h,012h,012h,009h,00Bh,006h,002h,000h
db 042h,042h,02Ah,02Eh,013h,01Ah,026h,002h,040h,020h,013h,00Ch,033h,060h,020h,000h
db 000h,01Ch,022h,021h,021h,022h,01Ch,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
upara9:
;参数9:
db 020h,020h,028h,02Ch,0AAh,06Bh,038h,0ACh,024h,064h,0A6h,02Ch,020h,020h,000h,000h
db 010h,092h,054h,038h,0FFh,038h,054h,052h,080h,0F0h,01Fh,012h,010h,0F0h,010h,000h
db 000h,0E0h,010h,008h,008h,010h,0E0h,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 002h,042h,045h,055h,052h,04Ah,029h,024h,024h,012h,012h,009h,00Bh,006h,002h,000h
db 042h,042h,02Ah,02Eh,013h,01Ah,026h,002h,040h,020h,013h,00Ch,033h,060h,020h,000h
db 000h,000h,031h,022h,022h,011h,00Fh,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
numtab1:
;1
db 000h,010h,010h,0F8h,000h,000h,000h,000h
db 000h,020h,020h,03Fh,020h,020h,000h,000h
numtab2:
;2
db 000h,070h,008h,008h,008h,088h,070h,000h
db 000h,030h,028h,024h,022h,021h,030h,000h
numtab3:
;3
db 000h,030h,008h,088h,088h,048h,030h,000h
db 000h,018h,020h,020h,020h,011h,00Eh,000h
numtab4:
;4
db 000h,000h,0C0h,020h,010h,0F8h,000h,000h
db 000h,007h,004h,024h,024h,03Fh,024h,000h
numtab5:
;5
db 000h,0F8h,008h,088h,088h,008h,008h,000h
db 000h,019h,021h,020h,020h,011h,00Eh,000h
numtab6:
;6
db 000h,0E0h,010h,088h,088h,018h,000h,000h
db 000h,00Fh,011h,020h,020h,011h,00Eh,000h
numtab7:
;7
db 000h,038h,008h,008h,0C8h,038h,008h,000h
db 000h,000h,000h,03Fh,000h,000h,000h,000h
numtab8:
;8
db 000h,070h,088h,008h,008h,088h,070h,000h
db 000h,01Ch,022h,021h,021h,022h,01Ch,000h
numtab9:
;9
db 000h,0E0h,010h,008h,008h,010h,0E0h,000h
db 000h,000h,031h,022h,022h,011h,00Fh,000h
numtab0:
;0
db 000h,0E0h,010h,008h,008h,010h,0E0h,000h
db 000h,00Fh,010h,020h,020h,010h,00Fh,000h
clear:
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,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,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
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -