Programación abierta de código; Este programa limita A y B a un máximo de 4 dígitos decimales. Este programa se ejecuta correctamente compilando: codesegmentassumes: code, DS: codecrequ 000 dhlfequ 000 ahkbbackequ 0008h; Función: Mostrar la cadena de la dirección especificada (Str_Addr); Entrada:; Str_Addr= = Dirección de cadena (requerida para el segmento de datos); Uso: OutputStr_Addr Ejemplo de uso: outputpromptstroutmacrostr_addleadx, str_addmovah, 9 int 21 hendm -; ; Entrada: Ninguna; Salida: DH=número de fila, DL=número de columna getcursorprocnearpushaxprushcxxorbx, bxmovah, 3int10hmovcursor_row, dhmovcursor_col, dlpopcxpopbxpopaxretcursor_rowdb? Cursor_ColDB? GetCursorEndP-; Función: Establecer la posición del cursor; Entrada: Cursor_Row=coordenada de fila; Cursor_Col: coordenada de columna) setcursorprocnearpushppushaxmovdh, Cursor_Rowmovdl, Cursor_Colxorbx, bxmovah, 2 int 10 hpoppoppxpretrsetcursorendp -; 2hmowdl, 0 pista 21 HMO wdl, 0 ahint 21 hopdxpopaxretender_ctlfendp; - Función: genera un carácter; entrada: dl = carácter que se mostrará enter_chrprocnearbushaxmovah, 02 sugerencia 21 hpopaxretenter_chrendp -; instrucciones para convertirlo en un número binario y guardarlo en la unidad de almacenamiento especificada.

; Entrada: N = número de dígitos; Di = primera dirección donde se guarda el número de entrada Salida: El número binario convertido se almacena en la unidad input_digitprocnearpushdxpushbxpushdileadi,@@save_tmppushdilmovcx,npushcx@@input: llamar a obtener posición del cursor movah; , 1; acepta un carácter del teclado int 21hcmpal, CR; si escribe enter, escribió un número con menos de n dígitos jz @@ASC_Dec para procesar el número ingresado cmpal, KBBackjz @@KB_Back si es una clave en blanco, re -ingrese cmpal, '0' jb @ @ KBBack si está debajo del número '0', vuelva a ingresar cmpal, '9' ja @ @ kb back si está debajo del número '9', vuelva a ingresar jmp @; @ save _ dig @ @ kb _ back: dec cursor _ colinccxdecdi @ @ kb back: llamar a establecer cursor; establecer la posición del cursor jmp @ @ Input @ @ Save_Dig: andal, 0fh convertido a número binario stosb save loop @ @ La entrada acepta el siguiente número @ @ ASC _ dec: movax, cxpopcxpopsisubcx, ax; el número real de dígitos ingresados ​​es xorbp, bpxordx, dxxorax, axjcxz @ @ save _ ret Si no se ingresa ningún número, ingréselo directamente, presione '0' para procesar el número real número de dígitos de entrada en deccx por 1. Esta cadena de números está lista para convertirse en un número binario jcxz @ @ One _ Digit Si el número de entrada es solo un dígito, guarde directamente el número binario movbx, 10 @ @ mul _. diez: lodsbwaddax, bpmulbxmovb, ax loop @ @ mul _ ten @ @ one _ digit:lodsbwaddax,BP @@save_ret:popdistoswpopbxpopdxret. )Entrada _ DigitEndP-; Función: Convertir el número binario sin signo en AX en código ASCII decimal explícito y enviarlo a la pantalla para su visualización Entrada: AX=número binario Salir: Mostrar el número de código ASCII convertido DEC _ ASCII ProcnearpushDXPUSHBPushDimovbx, 10LEAD; Yo, @@temp_Save[6] Movbyteptr[di], '$' decodificado @@Divide: @.