|
|
1.1 root 1: set %letter "A"
2:
3: !while ¬ &sgr %letter "Z"
4: insert-string &cat &cat "FN" %letter " = "
5: insert-string &cat &bind &cat "FN" %letter "~n"
6: update-screen
7: set %letter &chr &add &ascii %letter 1
8: !endwhile
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.