Mercurial > hg > Members > kono > nitros9-code

annotate level1/modules/boot_1773.asm @ 1166:bb618bed0bdc

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Miscellaneous source improvements
author boisy
date Mon, 19 May 2003 11:06:54 +0000
parents 30655a7845f7
children 4e235f213651
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
230
3d2fa54fe8fb Source changes
boisy
parents: 210
diff changeset
1 ********************************************************************
3d2fa54fe8fb Source changes
boisy
parents: 210
diff changeset
2 * Boot - WD1773 Boot for OS-9
3d2fa54fe8fb Source changes
boisy
parents: 210
diff changeset
3 *
3d2fa54fe8fb Source changes
boisy
parents: 210
diff changeset
4 * $Id$
3d2fa54fe8fb Source changes
boisy
parents: 210
diff changeset
5 *
3d2fa54fe8fb Source changes
boisy
parents: 210
diff changeset
6 * Ed. Comments Who YY/MM/DD
3d2fa54fe8fb Source changes
boisy
parents: 210
diff changeset
7 * ------------------------------------------------------------------
3d2fa54fe8fb Source changes
boisy
parents: 210
diff changeset
8 * 4 From Tandy OS-9 Level Two VR 02.00.01 and
3d2fa54fe8fb Source changes
boisy
parents: 210
diff changeset
9 * modified to work properly under OS-9 Level One
3d2fa54fe8fb Source changes
boisy
parents: 210
diff changeset
10
210
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
11 nam Boot
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
12 ttl os9 system module
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
13
210
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
14 * Disassembled 98/08/23 21:21:26 by Disasm v1.6 (C) 1988 by RML
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
15
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
16 ifp1
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
17 use defsfile
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
18 use rbfdefs
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
19 endc
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
20
210
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
21 * Step Rate:
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
22 * $00 = 6ms
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
23 * $01 =
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
24 * $02 =
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
25 * $03 = 30ms
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
26 STEP equ $00
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
27
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
28 tylg set Systm+Objct
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
29 atrv set ReEnt+rev
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
30 rev set $01
230
3d2fa54fe8fb Source changes
boisy
parents: 210
diff changeset
31 edition set 4
3d2fa54fe8fb Source changes
boisy
parents: 210
diff changeset
32
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
33 mod eom,name,tylg,atrv,start,size
230
3d2fa54fe8fb Source changes
boisy
parents: 210
diff changeset
34
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
35 u0000 rmb 2
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
36 u0002 rmb 2
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
37 u0004 rmb 1
210
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
38 u0005 rmb 1
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
39 u0006 rmb 1
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
40 u0007 rmb 1
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
41 u0008 rmb 1
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
42 u0009 rmb 1
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
43 size equ .
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
44
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
45 name fcs /Boot/
230
3d2fa54fe8fb Source changes
boisy
parents: 210
diff changeset
46 fcb edition
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
47
48
cdfe69117a2f Cleaned up source
boisy
parents: 0
diff changeset
48 * First, we make a stack...
210
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
49 start clra
230
3d2fa54fe8fb Source changes
boisy
parents: 210
diff changeset
50 ldb #size
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
51 MakeStak pshs a
210
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
52 decb
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
53 bne MakeStak
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
54
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
55 tfr s,u
210
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
56 ldx #DPort+8
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
57 lda #$D0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
58 sta ,x
210
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
59 lbsr L01A7
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
60 lda ,x
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
61 lda #$FF
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
62 sta u0004,u
210
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
63 leax >NMIRtn,pcr
1166
bb618bed0bdc Miscellaneous source improvements
boisy
parents: 249
diff changeset
64 IFGT Level-1
210
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
65 stx <D.NMI
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
66 lda #$09
1166
bb618bed0bdc Miscellaneous source improvements
boisy
parents: 249
diff changeset
67 ELSE
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
68 stx >$010A
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
69 lda #$7E
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
70 sta >$0109
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
71 lda #$08
1166
bb618bed0bdc Miscellaneous source improvements
boisy
parents: 249
diff changeset
72 ENDC
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
73 sta >DPort
210
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
74
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
75 * delay loop
1166
bb618bed0bdc Miscellaneous source improvements
boisy
parents: 249
diff changeset
76 IFGT Level-1
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
77 ldd #$C350
1166
bb618bed0bdc Miscellaneous source improvements
boisy
parents: 249
diff changeset
78 ELSE
249
30655a7845f7 Cut delay in half
boisy
parents: 230
diff changeset
79 ldd #$61A8
1166
bb618bed0bdc Miscellaneous source improvements
boisy
parents: 249
diff changeset
80 ENDC
210
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
81 L003A nop
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
82 nop
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
83 subd #$0001
210
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
84 bne L003A
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
85
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
86 * search for a free page (to use as a 256 byte disk buffer)
210
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
87 pshs u,y,x,b,a
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
88 ldd #$0001
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
89 os9 F$SRqMem
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
90 bcs L00AA
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
91 tfr u,d
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
92 ldu $06,s
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
93 std u0002,u
210
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
94 clrb
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
95
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
96 * go get LSN0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
97 ldx #$0000
210
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
98 bsr L00C4
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
99 bcs L00AA
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
100
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
101 * get bootfile size from LSN0 and allocate memory for it
210
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
102 ldd DD.TOT+1,y
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
103 std u0007,u
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
104 lda <DD.FMT,y
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
105 sta u0005,u
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
106 anda #$01
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
107 sta u0008,u
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
108 lda DD.TKS,y
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
109 sta u0006,u
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
110 ldd <DD.BSZ,y
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
111 std ,s
210
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
112 ldx <DD.BT+1,y
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
113 pshs x
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
114 ldd #256
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
115 ldu u0002,u
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
116 os9 F$SRtMem
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
117 ldd $02,s
1166
bb618bed0bdc Miscellaneous source improvements
boisy
parents: 249
diff changeset
118 IFGT Level-1
210
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
119 os9 F$BtMem
1166
bb618bed0bdc Miscellaneous source improvements
boisy
parents: 249
diff changeset
120 ELSE
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
121 os9 F$SRqMem
1166
bb618bed0bdc Miscellaneous source improvements
boisy
parents: 249
diff changeset
122 ENDC
210
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
123 puls x
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
124 bcs L00AA
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
125 stu $02,s
210
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
126 ldu $06,s
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
127 ldd $02,s
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
128 std u0002,u
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
129 ldd ,s
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
130 beq L00A3
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
131
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
132 * this loop reads a sector at a time from the bootfile
210
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
133 L0091 pshs x,b,a
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
134 clrb
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
135 bsr L00C4
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
136 bcs L00A8
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
137 puls x,b,a
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
138 inc u0002,u
210
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
139 leax 1,x
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
140 subd #256
210
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
141 bhi L0091
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
142 L00A3 clrb
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
143 puls b,a
210
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
144 bra L00AC
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
145 L00A8 leas $04,s
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
146 L00AA leas $02,s
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
147 L00AC
1166
bb618bed0bdc Miscellaneous source improvements
boisy
parents: 249
diff changeset
148 IFGT Level-1
210
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
149 sta >$FFD9
1166
bb618bed0bdc Miscellaneous source improvements
boisy
parents: 249
diff changeset
150 ENDC
210
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
151 puls u,y,x
230
3d2fa54fe8fb Source changes
boisy
parents: 210
diff changeset
152 leas size,s
210
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
153 rts
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
154
210
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
155 L00B4 lda #$29
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
156 sta ,u
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
157 clr u0004,u
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
158 lda #$05
210
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
159 lbsr L016D
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
160 ldb #STEP
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
161 lbra L0192
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
162
210
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
163 L00C4 lda #$91
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
164 cmpx #$0000
210
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
165 bne L00DC
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
166 bsr L00DC
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
167 bcs L00D3
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
168 ldy u0002,u
210
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
169 clrb
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
170 L00D3 rts
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
171
210
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
172 L00D4 bcc L00DC
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
173 pshs x,b,a
210
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
174 bsr L00B4
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
175 puls x,b,a
210
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
176 L00DC pshs x,b,a
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
177 bsr L00E7
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
178 puls x,b,a
210
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
179 bcc L00D3
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
180 lsra
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
181 bne L00D4
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
182 L00E7 bsr L0139
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
183 bcs L00D3
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
184 ldx u0002,u
210
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
185 orcc #IntMasks
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
186 pshs y
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
187 ldy #$FFFF
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
188 ldb #$80
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
189 stb >DPort+8
210
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
190 ldb ,u
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
191 orb #$30
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
192 tst u0009,u
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
193 beq L0104
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
194 orb #$40
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
195 L0104 stb >DPort
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
196 lbsr L01A7
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
197 orb #$80
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
198 lda #$02
210
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
199 L010E bita >DPort+8
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
200 bne L0120
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
201 leay -$01,y
210
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
202 bne L010E
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
203 lda ,u
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
204 sta >DPort
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
205 puls y
210
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
206 bra L0135
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
207 L0120 lda >DPort+$B
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
208 sta ,x+
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
209 stb >DPort
210
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
210 bra L0120
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
211
230
3d2fa54fe8fb Source changes
boisy
parents: 210
diff changeset
212 NMIRtn leas size+2,s
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
213 puls y
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
214 ldb >DPort+8
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
215 bitb #$04
210
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
216 beq L018C
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
217 L0135 comb
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
218 ldb #E$Read
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
219 rts
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
220
210
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
221 L0139 lda #$09
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
222 sta ,u
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
223 clr u0009,u
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
224 tfr x,d
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
225 cmpd #$0000
210
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
226 beq L0169
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
227 clr ,-s
210
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
228 tst u0008,u
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
229 beq L015F
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
230 bra L0155
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
231 L014F com u0009,u
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
232 bne L0155
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
233 inc ,s
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
234 L0155 subb u0006,u
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
235 sbca #$00
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
236 bcc L014F
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
237 bra L0165
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
238 L015D inc ,s
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
239 L015F subb u0006,u
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
240 sbca #$00
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
241 bcc L015D
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
242 L0165 addb #18
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
243 puls a
210
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
244 L0169 incb
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
245 stb >DPort+$A
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
246 L016D ldb u0004,u
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
247 stb >DPort+9
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
248 cmpa u0004,u
210
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
249 beq L018A
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
250 sta u0004,u
210
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
251 sta >DPort+$B
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
252 ldb #$10+STEP
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
253 bsr L0192
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
254 pshs x
210
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
255 ldx #$222E
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
256 L0184 leax -1,x
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
257 bne L0184
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
258 puls x
210
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
259 L018A clrb
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
260 rts
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
261 L018C bitb #$98
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
262 bne L0135
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
263 clrb
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
264 rts
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
265 L0192 bsr L01A5
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
266 L0194 ldb >DPort+$8
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
267 bitb #$01
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
268 bne L0194
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
269 rts
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
270 L019C lda ,u
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
271 sta >DPort
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
272 stb >DPort+$8
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
273 rts
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
274 L01A5 bsr L019C
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
275 L01A7 lbsr L01AA
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
276 L01AA lbsr L01AD
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
277 L01AD rts
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
278
1166
bb618bed0bdc Miscellaneous source improvements
boisy
parents: 249
diff changeset
279 IFGT Level-1
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
280
210
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
281 rts
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
282 rts
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
283 rts
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
284 rts
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
285 rts
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
286 rts
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
287 rts
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
288 rts
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
289 rts
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
290 rts
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
291 rts
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
292 rts
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
293 rts
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
294 rts
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
295 rts
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
296 rts
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
297 rts
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
298 rts
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
299 rts
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
300 rts
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
301 rts
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
302 rts
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
303 rts
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
304 rts
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
305 rts
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
306 rts
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
307 rts
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
308 rts
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
309 rts
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
310 rts
6bf55704c623 Boot is adapted from OS-9 Level Two boot module, now boots from
boisy
parents: 201
diff changeset
311 rts
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
312
1166
bb618bed0bdc Miscellaneous source improvements
boisy
parents: 249
diff changeset
313 ENDC
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
314
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
315 emod
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
316 eom equ *
48
cdfe69117a2f Cleaned up source
boisy
parents: 0
diff changeset
317 end