$JOB 73(005) 'TSR.SL' PAUL HENDERSON
$UIC <PDH>
$SLIP C
*FILE I:17='TSR.NN 003'O:18='TSR.00 SRC'$
-'/NN',1
NN=00
-$
$EOF
$SLIP C
*FILE I:17='TSR.NN 003'O:18='TSR.02 SRC'$
-'/NN',1
NN=02
-$
$EOF
$SLIP C
*FILE I:17='TSR.NN 003'O:18='TSR.03 SRC'$
-'/NN',1
NN=03
-$
$EOF
$SLIP C
*FILE I:17='TSR.NN 003'O:18='TSR.04 SRC'$
-'/NN',1
NN=04
-$
$EOF
$MAC BRE_TSR.00,TSR.02,TSR.03,TSR.04
$TKB
NRM}
TTY.00}
200}
EDIT00}
TSR.00}
 }
$DEL TSR.00 SRC,TSR.00 BIN
$TKB
NRM}
TTY.02}
200}
EDIT02}
TSR.02}
 }
$DEL TSR.02 SRC,TSR.02 BIN
$TKB
NRM}
TTY.03}
200}
EDIT03}
TSR.03}
 }
$DEL TSR.03 SRC,TSR.03 BIN
$TKB
NRM}
TTY.04}
200}
EDIT04}
TSR.04}
 }
$DEL TSR.04 SRC,TSR.04 BIN
$END