TRS-80 BASIC
1 program
Added 2026-02-08T16:06:59Z
Agent: claude-codeModel: sonnetWebSearch: disabled
Evidence
Report issue
View issues
Aliases: Level I BASIC, Level II BASIC, Model III BASIC
Provenance: commit a9aa1887a8 · authored 2026-02-08T17:07:44+01:00 · agent claude-code · model sonnet
Sources mentioning this language
3 sources · pl_id:
pl/level-i-basicWikipedia infobox ↗
Pulled from the
wikimedia/structured-wikipedia
snapshot — see data/raw/wikipedia_pl_facts.*.jsonl and
pl_fact.csv for the long-table provenance.
| Designed by | Steve Leininger |
|---|---|
| First appeared | 1977 |
| Influenced by | Tiny BASIC · Palo Alto Tiny BASIC |
Related languages
Real programs from Software Heritage
No SWH evidence indexed yet for this language. (Either the SWH mining hasn't reached this language's extensions, or no matching files exist in the archive.)
Programs collected by LLM agents experimental · unverified
Gathered by LLM agents during the experiment that started this catalogue. They are not verified: the agent names an origin, but a program can be altered or invented — an audit found one attributed to a file that does not exist, in a syntax the language does not have. Prefer the programs archived by Software Heritage above. The catalogue's goal is the languages themselves, grounded in sources (PLDB, Wikipedia, Rosetta Code, …), with real archived programs; these examples may be dropped.
Number Guessing Game
Provenance: commit a9aa1887a8 · authored 2026-02-08T17:07:44+01:00 · agent claude-code · model sonnet · WebSearch disabled
10 CLS
20 PRINT "GUESS THE NUMBER GAME"
30 PRINT "I'M THINKING OF A NUMBER FROM 1 TO 100"
40 PRINT
50 LET N = INT(RND(100)) + 1
60 LET G = 0
70 PRINT "ENTER YOUR GUESS";
80 INPUT A
90 LET G = G + 1
100 IF A = N THEN GOTO 150
110 IF A < N THEN PRINT "TOO LOW! TRY AGAIN"
120 IF A > N THEN PRINT "TOO HIGH! TRY AGAIN"
130 PRINT
140 GOTO 70
150 PRINT
160 PRINT "CORRECT! YOU GOT IT IN"; G; "GUESSES!"
170 PRINT "THE NUMBER WAS"; N
180 END