home *** CD-ROM | disk | FTP | other *** search
- .key dir
- .bra {
- .ket }
-
- IF "{dir}" EQ ""
- ECHO ""
- ECHO "Installation file for PLT: device"
- ECHO " Once installed, MOUNT PLT: and send HPGL files"
- ECHO " to PLT:"
- ECHO ""
- ECHO " To install, a directory must be created for PLT's"
- ECHO " data files for printing HPGL text."
- ECHO " Specify the parent directory (MUST END WITH ':' OR '/'"
- ECHO " Example: EXECUTE Install-PLT Work:"
- ECHO " or"
- ECHO " EXECUTE Install-PLT Data:CAD/"
- ECHO ""
- QUIT
- ENDIF
-
- ECHO "Directory set to [{dir}]"
-
- IF NOT EXISTS "{dir}"
- ECHO ""
- ECHO "Directory path {dir} doesn't exist"
- ECHO ""
- QUIT
- ENDIF
-
- MAKEDIR {dir}PlotData
- COPY PlotData/#? {dir}PlotData
- ECHO >PLT-assign "ASSIGN PLTdata: {dir}PlotData"
- EXECUTE PLT-assign ; Perform the ASSIGN so PLT will work
- JOIN S:User-StartUp PLT-assign as User-StartUp ; So will work on re-boot
- COPY User-StartUp S:
-
- COPY plt-handler L:
-
- JOIN Devs:MountList MountList.PLT as MountList
- COPY MountList Devs:
-
-