' tb-screen: 80x25
' tb-tempdir
' tb-keys: <F1>ä😀
' TerminalBasic-Codepointvertrag; keine historische Bytekompatibilitaet.
a$ = INPUT$(1)
b$ = INPUT$(1)
PRINT LEN(a$); ASC(a$); LEN(b$); ASC(b$); INPUT$(2)
OPEN "eingabe.txt" FOR OUTPUT AS #1
WRITE #1, "a,b", "ä😀", 5
WRITE #1, "Ende"
CLOSE
OPEN "eingabe.txt" FOR INPUT AS #1
INPUT #1, a$
INPUT #1, b$, n%
PRINT a$; ":"; b$; n%
PRINT INPUT$(1, #1)
LINE INPUT #1, a$
PRINT a$; EOF(1)
CLOSE
KILL "eingabe.txt"
END
