Page 1 of 1
Necesito la funcion XOR
Posted: Mon Mar 16, 2009 9:51 pm
by acuellar
Hola a todos, Necesito la funcion XOR, que creo que es de C
Necesito que me la pasen en texto o en obj para 32Bits
Muchisimas gracias por su colaboracion y ayuda
Saludos
Adhemar
Re: Necesito la funcion XOR
Posted: Tue Mar 17, 2009 12:36 am
by Antonio Linares
Adhemar,
FiveWin proporciona nXor( n1, n2, ... ) --> nResultado
Re: Necesito la funcion XOR
Posted: Tue Mar 17, 2009 12:17 pm
by acuellar
Gracias Distinguido Antonio
Me sale un error, aqui el proceso, no se como tengo que escribirlo el XOR
cConcate:="1234567890"
For I=1 To Len(cConcate)
X:=Mod( (x + 1) , 256 )
Y:=Mod( (aState[X+1]+Y) , 256 )
AuxState:=aState[X+1]
aState[X+1]:=aState[Y+1]
aState[Y+1]:=AuxState
Resto:=aState[ Mod( (aState[X+1] + aState[Y+1]) , 256 )+1 ]
nMen:=XOR( ASC( Subs(cConcate,I,1) ) , Resto )
nMen:=nMen+1
Next I
El error es:
Error: Unresolved external '_HB_FUN_XOR' referenced from D:\SISTEMAS\TAJIBOS\FACTURAS\OBJ\PROCFACT.OBJ
Gracias por su tiempo y colaboracion
Saludos
Adhemar
Re: Necesito la funcion XOR
Posted: Tue Mar 17, 2009 1:00 pm
by ronaldo
utiliza nXOR()
Re: Necesito la funcion XOR
Posted: Tue Mar 17, 2009 1:04 pm
by Antonio Linares
Lleva una n delante: nXor()
Re: Necesito la funcion XOR
Posted: Tue Mar 17, 2009 1:46 pm
by acuellar
Gracias Distinguidos
Ahora me funciona perfecto.
Saludos
Adhemar