【发布时间】:2017-03-27 08:01:52
【问题描述】:
英语不是我的母语;请原谅打字错误,我将在这里展示的代码是一个家庭作业。
我真的需要了解发生了什么。我在 DosBox 0.74 和 TASM 汇编器中使用 Intel 8086 语法。
当我必须除以 2 时,代码的问题在于三角形区域。注意:程序总是从键盘读取 1 位数字。看代码(这里的一个用户建议显示我所有的代码而不是部分显示,我觉得有点长,但我认为他是对的,更具可读性)[注意:我编辑了这个问题,只有部分有问题的代码都在这里,我花了一些时间将cmets和message翻译成英文,这有点长,我没有太多时间翻译所有]:
;Segmento de Datos
DATA SEGMENT 'DATA'
LADO1 DB ? ;con el ? se indica que la variable no tiene nada
LADO2 DB ?
LADO3 DB ?
BASE DB ?
ALTURA DB ?
COUNTER DB 0 ;contador para muestra de mensajes
;mensajes ESPECIFICOS
MSG_PRESENTACION DB 10,13,"Este programa calcula los perimetros y areas de algunas figuras geometricas $"
;triangulo
MSG_DIMENSIONES_TRIANGULO DB 10,13,10,13,"Ingrese las dimensiones del triangulo (considere el lado 2 como la BASE)$"
MSG_PERIMETRO_TRIANGULO DB 10,13,"El perimetro del triangulo es: $"
MSG_AREA_TRIANGULO DB 10,13,"El area del triangulo es: $"
;triangulo
;cuadrado
MSG_DIMENSIONES_CUADRADO DB 10,13,10,13,"Ingrese las dimensiones del cuadrado$"
MSG_PERIMETRO_CUADRADO DB 10,13,"El perimetro del cuadrado es: $"
MSG_AREA_CUADRADO DB 10,13,"El area del cuadrado es: $"
;cuadrado
;rectangulo
MSG_DIMENSIONES_RECTANGULO DB 10,13,10,13,"Ingrese las dimensiones del rectangulo$"
MSG_PERIMETRO_RECTANGULO DB 10,13,"El perimetro del rectangulo es: $"
MSG_AREA_RECTANGULO DB 10,13,"El area del rectangulo es: $"
;rectangulo
;otros mensajes GENERALES
MSG_ALTURA DB 10,13,"Introduzca la altura: $" ;sirve para solicitar la altura de varias figuras
MSG_BASE DB 10,13,"Introduzca la base: $"
MSG_LADO DB 10,13,"Ingrese el lado $"
MSG_PUNTO DB ": $" ;sirve para colocar 2 puntos luego del lado
MSG_PRUEBA DB 10,13,10,13,"El valor de prueba es: $"
DATA ENDS
;Segmento de codigo
CODE SEGMENT 'CODE'
ASSUME DS:DATA,CS:CODE ;se le indica al Assembler que DATA es el nombre dado al DATA SEGMENT, y CODE el nombre de CODE SEGMENT
MAIN PROC ;incia el inicio del segmento de codigo
MOV AX,DATA ;hacer disponible/accesible el contenido del DATA SEGMENT al CODE SEGMENT
MOV DS,AX ;inicializar el data segment, debido a limitacion de MOV, se hace con la ayuda de AX
LEA DX,MSG_PRESENTACION ;Mensaje de presentacion / introduccion
CALL printString
;triangulo********
LEA DX,MSG_DIMENSIONES_TRIANGULO ;carga a DX el mensaje 1 (Se le dice al usuario que introduzca los datos del triangulo)
CALL printString
;SOLICITUD DE DATOS ----//----
LEA DX,MSG_ALTURA ;indica al usuario que introduzca la altura del triangulo
CALL printString
CALL readNumber ;se lee del teclado la entrada del usuario mediante este procedimiento (1 digito)
MOV ALTURA,AL
LEA DX,MSG_LADO ;se le dice al usuario que introduzca el lado 1
CALL printString
CALL numberInMessage ;muestra el numero 1 despues del mensaje anterior y DOS PUNTOS para introducccion de datos (solo con fines de formato)
CALL readNumber
MOV LADO1,AL ;mueve valor capturado a la variable
LEA DX,MSG_LADO ;se le dice al usuario que introduzca el lado 2 (la base)
CALL printString
CALL numberInMessage ;muestra el numero 2 despues del mensade de LADO
CALL readNumber
MOV LADO2,AL ;mueve valor capturado a la variable
LEA DX,MSG_LADO ;se le dice al usuario que introduzca el lado 3
CALL printString
CALL numberInMessage ;muestra el numero 3
CALL readNumber
MOV LADO3,AL ;mueve valor capturado a la variable
;PERIMETRO DE TRIANGULO ----//----
ADD AL,LADO2 ;SUMA LADO3(AL) CON CON LADO2 y lo guarda en AL
ADD AL,LADO1 ;SUMA LO ANTERIOR CON LADO1
MOV AH,0 ;borra basura de AH
AAA ;significa ASCII Adjust after Addition
MOV BX,AX ;los registros AH y AL se usan una y otra vez, por tanto para evitar perder sus datos se mueven a BH y BL, esto se hace moviendo AX a BX
LEA DX,MSG_PERIMETRO_TRIANGULO ;lee la direccion efectiva de memoria del mensaje (resultado de la suma) y la carga en DX
CALL printString ;printDigits usa BX para la impresion de los datos
CALL printDigits ;imprime resultado
;AREA DE TRIANGULO ----//----
MOV AL,LADO2 ;multiplicar la base (LADO2) por la altura
MUL ALTURA
AAM
MOV BL,2
AAD
DIV BL
MOV BX,AX
LEA DX,MSG_AREA_TRIANGULO ;mensaje que indica la impresion del area del triangulo
CALL printString
CALL printDigits ;imprime numeros del area del triangulo
;FIN triangulo********
;cuadrado********
LEA DX,MSG_DIMENSIONES_CUADRADO
CALL printString
;SOLICITUD DE DATOS ----//----
LEA DX,MSG_LADO
CALL printString
LEA DX,MSG_PUNTO ;solo con fines de formato, muestra los 2 puntos antes la entrada del usuario
CALL printString
CALL readNumber ;recordemos que la lectura se almacena en AL
MOV LADO1,AL
;PERIMETRO DEL CUADRADO ----//----
MOV AH,4 ;MUL no acepta valores constantes como argumentos, por tanto se mueve a un registro
MUL AH ;multiplicamos la entrada del usuario por 4 y se almacena en AL
MOV AH,0 ;se limpia basura de AH
AAM ;ya explicado, se iran reduciendo comentarios debido a esto, no se omitiran valores y/o situaciones especificas y necesarias para entender
MOV BX,AX ;se mueve porque se trabaja mucho con AX, y evitamos posible perdida de los datos
LEA DX,MSG_PERIMETRO_CUADRADO
CALL printString
CALL printDigits ;imprime lo que esta en BX
;AREA DEL CUADRADO ----//----
MOV AL,LADO1
MUL AL ;multiplicamos la entrada del usuario por el mismo, ya que se desea elevar al cuadrado
MOV AH,0 ;se limpia basura de AH
AAM
MOV BX,AX ;se mueve porque se trabaja mucho con AX, y evitamos posible perdida de los datos
LEA DX,MSG_AREA_CUADRADO
CALL printString
CALL printDigits ;imprime lo que esta en BX
;FIN cuadrado********
;rectangulo********
LEA DX,MSG_DIMENSIONES_RECTANGULO
CALL printString
;SOLICITUD DE DATOS ----//----
LEA DX,MSG_BASE
CALL printString
CALL readNumber
MOV BASE,AL
LEA DX,MSG_ALTURA
CALL printString
CALL readNumber
MOV ALTURA,AL
;PERIMETRO DEL RECTANGULO----//----
MOV AH,2 ;no se puede usar MUL con una consatnte, por tanto se mueve a un registro
MUL AH ;AL contiene la ALTURA, y se multiplica por 2
MOV AH,0 ;se limpia la basura
AAM
MOV BX,AX ;se guarda en otro registro para evitar perdida de datos
MOV AL,BASE
MOV AH,2 ;mismo procedimiento que arriba para multiplicar por un numero constante
MUL AH
MOV AH,0
AAM
ADD BX,AX ;se suma el primer resultado (guardado en BX), con lo ultimo conseguido (guardo en AX), el resultado queda e BX
AAA
LEA DX,MSG_PERIMETRO_RECTANGULO
CALL printString
CALL printDigits
;AREA DEL RECTANGULO ----//----
MOV AL,BASE
MUL ALTURA
MOV AH,0
AAM
MOV BX,AX
LEA DX,MSG_AREA_RECTANGULO
CALL printString
CALL printDigits
;FIN rectangulo********
MOV AH,4CH ;EXIT, termina el programa
INT 21H ;ejecuta la interrupcion
MAIN ENDP ;acaba la rutina principal
;PROCEDIMIENTOS -----------------------------------------------------------------------------------------------------------------------------
printDigits PROC
ADD BX,3030H ;como AH & AL (BH & BL) estan en BCD, se le suman 30 para obtener el valor en ASCII
;primer digito
MOV AH,2 ;se le indica a la interrupcion que haremos una impresion de un CARACTER
MOV DL,BH ;como BH contiene el primer digito, se imprime este primero pasando el valor a DL
INT 21H ;se llama a la interrupcion, que ejecuta lo especificado por AH, tomando como entrada DL
;segundo digito
MOV AH,2 ;nuevamente se le indica una impresion (STANDARD OUTPUT)
MOV DL,BL ;esta vez se pasa el segundo digito
INT 21H ;y se imprime
RET
printDigits ENDP
printString PROC
MOV AH,9 ;se pasa a AH el 9 para indicar que se hara una salida a STANDARD OUTPUT
INT 21H ;interrupcion del DOS, que funciona con el valor del registro AH, el 9 indica STANDARD OUTPUT
RET
printString ENDP
readNumber PROC
MOV AH,1 ;1 en AH indica STANDARD INPUT
INT 21H ;Se usa la interrupcion para tomar entrada del teclado (por instruccion 1 en AH), se retorna lectura a AL
SUB AL,30H ;se convierte de ASCII a numero normal para realizar las operaciones deseadas, el 30 es porque se recibe el numero en BCD desempacado
RET
readNumber ENDP
numberInMessage PROC
ADD COUNTER,1 ;añade 1 a al contador, para nuevos usos es necesario limpiar COUNTER antes de la llamada
MOV BL,COUNTER ;se mueve porque se desea imprimir el contador, y printDigits trabaja con BX
MOV BH,0
CALL printDigits
LEA DX,MSG_PUNTO ;contiene el mensaje de los dos puntos para formato solamente
CALL printString
RET
numberInMessage ENDP
CODE ENDS ;final del segmento de codigo
END MAIN
注意:“三角区”是唯一有问题的部分。
这不适用于所有数字(那些输出有 2 位数字),我认为这里的问题是 AAM 和 AAD 指令,AAD 要求 AX 有一个 2 位数字的 BCD 数字,所以我决定删除 AAM指令,这也不起作用。所以我想知道我在这里缺少什么,我这样做得到的输出是(使用 5 和 6,5*6=30/2=15):
The area of the triangle is: 0?
我认为 AAD 指令是问题的一部分,如果我使用其他数字,如 4 和 4,这将是输出:
The area of the triangle is: 08
所以,我决定删除AAD指令,但行为还是一样,你能告诉我为什么吗?
提前感谢您的时间和帮助! (如果你认为在我的代码中还有另一种方法可以做某事,而且更好,因为任何原因,告诉我,我想学习)
【问题讨论】:
-
文字太多,写的更简洁会引起更多关注
-
编辑您的答案,使其显示您实际使用的程序的完整源代码。不要把它切成小块然后乱序。
-
这甚至与使用 AAM 或其他任何东西的minimal reproducible example 相差甚远。只需制作一个测试用例,将一些值移动到寄存器中,然后做一些事情。然后解释你在寄存器中实际得到什么(例如,使用调试器检查它们),并解释你想要/期待什么。 AAM 很像
DIV r8,但有一个立即操作数,并且商/余数进入与 DIV 相反的寄存器。如果您的程序不起作用,请单步执行它并查阅 insn 集参考以了解任何不符合您预期的指令。 -
顺便说一句,使用 DIV 除以 2 是可怕的。使用
shr ax, 1
标签: assembly x86-16 tasm dosbox