@echo off
setLocal EnableDelayedExpansion

cd ..
set WRK=%CD%

set DIR=c:
set PGM=%DIR%\hysplit4
cd %PGM%\working

IF EXIST ASCDATA.CFG DEL ASCDATA.CFG
echo -90.0   -180.0        >ASCDATA.CFG
echo 0.5     0.5          >>ASCDATA.CFG
echo 360     720          >>ASCDATA.CFG
echo 2                    >>ASCDATA.CFG
echo 0.2                  >>ASCDATA.CFG
echo '%PGM%\bdyfiles\bdyfiles0p5\' >>ASCDATA.CFG

SET SYR=10
SET SMO=03
SET SDA=30
SET SHR=00
    
SET RUN=30
SET TOP=10000.0

SET MET=%WRK%\dust
SET DAT=NAM20100330.bin

REM -------------------------------------------------------
        
echo %SYR% %SMO% %SDA% %SHR% >CONTROL
echo 3                      >>CONTROL
echo 38.00 -115.00  10.0    >>CONTROL
echo 41.00 -110.00  10.0    >>CONTROL
echo 38.25 -114.75  10.0    >>CONTROL
echo %RUN%                  >>CONTROL
echo 0                      >>CONTROL
echo %TOP%                  >>CONTROL
echo 1                      >>CONTROL
echo %MET%\                 >>CONTROL
echo %DAT%                  >>CONTROL
echo 1                      >>CONTROL
echo PM10                   >>CONTROL
echo 0.0                    >>CONTROL
echo %RUN%                  >>CONTROL
echo 00 00 00 00 00         >>CONTROL
echo 1                      >>CONTROL
echo 0.0 0.0                >>CONTROL
echo 0.05 0.05              >>CONTROL
echo 30.0 30.0              >>CONTROL
echo .\                     >>CONTROL
echo dust0.bin              >>CONTROL
echo 1                      >>CONTROL
echo 100                    >>CONTROL
echo 00 00 00 06 00         >>CONTROL
echo 00 00 00 00 00         >>CONTROL
echo 00 24 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 = 3,           >>SETUP.CFG
echo numpar = 100000,     >>SETUP.CFG
echo maxpar = 50000,      >>SETUP.CFG
echo /                    >>SETUP.CFG

%PGM%\exec\dustbdy

IF EXIST dust0.bin DEL dust0.bin
%PGM%\exec\hycs_std

IF EXIST concplot.ps DEL concplot.ps
ECHO 'TITLE^&','### %0: 0.5 degree landuse ### ^&' >LABELS.CFG
%PGM%\exec\concplot -idust0.bin -z80 -j%PGM%\graphics\arlmap -x1.0E+06 -c4 -uug -v500+200+100+50+20+10
concplot.ps
PAUSE

%PGM%\exec\c2datem -xi -idust0.bin -c1.0E+06 -m%MET%\AirNow_dust.txt -ohysplit.txt
%PGM%\exec\statmain -t0 -rhysplit.txt -d%MET%\AirNow_dust.txt -l10.0 -o1
type statA.txt
PAUSE

%PGM%\exec\scatter -idataA.txt -p10.0
scatter.ps