|
2824
|
1 * Disassembly by Os9disasm of system.r
|
|
|
2
|
|
|
3 section code
|
|
|
4
|
|
|
5 * class D external label equates
|
|
|
6
|
|
|
7 D0000 equ $0000
|
|
|
8
|
|
|
9 * class X external label equates
|
|
|
10
|
|
|
11 X6865 equ $6865
|
|
|
12
|
|
|
13 system: pshs u
|
|
|
14 ldd #$ff5a
|
|
|
15 lbsr _stkcheck
|
|
|
16 leas -86,s
|
|
|
17 ldd #$0051
|
|
|
18 ldu 90,s
|
|
|
19 leax ,s
|
|
|
20 pshs d
|
|
|
21 pshs x,u
|
|
|
22 lbsr strncpy
|
|
|
23 leas 6,s
|
|
|
24 clr 80,s
|
|
|
25 leax >L0066,pcr
|
|
|
26 pshs d,x
|
|
|
27 lbsr strcat
|
|
|
28 leas 4,s
|
|
|
29 clra
|
|
|
30 clrb
|
|
|
31 pshs d
|
|
|
32 incb
|
|
|
33 pshs d
|
|
|
34 pshs d
|
|
|
35 leax 6,s
|
|
|
36 pshs x
|
|
|
37 pshs x
|
|
|
38 lbsr strlen
|
|
|
39 std ,s
|
|
|
40 leax >L0061,pcr
|
|
|
41 pshs x
|
|
|
42 lbsr os9fork
|
|
|
43 leas 12,s
|
|
|
44 std 82,s
|
|
|
45 L004c leax 84,s
|
|
|
46 pshs x
|
|
|
47 lbsr wait
|
|
|
48 leas 2,s
|
|
|
49 cmpd 82,s
|
|
|
50 bne L004c
|
|
|
51 leas 84,s
|
|
|
52 puls d,u,pc
|
|
|
53 L0061 com X6865
|
|
|
54 inc 12,s
|
|
|
55 L0066 tst D0000
|
|
|
56
|
|
|
57 endsect
|
|
|
58
|
