@echo off
setLocal EnableDelayedExpansion

cd ..
set WRK=%CD%

set DIR=c:
set PGM=%DIR%\hysplit4
set MAP=%PGM%\graphics\arlmap
SET INP=hysplit2.bin

cd %PGM%\working

IF EXIST ASCDATA.CFG DEL ASCDATA.CFG
echo -90.0   -180.0  lat/lon of lower left corner   >ASCDATA.CFG
echo 1.0     1.0     lat/lon spacing in degrees    >>ASCDATA.CFG
echo 180     360     lat/lon number of data points >>ASCDATA.CFG
echo 2               default land use category     >>ASCDATA.CFG
echo 0.2             default roughness length (m)  >>ASCDATA.CFG
echo '%PGM%\bdyfiles\'  directory of files         >>ASCDATA.CFG

REM -------------------------------------------

SET SYR=83
SET SMO=09
SET SDA=25
SET SHR=17
    
SET LAT=39.90
SET LON=-84.22
SET LVL=10.0

SET RUN=11
SET TOP=10000.0

SET MET=%WRK%\captex
SET DAT=captex2_wrf27.bin

REM --------------------------------------------
       
echo %SYR% %SMO% %SDA% %SHR% >CONTROL
echo 1                      >>CONTROL
echo %LAT% %LON% %LVL%      >>CONTROL
echo %RUN%                  >>CONTROL
echo 0                      >>CONTROL
echo %TOP%                  >>CONTROL
echo 1                      >>CONTROL
echo %MET%\                 >>CONTROL
echo %DAT%                  >>CONTROL
echo 1                      >>CONTROL
echo PMCH                   >>CONTROL
echo 67000.0                >>CONTROL
echo 3.0                    >>CONTROL
echo 00 00 00 00 00         >>CONTROL
echo 1                      >>CONTROL
echo 42.0 -78.0             >>CONTROL
echo 0.05 0.05              >>CONTROL
echo 15.0 25.0              >>CONTROL
echo .\                     >>CONTROL
echo %INP%                  >>CONTROL
echo 2                      >>CONTROL
echo 800 1000               >>CONTROL
echo 83 09 26 03 00         >>CONTROL
echo 83 09 28 15 00         >>CONTROL
echo 00 01 00               >>CONTROL
echo 1                      >>CONTROL
echo 0.0 0.0 0.0            >>CONTROL
echo 0.0 0.0 0.0 0.0 0.0    >>CONTROL
echo 0.0 0.0 0.0            >>CONTROL
echo 0.0                    >>CONTROL
echo 0.0                    >>CONTROL

REM -----------------------------------------------

IF EXIST SETUP.CFG DEL SETUP.CFG
echo ^&SETUP               >SETUP.CFG
echo numpar = 5000,       >>SETUP.CFG
echo maxpar = 100000,     >>SETUP.CFG
echo initd = 3,           >>SETUP.CFG
echo kmsl = 1,            >>SETUP.CFG
echo /                    >>SETUP.CFG

IF EXIST %INP% DEL %INP%
%PGM%\exec\hycs_std

IF EXIST concplot.ps DEL concplot.ps
ECHO 'TITLE^&','### %0 ### ^&' >LABELS.CFG
%PGM%\exec\concplot -i%INP% -a3 -z80 -j%MAP% -x1.0E+12 -upg -h41.0:-82.5 -c4 -b1000 -t1000 -v50000+20000+10000+5000+2000+1000 
concplot.ps
PAUSE

REM -----------------------------------------------

IF EXIST HYSPLIT_ps.kml (
   IF EXIST HYSPLITconc.kmz DEL HYSPLITconc.kmz
   copy %PGM%\guicode\logocon.gif     logocon.gif
   copy %PGM%\guicode\noaa_google.gif noaa_google.gif
   copy %PGM%\graphics\icon63.png     icon63.png
   %PGM%\exec\zip HYSPLITconc.kmz HYSPLIT_ps.kml icon63.png logocon.gif noaa_google.gif
   IF EXIST HYSPLIT_ps.kml DEL HYSPLIT_ps.kml
)

IF EXIST GELABEL_ps.txt %PGM%\exec\gelabel 

set RUN=1
:loop
IF !RUN! LSS 100 (
   SET NUM=!RUN!
   IF !RUN! LSS 100 SET NUM=!RUN!
   IF !RUN! LSS 10 SET NUM=0!RUN!  
   echo !NUM!

   IF EXIST GELABEL_!NUM!_ps.ps (
      convert +adjoin -trim +page GELABEL_!NUM!_ps.ps GELABEL_!NUM!_ps.gif
      %PGM%\exec\zip -u HYSPLITconc.kmz GELABEL_!NUM!_ps.gif
      DEL GELABEL_!NUM!_ps.gif GELABEL_!NUM!_ps.ps
   )
   set /a RUN=!RUN!+1
GOTO loop

PAUSE