LOOP
F00
SLYR 500 300
PMSL CIN2 
CLRA
BKNT 1000& 
BKNT GRTN 0024 CLR2&
CLRD
BKNT 850&
BKNT GRTN 0039 CLR3&
CLRE
CONT SMLT DSDX XCMP GEOS LAVE DSDX TEMP LAVE
CONT SNEG SSUM SMLT DSDX YCMP GEOS LAVE DSDY TEMP LAVE
CONT SMLT DSDY YCMP GEOS LAVE DSDY TEMP LAVE
CONT SSUM SMLT DSDY XCMP GEOS LAVE DSDX TEMP LAVE
SNEG&
WAIT 3SEC
CLR9
DNEG DVRG LAST&
TXT4 MEAN SEA LEVEL PRESSURE (PMSL - MB)/1000 WIND (brown)/850 Wind (green) -
TXT5 500/300 LAYER Q-VECTOR / LAYER Q-VECTOR DIVERGENCE                     -
TXT6 00-H FORECAST -
ENDL
LOOP
F12
SLYR 500 300
PMSL CIN2 
CLRA
BKNT 1000& 
BKNT GRTN 0024 CLR2&
CLRD
BKNT 850&
BKNT GRTN 0039 CLR3&
CLRE
CONT SMLT DSDX XCMP GEOS LAVE DSDX TEMP LAVE
CONT SNEG SSUM SMLT DSDX YCMP GEOS LAVE DSDY TEMP LAVE
CONT SMLT DSDY YCMP GEOS LAVE DSDY TEMP LAVE
CONT SSUM SMLT DSDY XCMP GEOS LAVE DSDX TEMP LAVE
SNEG&
WAIT 3SEC
CLR9
DNEG DVRG LAST&
TXT4 MEAN SEA LEVEL PRESSURE (PMSL - MB)/1000 WIND (brown)/850 Wind (green) -
TXT5 500/300 LAYER Q-VECTOR / LAYER Q-VECTOR DIVERGENCE                     -
TXT6 12-H FORECAST -
ENDL
LOOP
F24
SLYR 500 300
PMSL CIN2 
CLRA
BKNT 1000& 
BKNT GRTN 0024 CLR2&
CLRD
BKNT 850&
BKNT GRTN 0039 CLR3&
CLRE
CONT SMLT DSDX XCMP GEOS LAVE DSDX TEMP LAVE
CONT SNEG SSUM SMLT DSDX YCMP GEOS LAVE DSDY TEMP LAVE
CONT SMLT DSDY YCMP GEOS LAVE DSDY TEMP LAVE
CONT SSUM SMLT DSDY XCMP GEOS LAVE DSDX TEMP LAVE
SNEG&
WAIT 3SEC
CLR9
DNEG DVRG LAST&
TXT4 MEAN SEA LEVEL PRESSURE (PMSL - MB)/1000 WIND (brown)/850 Wind (green) -
TXT5 500/300 LAYER Q-VECTOR / LAYER Q-VECTOR DIVERGENCE                     -
TXT6 24-H FORECAST -
ENDL
LOOP
F36
SLYR 500 300
PMSL CIN2 
CLRA
BKNT 1000& 
BKNT GRTN 0024 CLR2&
CLRD
BKNT 850&
BKNT GRTN 0039 CLR3&
CLRE
CONT SMLT DSDX XCMP GEOS LAVE DSDX TEMP LAVE
CONT SNEG SSUM SMLT DSDX YCMP GEOS LAVE DSDY TEMP LAVE
CONT SMLT DSDY YCMP GEOS LAVE DSDY TEMP LAVE
CONT SSUM SMLT DSDY XCMP GEOS LAVE DSDX TEMP LAVE
SNEG&
WAIT 3SEC
CLR9
DNEG DVRG LAST&
TXT4 MEAN SEA LEVEL PRESSURE (PMSL - MB)/1000 WIND (brown)/850 Wind (green) -
TXT5 500/300 LAYER Q-VECTOR / LAYER Q-VECTOR DIVERGENCE                     -
TXT6 36-H FORECAST -
ENDL
LOOP
F48
SLYR 500 300
PMSL CIN2 
CLRA
BKNT 1000& 
BKNT GRTN 0024 CLR2&
CLRD
BKNT 850&
BKNT GRTN 0039 CLR3&
CLRE
CONT SMLT DSDX XCMP GEOS LAVE DSDX TEMP LAVE
CONT SNEG SSUM SMLT DSDX YCMP GEOS LAVE DSDY TEMP LAVE
CONT SMLT DSDY YCMP GEOS LAVE DSDY TEMP LAVE
CONT SSUM SMLT DSDY XCMP GEOS LAVE DSDX TEMP LAVE
SNEG&
WAIT 3SEC
CLR9
DNEG DVRG LAST&
TXT4 MEAN SEA LEVEL PRESSURE (PMSL - MB)/1000 WIND (brown)/850 Wind (green) -
TXT5 500/300 LAYER Q-VECTOR / LAYER Q-VECTOR DIVERGENCE                     -
TXT6 48-H FORECAST -
ENDL
