?? daad.asm
字號:
CODE SEGMENT
ASSUME CS:CODE
ADPORT EQU 0060H
DAPORT EQU 0070H
CONTPORT EQU 00DFH
DATAPORT EQU 00DEH
DATA0 EQU 0500H
DATA1 EQU 0510H
DATA2 EQU 0514H
DATA3 EQU 0518H
DATA4 EQU 0519H
DATA5 EQU 051AH
DATA6 EQU 051CH
START: JMP CONTORL
CONTORL: CALL FORMAT
CALL LEDDISP
CALL DELAY
MOV AL,0D
DACON: PUSH AX
OUT DAPORT,AL
CLC
MOV SI,DATA5
MOV AL,1D
ADC AL,[SI]
DAA
MOV [SI],AL
INC SI
MOV AL,0D
ADC AL,[SI]
DAA
MOV [SI],AL
MOV SI,DATA5
MOV AL,[SI]
MOV BX,DATA2
CALL CONVERS
INC SI
MOV AL,[SI]
CALL CONVERS1
INC BX
MOV DS:[BX],AL
CALL DELAY
ADCON: MOV AX,00
OUT ADPORT,AL
CALL DELAY
IN AL,ADPORT
CALL CBCDM
MOV BX,DATA6
MOV [BX],AX
MOV BX,DATA1
CALL CONVERS
MOV AL,BYTE PTR DS:[051DH]
CALL CONVERS1
INC BX
MOV DS:[BX],AL
CALL LEDDISP
POP AX
INC AX
CMP AX,100H
JB DACON
MOV AX,0H
MOV WORD PTR DS:[DATA5], 0H
JMP DACON
CONVERS: PUSH AX
CALL CONVERS1
MOV DS:[BX],AL
INC BX
POP AX
MOV CL,4H
SHR AL,CL
CALL CONVERS1
MOV DS:[BX],AL
RET
CONVERS1: PUSH BX
MOV BH,0H
AND AL,0FH
MOV BL,AL
MOV AL,CS:[BX+DATA0]
POP BX
RET
LEDDISP: MOV AL,90H
OUT CONTPORT,AL
LED1: CMP BYTE PTR DS:[DATA3],07H
JA LED2
MOV BL,DS:[DATA3]
MOV BH,0H
MOV AL,DS:[BX+DATA1]
OUT DATAPORT,AL
ADD BYTE PTR DS:[DATA3],01H
JNZ LED1
LED2: MOV BYTE PTR DS:[DATA3],00
RET
CBCDM: MOV BL,AL
AND AX,0FH
CMP AL,09H
JNA NEXTBIT
ADD AL,06H
NEXTBIT: MOV BYTE PTR DS:[DATA4],AL
MOV AL,BL
MOV BH,0
MOV BL,BYTE PTR DS:[DATA4]
MOV CL,4H
SHR AL,CL
JZ OK
MOV CX,AX
MOV AL,BYTE PTR DS:[DATA4]
CLC
NEXT: ADD AL,16H
DAA
JNC NEXTBIT1
ADD AH,1H
NEXTBIT1: DEC CX
JNZ NEXT
MOV BX,AX
OK: MOV AX,BX
RET
FORMAT: MOV AX,0H
MOV DS,AX
MOV BX,0
MOV WORD PTR DS:[BX+DATA0],063FH
ADD BX,2
MOV WORD PTR DS:[BX+DATA0],4F5BH
ADD BX,2
MOV WORD PTR DS:[BX+DATA0],6D66H
ADD BX,2
MOV WORD PTR DS:[BX+DATA0],077DH
ADD BX,2
MOV WORD PTR DS:[BX+DATA0],6F7FH
ADD BX,2
MOV WORD PTR DS:[BX+DATA0],7C77H
ADD BX,2
MOV WORD PTR DS:[BX+DATA0],5E39H
ADD BX,2
MOV WORD PTR DS:[BX+DATA0],7179H
ADD BX,2
MOV WORD PTR DS:[BX+DATA0],525EH
ADD BX,2
MOV WORD PTR DS:[BX+DATA0],4077H
ADD BX,2
MOV WORD PTR DS:[BX+DATA0],7740H
ADD BX,2
MOV WORD PTR DS:[BX+DATA0],5E52H
ADD BX,2
MOV WORD PTR DS:[BX+DATA0],0H
ADD BX,2
MOV WORD PTR DS:[BX+DATA0],0H
ADD BX,2
MOV WORD PTR DS:[BX+DATA0],0H
RET
DELAY: MOV AX,5H
DELAY1: DEC AX
NOP
NOP
MOV CX,0FFFFH
DELAY2: LOOP DELAY2
JNZ DELAY1
RET
CODE ENDS
END START
?? 快捷鍵說明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -