Just a wild guess... 

set a="SECRETARIA DE ADMINISTRAÃ"_$c(135)_"Ã"_$c(131)_"O^1010^01010101"set b="SECRETARIA DE ADMINISTRAÇÃO^1010^01010101"set c=$zcvt(a,"I","UTF8")
if b=c {write"convert from UTF8" } else { write"no idea..." }