$ if p1 .nes. "" then FS 'P1'
$ COPY 'FM' [.SEND]
$ COPY 'FM' CMODA::IR:[BULLETIN]
$ TAB2SP 'FM' 
$ RENAME 'FM' [-.NET]
$ PUR [.SEND]'FM'
$ PUR [-.NET]'FM'
$ IF FM .EQS. "CHMAIL.MAI" THEN P3 = "AAAREADME."
$ IF P2 .EQS. "" THEN COPY 'FM' [ANONYMOUS.BULLETIN]'P3'
$ IF P3 .EQS. "" THEN PUR [ANONYMOUS.BULLETIN]'FM'
$ IF P3 .NES. "" THEN PUR [ANONYMOUS.BULLETIN]'p3'