annotate level1/cmds/edit.asm @ 2758:e4a0f58a5f9b

Found that people who do not have the envirornment variable NITROS9DIR set before building the project get a error missing file "/rules.mak". Found this is caused do to the fact that the code to set this envirornment variable is in the rules.mak which can't get loaded. To fix this the code needed to set the envirornment variable that is in the rules.mak is now in the makefile(s) right before the include for the rules.mak file. This should fix the problem for those who do not have the NITROS9DIR envirornment variable preset.
author drencor-xeen
date Mon, 14 Jan 2013 14:37:46 -0600
parents 84ea83668304
children f1ec894ef120
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
200
e9ce43cc215e Made major changes to headers for consistency and identification
boisy
parents: 195
diff changeset
1 ********************************************************************
e9ce43cc215e Made major changes to headers for consistency and identification
boisy
parents: 195
diff changeset
2 * Edit - Line editor
e9ce43cc215e Made major changes to headers for consistency and identification
boisy
parents: 195
diff changeset
3 *
e9ce43cc215e Made major changes to headers for consistency and identification
boisy
parents: 195
diff changeset
4 * $Id$
e9ce43cc215e Made major changes to headers for consistency and identification
boisy
parents: 195
diff changeset
5 *
1325
84ea83668304 Redid comments, reset all rev nibbles that weren't explictly set to 0
boisy
parents: 925
diff changeset
6 * Edt/Rev YYYY/MM/DD Modified by
84ea83668304 Redid comments, reset all rev nibbles that weren't explictly set to 0
boisy
parents: 925
diff changeset
7 * Comment
200
e9ce43cc215e Made major changes to headers for consistency and identification
boisy
parents: 195
diff changeset
8 * ------------------------------------------------------------------
1325
84ea83668304 Redid comments, reset all rev nibbles that weren't explictly set to 0
boisy
parents: 925
diff changeset
9 * 3 ????/??/??
84ea83668304 Redid comments, reset all rev nibbles that weren't explictly set to 0
boisy
parents: 925
diff changeset
10 * From Tandy OS-9 Level One VR 02.00.00.
200
e9ce43cc215e Made major changes to headers for consistency and identification
boisy
parents: 195
diff changeset
11
195
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
12 nam Edit
200
e9ce43cc215e Made major changes to headers for consistency and identification
boisy
parents: 195
diff changeset
13 ttl Line editor
195
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
14
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
15 * Disassembled 02/07/05 22:33:05 by Disasm v1.6 (C) 1988 by RML
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
16
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
17 ifp1
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
18 use defsfile
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
19 endc
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
20
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
21 tylg set Prgrm+Objct
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
22 atrv set ReEnt+rev
1325
84ea83668304 Redid comments, reset all rev nibbles that weren't explictly set to 0
boisy
parents: 925
diff changeset
23 rev set $00
200
e9ce43cc215e Made major changes to headers for consistency and identification
boisy
parents: 195
diff changeset
24 edition set 3
195
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
25
200
e9ce43cc215e Made major changes to headers for consistency and identification
boisy
parents: 195
diff changeset
26 L0000 mod eom,name,tylg,atrv,start,size
195
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
27
924
c155aac72190 Made cosmetic changes
boisy
parents: 921
diff changeset
28 org 0
195
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
29 u0000 rmb 1
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
30 u0001 rmb 1
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
31 u0002 rmb 1
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
32 u0003 rmb 1
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
33 u0004 rmb 1
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
34 u0005 rmb 1
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
35 u0006 rmb 1
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
36 u0007 rmb 1
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
37 u0008 rmb 1
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
38 u0009 rmb 1
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
39 u000A rmb 1
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
40 u000B rmb 1
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
41 u000C rmb 1
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
42 u000D rmb 1
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
43 u000E rmb 1
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
44 u000F rmb 1
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
45 u0010 rmb 1
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
46 u0011 rmb 1
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
47 u0012 rmb 2
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
48 u0014 rmb 2
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
49 u0016 rmb 2
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
50 u0018 rmb 2
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
51 u001A rmb 2
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
52 u001C rmb 2
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
53 u001E rmb 2
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
54 u0020 rmb 1
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
55 u0021 rmb 2
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
56 u0023 rmb 1
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
57 u0024 rmb 1
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
58 u0025 rmb 1
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
59 u0026 rmb 1
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
60 u0027 rmb 2
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
61 u0029 rmb 1
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
62 u002A rmb 1
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
63 u002B rmb 2
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
64 u002D rmb 2
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
65 u002F rmb 1
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
66 u0030 rmb 2
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
67 u0032 rmb 4
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
68 u0036 rmb 1
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
69 u0037 rmb 1
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
70 u0038 rmb 1
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
71 u0039 rmb 1
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
72 u003A rmb 1
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
73 u003B rmb 1
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
74 u003C rmb 1
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
75 u003D rmb 1
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
76 u003E rmb 1
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
77 u003F rmb 1
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
78 u0040 rmb 1
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
79 u0041 rmb 1
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
80 u0042 rmb 1
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
81 u0043 rmb 1
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
82 u0044 rmb 1
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
83 u0045 rmb 2
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
84 u0047 rmb 1
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
85 u0048 rmb 1
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
86 u0049 rmb 2
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
87 u004B rmb 2
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
88 u004D rmb 1
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
89 u004E rmb 1
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
90 u004F rmb 2
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
91 u0051 rmb 4
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
92 u0055 rmb 2
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
93 u0057 rmb 13
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
94 u0064 rmb 7
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
95 u006B rmb 2
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
96 u006D rmb 2
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
97 u006F rmb 5
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
98 u0074 rmb 7
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
99 u007B rmb 14
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
100 u0089 rmb 1
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
101 u008A rmb 4
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
102 u008E rmb 16
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
103 u009E rmb 7
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
104 u00A5 rmb 1
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
105 u00A6 rmb 11
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
106 u00B1 rmb 3
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
107 u00B4 rmb 2
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
108 u00B6 rmb 15
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
109 u00C5 rmb 8
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
110 u00CD rmb 2
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
111 u00CF rmb 2
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
112 u00D1 rmb 2
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
113 u00D3 rmb 2
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
114 u00D5 rmb 1
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
115 u00D6 rmb 18
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
116 u00E8 rmb 4
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
117 u00EC rmb 1
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
118 u00ED rmb 10
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
119 u00F7 rmb 4
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
120 u00FB rmb 3
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
121 u00FE rmb 121
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
122 u0177 rmb 255
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
123 u0276 rmb 40
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
124 u029E rmb 384
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
125 u041E rmb 2049
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
126 size equ .
200
e9ce43cc215e Made major changes to headers for consistency and identification
boisy
parents: 195
diff changeset
127
e9ce43cc215e Made major changes to headers for consistency and identification
boisy
parents: 195
diff changeset
128 name fcs /Edit/
e9ce43cc215e Made major changes to headers for consistency and identification
boisy
parents: 195
diff changeset
129 fcb edition
e9ce43cc215e Made major changes to headers for consistency and identification
boisy
parents: 195
diff changeset
130
925
93c871621a22 Uncommented (C) message
boisy
parents: 924
diff changeset
131 fcc "(C)1981Microware"
200
e9ce43cc215e Made major changes to headers for consistency and identification
boisy
parents: 195
diff changeset
132
195
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
133 L0022 fcb $01
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
134 lbra L0292
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
135 lbra L0C38
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
136 lbra L0BEC
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
137 lbra L0BE3
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
138 lbra L100F
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
139 lbra L0770
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
140 lbra L06EA
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
141 lbra L0716
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
142 lbra L073F
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
143 lbra L04A1
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
144 lbra L046B
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
145 lbra L05D6
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
146 lbra L0626
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
147 lbra L0094
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
148 lbra L0B96
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
149 lbra L0B01
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
150 L0053 lda #$00
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
151 sta <u0023,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
152 rti
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
153 L0059 ldx <u000E
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
154 jmp ,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
155 L005D lda <u0026
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
156 lbsr L0107
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
157 lda #$3A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
158 lbsr L0107
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
159 ldx <u0012
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
160 leax >$0177,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
161 lda <u000A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
162 ldy #$0080
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
163 os9 I$ReadLn
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
164 bcc L0081
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
165 cmpb #$D3
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
166 lbeq L114D
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
167 lbra L12AA
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
168 L0081 rts
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
169 L0082 pshs x,b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
170 lbsr L06D7
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
171 bsr L008B
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
172 puls pc,x,b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
173 L008B pshs b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
174 lbsr L0130
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
175 bsr L0094
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
176 puls pc,b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
177 L0094 pshs y,x,b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
178 cmpd #$0000
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
179 beq L00C6
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
180 leay d,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
181 pshs y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
182 L00A0 tst <u0037
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
183 beq L00AC
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
184 lda #$20
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
185 bsr L0107
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
186 bsr L0107
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
187 bsr L0107
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
188 L00AC tst <u0023
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
189 beq L00C4
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
190 lda ,x+
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
191 bsr L0107
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
192 cmpx ,s
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
193 beq L00BE
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
194 cmpa #$0D
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
195 bne L00AC
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
196 bra L00A0
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
197 L00BE cmpa #$0D
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
198 beq L00C4
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
199 bsr L00FF
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
200 L00C4 puls y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
201 L00C6 puls pc,y,x,b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
202 L00C8 pshs y,b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
203 ldd <u0002
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
204 tstb
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
205 beq L00E0
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
206 cmpa ,s
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
207 bne L00E0
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
208 ldd <u0021
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
209 addd #$0001
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
210 std <u0021
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
211 ldb <u0020
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
212 adcb #$00
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
213 stb <u0020
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
214 L00E0 bsr L0130
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
215 tfr d,y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
216 lda ,s
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
217 os9 I$Write
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
218 lbcs L12AA
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
219 puls pc,y,b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
220 L00EF pshs a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
221 bsr L00FF
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
222 lda <u0037
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
223 clr <u0037
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
224 bsr L008B
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
225 sta <u0037
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
226 puls pc,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
227 L00FD bsr L00FF
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
228 L00FF pshs a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
229 lda #$0D
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
230 bsr L0107
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
231 puls pc,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
232 L0107 pshs y,x,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
233 lda <u000B
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
234 ldy #$0001
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
235 tfr s,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
236 tst <u0041
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
237 bmi L0119
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
238 tst <u003E
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
239 beq L0120
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
240 L0119 os9 I$WritLn
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
241 lbcs L12AA
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
242 L0120 puls pc,y,x,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
243 L0122 pshs x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
244 lda ,x+
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
245 cmpa #$0D
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
246 lbeq L1272
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
247 bsr L0132
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
248 puls pc,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
249 L0130 lda #$0D
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
250 L0132 pshs y,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
251 ldb #$0D
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
252 ldy #$0000
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
253 L013A cmpx <u001C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
254 beq L014C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
255 leay $01,y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
256 cmpb ,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
257 beq L014C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
258 cmpa ,x+
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
259 bne L013A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
260 leay -$01,y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
261 bra L0152
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
262 L014C cmpa #$0D
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
263 lbne L1272
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
264 L0152 tfr y,d
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
265 cmpd #$0000
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
266 puls pc,y,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
267 L015A pshs u,x,b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
268 os9 F$PrsNam
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
269 puls pc,u,x,b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
270 start equ *
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
271 tfr u,d
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
272 std <u0012
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
273 sts <u001E
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
274 leas >u041E,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
275 addd #$041F
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
276 std <u0014
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
277 std <u0016
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
278 std <u001C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
279 std <u001A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
280 pshs u,y,x,b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
281 leax >L0022,pcr
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
282 stx <u000C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
283 leax >L005D,pcr
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
284 stx <u000E
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
285 leax >L09DD,pcr
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
286 stx <u0010
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
287 ldd #$0000
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
288 std <u0051
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
289 std <u006F
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
290 std <u0089
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
291 leax >L1482,pcr
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
292 stx <u004D
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
293 leax >L13CF,pcr
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
294 stx <u006B
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
295 leax >L0000,pcr
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
296 stx <u004F
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
297 stx <u006D
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
298 leax >L13B0,pcr
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
299 lda #$01
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
300 os9 F$Link
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
301 bcs L01B5
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
302 jsr ,y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
303 L01B5 leax >L13B6,pcr
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
304 lda #$01
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
305 os9 F$Link
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
306 bcs L01C2
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
307 jsr ,y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
308 L01C2 puls u,y,x,b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
309 lda #$FF
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
310 sta <u0041
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
311 inca
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
312 sta <u0001
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
313 sta <u0003
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
314 sta <u0005
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
315 sta <u0007
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
316 sta <u000A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
317 sta <u003D
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
318 inca
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
319 sta <u000B
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
320 sta <u003E
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
321 sta <u0040
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
322 lda #$45
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
323 sta <u0026
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
324 clr <u0036
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
325 lbsr L0691
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
326 cmpa #$0D
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
327 beq L0260
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
328 lbsr L015A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
329 bcs L0259
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
330 lda #$01
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
331 stx <u0032
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
332 os9 I$Open
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
333 bcs L024B
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
334 ldb #$01
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
335 std <u0000
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
336 pshs x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
337 leay >u00F7,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
338 leax >L139F,pcr
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
339 ldd #$0007
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
340 lbsr L0B96
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
341 pshs y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
342 ldx <u0032
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
343 L020F cmpx $02,s
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
344 beq L0220
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
345 lda ,x+
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
346 sta ,y+
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
347 cmpa #$2F
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
348 bne L020F
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
349 sty ,s
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
350 bra L020F
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
351 L0220 puls y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
352 leax >L13A7,pcr
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
353 ldd #$0008
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
354 lbsr L0B96
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
355 ldx <u0032
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
356 ldd ,s
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
357 subd <u0032
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
358 sty <u0032
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
359 lbsr L0B96
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
360 lda #$0D
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
361 sta ,y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
362 puls x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
363 lbsr L0691
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
364 cmpa #$0D
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
365 bne L024B
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
366 leax >u00FE,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
367 inc <u0036
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
368 L024B ldd #$020B
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
369 os9 I$Create
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
370 bcs L025B
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
371 ldb #$02
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
372 std <u0002
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
373 bra L0260
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
374 L0259 ldb #$D8
203
7dea3d77ba0b Used symbolics for andcc/orcc
boisy
parents: 200
diff changeset
375 L025B orcc #Carry
195
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
376 os9 F$Exit
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
377 L0260 ldy #$0000
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
378 sty <u0024
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
379 lda #$42
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
380 lbsr L06EA
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
381 lbsr L073F
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
382 lda #$42
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
383 ldy #$0001
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
384 lbsr L06EA
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
385 leax >L0053,pcr
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
386 ldu <u0012
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
387 os9 F$Icpt
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
388 tst <u0001
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
389 beq L028F
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
390 ldd <u001E
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
391 subd <u001C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
392 subd #$0400
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
393 lbsr L0F43
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
394 L028F lbsr L00FD
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
395 L0292 ldu <u0012
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
396 leas >u041E,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
397 leax >u029E,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
398 stx <u0045
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
399 stx <u0047
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
400 leax <-$28,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
401 stx <u0049
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
402 lda #$FF
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
403 sta <u0041
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
404 sta <u0023
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
405 lda <u0040
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
406 sta <u003E
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
407 clr <u003B
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
408 clr <u003A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
409 clr <u003C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
410 lda #$01
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
411 sta <u0037
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
412 tst <u003D
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
413 beq L02CB
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
414 tst <u0039
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
415 bne L02CB
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
416 leax >L1398,pcr
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
417 lbsr L00EF
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
418 lbsr L00FF
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
419 L02CB clr <u003D
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
420 clr <u0039
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
421 lbsr L0059
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
422 leax >u0177,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
423 lbsr L0130
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
424 leay d,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
425 sty <u002B
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
426 ldy #$0000
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
427 sty <u0029
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
428 leau >u0276,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
429 stu <u0027
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
430 lda ,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
431 cmpa #$20
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
432 bne L02F8
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
433 leax $01,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
434 lbsr L0BDE
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
435 bra L0292
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
436 L02F8 cmpa #$0D
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
437 bne L0308
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
438 ldx <u001A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
439 lbsr L06B2
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
440 stx <u001A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
441 lbsr L008B
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
442 bra L0292
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
443 L0308 bsr L0310
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
444 lbsr L00FF
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
445 lbra L0292
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
446 L0310 ldd <u0043
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
447 pshs b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
448 ldd <u0045
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
449 std <u0043
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
450 pshs b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
451 lda <u003E
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
452 pshs a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
453 clr <u002F
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
454 inc <u0041
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
455 L0322 cmpx <u002B
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
456 lbcc L03B8
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
457 lbsr L0691
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
458 cmpa #$0D
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
459 bne L0335
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
460 leax $01,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
461 clr <u002F
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
462 bra L0322
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
463 L0335 ldd <u0027
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
464 pshs b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
465 stu <u0027
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
466 ldd <u0029
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
467 pshs b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
468 ldd <u002B
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
469 pshs b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
470 pshs u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
471 lbsr L0691
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
472 sta <u0038
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
473 lbsr L03D3
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
474 pshs x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
475 pshs u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
476 leax <L039D,pcr
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
477 pshu x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
478 pshu u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
479 tfr d,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
480 lda <u0038
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
481 tst <u003B
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
482 bne L0372
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
483 tst <u003C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
484 bne L0372
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
485 tst <u003D
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
486 beq L0397
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
487 tst <u003A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
488 bne L0372
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
489 cmpa #$3A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
490 bne L0372
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
491 stb <u003D
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
492 L0372 cmpa #$5B
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
493 bne L0378
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
494 inc <u003A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
495 L0378 cmpa #$5D
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
496 bne L039D
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
497 dec <u003A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
498 bpl L039D
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
499 tst <u003C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
500 bne L0395
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
501 lbsr L0964
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
502 tst <u003B
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
503 bne L038F
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
504 clr <u003D
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
505 bra L039D
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
506 L038F clr <u003B
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
507 bra L039D
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
508 bra L039D
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
509 L0395 clr <u003C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
510 L0397 lda <u0041
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
511 clr <u0039
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
512 jsr ,y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
513 L039D puls u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
514 puls x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
515 puls u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
516 puls b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
517 std <u002B
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
518 puls b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
519 std <u0029
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
520 puls b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
521 std <u0027
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
522 tst <u0023
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
523 lbeq L127B
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
524 lbra L0322
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
525 L03B8 dec <u0041
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
526 puls a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
527 sta <u003E
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
528 puls b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
529 std <u0045
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
530 puls b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
531 std <u0043
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
532 tst <u003D
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
533 beq L03D2
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
534 lda #$01
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
535 sta <u003D
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
536 clr <u003C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
537 clr <u003B
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
538 L03D2 rts
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
539 L03D3 lbsr L0691
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
540 bsr L040E
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
541 beq L0400
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
542 leax $01,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
543 lbsr L04A1
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
544 lbeq L1269
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
545 pshs y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
546 tfr d,y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
547 ldd ,y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
548 leay d,y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
549 sty <u002B
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
550 ldy ,s
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
551 lbsr L04F4
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
552 tfr y,d
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
553 puls y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
554 sty <u0029
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
555 leay >L0310,pcr
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
556 rts
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
557 L0400 pshs b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
558 lbsr L04F4
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
559 ldd #$0000
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
560 std <u0029
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
561 std <u002B
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
562 puls pc,y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
563 L040E ldb ,x+
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
564 lbsr L04D0
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
565 tfr a,b
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
566 L0415 ldy <u0012
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
567 leay <$4D,y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
568 cmpb #$2E
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
569 bne L0425
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
570 ldy <u0012
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
571 leay <$6B,y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
572 L0425 sty <u004B
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
573 ldy ,y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
574 L042B lda ,y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
575 bne L043C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
576 ldy <u004B
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
577 leay $04,y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
578 sty <u004B
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
579 ldy ,y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
580 beq L045D
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
581 L043C cmpb #$2E
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
582 beq L0446
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
583 cmpb ,y+
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
584 bne L044A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
585 bra L044E
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
586 L0446 bsr L046B
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
587 beq L044E
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
588 L044A bsr L0462
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
589 bra L042B
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
590 L044E pshs y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
591 bsr L0462
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
592 ldd -$02,y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
593 ldy <u004B
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
594 addd $02,y
203
7dea3d77ba0b Used symbolics for andcc/orcc
boisy
parents: 200
diff changeset
595 orcc #Zero
195
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
596 puls pc,y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
597 L045D leax -$01,x
203
7dea3d77ba0b Used symbolics for andcc/orcc
boisy
parents: 200
diff changeset
598 andcc #^Zero
195
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
599 rts
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
600 L0462 lda ,y+
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
601 cmpa #$0D
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
602 bne L0462
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
603 leay $02,y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
604 rts
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
605 L046B pshs y,x,b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
606 lda ,y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
607 bsr L04DA
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
608 bne L049D
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
609 L0473 sty $04,s
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
610 lda ,y+
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
611 bsr L04D0
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
612 bne L0491
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
613 pshs a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
614 lda ,x+
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
615 bsr L04D0
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
616 cmpa ,s+
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
617 beq L0473
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
618 L0486 sty $04,s
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
619 lda ,y+
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
620 bsr L04DA
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
621 beq L0486
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
622 bra L049D
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
623 L0491 lda ,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
624 bsr L04DA
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
625 beq L049D
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
626 stx $02,s
203
7dea3d77ba0b Used symbolics for andcc/orcc
boisy
parents: 200
diff changeset
627 orcc #Zero
195
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
628 bra L049F
203
7dea3d77ba0b Used symbolics for andcc/orcc
boisy
parents: 200
diff changeset
629 L049D andcc #^Zero
195
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
630 L049F puls pc,y,x,b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
631 L04A1 pshs u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
632 ldu <u0014
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
633 lbsr L0691
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
634 L04A8 lda u0004,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
635 cmpa #$4D
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
636 bne L04C0
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
637 leay u000B,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
638 lbsr L069A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
639 bsr L046B
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
640 beq L04C4
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
641 ldd ,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
642 leau d,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
643 cmpu <u001C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
644 bcs L04A8
203
7dea3d77ba0b Used symbolics for andcc/orcc
boisy
parents: 200
diff changeset
645 L04C0 orcc #Zero
195
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
646 puls pc,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
647 L04C4 lbsr L069A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
648 lbsr L0691
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
649 tfr u,d
203
7dea3d77ba0b Used symbolics for andcc/orcc
boisy
parents: 200
diff changeset
650 andcc #^Zero
195
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
651 puls pc,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
652 L04D0 cmpa #$61
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
653 bcs L04DA
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
654 cmpa #$7A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
655 bhi L04DA
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
656 suba #$20
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
657 L04DA cmpa #$5F
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
658 beq L04EE
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
659 cmpa #$41
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
660 bcs L04F1
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
661 cmpa #$5A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
662 bls L04EE
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
663 cmpa #$61
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
664 bcs L04F1
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
665 cmpa #$7A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
666 bhi L04F1
203
7dea3d77ba0b Used symbolics for andcc/orcc
boisy
parents: 200
diff changeset
667 L04EE orcc #Zero
195
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
668 rts
203
7dea3d77ba0b Used symbolics for andcc/orcc
boisy
parents: 200
diff changeset
669 L04F1 andcc #^Zero
195
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
670 rts
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
671 L04F4 clr <u0042
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
672 pshs b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
673 L04F8 lbsr L069A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
674 lbsr L0691
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
675 bsr L052B
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
676 L0500 cmpa #$0D
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
677 beq L0525
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
678 cmpa #$4C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
679 bne L050F
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
680 pshu x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
681 lbsr L06C2
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
682 bra L0525
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
683 L050F cmpa #$23
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
684 bne L0517
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
685 bsr L0540
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
686 bra L04F8
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
687 L0517 cmpa #$24
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
688 lbne L1287
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
689 L051D bsr L0553
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
690 cmpa #$24
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
691 beq L051D
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
692 bra L0500
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
693 L0525 ldb <u0042
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
694 pshu b
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
695 puls pc,b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
696 L052B lbsr L069A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
697 pshs a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
698 cmpa #$0D
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
699 beq L053E
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
700 inc <u0042
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
701 L0536 leay $01,y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
702 lda ,y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
703 bsr L04DA
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
704 beq L0536
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
705 L053E puls pc,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
706 L0540 pshs b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
707 lda ,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
708 cmpa #$23
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
709 bne L054C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
710 bsr L05B3
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
711 bra L0551
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
712 L054C lbsr L05D6
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
713 pshu b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
714 L0551 puls pc,b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
715 L0553 pshs b
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
716 lbsr L0691
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
717 cmpa #$24
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
718 bne L0562
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
719 bsr L05B3
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
720 bsr L052B
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
721 bra L057E
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
722 L0562 pshu x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
723 lbsr L0122
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
724 leax d,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
725 leax $02,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
726 bsr L052B
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
727 cmpa #$24
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
728 bne L057E
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
729 pshs x,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
730 lbsr L0691
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
731 cmpa #$24
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
732 puls x,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
733 beq L057E
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
734 leax -$01,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
735 L057E puls pc,b
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
736 L0580 pshs y,x,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
737 ldy <u0029
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
738 ldb #$00
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
739 L0587 lbsr L069A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
740 cmpa #$0D
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
741 beq L05AB
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
742 lbsr L0691
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
743 addb #$01
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
744 lda ,x+
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
745 cmpa ,y+
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
746 bne L059E
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
747 lbsr L046B
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
748 beq L05AD
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
749 L059E ldx $01,s
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
750 L05A0 lda ,y+
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
751 lbsr L04DA
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
752 beq L05A0
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
753 leay -$01,y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
754 bra L0587
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
755 L05AB ldb #$00
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
756 L05AD stx $01,s
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
757 cmpb #$00
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
758 puls pc,y,x,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
759 L05B3 pshs y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
760 lda ,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
761 cmpa #$24
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
762 beq L05C1
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
763 cmpa #$23
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
764 lbne L1287
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
765 L05C1 bsr L0580
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
766 lbeq L1290
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
767 ldy <u0027
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
768 negb
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
769 addb $04,y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
770 lslb
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
771 leay $05,y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
772 ldd b,y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
773 pshu b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
774 puls pc,y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
775 L05D6 lda ,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
776 cmpa #$2A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
777 bne L05E3
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
778 leax $01,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
779 ldd #$FFFF
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
780 bra L05F3
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
781 L05E3 ldd #$0000
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
782 bsr L0600
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
783 bne L05EF
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
784 ldd #$0001
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
785 bra L05F3
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
786 L05EF bsr L0600
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
787 bne L05EF
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
788 L05F3 rts
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
789 L05F4 beq L0606
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
790 com <u00E8
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
791 neg <u0064
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
792 neg <u000A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
793 neg <u0001
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
794 neg <u0000
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
795 L0600 pshs y,b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
796 ldb ,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
797 subb #$30
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
798 L0606 cmpb #$0A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
799 bcc L0622
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
800 leax $01,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
801 lda #$00
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
802 ldy #$000A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
803 L0612 addd ,s
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
804 lbcs L1266
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
805 leay -$01,y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
806 bne L0612
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
807 std ,s
203
7dea3d77ba0b Used symbolics for andcc/orcc
boisy
parents: 200
diff changeset
808 andcc #^Zero
195
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
809 puls pc,y,b,a
203
7dea3d77ba0b Used symbolics for andcc/orcc
boisy
parents: 200
diff changeset
810 L0622 orcc #Zero
195
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
811 puls pc,y,b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
812 L0626 pshs y,x,b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
813 leax >L05F4,pcr
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
814 ldy #$2F20
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
815 L0630 leay >$0100,y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
816 subd ,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
817 bcc L0630
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
818 addd ,x++
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
819 pshs b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
820 ldd ,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
821 tfr y,d
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
822 beq L0659
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
823 ldy #$2F30
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
824 cmpd #$3020
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
825 bne L0652
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
826 ldy #$2F20
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
827 tfr b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
828 L0652 lbsr L0107
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
829 puls b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
830 bra L0630
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
831 L0659 lbsr L0107
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
832 leas $02,s
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
833 puls pc,y,x,b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
834 L0660 pshs x,b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
835 ldx <u0027
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
836 ldd -$02,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
837 puls pc,x,b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
838 L0668 pshs x,b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
839 tst <u0023
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
840 beq L0683
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
841 ldx <u0027
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
842 ldd -$02,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
843 beq L0683
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
844 cmpd #$FFFF
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
845 bne L067E
203
7dea3d77ba0b Used symbolics for andcc/orcc
boisy
parents: 200
diff changeset
846 andcc #^Zero
195
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
847 bra L0683
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
848 L067E subd #$0001
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
849 std -$02,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
850 L0683 puls pc,x,b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
851 L0685 pshs x,b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
852 ldx <u0027
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
853 ldd -$02,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
854 cmpd #$FFFF
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
855 puls pc,x,b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
856 L0691 lda ,x+
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
857 cmpa #$20
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
858 beq L0691
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
859 leax -$01,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
860 rts
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
861 L069A lda ,y+
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
862 cmpa #$20
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
863 beq L069A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
864 leay -$01,y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
865 rts
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
866 L06A3 pshs b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
867 ldd <u001C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
868 sty <u001C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
869 bsr L06B2
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
870 pshs cc
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
871 std <u001C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
872 puls pc,b,a,cc
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
873 L06B2 pshs a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
874 L06B4 cmpx <u001C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
875 beq L06C0
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
876 lda ,x+
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
877 cmpa #$0D
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
878 bne L06B4
203
7dea3d77ba0b Used symbolics for andcc/orcc
boisy
parents: 200
diff changeset
879 andcc #^Zero
195
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
880 L06C0 puls pc,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
881 L06C2 cmpx <u001C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
882 beq L06CE
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
883 bsr L06B2
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
884 cmpx <u0018
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
885 beq L06CE
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
886 leax -$01,x
203
7dea3d77ba0b Used symbolics for andcc/orcc
boisy
parents: 200
diff changeset
887 L06CE andcc #^Zero
195
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
888 rts
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
889 L06D1 bsr L06D7
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
890 beq L06E9
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
891 leax -$01,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
892 L06D7 pshs a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
893 L06D9 cmpx <u0018
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
894 beq L06E7
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
895 lda ,-x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
896 cmpa #$0D
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
897 bne L06D9
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
898 leax $01,x
203
7dea3d77ba0b Used symbolics for andcc/orcc
boisy
parents: 200
diff changeset
899 andcc #^Zero
195
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
900 L06E7 puls a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
901 L06E9 rts
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
902 L06EA pshs y,x,b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
903 ldd #$000B
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
904 ldy <u001C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
905 lbsr L0BC0
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
906 leax d,y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
907 sty <u0016
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
908 stx <u001C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
909 stx <u0018
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
910 stx <u001A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
911 std ,y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
912 std $02,y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
913 lda ,s
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
914 sta $04,y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
915 ldd $04,s
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
916 std $05,y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
917 ldd <u0000
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
918 std <u0004
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
919 ldd <u0002
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
920 std <u0006
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
921 puls pc,y,x,b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
922 L0716 pshs y,x,b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
923 stx <u001A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
924 ldd ,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
925 lbsr L0BEC
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
926 nega
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
927 negb
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
928 sbca #$00
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
929 ldx <u001C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
930 leax d,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
931 stx <u0016
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
932 leay $0B,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
933 sty <u0018
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
934 ldd $02,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
935 leay d,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
936 sty <u001A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
937 ldd $07,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
938 std <u0004
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
939 ldd $09,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
940 std <u0006
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
941 puls pc,y,x,b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
942 L073F pshs y,x,b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
943 ldx <u0016
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
944 ldd <u001C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
945 subd <u0016
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
946 std ,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
947 ldd <u001A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
948 subd <u0016
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
949 std $02,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
950 ldd <u0004
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
951 std $07,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
952 ldd <u0006
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
953 std $09,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
954 lda $04,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
955 cmpa #$42
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
956 bne L0763
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
957 ldd $05,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
958 std <u0024
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
959 bra L076E
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
960 L0763 ldy <u0014
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
961 sty <u001A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
962 ldd ,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
963 lbsr L0C38
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
964 L076E puls pc,y,x,b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
965 L0770 pshs b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
966 ldx <u0014
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
967 L0774 lda $04,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
968 cmpa #$42
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
969 bne L0781
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
970 ldd ,s
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
971 cmpd $05,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
972 beq L0788
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
973 L0781 lbsr L089B
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
974 bcs L0774
203
7dea3d77ba0b Used symbolics for andcc/orcc
boisy
parents: 200
diff changeset
975 andcc #^Zero
195
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
976 L0788 puls pc,b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
977 ldx <u0012
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
978 ldd u0005,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
979 addd #$041F
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
980 leax d,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
981 cmpx <u001C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
982 bls L07A1
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
983 os9 F$Mem
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
984 lbcs L12AA
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
985 sty <u001E
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
986 L07A1 pulu pc,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
987 lbsr L0922
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
988 lbsr L00FF
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
989 ldd <u001C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
990 subd <u0014
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
991 lbsr L0626
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
992 lda #$20
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
993 lbsr L0107
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
994 lbsr L0107
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
995 ldd <u001E
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
996 subd <u0014
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
997 lbsr L0626
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
998 lbsr L00FF
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
999 lbra L0929
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1000 ldx <u0016
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1001 lda $04,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1002 cmpa #$42
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1003 lbne L127E
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1004 ldd <u001C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1005 subd <u0016
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1006 std ,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1007 ldd u0005,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1008 cmpd $05,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1009 beq L07F9
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1010 bsr L0770
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1011 beq L07F3
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1012 ldd #$000B
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1013 lbsr L0BC0
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1014 lbsr L073F
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1015 lda #$42
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1016 ldy u0005,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1017 lbsr L06EA
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1018 pulu pc,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1019 L07F3 lbsr L073F
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1020 lbsr L0716
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1021 L07F9 pulu pc,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1022 tst <u0041
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1023 lbne L127E
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1024 ldx <u0016
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1025 lda $04,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1026 cmpa #$42
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1027 lbne L127E
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1028 ldx $05,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1029 ldy <u0024
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1030 pshs y,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1031 ldx u0005,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1032 lbsr L0691
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1033 cmpa $01,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1034 bne L0825
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1035 lbsr L073F
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1036 lda #$4D
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1037 lbsr L06EA
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1038 bra L0836
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1039 L0825 leax $01,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1040 lbsr L04A1
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1041 lbeq L1278
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1042 lbsr L073F
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1043 tfr d,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1044 lbsr L0716
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1045 L0836 puls y,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1046 stx <u0024
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1047 sty <u002D
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1048 lda #$4D
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1049 sta <u0026
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1050 pulu pc,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1051 lbsr L0922
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1052 leax >L13C6,pcr
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1053 lbsr L00EF
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1054 ldx <u0014
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1055 L084F ldb $04,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1056 cmpb #$42
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1057 bne L0873
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1058 ldd $05,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1059 cmpx <u0016
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1060 beq L0863
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1061 cmpd <u0024
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1062 beq L0866
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1063 lda #$20
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1064 fcb $8C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1065 L0863 fdb $862A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1066 fcb $8C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1067 L0866 fdb $8624
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1068 lbsr L0107
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1069 ldd $05,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1070 lbsr L0626
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1071 lbsr L00FF
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1072 L0873 bsr L089B
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1073 bcs L084F
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1074 leax >L13BE,pcr
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1075 lbsr L00EF
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1076 ldx <u0014
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1077 L0880 pshs x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1078 lda $04,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1079 cmpa #$4D
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1080 bne L0893
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1081 leax $0B,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1082 lbsr L008B
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1083 puls x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1084 bsr L089B
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1085 bcs L0880
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1086 L0893 lbsr L00FF
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1087 lbsr L0929
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1088 pulu pc,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1089 L089B pshs b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1090 ldd ,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1091 leax d,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1092 cmpx <u001C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1093 puls pc,b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1094 tst <u0041
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1095 lbne L127E
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1096 ldx u0005,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1097 lda ,x+
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1098 pshs a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1099 lbsr L0691
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1100 lbsr L04A1
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1101 lbeq L1278
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1102 tfr d,y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1103 ldd ,y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1104 ldx <u001A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1105 pshs x,b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1106 sty <u001A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1107 lbsr L0BEC
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1108 ldd <u0016
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1109 subd ,s
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1110 std <u0016
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1111 ldd <u0018
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1112 subd ,s
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1113 std <u0018
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1114 ldd <u001C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1115 subd ,s
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1116 std <u001C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1117 puls x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1118 puls b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1119 pshs x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1120 subd ,s++
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1121 std <u001A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1122 pulu pc,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1123 pshs u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1124 ldx u0005,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1125 lbsr L0130
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1126 tfr d,y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1127 tfr x,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1128 leax <L090C,pcr
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1129 lda #$01
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1130 ldb #$00
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1131 os9 F$Fork
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1132 lbcs L12AA
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1133 os9 F$Wait
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1134 tstb
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1135 lbne L12AA
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1136 puls u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1137 pulu pc,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1138 L090C fcc "SHELL"
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1139 fcb C$CR
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1140 L0912 fcb $ec,$45
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1141 beq L0918
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1142 lda #$01
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1143 L0918 sta <u003E
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1144 tst <u0041
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1145 bne L0920
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1146 sta <u0040
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1147 L0920 pulu pc,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1148 L0922 lda <u003E
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1149 sta <u003F
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1150 inc <u003E
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1151 rts
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1152 L0929 lda <u003F
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1153 sta <u003E
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1154 rts
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1155 ldx ,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1156 ldx $02,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1157 ldy <u0045
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1158 cmpy <u0049
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1159 lbls L128D
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1160 stx ,--y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1161 ldx #$0000
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1162 stx ,--y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1163 sty <u0045
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1164 pulu pc,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1165 ldx <u0045
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1166 ldd ,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1167 addd #$0001
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1168 std ,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1169 cmpd u0005,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1170 bcs L095A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1171 bsr L0964
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1172 pulu pc,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1173 L095A ldy $02,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1174 ldx ,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1175 sty $02,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1176 pulu pc,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1177 L0964 pshs x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1178 ldx <u0045
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1179 leax $04,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1180 cmpx <u0043
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1181 lbhi L128A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1182 stx <u0045
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1183 puls pc,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1184 bsr L0922
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1185 ldx <u001A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1186 lbsr L0660
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1187 beq L098A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1188 L097D lbsr L008B
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1189 lbsr L06B2
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1190 beq L098A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1191 lbsr L0668
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1192 bne L097D
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1193 L098A bsr L0929
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1194 pulu pc,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1195 bsr L0922
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1196 lbsr L0660
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1197 beq L09AF
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1198 ldx <u001A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1199 lbsr L06D7
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1200 bra L09A1
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1201 L099C lbsr L06D1
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1202 beq L09A6
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1203 L09A1 lbsr L0668
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1204 bne L099C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1205 L09A6 pshs x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1206 ldd <u001A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1207 subd ,s++
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1208 lbsr L0094
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1209 L09AF lbsr L0929
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1210 pulu pc,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1211 inc <u002F
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1212 ldd u0005,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1213 std <u0030
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1214 bne L09BE
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1215 clr <u002F
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1216 L09BE pulu pc,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1217 L09C0 lbsr L06B2
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1218 beq L09D4
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1219 L09C5 pshs b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1220 ldd <u0030
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1221 lbsr L0B01
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1222 puls b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1223 bne L09C0
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1224 cmpx <u001A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1225 bcs L09C0
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1226 L09D4 rts
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1227 L09D5 pshs y,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1228 ldx <u0010
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1229 stx $02,s
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1230 puls pc,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1231 L09DD pshs y,b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1232 ldx <u001A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1233 lda ,y+
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1234 tst <u002F
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1235 beq L09E9
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1236 bsr L09C5
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1237 L09E9 pshs y,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1238 L09EB cmpa ,y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1239 beq L0A0B
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1240 ldb ,y+
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1241 cmpx <u001C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1242 bcc L0A05
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1243 cmpb ,x+
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1244 beq L09EB
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1245 puls y,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1246 leax $01,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1247 tst <u002F
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1248 beq L09E9
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1249 bsr L09C0
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1250 bra L09E9
203
7dea3d77ba0b Used symbolics for andcc/orcc
boisy
parents: 200
diff changeset
1251 L0A05 orcc #Carry
195
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1252 bra L0A0B
203
7dea3d77ba0b Used symbolics for andcc/orcc
boisy
parents: 200
diff changeset
1253 andcc #^Carry
195
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1254 L0A0B puls y,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1255 puls pc,y,b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1256 L0A0F lbsr L1126
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1257 tst <u0041
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1258 bne L0A29
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1259 tst <u003D
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1260 beq L0A29
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1261 inc <u0039
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1262 lbsr L0922
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1263 leax >L1318,pcr
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1264 lbsr L00EF
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1265 lbsr L0929
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1266 L0A29 pulu pc,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1267 L0A2B pshs y,x,b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1268 lbsr L0660
203
7dea3d77ba0b Used symbolics for andcc/orcc
boisy
parents: 200
diff changeset
1269 andcc #^Carry
195
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1270 beq L0A4E
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1271 ldx u0005,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1272 lbsr L0122
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1273 L0A39 ldy u0005,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1274 bsr L09D5
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1275 bcs L0A4E
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1276 lbsr L0082
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1277 leax d,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1278 stx <u001A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1279 lbsr L0668
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1280 bne L0A39
203
7dea3d77ba0b Used symbolics for andcc/orcc
boisy
parents: 200
diff changeset
1281 andcc #^Carry
195
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1282 L0A4E puls pc,y,x,b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1283 L0A50 pshs y,x,b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1284 lbsr L0660
203
7dea3d77ba0b Used symbolics for andcc/orcc
boisy
parents: 200
diff changeset
1285 andcc #^Carry
195
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1286 beq L0A94
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1287 ldx u0005,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1288 lbsr L0122
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1289 pshs b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1290 ldx u0007,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1291 lbsr L0122
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1292 pshs b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1293 L0A67 ldd $02,s
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1294 subd ,s
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1295 lbsr L0BC0
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1296 ldy u0007,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1297 lbsr L09D5
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1298 bcs L0A92
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1299 stx <u001A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1300 ldd ,s
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1301 lbsr L100F
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1302 ldx u0005,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1303 leax $01,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1304 ldd $02,s
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1305 lbsr L0BE3
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1306 ldx <u001A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1307 lbsr L0082
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1308 lbsr L0668
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1309 bne L0A67
203
7dea3d77ba0b Used symbolics for andcc/orcc
boisy
parents: 200
diff changeset
1310 andcc #^Carry
195
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1311 L0A92 leas $04,s
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1312 L0A94 puls pc,y,x,b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1313 lbsr L0A2B
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1314 lbcs L0A0F
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1315 rts
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1316 lbsr L0A50
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1317 lbcs L0A0F
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1318 rts
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1319 ldx <u001A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1320 lbsr L0A50
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1321 bra L0AB2
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1322 ldx <u001A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1323 lbsr L0A2B
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1324 L0AB2 pshs cc
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1325 cmpx <u001A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1326 beq L0ABF
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1327 ldx <u001A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1328 lbsr L06D7
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1329 stx <u001A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1330 L0ABF puls cc
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1331 lbcs L0A0F
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1332 rts
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1333 lbsr L0660
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1334 beq L0AFF
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1335 ldx u0005,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1336 lbsr L0122
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1337 leax $01,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1338 L0AD2 pshs x,b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1339 ldx <u001A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1340 cmpx <u001C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1341 bcs L0ADF
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1342 lbsr L1126
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1343 bra L0AFF
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1344 L0ADF lbsr L06C2
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1345 ldd ,s
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1346 lbsr L0BC0
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1347 stx <u001A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1348 ldx $02,s
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1349 lbsr L0BE3
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1350 ldx <u001A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1351 lbsr L0082
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1352 lbsr L06B2
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1353 stx <u001A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1354 puls x,b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1355 lbsr L0668
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1356 bne L0AD2
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1357 L0AFF pulu pc,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1358 L0B01 pshs y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1359 cmpd #$0000
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1360 beq L0B26
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1361 tfr d,y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1362 lbsr L06D7
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1363 L0B0E lda ,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1364 cmpa #$0D
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1365 beq L0B20
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1366 cmpx <u001C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1367 bcc L0B20
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1368 leax $01,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1369 leay -$01,y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1370 bne L0B0E
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1371 leax -$01,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1372 L0B20 tfr y,d
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1373 cmpd #$0000
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1374 L0B26 puls pc,y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1375 lbsr L0660
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1376 beq L0B5C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1377 ldx <u001A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1378 ldd u0005,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1379 bsr L0B01
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1380 stx <u001A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1381 std u0005,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1382 beq L0B5C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1383 tfr d,y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1384 lbsr L0668
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1385 beq L0B5C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1386 leay -$01,y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1387 lda #$20
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1388 ldx <u001C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1389 pshs x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1390 L0B48 cmpx <u001E
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1391 lbcc L126F
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1392 sta ,x+
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1393 lbsr L0668
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1394 bne L0B48
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1395 tfr y,d
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1396 puls x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1397 lbsr L0BE3
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1398 L0B5C pulu pc,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1399 lbsr L0660
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1400 beq L0B94
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1401 ldx <u001A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1402 lbsr L06D7
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1403 pshs x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1404 ldx u0005,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1405 lbsr L0122
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1406 leax $01,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1407 ldy <u001C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1408 L0B74 bsr L0B96
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1409 lbeq L126F
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1410 lbsr L0668
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1411 bne L0B74
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1412 ldx <u001C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1413 tfr y,d
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1414 subd <u001C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1415 bsr L0BE3
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1416 lda #$0D
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1417 bsr L0BB5
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1418 ldx ,s
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1419 ldd <u001A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1420 subd ,s++
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1421 lbsr L0094
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1422 L0B94 pulu pc,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1423 L0B96 pshs u,x,b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1424 tfr d,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1425 L0B9A cmpy <u001E
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1426 bcc L0BB1
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1427 cmpu #$0000
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1428 beq L0BAD
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1429 lda ,x+
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1430 sta ,y+
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1431 leau -u0001,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1432 bra L0B9A
203
7dea3d77ba0b Used symbolics for andcc/orcc
boisy
parents: 200
diff changeset
1433 L0BAD andcc #^Zero
195
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1434 puls pc,u,x,b,a
203
7dea3d77ba0b Used symbolics for andcc/orcc
boisy
parents: 200
diff changeset
1435 L0BB1 orcc #Zero
195
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1436 puls pc,u,x,b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1437 L0BB5 pshs x,b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1438 tfr s,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1439 ldd #$0001
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1440 bsr L0BE3
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1441 puls pc,x,b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1442 L0BC0 pshs x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1443 ldx <u001C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1444 leax d,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1445 cmpx <u001E
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1446 lbcc L126F
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1447 puls pc,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1448 L0BCE pshs y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1449 ldy <u001C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1450 bsr L0B96
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1451 lbeq L126F
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1452 sty <u001C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1453 puls pc,y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1454 L0BDE lda #$0D
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1455 lbsr L0132
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1456 L0BE3 bsr L0BCE
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1457 bsr L0C38
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1458 addd <u001A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1459 std <u001A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1460 rts
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1461 L0BEC pshs u,y,x,b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1462 cmpd #$0000
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1463 beq L0C36
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1464 std <u00CF
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1465 ldd <u001A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1466 subd <u001C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1467 tfr d,y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1468 addd ,s
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1469 std <u00D1
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1470 ldd <u001C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1471 subd <u00CF
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1472 std <u00D3
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1473 ldx <u001C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1474 lda ,-x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1475 stx <u00D5
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1476 sta <u00CD
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1477 bra L0C22
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1478 L0C10 cmpx <u00D5
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1479 bne L0C1E
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1480 lda <u00CD
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1481 sta ,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1482 lda ,-x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1483 stx <u00D5
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1484 sta <u00CD
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1485 L0C1E leay $01,y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1486 beq L0C36
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1487 L0C22 ldd <u00D1
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1488 L0C24 tfr x,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1489 leax d,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1490 lda ,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1491 sta ,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1492 cmpx <u00D3
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1493 bcc L0C10
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1494 ldd <u00CF
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1495 leay $01,y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1496 bne L0C24
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1497 L0C36 puls pc,u,y,x,b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1498 L0C38 pshs b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1499 ldd <u001C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1500 subd <u001A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1501 subd ,s
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1502 bsr L0BEC
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1503 puls pc,b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1504 lbsr L0660
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1505 beq L0CAF
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1506 ldd <u0024
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1507 lbsr L0770
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1508 pshs x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1509 ldd ,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1510 leay d,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1511 leax $0B,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1512 pshs x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1513 L0C58 pshs y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1514 cmpx ,s++
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1515 bne L0C63
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1516 lbsr L1126
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1517 bra L0C6D
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1518 L0C63 lbsr L06A3
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1519 beq L0C6D
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1520 lbsr L0668
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1521 bne L0C58
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1522 L0C6D tfr x,d
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1523 subd ,s
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1524 puls y,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1525 pshs b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1526 lbsr L0094
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1527 ldd $02,y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1528 subd #$000B
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1529 subd ,s
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1530 bcc L0C84
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1531 ldd #$0000
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1532 L0C84 addd #$000B
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1533 std $02,y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1534 ldd ,y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1535 subd ,s
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1536 std ,y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1537 ldd <u0016
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1538 subd ,s
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1539 std <u0016
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1540 ldd <u0018
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1541 subd ,s
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1542 std <u0018
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1543 puls b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1544 ldy <u001A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1545 stx <u001A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1546 ldx <u001C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1547 sty <u001C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1548 lbsr L0BEC
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1549 stx <u001C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1550 sty <u001A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1551 L0CAF pulu pc,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1552 lbsr L0660
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1553 beq L0D0D
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1554 ldx <u001C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1555 pshs x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1556 ldd <u0024
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1557 lbsr L0770
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1558 pshs x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1559 ldx <u001A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1560 pshs x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1561 L0CC5 cmpx <u001C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1562 bcs L0CCE
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1563 lbsr L1126
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1564 bra L0CD8
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1565 L0CCE lbsr L06B2
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1566 beq L0CD8
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1567 lbsr L0668
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1568 bne L0CC5
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1569 L0CD8 tfr x,d
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1570 subd ,s
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1571 puls y,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1572 lbsr L0094
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1573 leax d,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1574 pshs x,b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1575 stx <u001C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1576 ldd ,y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1577 addd ,s
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1578 std ,y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1579 ldd $02,y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1580 leax d,y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1581 stx <u001A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1582 addd ,s
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1583 std $02,y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1584 ldd <u0016
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1585 addd ,s
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1586 std <u0016
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1587 ldd <u0018
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1588 addd ,s
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1589 std <u0018
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1590 puls y,x,b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1591 lbsr L0C38
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1592 stx <u001A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1593 sty <u001C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1594 L0D0D pulu pc,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1595 tst <u0005
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1596 beq L0D4D
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1597 lbsr L0660
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1598 beq L0D7A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1599 ldx <u001C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1600 L0D1A leay >$0080,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1601 cmpy <u001E
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1602 bls L0D28
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1603 bsr L0D68
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1604 lbra L126F
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1605 L0D28 lda <u0004
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1606 ldy #$0080
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1607 os9 I$ReadLn
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1608 bcc L0D5F
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1609 pshs b
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1610 bsr L0D68
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1611 puls b
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1612 cmpb #$D3
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1613 lbne L12AA
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1614 ldd <u0004
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1615 cmpd <u0000
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1616 beq L0D4D
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1617 os9 I$Close
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1618 lbcs L12AA
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1619 L0D4D clr <u0005
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1620 lbsr L1126
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1621 tst <u0041
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1622 bne L0D5D
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1623 leax >L138A,pcr
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1624 lbsr L00EF
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1625 L0D5D bra L0D7A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1626 L0D5F tfr y,d
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1627 leax d,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1628 lbsr L0668
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1629 bne L0D1A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1630 L0D68 tfr x,d
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1631 subd <u001C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1632 ldx <u001A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1633 pshs x,b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1634 ldx <u001C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1635 lbsr L0BE3
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1636 puls x,b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1637 lbsr L0094
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1638 L0D7A rts
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1639 tst <u0007
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1640 lbeq L1275
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1641 lbsr L0660
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1642 beq L0DB5
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1643 ldy <u001A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1644 L0D89 tfr y,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1645 lbsr L0130
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1646 bne L0D9D
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1647 bsr L0DA9
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1648 lbsr L1126
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1649 leax >L137C,pcr
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1650 lbsr L00EF
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1651 rts
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1652 L0D9D leay d,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1653 lda <u0006
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1654 lbsr L00C8
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1655 lbsr L0668
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1656 bne L0D89
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1657 L0DA9 ldx <u001A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1658 tfr y,d
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1659 subd <u001A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1660 lbsr L0094
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1661 lbsr L100F
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1662 L0DB5 rts
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1663 ldd <u0004
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1664 cmpd <u0000
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1665 beq L0DC9
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1666 tstb
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1667 beq L0DC9
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1668 os9 I$Close
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1669 lbcs L12AA
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1670 clr <u0005
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1671 L0DC9 ldx u0005,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1672 ldb ,x+
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1673 cmpb ,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1674 bne L0DD7
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1675 ldd <u0000
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1676 std <u0004
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1677 pulu pc,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1678 L0DD7 lbsr L0EC6
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1679 lbne L12A8
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1680 lda #$01
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1681 os9 I$Open
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1682 lbcs L12AA
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1683 ldb #$01
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1684 std <u0004
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1685 pulu pc,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1686 ldd <u0006
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1687 cmpd <u0002
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1688 beq L0E00
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1689 tstb
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1690 beq L0E00
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1691 os9 I$Close
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1692 lbcs L12AA
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1693 clr <u0007
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1694 L0E00 ldx u0005,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1695 ldb ,x+
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1696 cmpb ,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1697 bne L0E0E
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1698 ldd <u0002
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1699 std <u0006
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1700 pulu pc,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1701 L0E0E lbsr L0EC6
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1702 lbne L12A8
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1703 ldd #$021B
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1704 os9 I$Create
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1705 lbcs L12AA
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1706 ldb #$01
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1707 std <u0006
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1708 pulu pc,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1709 ldx u0005,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1710 ldb ,x+
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1711 lbsr L0EC6
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1712 lbne L12A8
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1713 lda #$01
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1714 os9 I$Open
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1715 lbcs L12AA
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1716 sta <u0008
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1717 L0E3B ldx <u001C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1718 ldy #$000B
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1719 bsr L0EB7
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1720 lda <u0008
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1721 os9 I$Read
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1722 bcs L0E6E
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1723 lda $04,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1724 cmpa #$4D
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1725 beq L0E58
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1726 ldd $05,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1727 beq L0E58
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1728 ldb #$D3
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1729 bra L0E6E
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1730 L0E58 clr $08,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1731 clr $0A,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1732 ldd ,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1733 subd #$000B
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1734 tfr d,y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1735 leax $0B,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1736 bsr L0EB7
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1737 lda <u0008
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1738 os9 I$Read
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1739 bcc L0E7F
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1740 L0E6E pshs b
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1741 lda <u0008
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1742 os9 I$Close
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1743 puls b
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1744 cmpb #$D3
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1745 lbne L12AA
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1746 pulu pc,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1747 L0E7F lbsr L0691
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1748 pshs x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1749 lbsr L04A1
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1750 puls x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1751 bne L0E3B
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1752 lbsr L008B
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1753 ldx <u001C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1754 ldd ,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1755 ldy <u001A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1756 leax d,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1757 stx <u001C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1758 pshs y,b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1759 ldx <u0014
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1760 stx <u001A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1761 lbsr L0C38
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1762 ldd <u0016
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1763 addd ,s
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1764 std <u0016
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1765 ldd <u0018
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1766 addd ,s
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1767 std <u0018
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1768 puls y,b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1769 leay d,y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1770 sty <u001A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1771 bra L0E3B
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1772 L0EB7 pshs y,b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1773 tfr y,d
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1774 leay d,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1775 cmpy <u001E
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1776 lbcc L126F
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1777 puls pc,y,b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1778 L0EC6 lbsr L0691
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1779 pshs y,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1780 leay ,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1781 L0ECD cmpb ,y+
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1782 bne L0ECD
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1783 pshs y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1784 lbsr L015A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1785 bcs L0EE1
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1786 cmpy ,s++
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1787 bcc L0EE1
203
7dea3d77ba0b Used symbolics for andcc/orcc
boisy
parents: 200
diff changeset
1788 orcc #Zero
195
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1789 puls pc,y,x
203
7dea3d77ba0b Used symbolics for andcc/orcc
boisy
parents: 200
diff changeset
1790 L0EE1 andcc #^Zero
195
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1791 puls pc,y,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1792 ldx #$FFFF
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1793 pshs x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1794 ldx u0007,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1795 leax $01,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1796 lbsr L0691
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1797 L0EF1 lbsr L04A1
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1798 lbeq L1278
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1799 pshs b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1800 lbsr L0691
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1801 ldy u0007,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1802 cmpa ,y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1803 bne L0EF1
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1804 ldx u0005,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1805 ldb ,x+
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1806 bsr L0EC6
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1807 lbne L12A8
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1808 ldd #$021B
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1809 os9 I$Create
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1810 lbcs L12AA
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1811 sta <u0008
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1812 L0F1A puls x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1813 cmpx #$FFFF
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1814 beq L0F3C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1815 ldd #$0000
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1816 std $05,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1817 ldy ,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1818 lda <u0008
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1819 os9 I$Write
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1820 bcc L0F1A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1821 pshs b
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1822 lda <u0008
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1823 os9 I$Close
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1824 puls b
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1825 lbra L12AA
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1826 L0F3C lda <u0008
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1827 os9 I$Close
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1828 pulu pc,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1829 L0F43 tst <u0001
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1830 beq L0F8E
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1831 ldx <u001C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1832 leay d,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1833 leay >$0080,y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1834 cmpy <u001E
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1835 bcs L0F5D
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1836 cmpd #$0080
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1837 bcs L0F8E
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1838 subd #$0080
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1839 L0F5D tfr d,y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1840 lda <u0000
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1841 os9 I$Read
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1842 bcs L0F77
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1843 tfr y,d
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1844 leax d,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1845 stx <u001C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1846 ldy #$0080
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1847 lda <u0000
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1848 os9 I$ReadLn
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1849 bcc L0F88
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1850 L0F77 cmpb #$D3
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1851 lbne L12AA
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1852 leax >L138A,pcr
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1853 lbsr L00EF
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1854 clr <u0005
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1855 bra L0F8E
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1856 L0F88 tfr y,d
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1857 leax d,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1858 stx <u001C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1859 L0F8E rts
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1860 tst <u0003
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1861 beq L0FA8
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1862 ldx <u0018
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1863 ldd <u001A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1864 subd <u0018
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1865 tfr d,y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1866 lda <u0002
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1867 os9 I$Write
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1868 stx <u001A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1869 tfr y,d
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1870 bsr L100F
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1871 bsr L0F43
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1872 L0FA8 pulu pc,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1873 lbsr L0660
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1874 beq L0FD4
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1875 ldx <u001A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1876 lbsr L06D7
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1877 stx <u001A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1878 pshs x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1879 L0FB8 cmpx <u001C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1880 bne L0FC1
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1881 lbsr L1126
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1882 bra L0FCE
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1883 L0FC1 lbsr L008B
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1884 lbsr L06B2
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1885 beq L0FCE
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1886 lbsr L0668
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1887 bne L0FB8
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1888 L0FCE tfr x,d
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1889 subd ,s++
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1890 bsr L100F
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1891 L0FD4 pulu pc,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1892 lbsr L0660
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1893 beq L0FFA
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1894 ldx <u001A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1895 pshs x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1896 L0FDF cmpx <u001C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1897 bne L0FE8
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1898 lbsr L1126
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1899 bra L0FEF
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1900 L0FE8 leax $01,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1901 lbsr L0668
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1902 bne L0FDF
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1903 L0FEF tfr x,d
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1904 subd ,s
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1905 puls x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1906 lbsr L0094
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1907 bsr L100F
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1908 L0FFA pulu pc,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1909 ldx <u001A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1910 lbsr L0130
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1911 beq L100D
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1912 subd #$0001
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1913 beq L100D
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1914 bsr L100F
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1915 lbsr L0082
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1916 L100D pulu pc,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1917 L100F pshs b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1918 lbsr L0BEC
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1919 ldd <u001C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1920 subd ,s
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1921 std <u001C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1922 puls pc,b,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1923 lbsr L0660
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1924 beq L1035
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1925 ldx <u001A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1926 L1023 cmpx <u0018
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1927 bne L102C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1928 lbsr L1126
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1929 bra L1033
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1930 L102C leax -$01,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1931 lbsr L0668
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1932 bne L1023
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1933 L1033 stx <u001A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1934 L1035 pulu pc,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1935 lbsr L0660
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1936 beq L1035
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1937 ldx <u001A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1938 L103E cmpx <u001C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1939 bne L1047
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1940 lbsr L1126
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1941 bra L1033
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1942 L1047 leax $01,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1943 lbsr L0668
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1944 bne L103E
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1945 bra L1033
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1946 ldx <u001A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1947 lbsr L0660
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1948 bne L105C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1949 lbsr L06C2
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1950 bra L106F
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1951 L105C cmpx <u001C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1952 bne L1065
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1953 lbsr L1126
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1954 bra L106F
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1955 L1065 lbsr L06B2
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1956 beq L106F
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1957 lbsr L0668
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1958 bne L105C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1959 L106F stx <u001A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1960 lbsr L008B
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1961 pulu pc,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1962 ldx <u001A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1963 lbsr L0660
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1964 bne L1082
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1965 lbsr L06D7
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1966 bra L106F
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1967 L1082 cmpx <u0018
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1968 bne L108B
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1969 lbsr L1126
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1970 bra L106F
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1971 L108B lbsr L06D1
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1972 beq L106F
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1973 lbsr L0668
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1974 bne L1082
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1975 bra L106F
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1976 ldx <u0018
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1977 stx <u001A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1978 pulu pc,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1979 ldx <u001C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1980 stx <u001A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1981 pulu pc,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1982 lda #$01
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1983 sta <u003C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1984 clr <u003A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1985 pulu pc,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1986 L10AB lda #$01
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1987 sta <u003D
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1988 clr <u003A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1989 pulu pc,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1990 L10B3 clra
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1991 sta <u003D
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1992 sta <u003A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1993 pulu pc,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1994 ldx <u001A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1995 cmpx <u001C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1996 beq L10AB
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1997 lda ,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1998 cmpa #$0D
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
1999 beq L10AB
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2000 bra L10B3
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2001 ldx <u001A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2002 cmpx <u001C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2003 beq L10B3
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2004 lda ,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2005 cmpa #$0D
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2006 beq L10B3
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2007 bra L10AB
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2008 ldx <u001A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2009 cmpx <u001C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2010 bne L10B3
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2011 bra L10AB
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2012 ldx <u001A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2013 cmpx <u001C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2014 beq L10B3
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2015 bra L10AB
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2016 bsr L10F2
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2017 bne L10AB
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2018 bra L10B3
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2019 bsr L10F2
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2020 beq L10AB
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2021 bra L10B3
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2022 L10F2 ldx u0005,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2023 ldy <u001A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2024 ldb ,x+
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2025 L10F9 cmpb ,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2026 beq L110A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2027 cmpy <u001C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2028 beq L1108
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2029 lda ,x+
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2030 cmpa ,y+
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2031 beq L10F9
203
7dea3d77ba0b Used symbolics for andcc/orcc
boisy
parents: 200
diff changeset
2032 L1108 andcc #^Zero
195
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2033 L110A rts
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2034 tst <u0005
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2035 bne L10B3
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2036 bra L10AB
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2037 lda <u0005
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2038 beq L10B3
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2039 bra L10AB
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2040 ldd u0005,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2041 beq L10B3
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2042 bra L10AB
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2043 lda #$00
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2044 lbsr L0685
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2045 beq L10B3
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2046 bra L10AB
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2047 L1126 pshs a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2048 lbsr L0685
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2049 beq L1133
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2050 lda #$01
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2051 sta <u003D
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2052 clr <u003A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2053 L1133 puls pc,a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2054 lda #$00
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2055 sta <u003D
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2056 sta <u003A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2057 inca
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2058 sta <u003B
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2059 pulu pc,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2060
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2061 lda #$00
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2062 sta <u003A
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2063 inca
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2064 sta <u003D
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2065 sta <u003B
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2066 pulu pc,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2067 pulu pc,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2068 L114D tst <u0041
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2069 lbne L127E
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2070 ldx <u0016
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2071 lda $04,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2072 cmpa #$42
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2073 beq L11C5
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2074 ldx <u001C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2075 cmpx <u0018
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2076 lbeq L1281
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2077 lda #$0D
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2078 cmpa -$01,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2079 beq L1175
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2080 leax $01,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2081 cmpx <u001E
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2082 lbcc L126F
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2083 sta -$01,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2084 stx <u001C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2085 L1175 ldx <u0018
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2086 lbsr L0691
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2087 lbsr L04DA
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2088 lbne L1281
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2089 pshs x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2090 L1183 lda ,x+
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2091 lbsr L04DA
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2092 beq L1183
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2093 cmpa #$20
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2094 beq L119C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2095 cmpa #$0D
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2096 beq L119C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2097 cmpa #$24
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2098 beq L119C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2099 cmpa #$23
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2100 lbne L1281
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2101 L119C ldx ,s
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2102 lbsr L04A1
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2103 lbne L1284
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2104 ldb #$2E
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2105 puls x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2106 lbsr L0415
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2107 lbeq L1284
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2108 lbsr L073F
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2109 ldd <u0024
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2110 lbsr L0770
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2111 lbsr L0716
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2112 ldd <u002D
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2113 std <u0024
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2114 lda #$45
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2115 sta <u0026
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2116 pulu pc,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2117 L11C5 ldd #$0001
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2118 lbsr L0770
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2119 cmpx <u0016
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2120 beq L11D2
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2121 lbra L126C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2122 L11D2 ldy <u0012
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2123 leay >$0089,y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2124 L11D9 ldx ,y++
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2125 beq L11E4
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2126 jsr ,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2127 os9 F$UnLink
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2128 bra L11D9
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2129 L11E4 ldx <u0018
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2130 ldd <u001C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2131 subd <u0018
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2132 tfr d,y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2133 L11EC ldd <u0002
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2134 cmpb #$00
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2135 beq L1261
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2136 os9 I$Write
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2137 bcs L1263
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2138 ldx <u0014
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2139 ldd <u001E
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2140 subd <u0014
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2141 tfr d,y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2142 ldd <u0000
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2143 cmpb #$00
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2144 beq L1261
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2145 os9 I$Read
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2146 bcc L11EC
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2147 cmpb #$D3
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2148 bne L1263
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2149 tst <u0036
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2150 beq L1261
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2151 ldd <u001E
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2152 subd <u0014
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2153 os9 F$Mem
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2154 bcs L1263
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2155 lda <u0000
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2156 os9 I$Close
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2157 bcs L1263
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2158 lda <u0002
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2159 os9 I$Close
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2160 bcs L1263
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2161 ldx <u0032
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2162 os9 I$Delete
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2163 bcs L1261
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2164 ldy <u0032
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2165 L1233 ldx <u0032
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2166 L1235 lda ,y+
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2167 sta ,x+
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2168 cmpa #$2F
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2169 beq L1233
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2170 cmpa #$0D
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2171 bne L1235
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2172 ldy <u0012
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2173 leax >$00FE,y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2174 tfr x,u
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2175 lbsr L0130
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2176 leax >$00F7,y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2177 tfr d,y
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2178 ldd #$0100
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2179 os9 F$Fork
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2180 bcs L1263
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2181 os9 F$Wait
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2182 tstb
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2183 bne L1263
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2184 L1261 ldb #$00
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2185 L1263 os9 F$Exit
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2186 L1266 ldb #$00
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2187 L1268 fcb $8C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2188 L1269 fdb $C60B
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2189 fcb $8C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2190 L126C fdb $C613
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2191 fcb $8C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2192 L126F fdb $C622
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2193 L1271 fcb $8C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2194 L1272 fdb $C633
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2195 fcb $8C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2196 L1275 fdb $C641
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2197 fcb $8C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2198 L1278 fdb $C64F
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2199 fcb $8C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2200 L127B fdb $C659
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2201 fcb $8C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2202 L127E fdb $C65F
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2203 fcb $8C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2204 L1281 fdb $C66D
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2205 fcb $8C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2206 L1284 fdb $C67C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2207 fcb $8C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2208 L1287 fdb $C687
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2209 fcb $8C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2210 L128A fdb $C694
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2211 fcb $8C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2212 L128D fdb $C694
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2213 fcb $8C
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2214 L1290 fdb $C6A5
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2215 lda #$FF
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2216 sta <u0023
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2217 inc <u003E
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2218 leax >L12C9,pcr
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2219 clra
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2220 leax d,x
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2221 lbsr L00EF
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2222 lbsr L00FF
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2223 lbra L0292
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2224 L12A8 ldb #$D7
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2225 L12AA inc <u003E
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2226 pshs b
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2227 leax <L12C5,pcr
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2228 ldy #$0004
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2229 lda <u000B
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2230 os9 I$Write
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2231 puls b
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2232 os9 F$PErr
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2233 lbsr L00FF
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2234 lbra L0292
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2235 L12C5 fcc "OS9 "
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2236 L12C9 fcc "BAD NUMBER"
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2237 fcb C$CR
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2238 fcc "WHAT ??"
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2239 fcb C$CR
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2240 fcc "* NOT BUF #1 *"
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2241 fcb C$CR
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2242 fcc "*WORKSPACE FULL*"
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2243 fcb C$CR
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2244 fcc "MISSING DELIM"
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2245 fcb C$CR
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2246 fcc "*FILE CLOSED*"
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2247 fcb C$CR
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2248 L1318 fcc "NOT FOUND"
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2249 fcb C$CR
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2250 fcc "BREAK"
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2251 fcb C$CR
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2252 fcc "MACRO IS OPEN"
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2253 fcb C$CR
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2254 fcc "BAD MACRO NAME"
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2255 fcb C$CR
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2256 fcc "DUPL MACRO"
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2257 fcb C$CR
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2258 fcc "BAD VAR LIST"
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2259 fcb C$CR
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2260 fcc "BRACKET MISMATCH"
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2261 fcb C$CR
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2262 fcc "UNDEFINED VAR"
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2263 fcb C$CR
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2264 L137C fcc "*END OF TEXT*"
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2265 fcb C$CR
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2266 L138A fcc "*END OF FILE*"
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2267 fcb C$CR
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2268 L1398 fcc "*FAIL*"
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2269 fcb C$CR
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2270 L139F fcc "RENAME "
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2271 fcb C$CR
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2272 L13A7 fcc "SCRATCH "
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2273 fcb C$CR
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2274 L13B0 fcc "EDTP2"
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2275 fcb C$CR
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2276 L13B6 fcc "EDTLIB1"
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2277 fcb C$CR
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2278 L13BE fcc "MACROS:"
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2279 fcb C$CR
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2280 L13C6 fcc "BUFFERS:"
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2281 fcb C$CR
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2282 L13CF fcc "MAC$"
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2283 fcb C$CR
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2284 fdb $07FB
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2285 fcc "EOF"
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2286 fcb C$CR
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2287 fdb $1111
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2288 fcc "NEOF"
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2289 fcb C$CR
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2290 fdb $110B
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2291 fcc "EOB"
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2292 fcb C$CR
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2293 fdb $10DE"
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2294 fcc "NEOB"
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2295 fcb C$CR
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2296 fdb $10d6
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2297 fcc "EOL"
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2298 fcb C$CR
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2299 fdb $10c8
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2300 fcc "NEOL"
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2301 fcb C$CR
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2302 fdb $10ba
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2303 fcc "ZERO#"
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2304 fcb C$CR
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2305 fdb $1117
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2306 fcc "STAR#"
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2307 fcb C$CR
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2308 fdb $111d
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2309 fcc "STR$"
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2310 fcb C$CR
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2311 fdb $10e6
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2312 fcc "NSTR$"
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2313 fcb C$CR
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2314 fdb $10ec
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2315 fcc "DIR"
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2316 fcb C$CR
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2317 fdb $0843
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2318 fcc "S"
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2319 fcb C$CR
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2320 fdb $1135
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2321 fcc "F"
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2322 fcb C$CR
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2323 fdb $1140
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2324 fcc "SEARCH#$"
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2325 fcb C$CR
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2326 fdb $0a96
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2327 fcc "CHANGE#$$"
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2328 fcb C$CR
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2329 fdb $0a9e
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2330 fcc "LOAD$"
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2331 fcb C$CR
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2332 fdb $0e25
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2333 fcc "SAVE$$"
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2334 fcb C$CR
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2335 fdb $0ee5
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2336 fcc "SIZE"
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2337 fcb C$CR
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2338 fdb $07a3
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2339 fcc "DEL$"
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2340 fcb C$CR
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2341 fdb $08a5
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2342 fcc "READ$"
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2343 fcb C$CR
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2344 fdb $0db6
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2345 fcc "WRITE$"
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2346 fcb C$CR
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2347 fdb $0ded
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2348 fcc "SHELL L"
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2349 fcb C$CR
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2350 fdb $08e7
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2351 fcc "NEW"
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2352 fcb C$CR
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2353 fdb $0f8f
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2354
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2355 fcb $00
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2356 L1482 fdb $4123,$0d09,$b44c,$230d,$0974,$5823,$0d09
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2357 fdb $8e2b,$230d,$1050,$2d23,$0d10,$7644,$230d,$0faa
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2358 fdb $4523,$240d,$0ac6,$3c23,$0d10,$1c3e,$230d,$1037
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2359 fdb $4923,$240d,$0b5e,$4b23,$0d0f,$d653,$2324,$0d0a
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2360 fdb $ad43,$2324,$240d,$0aa6,$550d,$0ffc,$5423,$0d0b
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2361 fdb $2842,$230d,$07c5,$5e0d,$1097,$2f0d,$109d,$4d23
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2362 fdb $0d07,$8a56,$230d,$0912,$4723,$0d0c,$4450,$230d
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2363 fdb $0cb1,$5b0d,$092e,$5d23,$0d09,$483a,$0d10,$a352
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2364 fdb $230d,$0d0f,$5723,$0d0d,$7b21,$4c0d,$114b,$510d
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2365 fdb $114d
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2366 fcb $00
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2367
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2368 emod
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2369 eom equ *
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2370 end
ebcece198317 Migrated OS-9 Level Two command
boisy
parents:
diff changeset
2371