Beispiele

test$ =" Sonderzeichen : äöüÄÖÜ ß []{}"
FOR i=1 TO 6
r$= CHARSET CONVERT$ ( test$ ; 2 ; i)
l= SLEN (r$)
linelen =0
FOR n=1 TO l
is_umlaut = SPOS ("äöüÄÖÜ ß " ; r$[n;n])
! DISP is_umlaut "\n"
IF NUM(r$[n]) >=32 AND NUM (r$[n ]) <=127 OR is_umlaut
THEN
DISP r$[n;n]
ELSE
DISP "{" NUM(r$[n]) "}"
linelen = linelen+5
END IF
IF linelen >60 THEN
DISP "\n >"
linelen=0
END IF
linelen = linelen+1
NEXT
DISP "\n"
NEXT
: Sonderzeichen : [ae ][ oe ][ ue ][ Ae ][ Oe ][ Ue ][ ss ][]{}
: Sonderzeichen : äöüÄÖÜ ß []{}
: Sonderzeichen : \[ ADoubleDot ]\[ ODoubleDot ]\[ uDoubleDot ]\[ Capita
: >lADoubleDot ]\[ CapitalODoubleDot ]\[ CapitalUDoubleDot ]\[ SZ ]\[ Ra
: >wLeftBracket ]\[ RawRightBracket ]\[ RawLeftBrace ]\[ RawRightBrace
: >]
: Sonderzeichen :& nbsp ;& auml ;& ouml ;& uuml ;& Auml ;& Ouml ;& Uuml ;& szlig
: >;[]{}
: Sonderzeichen :{ 194}{ 160}{ 195}{ 164}{ 195}{ 182}{ 195}{ 188}
: >{ 195}{ 132}{ 195}{ 150}{ 195}{ 156}{ 195}{ 159}[]{}
: Sonderzeichen :~"a"o"u"A"O"U\ss []\{\}

Referenz

CHARSET CONVERT$ ( String$ ; BasisTyp|BasisTyp$ ; ErgebnisTyp|ErgebnisTyp$)
Die Funktion konvertiert eine Zeichenkette von einem Format in ein anderes Format um. Als Quellund- und als Zielformat werden die Formate ISO-8859-15, AKSO, Mathematica, HTML, UTF-8 sowie LaTex akzeptiert. Das Ausgangsformat sowie das Zielformat kann numerisch oder in Textform gemäß folgender Tabelle angegeben werden:

Format

Numerisch

Bedeutung

AKSO

1

AKSO-/INVEP interne Universalkodierung

ISO

2

ISO-8859-15 Zeichensatz (mit Euro-Zeichen)

Mathematica

3

Wolfram-Mathematica Zeichensatz

HTML

4

Internet-/HTML-Zeichenkodierung

UTF8

5

standartisierte UTF-8 Zeichenkodierung

LaTex

6

Sonderzeichen werden gemäß LaTex-Standard kodiert

Lernbeispiele

Siehe auch



Schatten