Mercurial > hg > Members > kono > nitros9-code

view level1/modules/rbdesc.asm @ 3295:6b7a7b233925 default tip

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
makefile: Allow PORTS with level1/2 mix https://sourceforge.net/p/nitros9/feature-requests/10/
author Tormod Volden <debian.tormod@gmail.com>
date Tue, 19 Apr 2022 18:12:17 +0200
parents 4674aed99721
children
line wrap: on
line source

********************************************************************
* rbdesc - Device Descriptor Template
*
* $Id$
*
* Edt/Rev  YYYY/MM/DD  Modified by
* Comment
* 1/1	2013-12/10 Gene heskett
*	Raised default SAS to $10, shortens FD.SEG
*	usage for longer files
* ------------------------------------------------------------------

         nam   rbdesc
         ttl   Device Descriptor Template

* Disassembled 98/08/23 17:09:41 by Disasm v1.6 (C) 1988 by RML

         ifp1
         use   defsfile
         endc

tylg     set   Devic+Objct
atrv     set   ReEnt+rev
rev      set   $01

	IFNDEF	DNum
DNum     set   0
	ENDC
         IFNE  D35
Type     set   TYP.CCF+TYP.3
         ELSE
Type     set   TYP.CCF+TYP.5
         ENDC
	IFNDEF	Density
Density  set   DNS.MFM
	ENDC
	IFNDEF	Step
Step     set   STP.6ms
	ENDC
	IFNDEF	Cyls
Cyls     set   35
	ENDC
	IFNDEF	Sides
Sides    set   1
	ENDC
Verify   set   1
	IFNDEF	SectTrk
SectTrk  set   18
	ENDC
	IFNDEF	SectTrk0
SectTrk0 set   18
	ENDC
	IFNDEF	Interlv
Interlv  set   3
	ENDC
	IFNDEF	SAS
SAS      set   10
	ENDC

         mod   eom,name,tylg,atrv,mgrnam,drvnam

         fcb   DIR.!SHARE.!PEXEC.!PWRIT.!PREAD.!EXEC.!UPDAT. mode byte
         fcb   HW.Page    extended controller address
         fdb   $FF40      physical controller address
         fcb   initsize-*-1 initalization table size
         fcb   DT.RBF     device type:0=scf,1=rbf,2=pipe,3=scf
         fcb   DNum       drive number
         fcb   Step       step rate
         fcb   Type       drive device type
         fcb   Density    media density:0=single,1=double
         fdb   Cyls       number of cylinders (tracks)
         fcb   Sides      number of sides
         fcb   Verify     verify disk writes:0=on
         fdb   SectTrk    # of sectors per track
         fdb   SectTrk0   # of sectors per track (track 0)
         fcb   Interlv    sector interleave factor
         fcb   SAS        minimum size of sector allocation
initsize equ   *

         IFNE  DD
name     fcs   /DD/
         ELSE
name     fcc   /RTST/
         fcb   '0+DNum+$80
         ENDC
mgrnam   fcs   /RBF/
drvnam   fcs   /rbtest/

         emod
eom      equ   *
         end