Commit | Line | Data |
---|---|---|
69f28986 KT |
1 | " dskio |
2 | ||
3 | dskrd0: 0 | |
4 | dzm side | |
5 | jms dskio; 02000 | |
6 | jmp i dskrd0 | |
7 | ||
8 | dskwr0: 0 | |
9 | dzm side | |
10 | jms dskio; 03000 | |
11 | jmp i dskwr0 | |
12 | ||
13 | dskrd1: 0 | |
14 | lmq | |
15 | lac o200000 | |
16 | dac side | |
17 | lacq | |
18 | jms dskio; 02000 | |
19 | jmp i dskrd1 | |
20 | ||
21 | dskwr1: 0 | |
22 | lmq | |
23 | lac o200000 | |
24 | dac side | |
25 | lacq | |
26 | jms dskio; 03000 | |
27 | jmp i dskwr1 | |
28 | ||
29 | ||
30 | iskio: 0 | |
31 | cll; idiv; 80 | |
32 | dac 2f | |
33 | lacq | |
34 | idiv; 10 | |
35 | dac 3f | |
36 | lls 22 | |
37 | xor 3f | |
38 | als 8 | |
39 | dac 3f | |
40 | lac 2f | |
41 | idiv; 10 | |
42 | dac 2f | |
43 | lls 22 | |
44 | xor 2f | |
45 | xor 3f | |
46 | xor side | |
47 | dac 2f | |
48 | -10 | |
49 | dac 3f | |
50 | 1: | |
51 | dscs | |
52 | -640 | |
53 | dslw | |
54 | lac dskbufp | |
55 | dslm | |
56 | lac 2f | |
57 | dsld | |
58 | lac dskio i | |
59 | dsls | |
60 | dssf | |
61 | jmp .-1 | |
62 | dsrs | |
63 | sma | |
64 | jmp 1f | |
65 | isz 3f | |
66 | jmp 1b | |
67 | hlt | |
68 | 1: | |
69 | isz dskio | |
70 | jmp i dskio | |
71 | 2: 0 | |
72 | 3: 0 | |
73 | ||
74 | o200000: 0200000 | |
75 | dskbufp: dskbuf | |
76 | ||
77 | side: .=.+1 | |
78 | dskbuf: .=.+640 |