Hey@all
Ich möchte eine andere Text-Codierung machen. Darum gehts:
Spoiler anzeigen
[autoit]
Dim $abc[16]=[0,1,2,3,4,5,6,7,8,9,"A","B","C","D","E","F"]
$string=" "
For $b=0 To UBound($abc)-1
$string&=$abc[$b]&" "
Next
$string&=@CRLF
For $a=0 To UBound($abc)-1
$string&=$abc[$a]&" "
For $b=0 To UBound($abc)-1
$string&=StringReplace(StringReplace(StringReplace(String(BinaryToString("0x"&$abc[$a]&$abc[$b]))&" ",@LF,""),@CR,""),@TAB,"")
Next
$string&=@CRLF
Next
MsgBox(0,"Binary Code",$string)
Wäre schön wenn man dann auch alle auswählen könnte und alle verfügbaren Zeichen so sehen könnte (Unicode,UTF-8,...)
Thx4Help