|
|
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 - metrics - download
Length: 15596 (0x3cec)
Types: TextFile
Names: »IOPARS.S«
└─⟦8c095a7f3⟧ Bits:30005798 CR80 Disc Pack ( Vol ILS systemdisk XAMOS TOS 10:01 hard boot #43c 19-7-87/JFJ )
└─⟦this⟧ »PREFIXES.D!XAMOS.D!ASM.D!IOPARS.S«
└─⟦c2e810e96⟧ Bits:30005799 CR80 Disc Pack ( XAMOS 841129 ILS TOS 10-01 System Disk Tilhører ILS/MSG hard boot boot entry #43c )
└─⟦this⟧ »PREFIXES.D!XAMOS.D!ASM.D!IOPARS.S«
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
; F I L E : I O P A R S
;
; CSS/824
;
; VERSION: 0502
;
; LAST CHANGE: 830201
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
; DEFINITION OF PARAMETER BLOCKS.
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
MESSAGE <:IOPARS V830201:>
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
; DEVICE NAME.
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
USE BASE AX=BASE ; DEVICE NAME:
XDVNDN:= AX,AX=AX+2 ; DEVICE NAME
XDVNWL:= AX ; DEVICE NAME WORD LENGTH
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
; VOLUME NAME.
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
USE BASE AX=BASE ; VOLUME NAME:
XVLNVN:= AX,AX=AX+8 ; VOLUME NAME
XVLNWL:= AX ; VOLUME NAME WORD LENGTH
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
; MAGNETIC TAPE VOLUME NAME
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
USE BASE AX=BASE ; MT_VOLUME NAME:
XMTVLN:= AX,AX=AX+3 ; MT_VOLUME NAME
XMTVWL:= AX ; MT_VOLUME NAME WORD LENGTH
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
; VOLUME THRESHOLD.
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
USE BASE AX=BASE ; VOLUME THRESHOLD:
XVLTRH:= AX,AX=AX+2 ; VOLUME THRESHOLD
XVLTWL:= AX ; VOLUME THRESHOLD WORD LENGTH
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
; FILE NAME.
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
USE BASE AX=BASE ; FILE NAME:
XFLNFN:= AX,AX=AX+8 ; FILE NAME
XFLNWL:= AX ; FILE NAME WORD LENGTH
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
; FILE NAMES.
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
USE BASE AX=BASE ; FILE NAMES:
XFNSON:= AX,AX=AX+XFLNWL ; OLD NAME
XFNSNN:= AX,AX=AX+XFLNWL ; NEW NAME
XFNSWL:= AX ; FILE NAMES WORD LENGTH
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
; MAGNETIC TAPE FILE NAME
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
USE BASE AX=BASE ; MT_NAME:
XMTNVN:= AX,AX=AX+XMTVWL ; MT_VOLUME NAME
XMTNFN:= AX,AX=AX+XFLNWL ; FILE NAME
XMTNWL:= AX ; MT_NAME WORD LENGTH
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
; FILE SYSTEM NAME.
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
USE BASE AX=BASE ; FILE SYSTEM NAME:
XFSNN0:= AX,AX=AX+1 ; FILE SYSTEM NAME NAME0
XFSNN1:= AX,AX=AX+1 ; FILE SYSTEM NAME NAME1
XFSNN2:= AX,AX=AX+1 ; FILE SYSTEM NAME NAME2
XFSNNI:= AX,AX=AX+1 ; FILE SYSTEM NAME NAMEI
XFSNG0:= AX,AX=AX+1 ; FILE SYSTEM NAME GROUP0
XFSNG1:= AX,AX=AX+1 ; FILE SYSTEM NAME GROUP1
XFSNWL:= AX ; FILE SYSTEM NAME WORD LENGTH
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
; FILE ATTRIBUTES.
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
USE BASE AX=BASE ; FILE ATTRIBUTES:
XFATVN:= AX,AX=AX+XVLNWL ; VOLUME NAME:
XFATOR:= AX,AX=AX+1 ; FILE ORGANIZATION:
; ORGANIZATIONS:
XORDIR:= 10 ; DIRECTORY:
XORCON:= 12 ; CONTIGUOUS:
XORRAN:= 14 ; RANDOM:
XFATAL:= AX,AX=AX+2 ; ALLOCSIZE:
XFATAR:= AX,AX=AX+1 ; AREASIZE:
XFATWL:= AX ; FILE ATTRIBUTES WORD LENGTH
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
; MAGNETIC TAPE FILE ATTRIBUTES
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
USE BASE AX=BASE ; MT_ATTRIBUTES:
XMTAMN:= AX,AX=AX+XMTNWL ; MT_NAME
XMTAFV:= AX,AX=AX+1 ; FIXED/VARIABLE RECORDS
XMTABS:= AX,AX=AX+1 ; BLOCK SIZE
XMTARS:= AX,AX=AX+1 ; RECORD SIZE
XMTAWL:= AX ; MT_ATTRIBUTES WORD LENGTH
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
; FILE THRESHOLD.
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
USE BASE AX=BASE ; FILE THRESHOLD:
XFLTRH:= AX,AX=AX+2 ; FILE THRESHOLD
XFLTWL:= AX ; FILE THRESHOLD WORD LENGTH
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
; FILE INFORMATION.
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
USE BASE AX=BASE ; FILE INFORMATION:
XFILIN:= AX,AX=AX+2 ; FILE INFORMATION
XFINWL:= AX ; FILE INFORMATION WORD LENGTH
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
; FILE INFORMATION TYPES.
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
USE BASE AX=BASE ; FILE INFORMATION TYPES.
XGATOR:= AX,AX=AX+1 ; ORGANIZATION;
XGATSZ:= AX,AX=AX+1 ; SIZE (BYTES);
XGATAL:= AX,AX=AX+1 ; ALLOCSIZE (SECTORS FOR CONT.
; ELSE AREAS);
XGATBA:= AX,AX=AX+1 ; BODY ADDR (LOGICAL SECTOR NO.
; OF INDEX OR BODY);
XGATAR:= AX,AX=AX+1 ; AREA SIZE (SECTORS);
XGATFT:= AX,AX=AX+1 ; FILE THRESHOLD (BYTES);
XGATLK:= AX,AX=AX+1 ; LINKS (FROM DIRECTORIES);
XGATIB:= AX,AX=AX+1 ; IN_BFD (BOOLEAN);
XGATBN:= AX,AX=AX+1 ; BFD_BUMBER (ENTRY NO. IN BFD);
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
; ACCESS DESCRIPTION.
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
USE BASE AX=BASE ; ACCEXX DESCRIPTION:
XACDUI:= AX,AX=AX+XUSERH ; USER ID
XACDAC:= AX,AX=AX+2 ; ACCESS RIGHTS
XACRBS:= 0 ; READ BYTES
XACMBS:= 1 ; MODIFY BYTES
XACABS:= 2 ; APPEND BYTES
XACENT:= 5 ; ENTER
XACLUP:= 6 ; LOOK UP
XACREN:= 7 ; RENAME
XACREM:= 8 ; REMOVE
XACRES:= 10 ; RESET
XACGET:= 11 ; GET FILE INFORMATION;
XACPRO:= 12 ; PROTECT
XACSFT:= 13 ; SET_FILE_THRESHOLD
XACOFF:= 14 ; OFFER
XACDWL:= AX ; ACCESS DESCRIPTION WORD LENGTH
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
; DEVICE DESCRIPTION.
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
USE BASE AX=BASE ; DEVICE DESCRIPTION:
XDVDKN:= AX,AX=AX+1 ; DEVICE KUND:
; KINDS:
XKNSFL:= 10 ; SINGLE FLOPPY:
XKNDFL:= 12 ; DOUBLE FLOPPY:
XKNM12:= 20 ; MMD 12 MB:
XKNM24:= 22 ; MMD 24 MB:
XKNM81:= 24 ; MMD 80 MB (1 MB FIXED):
XKNM82:= 26 ; MMD 80 MB(2 MB FIXED):
XKNM16:= 28 ; MMD 160 MB:
XKNS40:= 40 ; SMD 40 MB:
XKNS80:= 42 ; SMD 80 MB:
XKNS15:= 44 ; SMD 150 MB:
XKNS30:= 46 ; SMD 300 MB:
XKNS60:= 48 ; SMD 600 MB:
XKNC32:= 60 ; CMD 32 MB:
XKNC64:= 62 ; CMD 64 MB:
XKNC96:= 64 ; CMD 96 MB:
XKNLPT:= 70 ; LINE PRINTER:
XKNPCR:= 72 ; PUNCED CARD READER:
XKNMTP:= 74 ; MAGNETIC TAPE:
XDVD80:= AX,AX=AX+1 ; CR80 DEV.ADDR.+PRIOR.:
XDVDUN:= AX,AX=AX+1 ; UNIT:
XDVDSU:= AX,AX=AX+1 ; SUBUNIT:
XDVDDN:= AX,AX=AX+XDVNWL ; DEVICE NAME:
XDVDWL:= AX ; DEVICE DESCRIPTION WORD LENGTH
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
; DEVICE DESCRIPTION DUAL.
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
USE BASE AX=BASE ; DEVICE DESCRIPTION DUAL:
XDDDKN:= AX,AX=AX+1 ; DEVICE KIND
XDD080:= AX,AX=AX+1 ; DEVICE ADDR, 0
XDD0UN:= AX,AX=AX+1 ; UNIT, 0
XDDDSU:= AX,AX=AX+1 ; SUBUNIT
XDDDDN:= AX,AX=AX+XDVNWL ; DEVICE NAME
XDD180:= AX,AX=AX+1 ; DEVICE ADDR, 1
XDD1UN:= AX,AX=AX+1 ; UNIT, 1
XDDDWL:= AX ; DEVICE DESCRIPTION DUAL WORD
; LENGTH
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
; PARTNER DEVICE ATTRIBUTES
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
USE BASE AX=BASE ; PARTNER DEVICE ATTRIBUTES:
XPDA80:= AX,AX=AX+1 ; DEVICE ADDR, PARTNER
XPDAUN:= AX,AX=AX+1 ; UNIT, PARTNER
XPDAWL:= AX ; PARTNER DEV. ATT. WORD LENGTH
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
; FILE ADDRESS.
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
USE BASE AX=BASE ; FILE ADDRESS:
XFADFB:= AX,AX=AX+2 ; FIRST BYTE
XFADBC:= AX,AX=AX+2 ; BYTE COUNT
XFADTB:= AX,AX=AX+2 ; TRANSFERRED BYTES
XFADWL:= AX ; FILE ADDRESS WORD LENGTH
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
; SECTOR ADDRESS.
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
USE BASE AX=BASE ; SECTOR ADDRESS:
XSADFS:= AX,AX=AX+2 ; FIRST SECTOR
XSADSC:= AX,AX=AX+2 ; SECTOR COUNT
XSADTS:= AX,AX=AX+2 ; TRANSFERRED SECTORS
XSADWL:= AX ; SECTOR ADDRESS WORD LENGTH
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
; BUFFER LIST ELEMENT.
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
USE BASE AX=BASE ; BUFFER LIST ELEMENT:
XBLETY:= AX,AX=AX+1 ; TYPE
BX=BASE ; TYPES:
XBLEUP:= BX,BX=BX+1 ; UPPER BYTE
XBLELC:= BX,BX=BX+1 ; LOCAL BUFFER
XBLEEX:= BX,BX=BX+1 ; EXTERNAL BUFFER
XBLETB:= BX,BX=BX+1 ; FIRST UNUSED BIT;
XBTYEX:= 1<XBLEEX ; EXTERNAL MASK
XBTYLL:= 1<XBLELC ; LOCAL LOWER BYTE MASK
XBTYLU:= 1<XBLELC OR % LOCAL UPPER BYTE MASK
1<XBLEUP ;
XBLELK:= AX,AX=AX+1 ; LINK(RELATIVE)
XBLEBA:= AX,AX=AX+1 ; BUF ADDRESS(RELATIVE)
XBLEBI:= XBLEBA ; BUF ID
XBLEBS:= AX,AX=AX+1 ; BUF SIZE(BYTES)
XBLEWL:= AX ; BUFFER LIST ELEMENT WORD LENGTH
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
; STREAM POSITION.
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
USE BASE AX=BASE ; STREAM POSITION:
XSTRPO:= AX,AX=AX+2 ; STREAM POSITION
XSTPWL:= AX ; STREAM POSITION WRD LENGTH
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
; DEFINITIONS OF BYTE LENGTHS.
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
XDVNBL:= XDVNWL *2 ; DEVICE NAME BYTE LENGTH
XVLNBL:= XVLNWL *2 ; VOLUME NAME BYTE LENGTH
XFLNBL:= XFLNWL *2 ; FILE NAME BYTE LENGTH
XFNSBL:= XFNSWL *2 ; FILE NAMES BYTE LENGTH
XFSNBL:= XFSNWL *2 ; FILE SYTSEM NAME BYTE LENGTH
XFATBL:= XFATWL *2 ; FILE ATTRIBUTES BYTE LENGTH
XFINBL:= XFINWL *2 ; FILE INFORMATION BYTE LENGTH
XUIDBL:= XUSERH *2 ; USER ID BYTE LENGTH
XACDBL:= XACDWL *2 ; ACCESS DESCRIPTION BYTE LENGTH
XDVDBL:= XDVDWL *2 ; DEVICE DESCRIPTION BYTE LENGTH
XDDDBL:= XDDDWL *2 ; DEVICE DESCRIPTION DUAL
; BYTE LENGTH
XPDABL:= XPDAWL *2 ; PARTNER DEV. ATT. BYTE LENGTH
XMTVBL:= XMTVWL *2 ; MT_VOLUME NAME BYTE LENGTH
XMTNBL:= XMTNWL *2 ; MT_NAME BYTE LENGTH
XMTABL:= XMTAWL *2 ; MT_ATTRIBUTES BYTE LENGTH
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
; E N D O F I O P A R S
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
2