home *** CD-ROM | disk | FTP | other *** search
/ The Datafile PD-CD 5 / DATAFILE_PDCD5.iso / utilities / a / armforth / !Forth / Forth / utility / mm < prev    next >
Encoding:
Text File  |  1991-04-09  |  258 b   |  11 lines
  1. : testz cr 1000 0 do i . cr loop ;
  2. : slow 1000000 0 do loop ;
  3. : bleep 100 0 do 20000 0 do loop 7 vdu loop ; 
  4. : ss cr
  5.   hex
  6.   [ Status : ] quantam @ . cr
  7.   [ Queue  : ] quantam 4+ @ . cr
  8.   [ Usage  : ] quantam 4+ 4+ @ quantam 4+ 4+ 4+ @ . 127 vdu . cr dec
  9. ;
  10.  
  11.