\ ----------------------------------------------------------------------- \ 4-1.forth ------------------------------------------------------------- \ ----------------------------------------------------------------------- \ Code from Starting Forth Chapter 4 \ ANSized by Benjamin Hoyt in 1997 ( problem 4-1 ) -1 0= 0= ( true ) . 0 0= 0= ( false ) . 200 0= 0= ( true ) .