Könnte mir eine nette Person mal ein kleines BASIC Programm unter CP/M in MBasic starten und davon einen Screenshot anfertigen damit ich eine Farbreferenz habe?
BastetFurry
Leider kam bei Deinem Programm keine Farben bei mir raus
Deshalb habe ich mal ein eigenes Programm geschrieben.
- 1 WIDTH 255
- 2 PRINT CHR$(27);"[0;0m "
- 5 PRINT "NORMAL ANSI-Code COLORS:"
- 10 FOR F=30 TO 39
- 20 FOR B=40 TO 49
- 30 A$=STR$(F):B$=STR$(B)
- 40 C$=MID$(A$,2,LEN(A$)):D$=MID$(B$,2,LEN(B$))
- 50 PRINT CHR$(27);"[";C$;";";D$;"m A";
- 60 NEXT B
- 65 PRINT CHR$(27);"[0;0m "
- 70 NEXT F
- 80 PRINT
- 85 PRINT CHR$(27);"[0;0m "
- 90 PRINT "BRIGHT ANSI-Code COLORS:"
- 110 FOR F=90 TO 97
- 120 FOR B=100 TO 107
- 130 A$=STR$(F):B$=STR$(B)
- 140 C$=MID$(A$,2,LEN(A$)):D$=MID$(B$,2,LEN(B$))
- 150 PRINT CHR$(27);"[";C$;";";D$;"m A";
- 160 NEXT B
- 165 PRINT CHR$(27);"[0;0m "
- 170 NEXT F
Display More
ANSI-Farben habe ich nach folgender Seite genutzt (siehe Color Codes Bereich).
Die normalen Vordergrund-Farben gehen von 30-39 und der normale Hintergrund von 40-49.
In Bright-Modus geht fuer den Vordergrund von 90-97 und Hintergrund 100-107.
Wobei im normalen Modus der erste (30 black) und letzte (39 default) Hintergrund gleich ist.
PS: Die Umwandlung der Zahlen fuer die ANSI Codes mit STR$ und MID$ werden noetig, weil man die Zahlen nicht als Zahl/String direkt mit PRINT nutzen kann.
Bei Zahlen wird ansonsten vorne und hinten ein Leerzeichen an die Zahl angehaent.
Bei Strings (umgewandelte Zahlen per STR$) wird immer noch vorne ein Leerzeichen angehaengt.
So wandle ich auf String und schneide mit dem MID$ vrone das eine Leezeichen ab.
PS2: WIDTH 255 ist notwendig, da wir mit den ANSI-Codes mehr (versteckte) als 80 Zeichen pro Zeile ausgeben (255 ist der Maximal-Wert pro Zeile) - ansonsten kann die Zeile zerstueckelt werden.
Das gibt dann (mit RunCPM v6.3 auf dem VGA32) und Tera Term folgenden Screenshot:
In puTTY sehen die Farben kaum anders aus :
und auf dem VGA-TFT am VGA32 sieht das so aus: