Google
 

Trailing-Edge - PDP-10 Archives - tops10and20_integ_tools_v9_3-aug-86 - 70,6067/telvms/tell.com
There are 4 other files named tell.com in the archive. Click here to see a list.
$ SET NOON
$ OPEN/READ/WRITE/ERROR=EXIT/SHARE=WRITE MAP_NETTELL 'P1'"198="
$ WRITE/ERROR=EXIT MAP_NETTELL P2," ",P3," ",P4," ",P5," ",P6," ",P7," ",P8
$ LOOP:
$ READ/ERR=EXIT/END=EXIT MAP_NETTELL XYZZY
$ WRITE SYS$OUTPUT XYZZY
$ GOTO LOOP
$ EXIT:
$ CLOSE MAP_NETTELL
$ EXIT