@echo off
setLocal EnableDelayedExpansion

cd ..
set WRK=%CD%

set DIR=c:
set PGM=%DIR%\hysplit4
set MAP=%PGM%\graphics\arlmap

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 rerun model -------------------------------------------

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=19
SET TOP=10000.0

SET MET=%WRK%\captex
SET DAT=captex2_narr.bin
SET INP=hysplit2.bin
        
echo %SYR% %SMO% %SDA% %SHR% >CONTROL
echo 3                      >>CONTROL
echo 38.0 -85.0 %LVL%       >>CONTROL
echo 45.0 -78.0 %LVL%       >>CONTROL
echo 38.5 -84.5 %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.25 0.25              >>CONTROL
echo 15.0 25.0              >>CONTROL
echo .\                     >>CONTROL
echo %INP%                  >>CONTROL
echo 1                      >>CONTROL
echo 100                    >>CONTROL
echo 83 09 26 09 00         >>CONTROL
echo 83 09 28 15 00         >>CONTROL
echo 00 03 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

IF EXIST SETUP.CFG DEL SETUP.CFG
echo ^&SETUP               >SETUP.CFG
echo ichem = 1,           >>SETUP.CFG
echo numpar = 50000,      >>SETUP.CFG
echo maxpar = 100000,     >>SETUP.CFG
echo /                    >>SETUP.CFG

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

%PGM%\exec\latlon

IF EXIST %INP% DEL %INP%
%PGM%\exec\hycs_std
IF EXIST sumstat.txt DEL sumstat.txt

set RUN=1
IF EXIST CONTROL (
   FOR /F "tokens=1,2 skip=1" %%P IN (CONTROL) do (
       IF !RUN! EQU 1 (
          set /a MAX=%%P+1
          echo !MAX!
       ) ELSE (
          IF !RUN! LEQ !MAX! (
             echo %%P %%Q
             %PGM%\exec\matrix   -i%INP% -oSRM_cdump -y%%P -x%%Q -ms
             %PGM%\exec\c2datem  -iSRM_cdump -ohysplit.txt -c1.0E+12 -m%MET%\captex2_3hr.txt -xi -s
             %PGM%\exec\statmain -t0 -rhysplit.txt -d%MET%\captex2_3hr.txt -l10.0 -o1 -ssumstat.txt
          )
       )
      set /a RUN=!RUN!+1
   )
)

%PGM%\exec\stat2grid -isumstat.txt -ostatmap.bin -v3
echo 'TITLE^&','### %0: spatial statistics for CC ### ^&'  >LABELS.CFG
echo 'UNITS^&',' ^&' >>LABELS.CFG
echo 'VOLUM^&',' ^&' >>LABELS.CFG

IF EXIST griplot.ps DEL gridplot.ps
%PGM%\exec\gridplot -istatmap.bin -j%MAP% -ogridplot.ps -l0.0 -d0.05 -a0 -c1.0
gridplot.ps
PAUSE

TYPE sumstat.txt
PAUSE