home *** CD-ROM | disk | FTP | other *** search
/ The Datafile PD-CD 5 / DATAFILE_PDCD5.iso / utilities / c / cdlocker / !CD / !Run < prev    next >
Encoding:
Text File  |  1996-06-21  |  883 b   |  29 lines
  1. |!RunFile for CD Locker
  2.  
  3. IconSprites <Obey$Dir>.!Sprites
  4.  
  5. rmensure cdfsdriver 0.00 error You have no CD drive configured + set up, don't bother using this program.
  6.  
  7. Set CDUNL$Flag "None"
  8. Set CDCom$Flag "None"
  9.  
  10. <Obey$Dir>.!RunImage
  11.  
  12. IF CDUNL$Flag="False" THEN <Obey$Dir>.!Run
  13.  
  14. IF CDUNL$Flag="Lock" THEN <Obey$Dir>.CDLock
  15. IF CDUNL$Flag="Unlock" THEN <Obey$Dir>.CDUnlock
  16. IF CDUNL$Flag="Permanent" THEN <Obey$Dir>.CDLock
  17. IF CDUNL$Flag="NotPerm" THEN <Obey$Dir>.CDUnlock
  18. IF CDUNL$Flag="Permanent" THEN <Obey$Dir>.Permanent
  19. IF CDUNL$Flag="NotPerm" THEN <Obey$Dir>.NotPerm
  20.  
  21. IF CDCom$Flag="Dis" THEN <Obey$Dir>.StopComms
  22. IF CDCom$Flag="Ena" THEN <Obey$Dir>.StartComms
  23. IF CDCom$Flag="PDis" THEN <Obey$Dir>.StopComms
  24. IF CDCom$Flag="PEna" THEN <Obey$Dir>.StartComms
  25. IF CDCom$Flag="PDis" THEN <Obey$Dir>.PermanentC
  26. IF CDCom$Flag="PEna" THEN <Obey$Dir>.NotPermC
  27.  
  28. Unset CDUNL$Flag
  29. Unset CDCom$Flag