DataMuseum.dk

Presents historical artifacts from the history of:

CR80 Wang WCS documentation floppies

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

See our Wiki for more about CR80 Wang WCS documentation floppies

Excavated with: AutoArchaeologist - Free & Open Source Software. 

top - download

⟦155a3ce6a⟧ Wang Wps File

    Length: 473 (0x1d9)
    Types: Wang Wps File
    Notes: Spelunked
    Names: »~ORPHAN03.06«

Derivation

└─⟦ea7a1ecf3⟧ Bits:30006190 8" Wang WCS floppy, CR 0437A
    └─ ⟦this⟧ »~ORPHAN03.06«

WangText


7.22     P̲R̲O̲C̲E̲D̲U̲R̲E̲ ̲-̲ ̲H̲I̲F̲$̲T̲X̲$̲R̲T̲N̲

         FUNCTION

         This procedure is scheduled periodically to return
         empty BUFFERS to the HOST which were previously used
         for COMMANDS or DATA TRANSMISSION.
         DESCRIPTION

         HIF ̲TX ̲RTN(CHANNO):

         IF TX(CHANNO).TX1 .EQ. ENABLED THEN
             INDEX=POP(CHANNO,HOST ̲EMPTIES);
             IF INDEX.NE.NULL THEN
             TX(CHANNO).OUT=BUFFER(INDEX).ADDR;
             TX(CHANNO).TS1=DISABLED;
             RETURN;
         END;/*HIF ̲TX ̲RTN*/