Files
kabellaengen/bin/create_dropItem.bat
T

56 lines
1.2 KiB
Batchfile

@echo on
call setenv.bat
mkdir %INSTALL_DIR%
set SHORTCUT=%INSTALL_DIR%\create_cables.lnk
set TARGET=%PROJECT_BIN%\getexdraw.bat
set ICON=%PROJECT_DOC%\img\Icons\Icon_Gemini2.ico
@echo off
setlocal enabledelayedexpansion
@echo off
(
if [%1]==[] goto usage
for %%i in ("%~1") do (
set "FILENAME=%%~ni"
set "EXT=%%~xi"
set "DIR=%%~dpi"
)
REM echo Dateiname ohne Erweiterung: %FILENAME%
REM echo Erweiterung: %EXT%
REM echo Verzeichnis: %DIR%
call %%PROJECT_BIN%%\setenv.bat
echo --hole Positionen
call getpositions.bat --filename %1 -s -r -w %FILENAME%_positions.json
echo --erzeuge Graph mit Routing
call routing.bat --filename %FILENAME%_positions.json -w %FILENAME%_todraw.json
echo --zeichne Kabel in dxf Datei
call draw_dxf.bat --filename %FILENAME%_todraw.json --new %FILENAME%_cables.dxf -x %FILENAME%_cables.xlsx
mkdir %INSTALL_DIR%\%FILENAME%
move %PROJECT_WORK%\%FILENAME%_* %INSTALL_DIR%\%FILENAME%
pause
endlocal
goto :eof
:usage
@echo Usage: %0 ^<dxfinWorkOrdner.dxf^>
exit /B 1
goto :eof
) > _getexdraw.bat
MOVE _getexdraw.bat getexdraw.bat
REM Icon anlegen
powershell -Command "$s=(New-Object -COM WScript.Shell).CreateShortcut('%SHORTCUT%');$s.TargetPath='%TARGET%';$s.IconLocation='%ICON%';$s.Save()"