XProfan

Titre de la fenêtre "Mathematische Symbole sans guten Zugriff"
'=====================================================
Fenêtre Style 24:CLS:imprimer
AppendMenuBar 100," Font- Chr$()    Beschreibunng"
Font 1:imprimer " 1-  9 ",Chr$( 9),:Font 0:imprimer " Kleiner Kreis, "
Font 1:imprimer " 1- 11 ",Chr$(11),:Font 0:imprimer " männlich, "
Font 1:imprimer " 1- 12 ",Chr$(12),:Font 0:imprimer " féminine, "
Font 1:imprimer " 1 -15 ",Chr$(15),:font 0:imprimer " Operator (soleil), "
Font 1:imprimer " 1- 19 ",Chr$(19),:font 0:imprimer " Doppelfakultät, "
Font 2:imprimer " 2- 20 ",Chr$(20),:font 0:imprimer " Pi-Symbol, "
Font 1:imprimer " 1- 21 ",Chr$(21),:font 0:imprimer " paragraphe, "
Font 2:imprimer " 2- 21 ",Chr$(21),:font 0:imprimer " la base-Symbol (Inv.T), "
Font 1:imprimer " 1- 24 ",Chr$(24),:font 0:imprimer " Hochpfeil, "
font 1:imprimer " 1- 26 ",Chr$(26),:font 0:imprimer " Folgepfeil, "
font 1:imprimer " 1- 27 ",chr$(27),:font 0:imprimer " Linkshinweispfeil, "
font 1:imprimer " 1- 29 ",Chr$(29),:font 0:imprimer " Kleine Äquivalenz, "
font 1:imprimer " 1-127 ",Chr$(127),:font 0:imprimer " maison, "
font 1:imprimer " 1-120 ",Chr$(120),:font 0:imprimer " la fois-Croix, "
font 1:imprimer " 1-134 ",Chr$(134),:font 0:imprimer " Angström, "
Font 2:imprimer " 2-164 ",Chr$(164),:font 0:imprimer " Allg.Währungssymbol, "
font 2:imprimer " 2-168 ",chr$(168),:font 0:imprimer " Oberpunkte, "
font 1:imprimer " 1-159 ",chr$(159),:font 0:imprimer " Funktionssymbol, "
font 2:imprimer " 2-166 ",chr$(166),:font 0:imprimer " Teilt-symbol, "
font 2:imprimer " 2-169 ",Chr$(169),:font 0:imprimer " Copyright, "
Waitinput:CLS:imprimer
font 1:imprimer " 1-172 ",chr$(172),:font 0:imprimer " 1/4 , "
font 1:imprimer " 1-171 ",chr$(171),:font 0:imprimer " 1/2 , "
font 2:imprimer " 2-190 ",chr$(190),:font 0:imprimer " 3/4 , "
font 2:imprimer " 2-172 ",chr$(172),:font 0:imprimer " Non-Symbol, "
font 2:imprimer " 2-171 ",chr$(171),:font 0:imprimer " très viel kleiner comme, "
font 1:imprimer " 1-175 ",chr$(175),:font 0:imprimer " très viel größer comme, "
font 2:imprimer " 2-174 ",chr$(174),:font 0:imprimer " Registered Trademark, "
font 2:imprimer " 2-177 ",chr$(177),:font 0:imprimer " +\-, "
font 2:imprimer " 2-176 ",chr$(176),:font 0:imprimer " Grad \ hoch 0, "
font 2:imprimer " 2-185 ",chr$(185),:font 0:imprimer " hoch 1, "
font 2:imprimer " 2-178 ",chr$(178),:font 0:imprimer " hoch 2, "
font 2:imprimer " 2-179 ",chr$(179),:font 0:imprimer " hoch 3, "
font 2:imprimer " 2-215 ",chr$(215),:font 0:imprimer " la fois-Croix, "
font 2:imprimer " 0-216 ",:font 0:imprimer chr$(216),:font 0:imprimer " Durchmesser petite, "
font 2:imprimer " 2-248 ",:font 2:imprimer chr$(248),:font 0:imprimer " Durchmesser fett, "
font 2:imprimer " 2-216 ",chr$(216),:font 0:imprimer " Gestrichene zéro, "
font 2:imprimer " 2-226 ",chr$(226),:font 0:imprimer " Tau-Symbol, "
font 1:imprimer " 1-228 ",chr$(228),:font 0:imprimer " Sigma\somme, "
font 1:imprimer " 1-236 ",chr$(236),:font 0:imprimer " Unendlich, "
font 1:imprimer " 1-238 ",chr$(238),:font 0:imprimer " Element de, "
Waitinput:CLS:imprimer
font 1:imprimer " 1-239 ",chr$(239),:font 0:imprimer " Schnittmenge, "
font 1:imprimer " 1- 85 ",chr$( 85),:font 0:imprimer " Vereinigt avec, "
font 1:imprimer " 1-240 ",chr$(240),:font 0:imprimer " Äquivalenz gross, "
font 1:imprimer " 1-241 ",chr$(241),:font 0:imprimer " +\- , "
font 1:imprimer " 1-242 ",chr$(242),:font 0:imprimer " größer-juste, "
font 1:imprimer " 1-243 ",chr$(243),:font 0:imprimer " kleiner-juste, "
font 1:imprimer " 1-244 ",chr$(244),:font 0:imprimer " partie supérieure Integral, "
font 1:imprimer " 1-179 ",Chr$(179),:font 0:imprimer " Mittelteil Integral, "
font 1:imprimer " 1-245 ",chr$(245),:font 0:imprimer " Unterteil Integral, "
font 2:imprimer " 2-247 ",chr$(247),:font 0:imprimer " Divisor, "
font 1:imprimer " 1-247 ",chr$(247),:font 0:imprimer " Ungefähr juste, "
font 1:imprimer " 1-251 ",chr$(251),:font 0:imprimer " Wurzelsymbol, "
font 1:imprimer " 1-234 ",Chr$(234),:font 0:imprimer " Ohm, "
font 2:imprimer " 2-124 ",chr$(124),:font 0:imprimer " Betrag-Strich, "
font 2:imprimer " 2-183 ",chr$(183),:font 0:imprimer " Mittlerer Punkt, "
font 1:imprimer " 1-216 ",chr$(216),:font 0:imprimer " ungleich, "
Waitinput
Fenêtre 0,0-%maxx,%maxy
Cls

whileloop 0,255

    font 0:imprimer "   ";&loop;" ";CHR$(&Boucle),
    font 1:imprimer chr$(&Boucle),
    font 2:imprimer chr$(&Boucle),
    cas %pos>140:imprimer "\n"

endwhile

waitinput