Not logged in

Differences From Artifact [d359f0894c18db96]:

File hangman/graphics.retro part of check-in [eca5386b7f] - Check in of hangman game from the forthlets part of the main Retro repo. by charleschilders on 2010-05-31 21:51:52. [annotate] [view]

To Artifact [a0e2e207bb4fb4ff]:

File hangman/graphics.retro part of check-in [0c2cfa8b8b] - Update hangman game to work with chained vocabularies. by charleschilders on 2010-07-25 00:28:17. [annotate] [view]


@@ -5,11 +5,11 @@
 ( Copyright [c] 2010, Marc Simpson                             )
 ( License: ISC                                                 )
 ( ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ )
 
-&console open
 ( --[ Drawing Routines ]-------------------------------------- )
 
+: at-xy \console.at-xy ;
 : bar ( xyn- ) push at-xy pop for char: - emit next ;
 : col ( xyn- ) for 2dup at-xy char: | emit 1+ next 2drop ;
 
 ( --[ Stages ]------------------------------------------------ )