home *** CD-ROM | disk | FTP | other *** search
/ ftp.barnyard.co.uk / 2015.02.ftp.barnyard.co.uk.tar / ftp.barnyard.co.uk / cpm / walnut-creek-CDROM / ZSYS / SIMTEL20 / ZSIG / QUEUE.LBR / DOMULT.ZEX < prev    next >
Text File  |  2000-06-30  |  2KB  |  30 lines
  1. ;;   ZEX command file to process files in a queue on disk.  The 'process'
  2. ;;   to perform is passed to this file as the first parameter.  As only
  3. ;;   the names and not the extents of files are stored in the queue,
  4. ;;   the second parameter passed is presumed to be an extent.  As many
  5. ;;   as three more parameters may be passed also; they will be unchanged.
  6. ;;   Note that the presumed extent is 'stuck' directly onto the filename
  7. ;;   and therefore the second parameter MUST be an appropriate extent.
  8. ;;   The name and extent cannot be concatenated directly in this ZEX
  9. ;;   file; to do so would require passing SH a token like '%QP$2', which
  10. ;;   it would fail to recognize as a legitimate variable name.  Instead
  11. ;;   the concatenation is done by the alias QSPECIAL.  Another slightly
  12. ;;   more elegant way to do it, not requiring an additional file, would
  13. ;;   be to do   SETFILE 1 %QP   right after the label FIRST and then
  14. ;;   concatenate the references to FILE 1 and parameter number two
  15. ;;   right here in the ZEX file.  The problem is that I haven't found any
  16. ;;   way to refer to these system files from within ZEX files; The Manual
  17. ;;   is still in limbo --  perhaps it will have an answer when it appears.
  18. ;;                                                -RDN
  19. SH
  20. SHVAR QP %QH;GO CLTAIL $2 $3 $4 $5
  21. GOTO FIRST
  22. ;=LOOP
  23. SHVAR SWITCH SHVAR QP %%%QP
  24. %SWITCH
  25. ;=FIRST
  26. QSPECIAL $1 %QP $2 $3 $4 $5;IF %QP=%QT;GOTO END;ELSE;XIF;GOTO LOOP;FI
  27. ;=END
  28. XIF
  29. SHEXIT
  30. ;;   end of ZEX command file