NAME ERROR BUFFER WRITTEN TO DISK FILE CLOSED FILE OPENED ~#·ÈÍSÃB> ÍS> õÛæ€ÂTñÓÉ!àÍ™þÂzÊd+~ÍSÃdþÂ…ÍLÃ_ÍSwþ Ê“#Ãd> ÍSÉÛæ™ÛæÉõÛ�æʦñÓ€ÉÛ�æʱÛ€æÉÍL!ÍBÍ_!] 6 # ÂÎ!à] ~#þaÚæÖ þ Êþ.Êù ÂÝÃe~#þaÚÖ þ Ê ÂþÃ7?É7ÉFILENAME? åÕÅ\Í!4ÍBÁÑáÉåÕÅ\ÍÁÑáÉåÕÅ\Í!&ÍBÁÑáÉåÕÅ\ÍÁÑáÉåÕÅ\ÍÁÑáÉåÕÅ\ÍÁÑáÉÅ:ÈGÛ æ€xÊ›öæþ2ÈÓ‚ÁÉyþÂ!/ÍÎ ÍK²:ÈæýæÓ‚2È!ÍÎà >N¹ÈÍ#ÃÎ>Ãá>2ÈÓ‚>Ó�ÉÍjÍ›!ÍÎ(ÍKÂù!É~þ ÈOÍþ*Â(ÍKÂ#Ö0Â!> Úþ ÒÍ/ÃõÍ£ÍKÍ›ÍKñ=Â/> ÍK=ÂCÉåÕõÍ ·Äþʪñ!ããÒaÑáÉ!ÉÍ §ÊmÍþÊ þÊmþÊwOõÍñþ È#þÂm++Ãm:Èö€Ã¨:Èæ2ÈÓ‚ÉåÕÅÍKz³Â´!q~þÊÎOÍÒ#ÃÀÁÑáÉÛ�æÊÒyÓ€Û æÈͤÉ NUMBER ? NO ANSWER--- CALL TERMINATED DIALING- LOST CARRIER EOT 80/103 CONTROL PROGRAM WAITING FOR RING OR CONTROL B   THE STARK COMPUTER NETWORK END OF SAVE AREA ÛæÉÛæ>À=ÉÛæ€Â½yÓÉ# FILE 5 FROM SOFTWARE TOOLS OF LBL #--------------------------------------------------------------------- # include symbol definitions # include symbols #--------------------------------------------------------------------- ## echo -- main program call initr4 call echo call endr4 end ## echo - echo command line arguments subroutine echo integer getarg, i character buf(MAXLINE) for (i=1; getarg(i, buf, MAXLINE) ^= EOF; i=i+1) { if (buf(1) == QMARK & buf(2) == EOS) call error('usage: echo args !.') call putlin (buf, STDOUT) call putch (BLANK, STDOUT) } if (i ^= 1) call putch (NEWLINE, STDOUT) return end n end #-------------------------------------------------------------------- #include symbols definitions # include symbols #--------------------------------------------------------------------- ## cat # FILE 6 OF SOFTWARE TOOLS FROM LBL #-------------------------------------------------------------------- #include symbols definitions # include symbols #--------------------------------------------------------------------- ## cat -- mai