Welcome to the Parallax Discussion Forums, sign-up to participate.
That's all it does. However, the PASM code does show how the inner loop, stacks and a small number of basic words are implemented. In future updates I will add the dictionary structure and the outer interpreter, which will allow for interactivity and the ability to compile new words.
create hellostr char H c, char e c, char l c, char l c, char o c, 32 c, char W c, char o c, char r c, char l c, char d c, : type ( addr num -- ) begin dup while 1 - swap dup c@ emit 1 + swap repeat drop drop ; : hello ( -- ) begin hellostr 11 type 13 emit again ; hello