DataMuseum.dk

Presents historical artifacts from the history of:

CR80 Hard and Floppy Disks

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about CR80 Hard and Floppy Disks

Excavated with: AutoArchaeologist - Free & Open Source Software. 

top - metrics - download

⟦8b84daa14⟧ TextFile

    Length: 620 (0x26c)
    Types: TextFile
    Names: »IO.I«

Derivation

└─⟦b8af24a88⟧ Bits:30005796 CR80 Disc Pack ( MINICAMPS )
    └─⟦this⟧ »GENS.D!SYSGEN.D!FMS.D!IO.I«

TextFile

"Procedures to handle Input and Output to the Operators Console"
"--------------------------------------------------------------"

"GMC / 81 03 27"



import procedure init_oc(r1;  "destroyed
                         r6); "link

import procedure out_text(r2;  "address of text to be output
                          r6  "link");

import procedure out_hexa(r2;  "integer to be output
                          r6  "link");

import procedure out_integer(r2;  "integer to be output
                             r6  "link");

import procedure out_long(r12;  "long integer to be output
                          r6  "link");