]> 4ch.mooo.com Git - 16.git/blob - src/lib/scroll16.c
854eaed05b31bed03537bc3a28202aaff3424d4e
[16.git] / src / lib / scroll16.c
1 /* Project 16 Source Code~
2  * Copyright (C) 2012-2015 sparky4 & pngwen & andrius4669
3  *
4  * This file is part of Project 16.
5  *
6  * Project 16 is free software; you can redistribute it and/or modify
7  * it under the terms of the GNU General Public License as published by
8  * the Free Software Foundation; either version 3 of the License, or
9  * (at your option) any later version.
10  *
11  * Project 16 is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14  * GNU General Public License for more details.
15  *
16  * You should have received a copy of the GNU General Public License
17  * along with this program.  If not, see <http://www.gnu.org/licenses/>, or
18  * write to the Free Software Foundation, Inc., 51 Franklin Street,
19  * Fifth Floor, Boston, MA 02110-1301 USA.
20  *
21  */
22 /*
23         scroll16 library~
24 */
25 #include "src/lib/scroll16.h"
26
27 void walk(map_view_t *pip, player_t *player, word pn)
28 {
29         #define INC_PER_FRAME if(player[pn].q&1) player[pn].persist_aniframe++; if(player[pn].persist_aniframe>4) player[pn].persist_aniframe = 1;
30         //right movement
31         switch(player[pn].info.dir)
32         {
33                 case 3:
34                         if(pip[0].tx >= 0 && pip[0].tx+20 < pip[0].map->width && player[pn].tx == pip[0].tx + 10 &&
35                         !(pip[0].map->data[(player[pn].tx)+(pip[0].map->width*(player[pn].ty-1))] == 0))//!(player[pn].tx+1 == TRIGGX && player[pn].ty == TRIGGY))      //collision detection!
36                         {
37                                 if(player[pn].q<=(TILEWH/(player[pn].speed)))
38                                 {
39                                         INC_PER_FRAME;
40                                         animatePlayer(pip, player, pn, 1);
41                                         mapScrollRight(pip, player, 0, pn);
42                                         mapScrollRight(pip, player, 1, pn);
43                                         modexShowPage(pip[1].page);
44                                         player[pn].q++;
45                                 } else { player[pn].q = 1; player[pn].info.dir = 0; player[pn].tx++; }
46                         }
47                         else if(player[pn].tx < pip[0].map->width && !(pip[0].map->data[(player[pn].tx)+(pip[0].map->width*(player[pn].ty-1))] == 0))//!(player[pn].tx+1 == TRIGGX && player[pn].ty == TRIGGY))
48                         {
49                                 if(player[pn].q<=(TILEWH/(player[pn].speed)))
50                                 {
51                                         INC_PER_FRAME;
52                                         player[pn].x+=(player[pn].speed);
53                                         animatePlayer(pip, player, pn, 0);
54                                         modexShowPage(pip[1].page);
55                                         player[pn].q++;
56                                 } else { player[pn].q = 1; player[pn].info.dir = 0; player[pn].tx++; }
57                         }
58                         else
59                         {
60                                 modexCopyPageRegion(pip[1].page, pip[0].page, player[pn].x-4, player[pn].y-TILEWH, player[pn].x-4, player[pn].y-TILEWH, 24, 32);
61                                 modexDrawSpriteRegion(pip[1].page, player[pn].x-4, player[pn].y-TILEWH, 24, 32, 24, 32, &player[pn].data);
62                                 modexShowPage(pip[1].page);
63                                 player[pn].info.dir = 0;
64                         }
65                         player[pn].triggerx = player[pn].tx+1;
66                         player[pn].triggery = player[pn].ty;
67                 break;
68
69                 //left movement
70                 case 1:
71                         if(pip[0].tx > 0 && pip[0].tx+20 <= pip[0].map->width && player[pn].tx == pip[0].tx + 10 &&
72                         !(pip[0].map->data[(player[pn].tx-2)+(pip[0].map->width*(player[pn].ty-1))] == 0))//!(player[pn].tx-1 == TRIGGX && player[pn].ty == TRIGGY))    //collision detection!
73                         {
74                                 if(player[pn].q<=(TILEWH/(player[pn].speed)))
75                                 {
76                                         INC_PER_FRAME;
77                                         animatePlayer(pip, player, pn, 1);
78                                         mapScrollLeft(pip, player, 0, pn);
79                                         mapScrollLeft(pip, player, 1, pn);
80                                         modexShowPage(pip[1].page);
81                                         player[pn].q++;
82                                 } else { player[pn].q = 1; player[pn].info.dir = 0; player[pn].tx--; }
83                         }
84                         else if(player[pn].tx > 1 && !(pip[0].map->data[(player[pn].tx-2)+(pip[0].map->width*(player[pn].ty-1))] == 0))//!(player[pn].tx-1 == TRIGGX && player[pn].ty == TRIGGY))
85                         {
86                                 if(player[pn].q<=(TILEWH/(player[pn].speed)))
87                                 {
88                                         INC_PER_FRAME;
89                                         player[pn].x-=(player[pn].speed);
90                                         animatePlayer(pip, player, pn, 0);
91                                         modexShowPage(pip[1].page);
92                                         player[pn].q++;
93                                 } else { player[pn].q = 1; player[pn].info.dir = 0; player[pn].tx--; }
94                         }
95                         else
96                         {
97                                 modexCopyPageRegion(pip[1].page, pip[0].page, player[pn].x-4, player[pn].y-TILEWH, player[pn].x-4, player[pn].y-TILEWH, 24, 32);
98                                 modexDrawSpriteRegion(pip[1].page, player[pn].x-4, player[pn].y-TILEWH, 24, 96, 24, 32, &player[pn].data);
99                                 modexShowPage(pip[1].page);
100                                 player[pn].info.dir = 0;
101                         }
102                         player[pn].triggerx = player[pn].tx-1;
103                         player[pn].triggery = player[pn].ty;
104                 break;
105
106                 //down movement
107                 case 4:
108                         if(pip[0].ty >= 0 && pip[0].ty+15 < pip[0].map->height && player[pn].ty == pip[0].ty + 8 &&
109                         !(pip[0].map->data[(player[pn].tx-1)+(pip[0].map->width*(player[pn].ty))] == 0))//!(player[pn].tx == TRIGGX && player[pn].ty+1 == TRIGGY))      //collision detection!
110                         {
111                                 if(player[pn].q<=(TILEWH/(player[pn].speed)))
112                                 {
113                                         INC_PER_FRAME;
114                                         animatePlayer(pip, player, pn, 1);
115                                         mapScrollDown(pip, player, 0, pn);
116                                         mapScrollDown(pip, player, 1, pn);
117                                         modexShowPage(pip[1].page);
118                                         player[pn].q++;
119                                 } else { player[pn].q = 1; player[pn].info.dir = 0; player[pn].ty++; }
120                         }
121                         else if(player[pn].ty < pip[0].map->height && !(pip[0].map->data[(player[pn].tx-1)+(pip[0].map->width*(player[pn].ty))] == 0))//!(player[pn].tx == TRIGGX && player[pn].ty+1 == TRIGGY))
122                         {
123                                 if(player[pn].q<=(TILEWH/(player[pn].speed)))
124                                 {
125                                         INC_PER_FRAME;
126                                         player[pn].y+=(player[pn].speed);
127                                         animatePlayer(pip, player, pn, 0);
128                                         modexShowPage(pip[1].page);
129                                         player[pn].q++;
130                                 } else { player[pn].q = 1; player[pn].info.dir = 0; player[pn].ty++; }
131                         }
132                         else
133                         {
134                                 modexCopyPageRegion(pip[1].page, pip[0].page, player[pn].x-4, player[pn].y-TILEWH, player[pn].x-4, player[pn].y-TILEWH, 24, 32);
135                                 modexDrawSpriteRegion(pip[1].page, player[pn].x-4, player[pn].y-TILEWH, 24, 64, 24, 32, &player[pn].data);
136                                 modexShowPage(pip[1].page);
137                                 player[pn].info.dir = 0;
138                         }
139                         player[pn].triggerx = player[pn].tx;
140                         player[pn].triggery = player[pn].ty+1;
141                 break;
142
143                 //up movement
144                 case 0:
145                         if(pip[0].ty > 0 && pip[0].ty+15 <= pip[0].map->height && player[pn].ty == pip[0].ty + 8 &&
146                         !(pip[0].map->data[(player[pn].tx-1)+(pip[0].map->width*(player[pn].ty-2))] == 0))//!(player[pn].tx == TRIGGX && player[pn].ty-1 == TRIGGY))    //collision detection!
147                         {
148                                 if(player[pn].q<=(TILEWH/(player[pn].speed)))
149                                 {
150                                         INC_PER_FRAME;
151                                         animatePlayer(pip, player, pn, 1);
152                                         mapScrollUp(pip, player, 0, pn);
153                                         mapScrollUp(pip, player, 1, pn);
154                                         modexShowPage(pip[1].page);
155                                         player[pn].q++;
156                                 } else { player[pn].q = 1; player[pn].info.dir = 0; player[pn].ty--; }
157                         }
158                         else if(player[pn].ty > 1 && !(pip[0].map->data[(player[pn].tx-1)+(pip[0].map->width*(player[pn].ty-2))] == 0))//!(player[pn].tx == TRIGGX &&  player[pn].ty-1 == TRIGGY))
159                         {
160                                 if(player[pn].q<=(TILEWH/(player[pn].speed)))
161                                 {
162                                         INC_PER_FRAME;
163                                         player[pn].y-=(player[pn].speed);
164                                         animatePlayer(pip, player, 0, pn);
165                                         modexShowPage(pip[1].page);
166                                         player[pn].q++;
167                                 } else { player[pn].q = 1; player[pn].info.dir = 0; player[pn].ty--; }
168                         }
169                         else
170                         {
171                                 modexCopyPageRegion(pip[1].page, pip[0].page, player[pn].x-4, player[pn].y-TILEWH, player[pn].x-4, player[pn].y-TILEWH, 24, 32);
172                                 modexDrawSpriteRegion(pip[1].page, player[pn].x-4, player[pn].y-TILEWH, 24, 0, 24, 32, &player[pn].data);
173                                 modexShowPage(pip[1].page);
174                                 player[pn].info.dir = 0;
175                         }
176                         player[pn].triggerx = player[pn].tx;
177                         player[pn].triggery = player[pn].ty-1;
178                 break;
179         }
180 }
181
182 /*map_t
183 allocMap(int w, int h) {
184         map_t result;
185
186         result.width =w;
187         result.height=h;
188         result.data = malloc(sizeof(byte) * w * h);
189         //result.data = (byte *)alloc_emem(((int)sizeof(byte) * w * h)/1024);
190         if(isEMS() || checkEMS())
191         {
192                 XMOVE mm;
193                 //emmhandle = mallocEMS(coretotalEMS());//alloc_emem((int)sizeof(map))
194                 mm.length=sizeof(result);
195                 mm.sourceH=0;
196                 mm.sourceOff=ptr2long(&result);
197                 mm.destH=emmhandle;
198                 mm.destOff=0;
199                 ist = move_emem(&mm);
200                 if(!ist){ dealloc_emem(emmhandle); exit(5); }
201                 printf("%d\n", coretotalEMS());
202         }
203
204         return result;
205 }*/
206
207 /*void
208 initMap(map_t *map) {
209         // just a place holder to fill out an alternating pattern
210         int x, y, xx, yy;
211         int i, q;
212 //      int tile = 1;
213         //if(!isEMS() || !checkEMS())
214 //              map->tiles = malloc(sizeof(tiles_t));
215         //else
216         //      map->tiles = (tiles_t *)alloc_emem(sizeof(tiles_t));
217
218          //create the tile set
219         //if(!isEMS() || !checkEMS())
220 //              map->tiles->data = malloc(sizeof(bitmap_t));
221         //else
222         //      map->tiles->data = (bitmap_t *)alloc_emem(sizeof(bitmap_t));
223 //      map->tiles->data->width = (TILEWH);
224 //      map->tiles->data->height= TILEWH;
225         //if(!isEMS() || !checkEMS())
226 //              map->tiles->data->data = malloc((TILEWH*2)*TILEWH);
227         //else
228         //      map->tiles->data->data = (byte *)alloc_emem((TILEWH*2)*TILEWH);
229 //      map->tiles->tileHeight = TILEWH;
230 //      map->tiles->tileWidth =TILEWH;
231 //      map->tiles->rows = 1;
232 //      map->tiles->cols = 1;//2;
233
234         q=0;
235         //for(y=0; y<map->height; y++) {
236         //for(x=0; x<map->width; x++) {
237         i=0;
238         for(yy=0; yy<TILEWH; yy++) {
239         for(xx=0; xx<(TILEWH); xx++) {
240                 //if(x<TILEWH){
241                   map->tiles->data->data[i+1] = map->data[q];//28;//0x24;
242 //                printf("[%d]", map->tiles->data->data[i]);
243                 //}else{
244                   //map->tiles->data->data[i] = map->data[q];//0;//0x34;
245                   //printf("]%d[==[%d]", i, map->tiles->data->data[i]);
246                 //}
247                 i++;
248         }
249 //      printf("\n");
250         }
251 //      printf("[%d]", map->data[q]);
252         q++;
253 //      }
254         //printf("\n\n");
255 //      }
256
257         i=0;
258         for(y=0; y<map->height; y++) {
259                 for(x=0; x<map->width; x++) {
260 //                      map->data[i]=255;
261                         printf("[%d]", map->data[i]);
262                         //tile = tile ? 0 : 1;
263                         i++;
264                 }
265                 //tile = tile ? 0 : 1;
266         }
267 }*/
268
269 void mapScrollRight(map_view_t *mv, player_t *player, word id, word plid)
270 {
271         word x, y;  /* coordinate for drawing */
272
273         /* increment the pixel position and update the page */
274         mv[id].page->dx += player[plid].speed;
275
276         /* check to see if this changes the tile */
277         if(mv[id].page->dx >= mv[id].dxThresh )
278         {
279         /* go forward one tile */
280         mv[id].tx++;
281         /* Snap the origin forward */
282         mv[id].page->data += 4;
283         mv[id].page->dx = mv[id].map->tiles->tileWidth;
284         }
285
286         /* draw the next column */
287         x= SCREEN_WIDTH + mv[id].map->tiles->tileWidth;
288         if(player[plid].q%4)
289                 if(id==0)
290                         mapDrawCol(&mv[0], mv[0].tx + 20 , mv[0].ty-1, x, player, mv->page->dx);
291                 else
292                         modexCopyPageRegion(mv[id].page, mv[0].page, x, 0, x, 0, mv[id].map->tiles->tileWidth, mv[id].map->tiles->tileHeight*17);
293         //}
294 }
295
296
297 void mapScrollLeft(map_view_t *mv, player_t *player, word id, word plid)
298 {
299         word x, y;  /* coordinate for drawing */
300
301         /* increment the pixel position and update the page */
302         mv[id].page->dx -= player[plid].speed;
303
304         /* check to see if this changes the tile */
305         if(mv[id].page->dx == 0)
306         {
307         /* go backward one tile */
308         mv[id].tx--;
309
310         /* Snap the origin backward */
311         mv[id].page->data -= 4;
312         mv[id].page->dx = mv[id].map->tiles->tileWidth;
313         }
314
315         /* draw the next column */
316         x= 0;
317         if(player[plid].q%4)
318                 if(id==0)
319                         mapDrawCol(&mv[0], mv[0].tx - 1, mv[0].ty-1, x, player, mv->page->dx);
320                 else
321                         modexCopyPageRegion(mv[id].page, mv[0].page, x, 0, x, 0, mv[id].map->tiles->tileWidth, mv[id].map->tiles->tileHeight*17);
322         //}
323 }
324
325
326 void mapScrollUp(map_view_t *mv, player_t *player, word id, word plid)
327 {
328         word x, y;  /* coordinate for drawing */
329
330         /* increment the pixel position and update the page */
331         mv[id].page->dy -= player[plid].speed;
332
333         /* check to see if this changes the tile */
334         if(mv[id].page->dy == 0 )
335         {
336         /* go down one tile */
337         mv[id].ty--;
338         /* Snap the origin downward */
339         mv[id].page->data -= mv[id].page->width*4;
340         mv[id].page->dy = mv[id].map->tiles->tileHeight;
341         }
342
343         /* draw the next row */
344         y= 0;
345         if(player[plid].q%3)
346                 if(id==0)
347                         mapDrawRow(&mv[0], mv[0].tx - 1, mv[0].ty-1, y, player, mv->page->dy);
348                 else
349                         modexCopyPageRegion(mv[id].page, mv[0].page, 0, y, 0, y, mv[id].map->tiles->tileWidth*22, mv[id].map->tiles->tileHeight);
350         //}
351 }
352
353 void mapScrollDown(map_view_t *mv, player_t *player, word id, word plid)
354 {
355         word x, y;  /* coordinate for drawing */
356
357         /* increment the pixel position and update the page */
358         mv[id].page->dy += player[plid].speed;
359
360         /* check to see if this changes the tile */
361         if(mv[id].page->dy >= mv[id].dyThresh )
362         {
363         /* go down one tile */
364         mv[id].ty++;
365         /* Snap the origin downward */
366         mv[id].page->data += mv[id].page->width*4;
367         mv[id].page->dy = mv[id].map->tiles->tileHeight;
368         }
369
370         /* draw the next row */
371         y= SCREEN_HEIGHT + mv[id].map->tiles->tileHeight;
372         if(player[plid].q%3)
373                 if(id==0)
374                         mapDrawRow(&mv[0], mv[0].tx - 1, mv[0].ty+15, y, player, mv->page->dy);
375                 else
376                         modexCopyPageRegion(mv[id].page, mv[0].page, 0, y, 0, y, mv[id].map->tiles->tileWidth*22, mv[id].map->tiles->tileHeight);
377         //}
378 }
379
380 sword chkmap(map_t *map, word q)
381 {
382         bitmap_t bp;
383         byte x[MAPW*MAPH] = {4};//{ 1, 2, 3, 4, 0, 3, 3, 3, 3, 3, 3, 3, 3, 4, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 5, 6, 7, 8, 0, 1, 0, 1, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 9, 10, 11, 12, 4, 1, 0, 1, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 13, 14, 15, 16, 0, 1, 1, 1, 5, 8, 1, 11, 11, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 4, 0, 0, 0, 0, 0, 8, 8, 1, 11, 11, 3, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 0, 8, 8, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 3, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 3, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 3, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 3, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 3, 3, 3, 3, 1, 2, 3, 4, 3, 3, 3, 3, 3, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 3, 1, 1, 1, 1, 5, 6, 7, 8, 6, 6, 6, 6, 6, 3, 3, 3, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 3, 3, 1, 1, 1, 1, 1, 9, 10, 11, 12, 6, 6, 6, 6, 6, 6, 6, 6, 3, 3, 3, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 3, 1, 1, 1, 1, 1, 1, 1, 13, 14, 15, 16, 3, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 3, 3, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 3, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 3, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 3, 3, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 3, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 3, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 3, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 3, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 3, 3, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 3, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 3, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 3, 3, 3, 3, 3, 6, 6, 6, 6, 6, 6, 6, 3, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 3, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 3, 3, 3, 3, 3, 3, 3, 3, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 3, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 3, 3, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 3, 3, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 3, 3, 3, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 0, 0, 0, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 3, 3, 3, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 0, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 10, 10, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 10, 10 };
384         //check for failed to load map
385         if((map->width == map->height == 0) || (q>0))
386         {
387                 //initiate a null map!
388                 map->width=MAPW;
389                 map->height=MAPH;
390 //              map->data = malloc((map->width*map->height)*sizeof(byte));
391                 map->data = &x;
392                 map->tiles = malloc(sizeof(tiles_t));
393                 //fix this to be far~
394                 bp = bitmapLoadPcx("data/ed.pcx");
395                 map->tiles->data = &bp;
396                 map->tiles->tileHeight = 16;
397                 map->tiles->tileWidth = 16;
398                 map->tiles->rows = 1;
399                 map->tiles->cols = 1;
400         }
401         return 0;
402 }
403
404 void mapGoTo(map_view_t *mv, int tx, int ty)
405 {
406         int px, py;
407         unsigned int i;
408
409         /* set up the coordinates */
410         mv->tx = tx;
411         mv->ty = ty;
412         mv->page->dx = mv->map->tiles->tileWidth;
413         mv->page->dy = mv->map->tiles->tileHeight;
414
415         /* set up the thresholds */
416         mv->dxThresh = mv->map->tiles->tileWidth * 2;
417         mv->dyThresh = mv->map->tiles->tileHeight * 2;
418
419         /* draw the tiles */
420         modexClearRegion(mv->page, 0, 0, mv->page->width, mv->page->height, 0);
421         py=0;
422         i=mv->ty * mv->map->width + mv->tx;
423         for(ty=mv->ty-1; py < SCREEN_HEIGHT+mv->dyThresh && ty < mv->map->height; ty++, py+=mv->map->tiles->tileHeight) {
424                 mapDrawWRow(mv, tx-1, ty, py);
425         i+=mv->map->width - tx;
426         }
427 }
428
429
430 void
431 mapDrawTile(tiles_t *t, word i, page_t *page, word x, word y)
432 {
433         word rx;
434         word ry;
435         //if(i==0) i=2;
436         if(i==0)
437         {
438                 //wwww
439                 modexClearRegion(page, x, y, t->tileWidth, t->tileHeight, 0); //currently the over scan color!
440         }
441         else
442         {
443         rx = (((i-1) % ((t->data->width)/t->tileWidth)) * t->tileWidth);
444         ry = (((i-1) / ((t->data->height)/t->tileHeight)) * t->tileHeight);
445 ////0000        printf("i=%d\n", i);
446         //mxPutTile(t->data, x, y, t->tileWidth, t->tileHeight);
447         modexDrawBmpRegion(page, x, y, rx, ry, t->tileWidth, t->tileHeight, (t->data));
448         }
449 }
450
451 void mapDrawRow(map_view_t *mv, int tx, int ty, word y, player_t *p, word poopoffset)
452 {
453         word x;
454         int i;
455         poopoffset%=p[0].speed;
456 //printf("y: %d\n", poopoffset);
457         /* the position within the map array */
458         i=ty * mv->map->width + tx;
459         for(x=poopoffset; x<(SCREEN_WIDTH+mv->dxThresh)/(poopoffset+1) && tx < mv->map->width; x+=mv->map->tiles->tileWidth, tx++) {
460         if(i>=0) {
461                 /* we are in the map, so copy! */
462                 mapDrawTile(mv->map->tiles, mv->map->data[i], mv->page, x, y);
463         }
464         i++; /* next! */
465         }
466 }
467
468 void mapDrawCol(map_view_t *mv, int tx, int ty, word x, player_t *p, word poopoffset)
469 {
470         int y;
471         int i;
472         poopoffset%=p[0].speed;
473 //printf("x: %d\n", poopoffset);
474         /* location in the map array */
475         i=ty * mv->map->width + tx;
476
477         /* We'll copy all of the columns in the screen,
478            i + 1 row above and one below */
479         for(y=poopoffset; y<(SCREEN_HEIGHT+mv->dyThresh)/(poopoffset+1) && ty < mv->map->height; y+=mv->map->tiles->tileHeight, ty++) {
480         if(i>=0) {
481                 /* we are in the map, so copy away! */
482                 mapDrawTile(mv->map->tiles, mv->map->data[i], mv->page, x, y);
483         }
484         i += mv->map->width;
485         }
486 }
487
488 void mapDrawWRow(map_view_t *mv, int tx, int ty, word y)
489 {
490         word x;
491         int i;
492
493         /* the position within the map array */
494         i=ty * mv->map->width + tx;
495         for(x=0; x<SCREEN_WIDTH+mv->dxThresh && tx < mv->map->width; x+=mv->map->tiles->tileWidth, tx++) {
496         if(i>=0) {
497                 /* we are in the map, so copy! */
498                 mapDrawTile(mv->map->tiles, mv->map->data[i], mv->page, x, y);
499         }
500         i++; /* next! */
501         }
502 }
503
504 void mapDrawWCol(map_view_t *mv, int tx, int ty, word x)
505 {
506         int y;
507         int i;
508
509         /* location in the map array */
510         i=ty * mv->map->width + tx;
511
512         /* We'll copy all of the columns in the screen,
513            i + 1 row above and one below */
514         for(y=0; y<SCREEN_HEIGHT+mv->dyThresh && ty < mv->map->height; y+=mv->map->tiles->tileHeight, ty++) {
515         if(i>=0) {
516                 /* we are in the map, so copy away! */
517                 mapDrawTile(mv->map->tiles, mv->map->data[i], mv->page, x, y);
518         }
519         i += mv->map->width;
520         }
521 }
522
523 void qclean()
524 {
525         modexLeave();
526         //setkb(0);
527 }
528
529 void pdump(page_t *pee)
530 {
531         int mult=(QUADWH);
532         int palq=(mult)*TILEWH;
533         int palcol=0;
534         int palx, paly;
535         for(paly=0; paly<palq; paly+=mult){
536                 for(palx=0; palx<palq; palx+=mult){
537                                 modexClearRegion(pee, palx+TILEWH, paly+TILEWH, mult, mult, palcol);
538                         palcol++;
539                 }
540         }
541 }
542
543 //sync!
544 void shinku(page_t *page, global_game_variables_t *gv)
545 {
546         byte *pee;
547         word x = (SCREEN_WIDTH/2);
548         word y = (SCREEN_HEIGHT/2);
549         word col = 33;
550         word bgcol = 0;
551         word type = 1;
552         if(elapsed_timer(gv) >= (1.0 / gv->frames_per_second))
553         {
554                 pee = malloc(sizeof(double));
555                 sprintf(pee, "%f", (((0x046C)-(gv->t)) /18.2));
556                 modexprint(page, x, y, type, col, bgcol, pee);
557                 sprintf(pee, "%f", elapsed_timer(gv));
558                 modexprint(page, x, y+16, type, col, bgcol, pee);
559         }
560 }
561
562 void animatePlayer(map_view_t *pip, player_t *player, word playnum, sword scrollswitch)
563 {
564         sword dire=32; //direction
565         sword qq; //scroll offset
566         word ls = player[playnum].persist_aniframe;
567
568         if(scrollswitch==0) qq = 0;
569         else qq = ((player[playnum].persist_aniframe)*player[playnum].speed);
570         switch (player[playnum].info.dir)
571         {
572                 case 0:
573                         //up
574                         dire*=player[playnum].info.dir;
575                         player[playnum].x=player[playnum].x-4;
576                         player[playnum].y=player[playnum].y-qq-TILEWH;
577                 break;
578                 case 1:
579                         // right
580                         dire*=(player[playnum].info.dir-2);
581                         player[playnum].x=player[playnum].x+qq-4;
582                         player[playnum].y=player[playnum].y-TILEWH;
583                 break;
584                 case 2:
585                 break;
586                 case 3:
587                         //down
588                         dire*=(player[playnum].info.dir-2);
589                         player[playnum].x=player[playnum].x-4;
590                         player[playnum].y=player[playnum].y+qq-TILEWH;
591                 break;
592                 case 4:
593                         //left
594                         dire*=(player[playnum].info.dir+2);
595                         player[playnum].x=player[playnum].x-qq-4;
596                         player[playnum].y=player[playnum].y-TILEWH;
597                 break;
598         }
599         modexCopyPageRegion(pip[1].page, pip[0].page, player[playnum].x-4, player[playnum].y-4, player[playnum].x-4, player[playnum].y-4, 28, 40);
600         if(2>ls && ls>=1) { modexDrawSpriteRegion(pip[1].page, player[playnum].x, player[playnum].y, 48, dire, 24, 32, &player[playnum].data); }else
601         if(3>ls && ls>=2) { modexDrawSpriteRegion(pip[1].page, player[playnum].x, player[playnum].y, 24, dire, 24, 32, &player[playnum].data); }else
602         if(4>ls && ls>=3) { modexDrawSpriteRegion(pip[1].page, player[playnum].x, player[playnum].y, 0, dire, 24, 32, &player[playnum].data); }else
603         if(5>ls && ls>=4) { modexDrawSpriteRegion(pip[1].page, player[playnum].x, player[playnum].y, 24, dire, 24, 32, &player[playnum].data); }
604         //TODO: mask copy //modexCopyPageRegion(dest->page, src->page, x-4, y-4, x-4, y-4, 28, 40);
605         //modexClearRegion(top->page, 66, 66, 2, 40, 0);
606         //modexCopyPageRegion(dest->page, top->page, 66, 66, 66, 66, 2, 40);
607         //turn this off if XT
608         //XTif(detectcpu() > 0)
609         modexWaitBorder();
610 }