libc for the amiga version
[retrocrawl] / src / game.c
1 #include <stdio.h>
2 #include <string.h>
3 #include "game.h"
4 #include "gfx.h"
5 #include "copper.h"
6 #include "data.h"
7 #include "sprite.h"
8
9 #include "hwregs.h"     /* XXX */
10
11 #define TILE_W  64
12 #define TILE_H  32
13
14 void draw_tile(int tid, int x, int y, int light);
15
16 static uint16_t *sprdata[NUM_HWSPRITES];
17
18 /* hardcoded test sprite */
19 static struct sprite test_sprite;
20
21 int game_init(void)
22 {
23         int i;
24
25         printf("hello world\n");
26
27         REG_COLOR0 = 0x221;
28         REG_COLOR1 = 0x222;
29         REG_COLOR2 = 0x332;
30         REG_COLOR3 = 0x433;
31         REG_COLOR4 = 0x543;
32         REG_COLOR5 = 0x554;
33         REG_COLOR6 = 0x654;
34         REG_COLOR7 = 0x765;
35
36         for(i=0; i<16; i++) {
37                 REG_COLOR_PTR[i + 16] = sprpal[i];
38         }
39
40         sprdata[0] = spr0a;
41         sprdata[1] = spr0b;
42         sprdata[2] = spr1a;
43         sprdata[3] = spr1b;
44         sprdata[4] = spr2a;
45         sprdata[5] = spr2b;
46
47         test_sprite.width = test_sprite.height = 48;
48         test_sprite.origx = 24;
49         test_sprite.origy = 24;
50         test_sprite.img = test_sprite.mask = 0;
51         test_sprite.hwslices = 3;
52         for(i=0; i<8; i++) {
53                 test_sprite.hwspr[i] = i < 6 ? sprdata[i] : 0;
54         }
55
56         return 0;
57 }
58
59 #define XTILES  5
60 #define YTILES  13
61
62 void game_draw(void)
63 {
64         int i, j, xoffs, yoffs, ntiles;
65
66         yoffs = 0;
67         for(i=0; i<YTILES; i++) {
68                 xoffs = i & 1 ? TILE_W / 2 : 0;
69                 ntiles = i & 1 ? XTILES - 1 : XTILES;
70                 for(j=0; j<ntiles; j++) {
71                         draw_tile(0, xoffs, yoffs, 0);
72                         xoffs += TILE_W;
73                 }
74                 yoffs += TILE_H / 2;
75         }
76
77         begin_sprites();
78         draw_sprite(&test_sprite, 160, 100);
79         end_sprites();
80 }
81
82
83 void draw_tile(int tid, int x, int y, int light)
84 {
85         unsigned char *dest = bplptr[0] + (y * SCANSZ * NBPL) + x / 8;
86         unsigned char *src = test_tile;
87
88         wait_blit();
89
90         REG32_BLTCON = BLTCON_USEA | BLTCON_USEB | BLTCON_USEC | BLTCON_USED |
91                 BLTCON_LF(0xca);
92         REG32_BLTAFLWM = 0xffffffff;
93         REG_BLTAMOD = 0;
94         REG_BLTBMOD = 0;
95         REG_BLTCMOD = SCANSZ - TILE_W / 8;
96         REG_BLTDMOD = SCANSZ - TILE_W / 8;
97         REG32_BLTAPT = (intptr_t)test_tile_mask;
98         REG32_BLTBPT = (intptr_t)src;
99         REG32_BLTCPT = (intptr_t)dest;
100         REG32_BLTDPT = (intptr_t)dest;
101         REG_BLTSIZE = BLTSIZE(TILE_W, TILE_H * NBPL);
102 }