/ ST-Computer Leser 2002 January
/ STC_CD_01_2002.iso / GAMES / COLUMSRC / PAL_CONV.S ![]() | < prev | next > |
Comma Seperated Value File | 1993-12-01 | 1KB | 100 rows |
# | SETBLOCK MOVE.L A7 | A5 |
---|---|---|
1 | MOVE.L #PILE | A7 |
2 | MOVE.L 4(A5) | A5 |
3 | MOVE.L $C(A5) | D0 |
4 | ADD.L $14(A5) | D0 |
5 | ADD.L $1C(A5) | D0 |
6 | ADD.L #$100 | D0 |
7 | MOVE.L D0 | -(A7) |
8 | MOVE.L A5 | -(A7) |
9 | MOVE.W #0 | -(A7) |
10 | MOVE.W #$4A | -(A7) |
11 | TRAP #1 | |
12 | ADD.L #12 | A7 |
13 | ||
14 | PEA 0 | |
15 | MOVE.W #$20 | -(A7) |
16 | TRAP #1 | |
17 | ADDQ.L #6 | A7 |
18 | MOVE.L D0 | OLD_SP |
19 | ||
20 | LEA PAL_FALCON | A1 |
21 | LEA BLOC1 | A0 |
22 | MOVE.W #255 | D0 |
23 | LOOP | |
24 | MOVEQ #0 | D1 |
25 | MOVE.B (A0)+ | D1 |
26 | MULU.W #4 | D1 |
27 | CMP.W #0 | D1 |
28 | BEQ.S CONT1 | |
29 | ADDQ.W #3 | D1 |
30 | CONT1 | |
31 | MOVE.B D1 | (A1) |
32 | ||
33 | MOVEQ #0 | D1 |
34 | MOVE.B (A0)+ | D1 |
35 | MULU.W #4 | D1 |
36 | CMP.W #0 | D1 |
37 | BEQ.S CONT2 | |
38 | ADDQ.W #3 | D1 |
39 | CONT2 | |
40 | MOVE.B D1 | 1(A1) |
41 | ||
42 | MOVE.B #0 | 2(A1) |
43 | ||
44 | MOVEQ #0 | D1 |
45 | MOVE.B (A0)+ | D1 |
46 | MULU.W #4 | D1 |
47 | CMP.W #0 | D1 |
48 | BEQ CONT3 | |
49 | ADDQ.W #3 | D1 |
50 | CONT3 | |
51 | MOVE.B D1 | 3(A1) |
52 | ADDQ.L #4 | A1 |
53 | DBRA D0 | LOOP |
54 | ||
55 | MOVE.W #0 | -(A7) |
56 | PEA FILE_NAME | |
57 | MOVE.W #$3C | -(A7) |
58 | TRAP #1 | |
59 | ADDQ.L #8 | A7 |
60 | MOVE.W D0 | D7 |
61 | ||
62 | MOVE.L #PAL_FALCON | -(A7) |
63 | MOVE.L #1024 | -(A7) |
64 | MOVE.W D7 | -(A7) |
65 | MOVE.W #$40 | -(A7) |
66 | TRAP #1 | |
67 | ADD.L #12 | A7 |
68 | ||
69 | MOVE.W D7 | -(A7) |
70 | MOVE.W #$3E | -(A7) |
71 | TRAP #1 | |
72 | ADDQ.L #4 | A7 |
73 | ||
74 | ||
75 | MOVE.L OLD_SP | -(A7) |
76 | MOVE.W #$20 | -(A7) |
77 | TRAP #1 | |
78 | ADDQ.L #6 | A7 |
79 | ||
80 | MOVE.W #0 | -(A7) |
81 | TRAP #1 | |
82 | ||
83 | ||
84 | ||
85 | ||
86 | ||
87 | DATA | |
88 | EVEN | |
89 | FILE_NAME DC.B 'D:\DEVPAC\SOURCE\COLUMS\PAL_COLU.PAL' | 0 |
90 | BLOC1 INCBIN BLOC1.MCS | |
91 | EVEN | |
92 | PAL_FALCON | |
93 | DCB.L 256 | 0 |
94 | ||
95 | ||
96 | BSS | |
97 | DS.L 100 | |
98 | PILE DS.L 1 | |
99 | OLD_SP DS.L 1 |