Les dejo esta función que retorna el orden en que los bytes se almacenan en memoria.

Código: Seleccionar todo

#cs -------------------------------------------------------
AutoIt Version: 3.3.8.1
Author..........: Pink
Script Function...: OLE
Uso..............: OLE("Valor")
Retorna:El Orden Little Endian de una Serie de bytes
#ce -------------------------------------------------------

;Ejemplo
; En Mi archivo visto en Un Editor Hexadecimal el Valor de l_fanew es "B8000000"
;La Funcion Retorna el Equivalente a la Vista en Memoria

Msgbox(0,"",OLE("B8000000")); Simplemente Revierte los Bytes


Func OLE($Var)
Local $len=stringlen($Var)/2
local $Array[$len+1]
local $Char
local $A=1
local $Result
for $i= 1 to $len
	$Char=stringmid($Var,$A,2)
	$A+=2
	$Array[$i]=$Char
	next
for $x = $len to 1 Step -1
	$Result&=$Array[$x]
Next
Return $Result
EndFunc



saludos
Imagen
Responder

Volver a “Fuentes”