|
DataMuseum.dkPresents historical artifacts from the history of: CR80 Hard and Floppy Disks |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about CR80 Hard and Floppy Disks Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 1184 (0x4a0) Types: TextFile Names: »MS1100.S«, »~ORPHAN_0x0031«
└─⟦93791531c⟧ Bits:30005105 8" CR80 Floppy CR80FD_0064 ( VOL:SCC.V MSS Directory: MS1.D ) └─⟦185cc4db7⟧ └─ ⟦this⟧ »~ORPHAN_0x0031« └─⟦b5acf5c79⟧ Bits:30005104 8" CR80 Floppy CR80FD_0063 ( VOL: SCC.V MSS Directory: MS2.D ) └─⟦f918199fd⟧ └─ ⟦this⟧ »MS2.D!MS1100.S«
MESSAGE <:MS1100.S V810326:> ;----------------------------------------------------------------------- ; SUBROUTINE MS1100 - NATO_RI TO FIKS_ANO. ; ; EXTERNAL TABLE ACCESSED: FILE ADF, TABLE RTA. ; ; REGISTERS CALL EXIT ; R4 LINK DON'T CARE ; R0-R7 DON'T CARE ; ; INPUT: RICHR1,RICHR2 ; OUTPUT: ANO ; EXIT TO: LINK+0 (NOT FOUND) ; LINK+1 (OK) ; MSE130 (ERROR) ; ; DESCRIPTION: ; THE ROUTING INDICATOR HAS THE FORM: RDF<A><B>, WHERE A AND B ARE ; ALPHABETIC CHARACTERS. THE ASCII VALUE FOR <A> AND <B> ARE GIVEN ; IN INPUT WORDS RICHR1 AND RICHR2. IF RICHR2 IS ZERO, THEN THE ; ROUTING INDICATOR HAS THE ALTERNATIVE FORM: RDF<A>. ; THE OUTPUT IS A FIKS ANO OF THE (STANDARD) FORM: ; BIT CONTAINS ; 13-15 ZERO ; 8-12 MEDE LETTER DESIGNATOR (0-26) ; 0-7 MEDE SERIAL TERMINAL NUMBER ; ; IMPLEMENTATION: ; LOCAL VARIABLES NECESSARY FOR STORAGE MAY BE ADDED TO THE MSS BASE. ;----------------------------------------------------------------------- MS1100: ; NATO_RI TO FIKS_ANO: JMP 0. X4 ;* NOT IMPLEMENTED - EXIT(0)