Hi guys, sorry  for my delay...<div><br></div><div>I made this:</div><div><br></div><div><div>function FlipText(AText: string): string;</div><div>var</div><div>  I: Integer;</div><div>begin</div><div>  AText := LowerCase(AText);</div>

<div>  for I := 1 to Length(AText) do</div><div>  begin</div><div>    case AText[I] of</div><div>      'a': Result := 'ɐ' + Result;</div><div>      'b': Result := 'q' + Result;</div><div>      'c': Result := 'ɔ' + Result;</div>

<div>      'd': Result := 'p' + Result;</div><div>      'e': Result := 'ǝ' + Result;</div><div>      'f': Result := 'ɟ' + Result;</div><div>      'g': Result := 'b' + Result;</div>

<div>      'h': Result := 'ɥ' + Result;</div><div>      'i': Result := 'ı' + Result;</div><div>      'j': Result := 'ɾ' + Result;</div><div>      'k': Result := 'ʞ' + Result;</div>

<div>      'l': Result := 'ן' + Result;</div><div>      'm': Result := 'ɯ' + Result;</div><div>      'n': Result := 'u' + Result;</div><div>      'p': Result := 'd' + Result;</div>

<div>      'q': Result := 'b' + Result;</div><div>      'r': Result := 'ɹ' + Result;</div><div>      't': Result := 'ʇ' + Result;</div><div>      'u': Result := 'n' + Result;</div>

<div>      'v': Result := 'ʌ' + Result;</div><div>      'w': Result := 'ʍ' + Result;</div><div>      'y': Result := 'ʎ' + Result;</div><div>      '.': Result := '˙' + Result;</div>

<div>      ',': Result := '''' + Result;</div><div>      '''': Result := ',' + Result;</div><div>      '"': Result := ',,' + Result;</div><div>      ';': Result := '؛' + Result;</div>

<div>      '!': Result := '¡' + Result;</div><div>      #161: Result := '!' + Result;</div><div>      '?': Result := '¿' + Result;</div><div>      #191: Result := '?' + Result;</div>

<div>      '[': Result := ']' + Result;</div><div>      ']': Result := '[' + Result;</div><div>      '(': Result := ')' + Result;</div><div>      ')': Result := '(' + Result;</div>

<div>      '{': Result := '}' + Result;</div><div>      '}': Result := '{' + Result;</div><div>      '<': Result := '>' + Result;</div><div>      '>': Result := '<' + Result;</div>

<div>      '_': Result := '‾' + Result;</div><div>    else</div><div>      Result := AText[I] + Result;</div><div>    end;</div><div>  end;</div><div>end;</div></div><div><br></div><div>Is not the 'best funtion', but it's something. ^^</div>

<div><br>-- <br>Silvio Clécio,<br><div><span style="font-family:arial"><div><div><span style="font-family:arial"><div><b><span style="color:rgb(204, 204, 204)"><span style="background-color:rgb(68, 68, 68)">programmer</span></span></b><span style="font-family:arial"><span style="font-family:arial"><span style="color:white"><span style="color:rgb(204, 204, 204)"><span style="background-color:rgb(68, 68, 68)"> </span></span><b><span style="color:rgb(68, 68, 68)"><span style="background-color:rgb(68, 68, 68)"><span style="color:rgb(106, 168, 79)">ObjectPascal</span></span></span></b></span></span></span></div>

</span></div></div></span></div>
</div>