mirror of
https://github.com/hsoft/collapseos.git
synced 2024-11-27 19:08:06 +11:00
5 lines
164 B
Plaintext
5 lines
164 B
Plaintext
'? CASE NOT [IF] 1 2 LOADR+ [THEN] DROP ( from '? )
|
|
'? FILL NOT [IF] 3 LOAD+ [THEN] DROP
|
|
'? EMPTY NOT [IF] 4 LOAD+ [THEN] DROP
|
|
'? WIPE NOT [IF] 5 LOAD+ [THEN] DROP
|