|
DataMuseum.dkPresents historical artifacts from the history of: RC4000/8000/9000 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about RC4000/8000/9000 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 3072 (0xc00) Types: TextFile Names: »mtreadinp«
└─⟦621cfb9a2⟧ Bits:30002817 RC8000 Dump tape fra HCØ. Detaljer om "HC8000" projekt. └─⟦0364f57e3⟧ └─⟦8c6b0f8fa⟧ »cdes« └─⟦667bb35d6⟧ Bits:30007480 RC8000 Dump tape fra HCØ. └─⟦4334b4c0b⟧ └─⟦8c6b0f8fa⟧ »cdes« └─⟦this⟧
*pl 297,21,240,13,4* *pn 0,0**lw 170* *ld 12* *ps* *qr* 1980-10-21 Anders Lindgård *nl1* *ct* mtread *nl1* *rj**np* Reads magnetic tape files with any blocklength. The tape must contain text in either ascii, ebcd or ebcdic. *ns 1,2,Call:* -----*nl2* <outfile>=mtread <file> <par> *nl* <outfile>::=<empty>/<filedescriptor> *nl* <file> specifies the magnetic tape name *nl* <outfile> If specified mtread will use this as output file, else a working file is created. *nl* *sj* <par>::=ascii.<boolean>/ebcd.<boolean>/ebcdic.<boolean>/ cards.<boolean>/list.<boolean>/ lastchar.<integer>/file.<integer>/ max.<integer> <boolean>::=yes/no *rj**nl* if no parameters are specified the default values are:*nl* ascii.yes cards.no file.0 list.no lastchar.132 even.yes max.1000 *ns 1,2,Function:* ---------*nl* *rj* *np* The program read 1600 bpi magnetic tapes in odd parity with a maximum blocklength given by the parameter "max" (in RC8000 double words (default 1000)). The content is converted to ISO characters. *np* The default file is file 0 and may be changed using the "file" parameter. *np* if "list.yes" is specified the character values is written as integers and no conversion takes place. if "list.no" then the content is converted to ISO characters. *np* The basic modes of the program is determined by the parameters "ascii","ebcd" and "ebcdic" of which only one can be true. *np* The program is very slow in reading magnetic tapes, so the user should save <outfile> for later use rather than reread the tape. *nl2* ascii *nl**np* This is the default mode. If "cards" is set then "lastchar" is default 72 else 132. The program reads the text line by line and only up to lastchar characters are written on the output file. NUL characters are skipped and EM characters are replaced by the sequence <25>. If cards is set a newline character is generated for each card. *nl2* ebcd *nl**np* In this mode the content of the tape should be ebcd characters. "cards" is by default true and "lastchar" is 72. *nl2* ebcdic *nl**np* As ebcd but the content of the tape should be ebcdic characters. *ns 1,2,Storage requirements:* ---------------------*nl2* *se?* As for a normal ALGOL program+4*<max>+1190 halfwords. ?se*? *ns 1,2,Error messages:* ---------------*nl1* *sj**se?* **parity error Parity error on the tape. This is a warning. ***input missing No tape name was specified in the call ***blocklength error <blocklength> increase blocklength call: mtread max.<max> where max > <oldmax> The blocklength on the tape is larger than the one given in the call. Increase blocklength. ?se*? *rj* *lm0* *ns 1,2,Language: ALGOL* ---------*nl1* *ns 1,2,Maintenance level: user* ------------------*nl1* User *ef* ▶EOF◀