Chili Palmer
7e6fa6ea88
Entscheidungen festgehalten: TBVM bestaetigt und eingebettet in die Executables; durchgaengig UTF-8 statt CP437 (dokumentierte Abweichung). - docs/: Sprachreferenz, Forms-Referenz, Dateiformate, TBVM-Design - tb-runtime::errors: klassischer Laufzeitfehler-Katalog (implementiert) - tb-ui::screen: 80x25-Unicode-Zellenpuffer mit 16-Farben-Abbildung, Scrollbereich (VIEW PRINT), Letterboxing; Ratatui-Widget + Tests - Spike: cargo run -p tb-ui --example spike (Farben, Unicode, Tasten, Maus) - tests/compat/: erste Referenzprogramme mit byte-genauer Sollausgabe Co-Authored-By: Claude Fable 5 <noreply@anthropic.com>
13 lines
328 B
QBasic
13 lines
328 B
QBasic
' Stringfunktionen; LEN zählt Zeichen (UTF-8-Abweichung dokumentiert)
|
|
s$ = "Terminal Basic"
|
|
PRINT LEN(s$)
|
|
PRINT LEFT$(s$, 8)
|
|
PRINT RIGHT$(s$, 5)
|
|
PRINT MID$(s$, 10, 3)
|
|
PRINT INSTR(s$, "Basic")
|
|
PRINT UCASE$("äöü grüße")
|
|
PRINT STRING$(5, "*"); SPACE$(3); "|"
|
|
PRINT CHR$(65); ASC("A")
|
|
PRINT STR$(42); "|"; VAL(" 12.5abc")
|
|
END
|