ASSEMBLER en JAVA

[Enan0]

Usando este codigo!!!

Código Delphi [-]
function ROL2(B: Byte): Byte;
begin
   asm
      mov   al,b
      rol   al,2
      mov   result,al
   end;
end;

el Rol Da lo siguiente

ROL 83,2 = 77
ROL 77,2 = 53
ROL 53,2 = 212
ROL 212,2 = 83
ROL 83,2 = 77

como te inmaginas uso el resultado como valor de entrada y los valores se repiten!!

Utilizando el Codigo de java!!
77
53
-44
-1
-1
-1
-1
-1

Como te inmaginaras.. sigo con el mismo problema.. en verdad no los Rota. sino que los Desplaza.
es decir los mueve y rellena con 0

me parece que voy a tener que hacer algo de manera cacera!!

[[cHackAll]]

Considero que no es necesario el modificador "static" en una función sin variables declaradas, digo esto porque solo un comportamiento "residual" provocaría que una función retorne un valor correcto con un numero X, y que luego de algunas iteraciones al azar retorne un valor incorrecto con el mismo numero de prueba X (me refiero al "83" en tus pruebas).

Aparte de ese problema, he notado que el tipo de datos “byte” en JAVA tiene un rango de 2^7-1 al igual que un ShortInt de Delphi, con lo cual el valor esperado será siempre erróneo cuando sea establecido el último bit de dicho tipo (el signo).

Hagamos otra prueba antes que decida instalar JAVA , y por favor si realizas alguna modificación a la misma explícame la razón puntualmente;

  private int ROL2(int Value)
  {
   return ((Value << 2) | (Value >> 6)) & 0xFF;
  }

Saludos

[Enan0]

Hola cHackAll, mira el cambio que hice lo hice sin saber, TE pido disculpas y voy a probar eso que me pasaste a ver si todo funciona Bien.

y la verdad que mucho no te voy a poder explicar si hago algun cambio, que como dije. es mi primer Pasito en el lindo mundo de java.

saludos y estoy en contacto

[Enan0]

Bueno cHacKall, la verdad que me ayudaste muchisimo, en 2 dias pude solucionar algo que me venia llevando unos cuantos mas..

Te cuento que la funcion quedo de 10, de la siguiente manera.

Antes que nada Volvi a declarar la funcion como STATIC porque sino me daba el siguiente Error.

non-static method ROL2(int) cannot be referenced from a static context

asique la Redeclare.

Y bueno he aqui el codigo!!

Código Delphi [-]
public class rotate {

     private static  int ROL2(int Value)
      {
           return ((Value<<2)|(Value>>6))& 0xFF ;
      }

    public static void main (String[] args) {
    java.util.BitSet b;    
        
    int n;
    Integer i;
    n=83;
  
    n=ROL2(n);
    
    System.out.println(n);
    for (i=0;i<7;i++) {
        n=ROL2(n);
        System.out.println(n);
        
    }
    }
    
    
}

Empezado por Resultado

77
53
212
83
77
53
212
83

Una vez mas un millon de Gracias!