la hora en ensamblador

talia
21 de Septiembre del 2004
quisiera que alguien me mandara un ejemplo de un programa que me de la hora en ensamblador. Le los agradecería mucho.

ivan damian uc cen
21 de Septiembre del 2004
; Este es un programa que me llevo mucho tiempo realizarlo, espero que te sea de gran utilidad. CEN

.MODEL SMALL
.STACK 100H
.DATA
.CODE
RELOJ:
MOV AX,0
MOV AX,@DATA
MOV DS,AX
CICLO:
MOV AH,02H
MOV BH,00
MOV DH,10
MOV DL,32
INT 10H
CALL HORA
JMP CICLO

MOV AH,4CH
INT 21H

HORA PROC NEAR
MOV AH,2CH
INT 21H
MOV BH,'A'
CMP CH,12
JB HORA1
MOV BH,'P'
SUB CH,12
HORA1:
OR CH,CH
JNE HORA2
MOV CH,12
HORA2:
MOV AL,CH
XOR AH,AH
AAM
OR AH,AH
JZ HORA3
PUSH AX
MOV AL,AH
ADD AL,'0'
CALL DESP
POP AX
HORA3:
ADD AL,'0'
CALL DESP
MOV AL,':'
CALL DESP
MOV AL,CL
XOR AH,AH
AAM
ADD AX,3030H
PUSH AX
MOV AL,AH
CALL DESP
POP AX
CALL DESP

MOV AL,''
CALL DESP
MOV AL,DH
XOR AH,AH
AAM
ADD AX,3030H
PUSH AX
MOV AL,AH
CALL DESP
POP AX
CALL DESP

MOV AL,''
CALL DESP

MOV AL,BH
CALL DESP

MOV AH,02H
MOV DL,77
INT 21H
MOV AL,''
CALL DESP
MOV AL,''
CALL DESP
RET
HORA ENDP

DESP PROC NEAR
PUSH AX
MOV AH,6
MOV DL,AL
INT 21H
POP AX
RET
DESP ENDP

END RELOJ