09.09.2006, 20:58
общий
это ответ
Здравствуйте, Whiteman!
<PRE>
Предлагается следующий вариант:
PUSH CX
MOV CX,4
@1: ROL AX,4
CALL OutDigit
LOOP @1
POP CX
;Ввиду частого использования этого кода обычно его выносят в макрос, а лучше - в процедуру
Используемая процедура:
OutDigit PROC NEAR
PUSH AX
AND AX,000Fh
CMP AL,9
JBE @2
ADD AL,7
@2: ADD AL,30h
PUSH DX ;Теперь надо вывести символ, код которого в AL. Приведён вариант для DOS
MOV DL,AL
MOV AH,2
INT 21h
POP DX ;Этот кусок кода - единственное, требующее замены для перехода под Win
POP AX
RET
OutDigit ENDP
</PRE>
Good luck!