1
0
mirror of https://github.com/hsoft/collapseos.git synced 2024-11-05 22:00:54 +11:00
collapseos/blk/152
2020-06-03 20:28:18 -04:00

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