Cómo implementar la programación binaria
hextb? base de datos? ' 0123456789ABCDEF '
msg0? base de datos? 0dh, 0ah? **********Menú* * * * * * * * * * ',0dh,0ah
db? '*?1.¿Entrada? ¿Binario? Número: * ', 0dh, 0ah
db? '*?2.¿Entrada? ¿brujería? número de serie:? *, 0dh, 0ah
db? '*?3.export*',0dh,0ah
db? ***********************,0dh,0ah,' $ '
msg1? base de datos? 0dh, 0ah, '¿Entrar? ¿Binario? Número: $ '
msg2? base de datos? 0dh, 0ah, '¿Entrar? ¿brujería? Número: $ '
res1? base de datos? 0dh, 0ah, 'Convert2Hex? Número: $ '
res2? base de datos? 0dh, 0ah, 'Convert2Bin? Número: $ '
crlf? base de datos? 0dh, 0ah, ' $ '
dseg? ¿Fin
cseg? Párrafo
¿Hipótesis? cs:cseg,? ds: dseg
Inicio:
mov? hacha,? dseg
mov? ds,? cortar
m0:
mov? Ah, 9
lea. dx,? msg0
int? 21h
mov? ah? ¿Siete
int? 21h
cmp? Al, '1'
jb? m0
cmp? Al, '3'
¿En serio? m0
mov? Ah, 0eh
int? 10h
Y luego qué. Aluminio, 0fh
cmp? Aluminio, 1
jz? m1
cmp? Aluminio, 2
jz? Oferta monetaria 2
cmp? Aluminio, 3
jz? m3
m1:
mov? Ah, 9
lea. dx,? mensaje1
int? 21h
¿Llamar? readBin
mov? Ah, 9
lea. dx,? res1
int? 21h
¿Llamar? printHex
jmp? m0
m2:
mov? Ah, 9
lea. dx,? msg2
int? 21h
¿Llamar? leerHex
mov? Ah, 9
lea. dx,? res2
int? 21h
¿Llamar? Imprimir cuadro
jmp? m0
m3:
mov? Ah, 4ch
int? 21h
readBin? proceso? ¿Cerca de
mov? ¿bx? 0
mov? ¿cx? 16
b0:
mov? Ah, 7
int? 21h
cmp? Aluminio, 0dh
jz? b1
cmp? Al, '0'
jb? b0
cmp? Al, '1'
¿En serio? b0
mov? Ah, 0eh
int? 10h
Y luego qué.
hacha, 01h
shl? caja, 1
¿Suplementario? bx, ax
¿Diciembre? cx
jnz? b0
b1:
Remojado en agua para suavizarlo
readBin? endp
printBin? proceso? ¿Cerca de
mov? cx, 16
mov? Ah, 0eh
p1:
rol? bx,1
mov? al, bl
Y luego qué. Aluminio, 1
xor? Aluminio, 30h
int? 10h
¿Bucle? p1
Remojar en agua para suavizarlo
printBin? endp
leerHex? proceso? ¿Cerca de
mov? bx,0
mov? cx, 404h
h0:
mov? Ah, 7
int? 21h
cmp? Aluminio, 0dh
jz? h6
cmp? Al, '0'
jb? Hipótesis nula
cmp? Al, "9"
¿En serio? h1
movimiento? Ah, 0eh
int? 10h
Y luego qué. Aluminio, 0fh
jmp? h5
h1:
cmp? Al, A
jb? Hipótesis nula
cmp? Al, "F"
¿En serio? Deuterio
mov? Ah, 0eh
int? 10h
sub? Aluminio, 37H
jmp? h5
h2:
cmp? Al, a
jb? Hipótesis nula
cmp? Al, "f"
¿En serio? Hipótesis nula
mov? Ah, 0eh
int? 10h
sub? Aluminio, 57H
h5:
shl? bx, cl
¿Suplementario? bl,al
Diciembre? Honorable Señor
jnz? Hipótesis nula
h6:
Remojar en agua la suaviza
¿leer Hex? endp
imprimirHex? proceso? ¿Cerca de
mov? cx, 404h
mov? Ah, 0eh
mov? dx,? Bronx
Leah. ¿bx? hextb
p0:
rol? dx,? Centilitro
mov? Alabama. decilitro
Y luego qué. Aluminio, 0fh
xlat
int? 10h
¿Diciembre? Honorable Señor
jnz? Proteína p0
Remojada en agua para hacerla suave
printHex? endp
cseg? Fin
¿Fin? Inicio