$ SET VERIFY
$ ! Command file to build a new cookie database and also
$ ! optionally a printable formatted list of all
$ ! cookies on RSTS/E - invoke as @COOMAK RNO if the
$ ! list is desired
$ !
$ ! Build unoffensive cookies
$ CRUN COOSRC:COOTXT -L "COOSRC:" -F COOSRC:COONO1.SRC -O COOSRC:COOKIE.TXT
$ CRUN COOSRC:COOBLD -F COOSRC:COOKIE.TXT -O COOSRC:COOKIE.FIL
$ IF P1 .EQS. "RNO" THEN CRUN COOSRC:COORNO COOSRC:COOKIE.TXT >COOSRC:COOKIE.LST
$ COPY/REPLACE COOSRC:COOKIE.FIL $COOKIE.FIL
$ SET FILE/PROTECTION=40 $COOKIE.FIL
$ !
$ ! Build offensive cookies
$ CRUN COOSRC:COOTXT -L "COOSRC:" -F COOSRC:COOOF1.SRC -O COOSRC:COOKOB.TXT
$ CRUN COOSRC:COOBLD -F COOSRC:COOKOB.TXT -O COOSRC:COOKOB.FIL
$ IF P1 .EQS. "RNO" THEN CRUN COOSRC:COORNO COOSRC:COOKOB.TXT >COOSRC:COOKOB.LST
$ COPY/REPLACE COOSRC:COOKOB.FIL $COOKOB.FIL
$ SET FILE/PROTECTION=40 $COOKOB.FIL
$ !
$ ! Clean up
$ DEL COOSRC:COOKIE.TXT
$ DEL COOSRC:COOKOB.TXT
$ DEL COOSRC:COOKIE.FIL
$ DEL COOSRC:COOKOB.FIL
$ !
$ ! All done
     