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
|
||||
;bottles-of-beer print
|
||||
;on-the-wall print
|
||||
( incrment num )
|
||||
;bottles-of-beer print
|
||||
BRK
|
||||
|
||||
|
@ -15,7 +16,9 @@
|
|||
|
||||
@print ( str* -: )
|
||||
( LDAk LIT "_ NEQk ?print/space )
|
||||
LDAk #18 DEO
|
||||
LDAk DUP #5f NEQ
|
||||
?{ POP #20 }
|
||||
#18 DEO
|
||||
INC2 LDAk ?print
|
||||
( print newline )
|
||||
#0a #18 DEO
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue