replace _ with space
This commit is contained in:
parent
06daa57ba5
commit
2ec5691e28
1 changed files with 4 additions and 1 deletions
|
@ -2,6 +2,7 @@
|
||||||
|0100
|
|0100
|
||||||
;bottles-of-beer print
|
;bottles-of-beer print
|
||||||
;on-the-wall print
|
;on-the-wall print
|
||||||
|
( incrment num )
|
||||||
;bottles-of-beer print
|
;bottles-of-beer print
|
||||||
BRK
|
BRK
|
||||||
|
|
||||||
|
@ -15,7 +16,9 @@
|
||||||
|
|
||||||
@print ( str* -: )
|
@print ( str* -: )
|
||||||
( LDAk LIT "_ NEQk ?print/space )
|
( LDAk LIT "_ NEQk ?print/space )
|
||||||
LDAk #18 DEO
|
LDAk DUP #5f NEQ
|
||||||
|
?{ POP #20 }
|
||||||
|
#18 DEO
|
||||||
INC2 LDAk ?print
|
INC2 LDAk ?print
|
||||||
( print newline )
|
( print newline )
|
||||||
#0a #18 DEO
|
#0a #18 DEO
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue