897acdfa1f43088fdcd51e1281f2502cccd4ddaf
[megadrive.git] / megaed-sv / sega_gcc.s
1 exc_tab:\r
2     dc.l     0, 0x200, exc02, exc03, exc04, exc05, exc06, exc07\r
3     dc.l exc08, exc09, exc0a, exc0b, exc0c, exc0d, exc0e, exc0f\r
4     dc.l exc10, exc11, exc12, exc13, exc14, exc15, exc16, exc17\r
5     dc.l exc18, exc19, exc1a, exc1b, HBL,   exc1d, VBL,   exc1f\r
6     dc.l exc20, exc21, exc22, exc23, exc24, exc25, exc26, exc27\r
7     dc.l exc28, exc29, exc2a, exc2b, exc2c, exc2d, exc2e, exc2f\r
8     dc.l exc30, exc31, exc32, exc33, exc34, exc35, exc3e, exc37\r
9     dc.l exc38, exc39, exc3a, exc3b, exc3c, exc3d, exc3e, exc3f\r
10 \r
11     .ascii "SEGA EVERDRIVE                  "\r
12     .ascii "MEGA-ED host                                    "\r
13     .ascii "MEGA-ED host                                    "\r
14     .ascii "GM 00000000-00"\r
15     .byte 0x00,0x00\r
16     .ascii "JD              "\r
17     .byte 0x00,0x00,0x00,0x00,0x00,0x02,0x00,0x00\r
18     .byte 0x00,0xff,0x00,0x00,0xff,0xff,0xff,0xff\r
19     .ascii "               "\r
20     .ascii "                        "\r
21     .ascii "                         "\r
22     .ascii "JUE             "\r
23 \r
24 RST:\r
25         move.w      (0xc00008), start_hvc\r
26         move.w          #0x2700, %sr\r
27 /* magic ED app init */\r
28         move.w #0x0000, (0xA13006)\r
29         jmp init_ed.l\r
30 init_ed:\r
31 /* relocate to bank a, so that other ROMs can be loaded */\r
32         move.w #0x0a0f, (0xA13006)\r
33         movea.l #0x100000, %a0\r
34         movea.l #0x200000, %a1\r
35         move.l #0x100000/4/4-1, %d0\r
36 0:\r
37         move.l (a0)+, (a1)+\r
38         move.l (a0)+, (a1)+\r
39         move.l (a0)+, (a1)+\r
40         move.l (a0)+, (a1)+\r
41         dbra %d0, 0b\r
42 \r
43         move.w #0x10af, (0xA13006)\r
44 \r
45         lea exc_tab, %a0\r
46         adda.l #4*2, %a0\r
47         movea.l #4*2, %a1\r
48         move.l #64-2-1, %d0\r
49 0:\r
50         move.l (a0)+, (a1)+\r
51         dbra %d0, 0b\r
52 \r
53         moveq   #0, %d0\r
54         movea.l %d0, %a7\r
55         move    %a7, %usp\r
56         move.w  #0x2000, %sr\r
57         bra     main\r
58 \r
59 HBL:\r
60         rte\r
61 \r
62 VBL:\r
63         movem.l %d0-%d1/%a0-%a1,-(%sp)\r
64         jsr vbl\r
65         movem.l (%sp)+,%d0-%d1/%a0-%a1\r
66         rte\r
67 \r
68 pre_exception:\r
69         move.w  #0x2700, %sr\r
70         movem.l %d0-%d7/%a0-%a7,-(%sp)\r
71         move.l %sp, %d0\r
72         move.l %d0,-(%sp)\r
73         jsr exception\r
74 0:\r
75         bra 0b\r
76 \r
77 \r
78 * Standard 32X startup code for MD side at 0x3F0\r
79         .org 0x3F0\r
80 \r
81         .word   0x287C,0xFFFF,0xFFC0,0x23FC,0x0000,0x0000,0x00A1,0x5128\r
82         .word   0x46FC,0x2700,0x4BF9,0x00A1,0x0000,0x7001,0x0CAD,0x4D41\r
83         .word   0x5253,0x30EC,0x6600,0x03E6,0x082D,0x0007,0x5101,0x67F8\r
84         .word   0x4AAD,0x0008,0x6710,0x4A6D,0x000C,0x670A,0x082D,0x0000\r
85         .word   0x5101,0x6600,0x03B8,0x102D,0x0001,0x0200,0x000F,0x6706\r
86         .word   0x2B78,0x055A,0x4000,0x7200,0x2C41,0x4E66,0x41F9,0x0000\r
87         .word   0x04D4,0x6100,0x0152,0x6100,0x0176,0x47F9,0x0000,0x04E8\r
88         .word   0x43F9,0x00A0,0x0000,0x45F9,0x00C0,0x0011,0x3E3C,0x0100\r
89         .word   0x7000,0x3B47,0x1100,0x3B47,0x1200,0x012D,0x1100,0x66FA\r
90         .word   0x7425,0x12DB,0x51CA,0xFFFC,0x3B40,0x1200,0x3B40,0x1100\r
91         .word   0x3B47,0x1200,0x149B,0x149B,0x149B,0x149B,0x41F9,0x0000\r
92         .word   0x04C0,0x43F9,0x00FF,0x0000,0x22D8,0x22D8,0x22D8,0x22D8\r
93         .word   0x22D8,0x22D8,0x22D8,0x22D8,0x41F9,0x00FF,0x0000,0x4ED0\r
94         .word   0x1B7C,0x0001,0x5101,0x41F9,0x0000,0x06BC,0xD1FC,0x0088\r
95         .word   0x0000,0x4ED0,0x0404,0x303C,0x076C,0x0000,0x0000,0xFF00\r
96         .word   0x8137,0x0002,0x0100,0x0000,0xAF01,0xD91F,0x1127,0x0021\r
97         .word   0x2600,0xF977,0xEDB0,0xDDE1,0xFDE1,0xED47,0xED4F,0xD1E1\r
98         .word   0xF108,0xD9C1,0xD1E1,0xF1F9,0xF3ED,0x5636,0xE9E9,0x9FBF\r
99         .word   0xDFFF,0x4D41,0x5253,0x2049,0x6E69,0x7469,0x616C,0x2026\r
100         .word   0x2053,0x6563,0x7572,0x6974,0x7920,0x5072,0x6F67,0x7261\r
101         .word   0x6D20,0x2020,0x2020,0x2020,0x2020,0x2043,0x6172,0x7472\r
102         .word   0x6964,0x6765,0x2056,0x6572,0x7369,0x6F6E,0x2020,0x2020\r
103         .word   0x436F,0x7079,0x7269,0x6768,0x7420,0x5345,0x4741,0x2045\r
104         .word   0x4E54,0x4552,0x5052,0x4953,0x4553,0x2C4C,0x5444,0x2E20\r
105         .word   0x3139,0x3934,0x2020,0x2020,0x2020,0x2020,0x2020,0x2020\r
106         .word   0x2020,0x2020,0x2020,0x2020,0x2020,0x2020,0x2020,0x2020\r
107         .word   0x2020,0x2020,0x2020,0x524F,0x4D20,0x5665,0x7273,0x696F\r
108         .word   0x6E20,0x312E,0x3000,0x48E7,0xC040,0x43F9,0x00C0,0x0004\r
109         .word   0x3011,0x303C,0x8000,0x323C,0x0100,0x3E3C,0x0012,0x1018\r
110         .word   0x3280,0xD041,0x51CF,0xFFF8,0x4CDF,0x0203,0x4E75,0x48E7\r
111         .word   0x81C0,0x41F9,0x0000,0x063E,0x43F9,0x00C0,0x0004,0x3298\r
112         .word   0x3298,0x3298,0x3298,0x3298,0x3298,0x3298,0x2298,0x3341\r
113         .word   0xFFFC,0x3011,0x0800,0x0001,0x66F8,0x3298,0x3298,0x7000\r
114         .word   0x22BC,0xC000,0x0000,0x7E0F,0x3340,0xFFFC,0x3340,0xFFFC\r
115         .word   0x3340,0xFFFC,0x3340,0xFFFC,0x51CF,0xFFEE,0x22BC,0x4000\r
116         .word   0x0010,0x7E09,0x3340,0xFFFC,0x3340,0xFFFC,0x3340,0xFFFC\r
117         .word   0x3340,0xFFFC,0x51CF,0xFFEE,0x4CDF,0x0381,0x4E75,0x8114\r
118         .word   0x8F01,0x93FF,0x94FF,0x9500,0x9600,0x9780,0x4000,0x0080\r
119         .word   0x8104,0x8F02,0x48E7,0xC140,0x43F9,0x00A1,0x5180,0x08A9\r
120         .word   0x0007,0xFF80,0x66F8,0x3E3C,0x00FF,0x7000,0x7200,0x337C\r
121         .word   0x00FF,0x0004,0x3341,0x0006,0x3340,0x0008,0x4E71,0x0829\r
122         .word   0x0001,0x000B,0x66F8,0x0641,0x0100,0x51CF,0xFFE8,0x4CDF\r
123         .word   0x0283,0x4E75,0x48E7,0x8180,0x41F9,0x00A1,0x5200,0x08A8\r
124         .word   0x0007,0xFF00,0x66F8,0x3E3C,0x001F,0x20C0,0x20C0,0x20C0\r
125         .word   0x20C0,0x51CF,0xFFF6,0x4CDF,0x0181,0x4E75,0x41F9,0x00FF\r
126         .word   0x0000,0x3E3C,0x07FF,0x7000,0x20C0,0x20C0,0x20C0,0x20C0\r
127         .word   0x20C0,0x20C0,0x20C0,0x20C0,0x51CF,0xFFEE,0x3B7C,0x0000\r
128         .word   0x1200,0x7E0A,0x51CF,0xFFFE,0x43F9,0x00A1,0x5100,0x7000\r
129         .word   0x2340,0x0020,0x2340,0x0024,0x1B7C,0x0003,0x5101,0x2E79\r
130         .word   0x0088,0x0000,0x0891,0x0007,0x66FA,0x7000,0x3340,0x0002\r
131         .word   0x3340,0x0004,0x3340,0x0006,0x2340,0x0008,0x2340,0x000C\r
132         .word   0x3340,0x0010,0x3340,0x0030,0x3340,0x0032,0x3340,0x0038\r
133         .word   0x3340,0x0080,0x3340,0x0082,0x08A9,0x0000,0x008B,0x66F8\r
134         .word   0x6100,0xFF12,0x08E9,0x0000,0x008B,0x67F8,0x6100,0xFF06\r
135         .word   0x08A9,0x0000,0x008B,0x6100,0xFF3C,0x303C,0x0040,0x2229\r
136         .word   0x0020,0x0C81,0x5351,0x4552,0x6700,0x0092,0x303C,0x0080\r
137         .word   0x2229,0x0020,0x0C81,0x5344,0x4552,0x6700,0x0080,0x21FC\r
138         .word   0x0088,0x02A2,0x0070,0x303C,0x0002,0x7200,0x122D,0x0001\r
139         .word   0x1429,0x0080,0xE14A,0x8242,0x0801,0x000F,0x660A,0x0801\r
140         .word   0x0006,0x6700,0x0058,0x6008,0x0801,0x0006,0x6600,0x004E\r
141         .word   0x7020,0x41F9,0x0088,0x0000,0x3C28,0x018E,0x4A46,0x6700\r
142         .word   0x0010,0x3429,0x0028,0x0C42,0x0000,0x67F6,0xB446,0x662C\r
143         .word   0x7000,0x2340,0x0028,0x2340,0x002C,0x3E14,0x2C7C,0xFFFF\r
144         .word   0xFFC0,0x4CD6,0x7FF9,0x44FC,0x0000,0x6014,0x43F9,0x00A1\r
145         .word   0x5100,0x3340,0x0006,0x303C,0x8000,0x6004,0x44FC,0x0001\r
146 \r
147 .macro exc_stub num\r
148 exc\num:\r
149         move.w #0x\num, -(%sp)\r
150         jmp pre_exception\r
151 .endm\r
152 \r
153 exc_stub 02\r
154 exc_stub 03\r
155 exc_stub 04\r
156 exc_stub 05\r
157 exc_stub 06\r
158 exc_stub 07\r
159 exc_stub 08\r
160 exc_stub 09\r
161 exc_stub 0a\r
162 exc_stub 0b\r
163 exc_stub 0c\r
164 exc_stub 0d\r
165 exc_stub 0e\r
166 exc_stub 0f\r
167 exc_stub 10\r
168 exc_stub 11\r
169 exc_stub 12\r
170 exc_stub 13\r
171 exc_stub 14\r
172 exc_stub 15\r
173 exc_stub 16\r
174 exc_stub 17\r
175 exc_stub 18\r
176 exc_stub 19\r
177 exc_stub 1a\r
178 exc_stub 1b\r
179 # exc_stub 1c\r
180 exc_stub 1d\r
181 # exc_stub 1e\r
182 exc_stub 1f\r
183 exc_stub 20\r
184 exc_stub 21\r
185 exc_stub 22\r
186 exc_stub 23\r
187 exc_stub 24\r
188 exc_stub 25\r
189 exc_stub 26\r
190 exc_stub 27\r
191 exc_stub 28\r
192 exc_stub 29\r
193 exc_stub 2a\r
194 exc_stub 2b\r
195 exc_stub 2c\r
196 exc_stub 2d\r
197 exc_stub 2e\r
198 exc_stub 2f\r
199 exc_stub 30\r
200 exc_stub 31\r
201 exc_stub 32\r
202 exc_stub 33\r
203 exc_stub 34\r
204 exc_stub 35\r
205 exc_stub 36\r
206 exc_stub 37\r
207 exc_stub 38\r
208 exc_stub 39\r
209 exc_stub 3a\r
210 exc_stub 3b\r
211 exc_stub 3c\r
212 exc_stub 3d\r
213 exc_stub 3e\r
214 exc_stub 3f\r
215 \r
216 .bss\r
217 .align 2\r
218 .global start_hvc\r
219 start_hvc:\r
220     .word 0\r
221 \r
222 # vim:filetype=asmM68k:ts=4:sw=4:expandtab\r