home *** CD-ROM | disk | FTP | other *** search

---

/ ST-Computer Leser 2002 January / STC_CD_01_2002.iso / GAMES / COLUMSRC / PAL_CONV.S

< prev

next >

Wrap

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