//ENCODE
//String to BufferToPhrase
// Encode
MyBuffer is Buffer = Encode("teste", encodeBASE64)
Trace (BufferToPhrase(MyBuffer, languageEnglish)

// contains "gold deny ozone silk inspire ozone"

//Decode
//String to BufferToPhrase
sPhraseEN is string = "gold deny ozone silk inspire ozone"
MyBuffer is Buffer = (BufferToHexa(PhraseToBuffer(sPhraseEN)))
sText is Buffer = HexaToBuffer(MyBuffer)
Trace (Decode(sText, encodeBASE64))

//contains "teste"