Mercurial > hg > Members > kono > nitros9-code

annotate 3rdparty/drivers/burke/bb1fhdisk.asm @ 962:8a0993b04c8a

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
*** empty log message ***
author boisy
date Fri, 31 Jan 2003 17:35:49 +0000
parents c10820aa211b
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
91
boisy
parents:
diff changeset
1 *******************************************
boisy
parents:
diff changeset
2 *** ***
boisy
parents:
diff changeset
3 *** COPYRIGHT 1988 BURKE & BURKE ***
boisy
parents:
diff changeset
4 *** ALL RIGHTS RESERVED ***
boisy
parents:
diff changeset
5 *** ***
boisy
parents:
diff changeset
6 *******************************************
boisy
parents:
diff changeset
7
boisy
parents:
diff changeset
8 nam BB1FHDISK
boisy
parents:
diff changeset
9
boisy
parents:
diff changeset
10 *
boisy
parents:
diff changeset
11 * CoCo XT Hard Disk Driver 07/26/87
boisy
parents:
diff changeset
12 * (with formatting capability)
boisy
parents:
diff changeset
13 *
boisy
parents:
diff changeset
14 *
boisy
parents:
diff changeset
15 * For Western Digital WD1002-WX2 (or WX1) Controller.
boisy
parents:
diff changeset
16 *
boisy
parents:
diff changeset
17 * This is a general purpose driver. It can handle
boisy
parents:
diff changeset
18 * 1-2 hard drives, the parameters of which are described
boisy
parents:
diff changeset
19 * in the device descriptors. The drives may be of
boisy
parents:
diff changeset
20 * different sizes. This version is optimized
boisy
parents:
diff changeset
21 * for the CoCo 3 under level 1, version 2 OS9.
boisy
parents:
diff changeset
22 * It does not mess with the clock speed -- the native
boisy
parents:
diff changeset
23 * speed is used. It also verifies disk writes, and uses
boisy
parents:
diff changeset
24 * read caching.
boisy
parents:
diff changeset
25 *
boisy
parents:
diff changeset
26 * THIS VERSION CAN FORMAT THE HARD DISK!
boisy
parents:
diff changeset
27 *
boisy
parents:
diff changeset
28 * Chris Burke Schaumburg, IL 07/26/87
boisy
parents:
diff changeset
29 *
boisy
parents:
diff changeset
30
boisy
parents:
diff changeset
31 page
boisy
parents:
diff changeset
32 *
boisy
parents:
diff changeset
33 * Conditional assembly control
boisy
parents:
diff changeset
34 *
boisy
parents:
diff changeset
35
boisy
parents:
diff changeset
36 Drives equ 2 ;Number of drives supported
boisy
parents:
diff changeset
37
boisy
parents:
diff changeset
38 irqflg equ 0 ;non-zero to mask interrupts during HD access
boisy
parents:
diff changeset
39 trsflg equ 0 ;non-zero if optimized for 4x32 disk
boisy
parents:
diff changeset
40 cchflg equ 1 ;non-zero if read cache supported
boisy
parents:
diff changeset
41 vrfflg equ 1 ;non-zero if write verification supported
boisy
parents:
diff changeset
42 tboflg equ 0 ;non-zero if jump to 2 MHz for block moves
boisy
parents:
diff changeset
43 fstflg equ 1 ;non-zero if fast transfers supported
boisy
parents:
diff changeset
44 sysram equ 1 ;non-zero to use system RAM for verf buffer
boisy
parents:
diff changeset
45 sizflg equ 1 ;non-zero to allow drives of different sizes
boisy
parents:
diff changeset
46
boisy
parents:
diff changeset
47 fmtflg equ 1 ;non-zero if hard formatting supported
boisy
parents:
diff changeset
48 errflg equ 0 ;non-zero for good error messages
boisy
parents:
diff changeset
49 icdflg equ 0 ;non-zero to ignore C/D status bit
boisy
parents:
diff changeset
50 timflg equ 0 ;non-zero to support access timer
boisy
parents:
diff changeset
51
boisy
parents:
diff changeset
52 XLEVEL equ 1 ;Bogus level 2 flag
boisy
parents:
diff changeset
53
boisy
parents:
diff changeset
54 testing equ 0 ;non-zero to call driver "XD", not "HD"
boisy
parents:
diff changeset
55
boisy
parents:
diff changeset
56 *
boisy
parents:
diff changeset
57 * Include the main line
boisy
parents:
diff changeset
58 *
boisy
parents:
diff changeset
59
boisy
parents:
diff changeset
60 use xtos9.src
boisy
parents:
diff changeset
61