home *** CD-ROM | disk | FTP | other *** search
- echo off
- rem Copyright (C) 1990, CADAM, INC.
- cls
- echo ╔══════════════════════════════════╗
- echo ║ ╔════════════════════════════╗ ║
- echo ║ ║ P-CAD ║ ║
- echo ║ ║ ║ ║
- echo ║ ║ LINKSCH ║ ║
- echo ║ ║ Version 1.00 ║ ║
- echo ║ ║ ║ ║
- echo ║ ║ (C) 1990, CADAM, INC. ║ ║
- echo ║ ╚════════════════════════════╝ ║
- echo ╚══════════════════════════════════╝
- echo .
- echo .
- echo P-CAD Schematic Linker - via PC-NODES & PC-LINK
- echo .
- echo .
- rem delete error logging file
- if exist LINKSCH.LOG del LINKSCH.LOG
- if %1x == x goto :HELP
- rem -----------------------------------------------------------------
- EXDESIGN %1 "LINKSCH2"
- copy EXDESIGN.LOG LINKSCH.LOG >NUL
- if ERRORLEVEL 2 goto :ERROREXIT
- rem -----------------------------------------------------------------
- if exist PCLINK.LOG del PCLINK.LOG
- if exist PCADLINK.LOG del PCADLINK.LOG
- rem transfer to PCADNETS.BAT for output from EXDESIGN
- PCADNETS
- rem -----------------------------------------------------------------
- :HELP
- echo .
- echo Usage:
- echo LINKSCH Design_name
- echo .
- echo .
- goto :EXIT
- :ERROREXIT
- echo .
- echo **********************************************************
- echo * Error(s) listed in LINKSCH.LOG *
- echo * Unable to proceed. Correct error and try again. *
- echo **********************************************************
- seterl SET255
- echo .
- :EXIT