(dotdash) Added new project
This commit is contained in:
parent
c1ada0d3a6
commit
0132d025cd
|
@ -0,0 +1,18 @@
|
|||
( . _ )
|
||||
|
||||
|10 @Console &vector $2 &read $1 &pad $4 &type $1 &write $1 &error $1
|
||||
|
||||
|100
|
||||
|
||||
@on-reset ( -> )
|
||||
;on-console .Console/vector DEO2
|
||||
BRK
|
||||
|
||||
@on-console ( -> )
|
||||
[ LITr -Console/read ] DEIr #f8
|
||||
&>l ( -- )
|
||||
[ LIT2 "._ ] STHkr #01 AND ?{ SWP }
|
||||
POP #18 DEO
|
||||
[ LITr 01 ] SFTr INC DUP ?&>l
|
||||
POP POPr BRK
|
||||
|
Loading…
Reference in New Issue