How to print utf8 text "Klöße" out to console ?

[Octopus]

How to do this in a way, which will be working on all supported operating systems?

[luis]

Woks on Windows, does not work elsewhere ?

Code: Select all

CompilerIf (#PB_Compiler_Unicode = 1)
 OpenConsole()
 Print("Klöße")
 Input()
 CloseConsole()
CompilerElse 
 CompilerError "Enable Unicode"
CompilerEndIf

[Octopus]

Thanks for this fillip!

[Shield]

If you don't want to use Unicode, you can use this for Windows:

Code: Select all

OpenConsole()
text$ = "Klöße"
CharToOem_(@text$, @text$)
Print(text$)
Input()