Juan
26 de Diciembre del 2003

¿Sabéis una manera sencilla de pasar este pseudocódigo a ensamblador?
----
FUNCTION calcula(x)
x:=x*250
END_FUNCTION

CASE valor DO
1: calcula(A)
2: calcula(B)
'A': calcula(C)
'q': calcula(D)
DEFAULT
calcula(-1)
END_CASE
----

Mariano Cerdeiro
26 de Diciembre del 2003

Buenas, no lo pruebo ya que lo escribo derecho aca...
intentar compilar con tasm xxx.asm /m3
tlink xxx.obj /t /3

codigo segment use16
org 100h
assume cs:codigo,ds:codigo
jmp inicio:
x dd 0

calcula:
mov eax,x
mov ebx,250
mul ebx
mov x,eax
ret

inicio:
xor ax,ax
int 16h
cmp al,'1'
jne no1
mov x,A
call calcula
jmp end_case
no1:
cmp al,'2'
jne no2
mov x,'B'
call calcula
jmp end_case
no2:
etc.etc.
default:

end_case:


Saludos.
Mariano.-