.; TALK.CMD - 29APR81
.ENABLE SUBSTITUTION
.SETS	UIC	"'<UIC>'"
; ASSEMBLE AND BUILD THE TALK PROGRAM - '<DATE>' - '<TIME>'
.SETS SPL  ""
.ASK SPQ DO YOU WANT TO CREATE LISTINGS
.IFT SPQ .SETS SPL ",TALK/-SP"
.SETF SPX
.IFT SPQ .ASK SPX DO YOU WANT A CROSS REFERENCE LISTING
.IFT SPX  .SETS  SPL  SPL+"/CR"
MAC TALK'SPL'=LB:[1,1]EXEMC/ML,SY:'<UIC>'TALKPRE,TALK
.;   CHANGE PAR$TY TO 0 TO ALLOW 8 BIT TRANSFERS
.OPEN TALKTKB.TMP
.ENABLE DATA
TALK/PR/-CP/-FP'SPL'=TALK,'<SYSUIC>'RSX11M.STB
/
TASK=...TLK
PRI=95
STACK=256
UNITS=5
ASG=SY:1:2,TI:4
ACTFIL=2
FMTBUF=0
GBLDEF=PAR$TY:200
//
.DISABLE DATA
.CLOSE
TKB @TALKTKB.TMP
PIP TALKTKB.TMP;*/DE