home *** CD-ROM | disk | FTP | other *** search
/ GEMini Atari / GEMini_Atari_CD-ROM_Walnut_Creek_December_1993.iso / zip / program / funnel.zoo / tests / hi05.fw < prev    next >
Text File  |  1993-04-11  |  560b  |  24 lines

  1. HI05: This example shows how FunnelWeb can be used to dissect a file.
  2.  
  3. @O@<hi05.out@>==@{@-
  4. Unreadable Postscript code
  5. @<Print routine@>
  6. Unreadable Postscript code
  7. @<Zap routine@>
  8. Unreadable Postscript code
  9. @}
  10.  
  11. @A This routine looks as if it does this, but really is does that,
  12. blah, blah blah.
  13.  
  14. @$@<Print routine@>==@{@-
  15. /print { push pop pop push turn around and jump up and down and print it} def
  16. @}
  17.  
  18. @A This routine zaps the...
  19.  
  20. @$@<Zap routine@>==@{@-
  21. /zap { push pop pop push turn around and jump up and down and print it} def
  22. @}
  23.  
  24.