home *** CD-ROM | disk | FTP | other *** search
/ CP/M / CPM_CDROM.iso / jsage / znode3 / z3util / queue.lbr / ADDQ.ZEX next >
Encoding:
Text File  |  1993-06-07  |  640 b   |  11 lines

  1. ;;   ZEX command file for adding a filename to a queue of filenames
  2. ;;   in the SH.VAR file.  'QH' is a variable that points to the
  3. ;;   head item in the queue, 'QT' points to the last item.  The last
  4. ;;   item always points to the new item.  REGister 1 is used as a
  5. ;;   flag to indicate whether anything is already in the queue or not.
  6. ;;   A value of 0 in REG 1 indicates that the queue is empty.
  7. ;;                                                     -RDN
  8. SH
  9. IF 1;SHVAR QH $1;GO QT $1;REG S1 1;ELSE;SHVAR %QT $1;GO QT $1;FI
  10. SHEXIT
  11. ;;   end of ZEX command file