U could use the AES Cipher
Here is some code i wrote (Unicode):
Code:
EnableExplicit
Procedure.i CryptBuffer(*Buffer,Length.i,Key.s,Decrypt.i = #False)
Protected *key
Protected *block
If Key And *Buffer And Length > 15
*key = Ascii(Key + Space(8))
If *key
*block = AllocateMemory(Length)
If *block
If Decrypt
If AESDecoder(*Buffer,*block,Length,*key,128,#Null,#PB_Cipher_ECB)
FreeMemory(*key)
ProcedureReturn *block
EndIf
Else
If AESEncoder(*Buffer,*block,Length,*key,128,#Null,#PB_Cipher_ECB)
FreeMemory(*key)
ProcedureReturn *block
EndIf
EndIf
FreeMemory(*block)
EndIf
FreeMemory(*key)
EndIf
EndIf
ProcedureReturn #Null
EndProcedure
Procedure.i Main()
Protected *encrypt
Protected *decrypt
Protected dummy.s
dummy = "Hello World!"
*encrypt = CryptBuffer(@dummy,StringByteLength(dummy) + 2,"Password")
If *encrypt
*decrypt = CryptBuffer(*encrypt,MemorySize(*encrypt),"Password",#True)
If *decrypt
ShowMemoryViewer(*decrypt ,MemorySize(*decrypt))
FreeMemory(*decrypt)
EndIf
FreeMemory(*encrypt)
EndIf
ProcedureReturn
EndProcedure
Main()
End
Edit:
I dont know about the loading part.
Ogre is unable to load stuff from memory iirc.