|
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: 3980 (0xf8c)
Types: TextFile
Names: »FSC«
└─⟦b8af24a88⟧ Bits:30005796 CR80 Disc Pack ( MINICAMPS )
└─⟦this⟧ »GENS.D!FSC«
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
; F I L E : F S C . C
;
; LAST CHANGE: 800506
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;-----------------------------------------------------------------------
;
; PROJECT: AMOS
;
; MODULE NAME: FSC
; MODULE ID NMB: CSS/827
; MODULE VERSION: 0101
; MODULE TYPE: PREFIX
; MODULE FILES: FSC.S
; MERGE FILES: -
;
; SPECIFICATIONS: -
; AUTHOR/DATE: FP/800506
;
; DELIVERABLE: YES
; SOURCE LANGUAGE: CR80 ASSEMBLER
; COMPILE COMPUTER: CR80
; TARGET COMPUTER: CR80
; OPER. SYSTEM: AMOS
;
;-----------------------------------------------------------------------
;
; CHANGE RECORD:
;
; VERSION AUTHOR/DATE DESCRIPTION OF CHANGE
; ------- ----------- ---------------------
;
; 0101 FP/800506 INITIAL SUBMITTAL
;
;-----------------------------------------------------------------------
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
; FILE SYSTEM COMMAND
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
USE BASE AX=BASE ; FILE SYSTEM COMMAND
;
COPER:= AX,AX=AX+1 ; FILE SYSTEM OPERATION
CUSER:= AX,AX=AX+XUSERH ; USER ID
CFNUM:= AX,AX=AX+1 ; FILE NUMBER
CFNUM1:= AX,AX=AX+1 ; ADDITIONAL FILE NUMBER
CDEVN:= CFNUM ; DEVICE NAME
CFIRST:= AX,AX=AX+2 ; FIRST BYTE
CCOUNT:= AX,AX=AX+2 ; BYTE COUNT
COMLNG:= AX ;
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
; FILE SYSTEM ANSWER
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
USE BASE AX=BASE ; FILE SYSTEM ANSWER
RRES:= AX,AX=AX+1 ; FILE SYSTEM RESULT
RCOUNT:= AX,AX=AX+2 ; TRANSFERRED BYTES
RFNUM:= RCOUNT ; FILE NUMBER (RESULT)
RESLNG:= AX ;
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
; FILE SYSTEM COMMAND CODES.
;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;
XXUSERON:= 2 ;
XXUSEROFF:= 4 ;
XXASSIGN:= 8 ;
XXASSIGNDUAL= 9 ; ASSIGN DUAL
XXDEASSIGN:= 10 ;
XXDISCARD= 11 ; DISCARD
XXMOUNT:= 14 ;
XXDISMOUNT:= 16 ;
XXUPDATE:= 17 ; UPDATE
XXGETROOT:= 18 ;
XXSTVOLTHD:= 19 ; SET VOLUME THRESHOLD
XXGTVOLTHD:= 20 ; GET VOLUME THRESHOLD
XXCREATE:= 22 ;
XXDISMANTLE:= 24 ;
XXRESET:= 26 ;
XXOFFER:= 28 ;
XXACCEPT:= 30 ;
XXPROTECT:= 34 ;
XXSTFILETHD:= 35 ; SET FILE THRESHOLD
XXGETFIN:= 36 ; GET FILE INFORMATION
XXENTER:= 38 ;
XXLOOKUP:= 40 ;
XXDESCENT:= 42 ;
XXRENAME:= 44 ;
XXREMOVE:= 46 ;
XXREADBYTES:= 50 ;
XXMODIFS:= 52 ;
XXAPPENS:= 54 ;
XXREADR:= 60 ;
XXWRITER:= 62 ;
XXWRITEP:= 64 ; WRITE AND PROTECT
XXWRITEM:= 66 ; WRITE AND MARK
XXFORMAT:= 70 ;
XXSPECIAL:= 80 ; SPECIAL
;