Traditionally forths have redefined common used numbers as words, this system provides the words
0 CONSTANT zero
Traditionally forths have redefined common used numbers as words, this system provides the words
1 CONSTANT one
Traditionally forths have redefined common used numbers as words, this system provides the words
2 CONSTANT two
Traditionally forths have redefined common used numbers as words, this system provides the words
3 CONSTANT three
Traditionally forths have redefined common used numbers as words, this system provides the words
4 CONSTANT four
Traditionally forths have redefined common used numbers as words, this system provides the words
8 CONSTANT eight
Duplicate the top four stack items.
: 4dup ( a b c d -- a b c d )
2OVER 2OVER
;
Third stack item copied to the top.
.S .( jump)
: jump ( a b c -- a b c a )
two PICK
;
Can't write size independent character code without this word.
: char! ( addr -- character )
C!
; inline \ renamed zero over head
Can't write size independent character code without this word.
: char@ ( addr -- character )
C@
; inline
You use CHAR top get from characters to bytes, you use byte>char get from bytes to char
: bytes>chars ( n -- n2)
; inline