Convert Text "Ù×÷ϵͳ¡£ ÇëÉý¼¶Ä" to Traditional Chinese

[cu0x]

Hello guys,

 

im trying to solved a problem that I have.

 

Need to get some chinese text from an old Wise script, and in the wise file says f.e. Ù×÷ϵͳ¡£ ÇëÉý¼¶Ä. Is there any way to convert it to traditional chinese?

 

Already tryied the following code...

 

expandcollapse popup

#include <MsgBoxConstants.au3>

Example()

Func Example()
    ; Define the string that will be converted later.
    ; NOTE: This string may show up as ?? in the help file and even in some editors.
    ; This example is saved as UTF-8 with BOM.  It should display correctly in editors
    ; which support changing code pages based on BOMs.
    Local Const $sString = "Ù×÷ϵͳ¡£ ÇëÉý¼¶Ä"

    ; Temporary variables used to store conversion results.  $dBinary will hold
    ; the original string in binary form and $sConverted will hold the result
    ; afte it's been transformed back to the original format.
    Local $dBinary = Binary(""), $sConverted = ""

    ; Convert the original UTF-8 string to an ANSI compatible binary string.
    $dBinary = StringToBinary($sString)

    ; Convert the ANSI compatible binary string back into a string.
    $sConverted = BinaryToString($dBinary)

    ; Display the resulsts.  Note that the last two characters will appear
    ; as ?? since they cannot be represented in ANSI.
    DisplayResults($sString, $dBinary, $sConverted, "ANSI")

    ; Convert the original UTF-8 string to an UTF16-LE binary string.
    $dBinary = StringToBinary($sString, 2)

    ; Convert the UTF16-LE binary string back into a string.
    $sConverted = BinaryToString($dBinary, 2)

    ; Display the resulsts.
    DisplayResults($sString, $dBinary, $sConverted, "UTF16-LE")

    ; Convert the original UTF-8 string to an UTF16-BE binary string.
    $dBinary = StringToBinary($sString, 3)

    ; Convert the UTF16-BE binary string back into a string.
    $sConverted = BinaryToString($dBinary, 3)

    ; Display the resulsts.
    DisplayResults($sString, $dBinary, $sConverted, "UTF16-BE")

    ; Convert the original UTF-8 string to an UTF-8 binary string.
    $dBinary = StringToBinary($sString, 4)

    ; Convert the UTF8 binary string back into a string.
    $sConverted = BinaryToString($dBinary, 4)

    ; Display the resulsts.
    DisplayResults($sString, $dBinary, $sConverted, "UTF8")
EndFunc   ;==>Example

; Helper function which formats the message for display.  It takes the following parameters:
; $sOriginal - The original string before conversions.
; $dBinary - The original string after it has been converted to binary.
; $sConverted- The string after it has been converted to binary and then back to a string.
; $sConversionType - A human friendly name for the encoding type used for the conversion.
Func DisplayResults($sOriginal, $dBinary, $sConverted, $sConversionType)
    MsgBox($MB_SYSTEMMODAL, "", "Original:" & @CRLF & $sOriginal & @CRLF & @CRLF & "Binary:" & @CRLF & $dBinary & @CRLF & @CRLF & $sConversionType & ":" & @CRLF & $sConverted)
EndFunc   ;==>DisplayResults

Thanks a lot!

[Jos]

What would the proper Chinese output look like so I can have a play and check?

Jos

[jchd]

Post the actual hex content of the source instead of having it interpreted as characters in whatever codepage.

Traditional Chinese codepage is 50229 and this is not the encoding used here (at least by submitting hex from the characters you pasted, probably already interpreted outside their initial encoding).

[Jury]

Is that little endian ? :

쌢쎙쎗쎷슏쎵슍슳슡₣蟃ꯃ觃뷃볂뛂蓃

Edited August 13, 2017 by Jury