Manual/Tutorial de ASM (Ensamblador) en castellano

[DarkByte]

Gracias a todos creo que con esto y las preguntitas que le voy haciendo a cadetill va que chuta

[roman]

La única rutina que hago en ensamblador es esta:

Código Delphi [-]
procedure DoAsm;
asm
  ret // de regreso a Delphi
end;

[DarkByte]

así se programa en ensamblador desde delphi?? se meten sentencias de esamblador?? como va eso?.

Gracias román.

[marcoszorrilla]

Mira este ejemplo:

implementation

{$R *.DFM}

function Base10(Base2:Integer) : Integer; assembler;
asm
  cmp    eax,100000000            // check upper limit
  jb     @1                       // ok
  mov    eax,-1                   // error flag
  jmp    @exit                    // exit with -1
@1:
  push   ebx                      // save registers
  push   esi
  xor    esi,esi                  // result = 0
  mov    ebx,10                   // diveder base 10
  mov    ecx,8                    // 8 nibbles (10^8-1)
@2:
  mov    edx,0                    // clear remainder
  div    ebx                      // eax DIV 10, edx mod 10
  add    esi,edx                  // result = result + remainder[i]
  ror    esi,4                    // shift nibble
  loop	@2                       // loop for all 8 nibbles
  mov    eax,esi                  // function result
  pop    esi                      // restore registers
  pop    ebx
@exit:
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
showmessage(InTtostr(base10(41)));
end;

Un Saludo.

[[eduarcol]]

Empezado por DarkByte

Gracias a todos creo que con esto y las preguntitas que le voy haciendo a cadetill va que chuta

jajajaja, suena bien lo de un profesor particular, yo tambien ando buscando uno como hicistes para encontrarlo, ya no me digas seguro pusistes en practica lo de este hilo que decia como tener mi propio informatico (no coloco el link porq no lo encuentro )

[roman]

Aquí hay otro ejemplito donde se ve como usar variables Pascal dentro el código ensamblador:

Código Delphi [-]
function Suma(X, Y: Integer): Integer;
asm
  mov eax,X
  add eax,Y
  mov Result, eax
end;

// Saludos

[roman]

Ahora entiendo porque cadetill escribe menos. ¿Cómo se le hace para pedir cita con él? Yo también quiero asesoría.

[__cadetill]

Empezado por roman

Ahora entiendo porque cadetill escribe menos. ¿Cómo se le hace para pedir cita con él? Yo también quiero asesoría.

eh! eh! menos cachondeo eh!!!!

[DarkByte]

Empezado por roman

Ahora entiendo porque cadetill escribe menos. ¿Cómo se le hace para pedir cita con él? Yo también quiero asesoría.

Tampoco que digamos hablamos mucho sobre ensamblador (en total llevaremos hablados unos 7 min). Normalmente compartimos opiniones sobre el foro... nos echamos unas manitas con las webs... todo eso...

De todos modos, cualquier duda seria que tenga no dudo en ponerla en el foro si al cabo de los 5 min. no encuentro solución en Internet.

[DarkByte]

Por cierto, me había olividado responder a los demás. Probaré el código y ya os contaré. Muchísmas gracias.

[Mav]

Hola, aqui hay algo que a lo mejor, te gusta:

[marcoszorrilla]

A título de aclaración verás que el lenguaje es un tanto críptico se trata de códigos mnemónicos que denotan que el lenguaje es de bajo nivel.

  cmp    eax,100000000            // check upper limit
  jb     @1                       // ok
  mov    eax,-1                   // error flag
  jmp    @exit

cmp----> compare
jb------>Jump if borrow
mov---->mover es decir colocar un valor en un registro.
jmp----->Jump salto incondicional parecido al GOTO del Basic.

Com verás procede hacerse con un manual con ejemplos y el juego de instrucciones del procesador en cuestión, yo aún conservo muchos libros pero ya desfasados pues éstos eran para las familias 8086-88-286-386.

Un Saludo.