URL decoding: Difference between revisions

Content deleted Content added
→‎{{header|M2000 Interpreter}}: correction for working with utf-8
Line 714:
acc$=str$(a$(0))
While k {
acc$+=str \\ chr$(ChrCode$(Eval("0x"+left$(a$(k^),2)))+Mid$(a$(k^),3)) convert to UTF16LE
\\ str$() convert to ANSI using locale (can be 1033 we can set it before as Locale 1033)
\\ so chr$(0x93) give 0x201C
\\ str$(chr$(0x93)) return one byte 93 in ANSI as string of one byte length
\\ numbers are for UTF-8 so we have to preserve them
acc$+=str$(Chr$(Eval("0x"+left$(a$(k^),2)))+Mid$(a$(k^),3))
}
=acc$