Mercurial > hg > Members > kono > nitros9-code

annotate level1/cmds/shell_21.asm @ 1:d4eb10b30e72

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Disassembled and commented shell.asm, removed shell binary
author boisy
date Fri, 05 Apr 2002 06:58:35 +0000
parents 6641a883d6b0
children 25d626c770e9
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
1 ********************************************************************
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
2 * Shell - OS-9 Command Interpreter
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
3 *
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
4 * $Id$
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
5 *
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
6 * Ed. Comments Who YY/MM/DD
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
7 * ------------------------------------------------------------------
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
8 * 20 Original Microware distribution version
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
9
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
10 nam Shell
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
11 ttl OS-9 Command Interpreter
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
12
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
13 * Disassembled 02/04/03 22:01:32 by Disasm v1.6 (C) 1988 by RML
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
14
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
15 ifp1
1
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
16 use defsfile
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
17 endc
1
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
18
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
19 tylg set Prgrm+Objct
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
20 atrv set ReEnt+rev
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
21 rev set $01
1
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
22
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
23 mod eom,name,tylg,atrv,start,size
1
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
24
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
25 u0000 rmb 1
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
26 u0001 rmb 2
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
27 u0003 rmb 1
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
28 u0004 rmb 1
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
29 u0005 rmb 1
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
30 u0006 rmb 2
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
31 u0008 rmb 2
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
32 u000A rmb 1
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
33 u000B rmb 1
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
34 u000C rmb 1
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
35 u000D rmb 1
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
36 u000E rmb 1
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
37 u000F rmb 1
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
38 u0010 rmb 1
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
39 u0011 rmb 1
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
40 u0012 rmb 1
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
41 u0013 rmb 4
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
42 u0017 rmb 14
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
43 u0025 rmb 1
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
44 u0026 rmb 7
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
45 u002D rmb 17
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
46 u003E rmb 5
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
47 u0043 rmb 8
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
48 u004B rmb 19
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
49 u005E rmb 46
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
50 u008C rmb 1
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
51 u008D rmb 25
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
52 u00A6 rmb 4
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
53 u00AA rmb 17
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
54 u00BB rmb 25
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
55 u00D4 rmb 3
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
56 u00D7 rmb 40
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
57 u00FF rmb 438
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
58 size equ .
1
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
59
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
60 name fcs /Shell/
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
61 fcb $14
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
62 L0013 fcb $13
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
63 fcb $50 P
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
64 fcb $61 a
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
65 fcb $73 s
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
66 fcb $63 c
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
67 fcb $61 a
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
68 fcb $6C l
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
69 fcb $D3 S
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
70 fcb $25 %
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
71 fcb $52 R
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
72 fcb $75 u
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
73 fcb $6E n
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
74 fcb $C3 C
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
75 fcb $22 "
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
76 fcb $52 R
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
77 fcb $75 u
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
78 fcb $6E n
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
79 fcb $C2 B
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
80 fcb $00
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
81 fcb $00
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
82 fcb $00
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
83 fcb $00
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
84 fcb $00
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
85 fcb $00
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
86 fcb $00
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
87 fcb $00
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
88 fcb $00
1
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
89 L002E fcb C$LF
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
90 fcc "Shell"
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
91 fcb C$CR
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
92 L0035 fcb C$LF
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
93 L0036 fcc "OS9:"
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
94
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
95 L003A stb <u000E
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
96 rti
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
97
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
98 start leas -$05,s
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
99 pshs y,x,b,a
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
100 ldb #$24
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
101 lbsr L00C9
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
102 leax <L003A,pcr
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
103 os9 F$Icpt
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
104 puls x,b,a
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
105 std <u0006
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
106 beq L005B
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
107 lbsr L0131
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
108 bcs L00BC
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
109 tst <u000C
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
110 bne L00BB
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
111 L005B lds ,s++
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
112 leax <L002E,pcr
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
113 tst <u000F
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
114 bne L0074
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
115 bsr L00BF
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
116 L0067 leax <L0035,pcr
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
117 ldy #$0005
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
118 L006E tst <u000F
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
119 bne L0074
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
120 bsr L00C3
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
121 L0074 clra
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
122 leax <u0025,u
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
123 ldy #$00C8
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
124 os9 I$ReadLn
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
125 bcc L008E
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
126 cmpb #$D3
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
127 beq L00B2
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
128 L0085 tst <u0011
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
129 bne L00BC
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
130 os9 F$PErr
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
131 bra L0067
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
132 L008E cmpy #$0001
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
133 bhi L009E
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
134 leax >L0036,pcr
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
135 ldy #$0004
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
136 bra L006E
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
137 L009E tst <u0010
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
138 beq L00A4
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
139 bsr L00BF
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
140 L00A4 lbsr L0131
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
141 bcc L0067
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
142 tstb
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
143 bne L0085
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
144 bra L0067
1
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
145 L00AE fcc "eof"
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
146 fcb C$CR
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
147 L00B2 tst <u000F
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
148 bne L00BB
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
149 leax <L00AE,pcr
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
150 bsr L00BF
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
151 L00BB clrb
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
152 L00BC os9 F$Exit
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
153 L00BF ldy #$0050
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
154 L00C3 lda #$02
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
155 os9 I$WritLn
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
156 rts
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
157 L00C9 clr b,u
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
158 L00CB decb
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
159 bpl L00C9
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
160 rts
1
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
161 L00CF fdb L0286-*
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
162 fcs "*"
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
163 fdb L035B-*
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
164 fcs "W"
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
165 fdb L0268-*
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
166 fcs "CHD"
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
167 fdb L0264-*
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
168 fcs "CHX"
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
169 fdb L023E-*
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
170 fcs "EX"
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
171 fdb L04BC-*
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
172 fcs "KILL"
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
173 fdb L027E-*
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
174 fcs "X"
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
175 fdb L0282-*
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
176 fcs "-X"
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
177 fdb L026E-*
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
178 fcs "P"
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
179 fdb L0271-*
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
180 fcs "-P"
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
181 fdb L0276-*
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
182 fcs "T"
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
183 fdb L027A-*
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
184 fcs "-T"
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
185 fdb L04E8-*
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
186 fcs "SETPR"
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
187 fdb L0209-*
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
188 fcs ";"
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
189 fdb $0000
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
190 L010A fcb $03
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
191 fcb $5E ^ symbol
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
192 fcb $A1 ! symbol
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
193 fdb L0334-*
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
194 fcs ";"
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
195 fdb L034D-*
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
196 fcs "&"
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
197 fdb L032D-*
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
198 fcb $8D
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
199 L0116 fdb L02CE-*
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
200 fcs ">>"
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
201 fdb L02C9-*
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
202 fcs "<"
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
203 fdb L02D5-*
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
204 fcs ">"
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
205 fdb L030F-*
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
206 fcs "#"
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
207 fdb $0000
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
208 L0125 fcb $0d
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
209 fcc "()"
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
210 fcb $FF
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
211 L0129 fcb $0D
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
212 fcb $21,$23,$26,$3b,$3c,$3e,$ff
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
213 L0131 fcb $c6,$0E,$8d,$94
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
214 L0135 clr <u0003
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
215 clr <u000E
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
216 leay <L00CF,pcr
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
217 lbsr L01C3
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
218 bcs L0192
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
219 cmpa #$0D
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
220 beq L0192
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
221 sta <u000C
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
222 cmpa #$28
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
223 bne L016F
1
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
224 leay >name,pcr
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
225 sty <u0004
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
226 leax $01,x
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
227 stx <u0008
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
228 L0156 inc <u000D
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
229 L0158 leay <L0125,pcr
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
230 bsr L01DB
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
231 cmpa #$28
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
232 beq L0156
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
233 cmpa #$29
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
234 bne L018A
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
235 dec <u000D
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
236 bne L0158
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
237 lda #$0D
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
238 sta -$01,x
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
239 bra L0173
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
240 L016F bsr L0195
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
241 bcs L0192
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
242 L0173 leay <L0129,pcr
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
243 bsr L01DB
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
244 tfr x,d
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
245 subd <u0008
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
246 std <u0006
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
247 leax -$01,x
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
248 leay <L010A,pcr
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
249 bsr L01C3
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
250 bcs L0192
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
251 ldy <u0004
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
252 L018A lbne L02BE
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
253 cmpa #$0D
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
254 bne L0135
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
255 L0192 lbra L028F
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
256 L0195 stx <u0004
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
257 bsr L01A8
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
258 bcs L01A7
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
259 L019B bsr L01A8
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
260 bcc L019B
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
261 leay >L0116,pcr
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
262 bsr L01C3
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
263 stx <u0008
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
264 L01A7 rts
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
265 L01A8 os9 F$PrsNam
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
266 bcc L01B9
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
267 lda ,x+
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
268 cmpa #$2E
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
269 bne L01BD
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
270 cmpa ,x+
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
271 beq L01BB
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
272 leay -$01,x
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
273 L01B9 leax ,y
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
274 L01BB clra
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
275 rts
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
276 L01BD comb
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
277 leax -$01,x
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
278 ldb #$D7
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
279 rts
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
280 L01C3 bsr L01E9
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
281 pshs y
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
282 bsr L020C
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
283 bcs L01D4
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
284 ldd ,y
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
285 jsr d,y
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
286 puls y
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
287 bcc L01C3
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
288 rts
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
289 L01D4 clra
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
290 lda ,x
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
291 puls pc,y
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
292 L01D9 puls y
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
293 L01DB pshs y
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
294 lda ,x+
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
295 L01DF tst ,y
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
296 bmi L01D9
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
297 cmpa ,y+
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
298 bne L01DF
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
299 puls pc,y
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
300 L01E9 pshs x
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
301 lda ,x+
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
302 cmpa #$20
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
303 beq L01FF
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
304 cmpa #$2C
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
305 beq L01FF
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
306 leax >L0129,pcr
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
307 L01F9 cmpa ,x+
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
308 bhi L01F9
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
309 puls pc,x
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
310 L01FF leas $02,s
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
311 lda #$20
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
312 L0203 cmpa ,x+
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
313 beq L0203
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
314 leax -$01,x
1
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
315 L0209 andcc #$FE
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
316 rts
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
317 L020C pshs y,x
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
318 leay $02,y
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
319 L0210 ldx ,s
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
320 L0212 lda ,x+
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
321 cmpa #$61
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
322 bcs L021A
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
323 suba #$20
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
324 L021A eora ,y+
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
325 lsla
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
326 bne L022E
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
327 bcc L0212
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
328 lda -$01,y
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
329 cmpa #$C1
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
330 bcs L022B
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
331 bsr L01E9
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
332 bcs L022E
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
333 L022B clra
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
334 puls pc,y,b,a
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
335 L022E leay -$01,y
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
336 L0230 lda ,y+
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
337 bpl L0230
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
338 sty $02,s
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
339 ldd ,y++
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
340 bne L0210
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
341 comb
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
342 puls pc,y,x
1
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
343 L023E lbsr L0195
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
344 clra
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
345 bsr L0260
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
346 bsr L025F
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
347 bsr L025F
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
348 bsr L0286
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
349 leax $01,x
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
350 tfr x,d
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
351 subd <u0008
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
352 std <u0006
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
353 leas >u00FF,u
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
354 lbsr L0394
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
355 os9 F$Chain
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
356 os9 F$Exit
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
357 L025F inca
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
358 L0260 pshs a
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
359 bra L02AB
1
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
360 L0264 lda #$84
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
361 bra L026A
1
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
362 L0268 lda #$83
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
363 L026A os9 I$ChgDir
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
364 rts
1
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
365 L026E clra
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
366 bra L0273
1
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
367 L0271 lda #$01
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
368 L0273 sta <u000F
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
369 rts
1
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
370 L0276 lda #$01
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
371 bra L027B
1
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
372 L027A clra
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
373 L027B sta <u0010
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
374 rts
1
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
375 L027E lda #$01
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
376 bra L0283
1
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
377 L0282 clra
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
378 L0283 sta <u0011
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
379 rts
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
380 L0286 lda #$0D
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
381 L0288 cmpa ,x+
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
382 bne L0288
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
383 cmpa ,-x
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
384 rts
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
385 L028F pshs b,a,cc
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
386 clra
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
387 L0292 bsr L029D
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
388 inca
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
389 cmpa #$02
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
390 bls L0292
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
391 ror ,s+
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
392 puls pc,b,a
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
393 L029D pshs a
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
394 tst a,u
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
395 beq L02B6
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
396 os9 I$Close
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
397 lda a,u
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
398 os9 I$Dup
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
399 L02AB ldb ,s
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
400 lda b,u
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
401 beq L02B6
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
402 clr b,u
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
403 os9 I$Close
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
404 L02B6 puls pc,a
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
405 L02B8 asrb
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
406 lsla
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
407 fcb $41 A
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
408 lsrb
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
409 swi
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
410 fcb $0D
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
411 L02BE bsr L028F
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
412 leax <L02B8,pcr
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
413 lbsr L00BF
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
414 clrb
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
415 coma
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
416 rts
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
417 L02C9 ldd #$0001
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
418 bra L02E3
1
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
419 L02CE ldd #$020D
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
420 stb -$02,x
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
421 bra L02D7
1
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
422 L02D5 lda #$01
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
423 L02D7 ldb #$02
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
424 bra L02E3
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
425 tst a,u
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
426 bne L02BE
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
427 pshs b,a
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
428 bra L02ED
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
429 L02E3 tst a,u
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
430 bne L02BE
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
431 pshs b,a
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
432 ldb #$0D
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
433 stb -$01,x
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
434 L02ED os9 I$Dup
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
435 bcs L030D
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
436 ldb ,s
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
437 sta b,u
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
438 lda ,s
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
439 os9 I$Close
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
440 lda $01,s
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
441 bita #$02
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
442 bne L0306
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
443 os9 I$Open
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
444 bra L030B
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
445 L0306 ldb #$0B
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
446 os9 I$Create
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
447 L030B stb $01,s
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
448 L030D puls pc,b,a
1
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
449 L030F ldb #$0D
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
450 stb -$01,x
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
451 ldb <u0003
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
452 bne L02BE
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
453 lbsr L04CA
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
454 eora #$4B
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
455 anda #$DF
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
456 bne L0328
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
457 leax $01,x
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
458 lda #$04
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
459 mul
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
460 tsta
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
461 bne L02BE
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
462 L0328 stb <u0003
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
463 lbra L01E9
1
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
464 L032D leax -$01,x
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
465 lbsr L03C7
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
466 bra L0337
1
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
467 L0334 lbsr L03C3
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
468 L0337 bcs L034A
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
469 lbsr L028F
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
470 bsr L035C
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
471 L033E bcs L034A
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
472 lbsr L01E9
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
473 cmpa #$0D
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
474 bne L0349
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
475 leas $04,s
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
476 L0349 clrb
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
477 L034A lbra L028F
1
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
478 L034D lbsr L03C3
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
479 bcs L034A
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
480 bsr L034A
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
481 ldb #$26
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
482 lbsr L0495
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
483 bra L033E
1
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
484 L035B clra
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
485 L035C pshs a
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
486 L035E os9 F$Wait
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
487 tst <u000E
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
488 beq L0376
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
489 ldb <u000E
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
490 cmpb #$02
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
491 bne L038E
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
492 lda ,s
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
493 beq L038E
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
494 os9 F$Send
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
495 clr ,s
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
496 bra L035E
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
497 L0376 bcs L0392
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
498 cmpa ,s
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
499 beq L038E
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
500 tst ,s
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
501 beq L0383
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
502 tstb
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
503 beq L035E
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
504 L0383 pshs b
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
505 bsr L034A
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
506 ldb #$2D
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
507 lbsr L0495
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
508 puls b
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
509 L038E tstb
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
510 beq L0392
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
511 coma
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
512 L0392 puls pc,a
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
513 L0394 lda #$11
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
514 ldb <u0003
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
515 ldx <u0004
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
516 ldy <u0006
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
517 ldu <u0008
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
518 rts
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
519 L03A0 lda #$04
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
520 os9 I$Open
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
521 bcs L03FE
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
522 leax <u0013,u
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
523 ldy #$000D
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
524 os9 I$Read
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
525 pshs b,cc
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
526 os9 I$Close
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
527 puls b,cc
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
528 lbcs L045F
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
529 lda $06,x
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
530 ldy $0B,x
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
531 bra L03D7
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
532 L03C3 lda #$0D
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
533 sta -$01,x
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
534 L03C7 pshs u,y,x
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
535 clra
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
536 ldx <u0004
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
537 os9 F$Link
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
538 bcs L03A0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
539 ldy u000B,u
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
540 os9 F$UnLink
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
541 L03D7 cmpa #$11
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
542 beq L0425
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
543 sty <u000A
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
544 leax >L0013,pcr
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
545 L03E2 tst ,x
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
546 beq L045D
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
547 cmpa ,x+
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
548 beq L03F0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
549 L03EA tst ,x+
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
550 bpl L03EA
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
551 bra L03E2
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
552 L03F0 ldd <u0008
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
553 subd <u0004
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
554 addd <u0006
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
555 std <u0006
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
556 ldd <u0004
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
557 std <u0008
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
558 bra L0423
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
559 L03FE ldx <u0006
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
560 leax $05,x
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
561 stx <u0006
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
562 ldx <u0004
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
563 ldu $04,s
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
564 lbsr L02C9
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
565 bcs L045F
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
566 ldu <u0008
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
567 ldd #$5820
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
568 std ,--u
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
569 ldd #$5020
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
570 std ,--u
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
571 ldb #$2D
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
572 stb ,-u
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
573 stu <u0008
1
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
574 leax >name,pcr
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
575 L0423 stx <u0004
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
576 L0425 ldx <u0004
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
577 lda #$11
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
578 os9 F$Link
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
579 bcc L0433
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
580 os9 F$Load
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
581 bcs L045F
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
582 L0433 pshs u
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
583 tst <u0003
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
584 bne L0442
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
585 ldd u000B,u
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
586 addd <u000A
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
587 addd #$00FF
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
588 sta <u0003
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
589 L0442 lbsr L0394
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
590 os9 F$Fork
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
591 puls u
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
592 pshs b,cc
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
593 bcs L0454
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
594 ldx #$0001
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
595 os9 F$Sleep
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
596 L0454 clr <u0004
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
597 clr <u0005
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
598 os9 F$UnLink
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
599 puls pc,u,y,x,b,cc
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
600 L045D ldb #$EA
1
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
601
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
602 L045F coma
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
603 puls pc,u,y,x
1
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
604
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
605 L0462 fcc "/pipe"
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
606 fcb C$CR
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
607 L0468 fcb $34,$10,$30,$8c,$f5,$cc,$01,$03
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
608 fdb $17FE,$6835,$1025,$5217,$FF49,$254D,$A6C4,$2607
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
609 os9 I$Dup
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
610 bcs L04C9
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
611 sta ,u
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
612 L0487 clra
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
613 os9 I$Close
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
614 lda #$01
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
615 os9 I$Dup
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
616 lda #$01
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
617 lbra L029D
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
618 L0495 pshs y,x,b,a
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
619 pshs y,x,b
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
620 leax $01,s
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
621 ldb #$2F
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
622 L049D incb
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
623 suba #$64
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
624 bcc L049D
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
625 stb ,x+
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
626 ldb #$3A
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
627 L04A6 decb
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
628 adda #$0A
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
629 bcc L04A6
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
630 stb ,x+
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
631 adda #$30
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
632 ldb #$0D
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
633 std ,x
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
634 leax ,s
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
635 lbsr L00BF
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
636 leas $05,s
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
637 puls pc,y,x,b,a
1
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
638 L04BC bsr L04CA
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
639 cmpb #$02
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
640 bcs L04E5
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
641 tfr b,a
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
642 ldb #$00
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
643 os9 F$Send
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
644 L04C9 rts
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
645 L04CA clrb
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
646 L04CB lda ,x+
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
647 suba #$30
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
648 cmpa #$09
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
649 bhi L04DC
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
650 pshs a
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
651 lda #$0A
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
652 mul
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
653 addb ,s+
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
654 bcc L04CB
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
655 L04DC lda ,-x
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
656 bcs L04E3
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
657 tstb
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
658 bne L04C9
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
659 L04E3 leas $02,s
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
660 L04E5 lbra L02BE
1
d4eb10b30e72 Disassembled and commented shell.asm, removed shell binary
boisy
parents: 0
diff changeset
661 L04E8 bsr L04CA
0
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
662 stb <u0012
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
663 lbsr L01E9
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
664 bsr L04CA
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
665 lda <u0012
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
666 os9 F$SPrior
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
667 rts
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
668 emod
6641a883d6b0 Initial revision
boisy
parents:
diff changeset
669 eom equ *