Pascal/Turbo Pascal - Assembler en Pascal

Hola al grupo,

quiero meter un cachito de pascal en assembler pero no se como. Uso el Free Pascal y en el programmer guide esta el tema muy pobremente explicado. (o quiza orientado a avanzados y no a un principiante en pascal como yo) Enfin..
Quiero meter este cachito de assm.

asm
mov ax,0x40
mov es,ax
mov dx,es:[8]
mov adrp,dx
end;

adrp es una variable int en la que cargaria la direccion del puerto paralelo. Como se hace?

Con un simple ejemplo que funcione supogo que me bastara..
Gracias por leer el mensaje.

Saludos.
Dario

me quivoque, quise decir: "meter un cachito de assembler en pascal"

:-)

Bueno, no soy experto en Assembler pero he hecho algunos "pinitos" en Asm.
Me extraña lo siguiente en el código que has puesto.
mov ax,0x40 <---- ¿Esto no te da error al compilar?
entiendo que FreePascal es muy estandar y la notación usada en esa línea no se corresponde con el estandar Pascal para InLine Assembler, lo correcto sería, según mi opinión, como sigue:
mov ax,$40
Con respecto a tu consulta creo que el tipo de dato de la variable adrp debería ser de tipo Word y no integer pues AX debe tener cargado un valor sin signo.