|
2824
|
1 * Disassembly by Os9disasm of clmul.r
|
|
|
2
|
|
|
3 section code
|
|
|
4
|
|
|
5 _lmul: ldd 2,x
|
|
|
6 pshs d
|
|
|
7 ldd ,x
|
|
|
8 pshs d
|
|
|
9 leax _flacc,y
|
|
|
10 clr ,x
|
|
|
11 clr 1,x
|
|
|
12 lda 9,s
|
|
|
13 ldb 3,s
|
|
|
14 mul
|
|
|
15 std 2,x
|
|
|
16 lda 9,s
|
|
|
17 ldb 2,s
|
|
|
18 mul
|
|
|
19 addd 1,x
|
|
|
20 std 1,x
|
|
|
21 bcc L0024
|
|
|
22 inc ,x
|
|
|
23 L0024 lda 8,s
|
|
|
24 ldb 3,s
|
|
|
25 mul
|
|
|
26 addd 1,x
|
|
|
27 std 1,x
|
|
|
28 bcc L0031
|
|
|
29 inc ,x
|
|
|
30 L0031 lda 9,s
|
|
|
31 ldb 1,s
|
|
|
32 mul
|
|
|
33 addd ,x
|
|
|
34 std ,x
|
|
|
35 lda 8,s
|
|
|
36 ldb 2,s
|
|
|
37 mul
|
|
|
38 addd ,x
|
|
|
39 std ,x
|
|
|
40 lda 7,s
|
|
|
41 ldb 3,s
|
|
|
42 mul
|
|
|
43 addd ,x
|
|
|
44 std ,x
|
|
|
45 lda 9,s
|
|
|
46 ldb ,s
|
|
|
47 mul
|
|
|
48 addb ,x
|
|
|
49 stb ,x
|
|
|
50 lda 8,s
|
|
|
51 ldb 1,s
|
|
|
52 mul
|
|
|
53 addb ,x
|
|
|
54 stb ,x
|
|
|
55 lda 7,s
|
|
|
56 ldb 2,s
|
|
|
57 mul
|
|
|
58 addb ,x
|
|
|
59 stb ,x
|
|
|
60 lda 6,s
|
|
|
61 ldb 3,s
|
|
|
62 mul
|
|
|
63 addb ,x
|
|
|
64 stb ,x
|
|
|
65 leas 4,s
|
|
|
66 lbra _lbexit
|
|
|
67
|
|
|
68 endsect
|
|
|
69
|
