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         switch(player[pn].d)
  31         {
  32                 //right movement
  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].d = 2; 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].d = 2; 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 #ifdef SPRITE
  62                                 modexDrawSpriteRegion(pip[1].page, player[pn].x-4, player[pn].y-TILEWH, 24, 32, 24, 32, &player[pn].data);
  63 #else
  64                                 modexClearRegion(pip[1].page, player[pn].x-4, player[pn].y-TILEWH, 24, 32, 14);
  65 #endif
  66                                 modexShowPage(pip[1].page);
  67                                 player[pn].d = 2;
  68                         }
  69                         player[pn].triggerx = player[pn].tx+1;
  70                         player[pn].triggery = player[pn].ty;
  71                 break;
  72
  73                 //left movement
  74                 case 1:
  75                         if(pip[0].tx > 0 && pip[0].tx+20 <= pip[0].map->width && player[pn].tx == pip[0].tx + 10 &&
  76                         !(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!
  77                         {
  78                                 if(player[pn].q<=(TILEWH/(player[pn].speed)))
  79                                 {
  80                                         INC_PER_FRAME;
  81                                         animatePlayer(pip, player, pn, 1);
  82                                         mapScrollLeft(pip, player, 0, pn);
  83                                         mapScrollLeft(pip, player, 1, pn);
  84                                         modexShowPage(pip[1].page);
  85                                         player[pn].q++;
  86                                 } else { player[pn].q = 1; player[pn].d = 2; player[pn].tx--; }
  87                         }
  88                         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))
  89                         {
  90                                 if(player[pn].q<=(TILEWH/(player[pn].speed)))
  91                                 {
  92                                         INC_PER_FRAME;
  93                                         player[pn].x-=(player[pn].speed);
  94                                         animatePlayer(pip, player, pn, 0);
  95                                         modexShowPage(pip[1].page);
  96                                         player[pn].q++;
  97                                 } else { player[pn].q = 1; player[pn].d = 2; player[pn].tx--; }
  98                         }
  99                         else
 100                         {
 101                                 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);
 102 #ifdef SPRITE
 103                                 modexDrawSpriteRegion(pip[1].page, player[pn].x-4, player[pn].y-TILEWH, 24, 96, 24, 32, &player[pn].data);
 104 #else
 105                                 modexClearRegion(pip[1].page, player[pn].x-4, player[pn].y-TILEWH, 24, 32, 10);
 106 #endif
 107                                 modexShowPage(pip[1].page);
 108                                 player[pn].d = 2;
 109                         }
 110                         player[pn].triggerx = player[pn].tx-1;
 111                         player[pn].triggery = player[pn].ty;
 112                 break;
 113
 114                 //down movement
 115                 case 4:
 116                         if(pip[0].ty >= 0 && pip[0].ty+15 < pip[0].map->height && player[pn].ty == pip[0].ty + 8 &&
 117                         !(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!
 118                         {
 119                                 if(player[pn].q<=(TILEWH/(player[pn].speed)))
 120                                 {
 121                                         INC_PER_FRAME;
 122                                         animatePlayer(pip, player, pn, 1);
 123                                         mapScrollDown(pip, player, 0, pn);
 124                                         mapScrollDown(pip, player, 1, pn);
 125                                         modexShowPage(pip[1].page);
 126                                         player[pn].q++;
 127                                 } else { player[pn].q = 1; player[pn].d = 2; player[pn].ty++; }
 128                         }
 129                         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))
 130                         {
 131                                 if(player[pn].q<=(TILEWH/(player[pn].speed)))
 132                                 {
 133                                         INC_PER_FRAME;
 134                                         player[pn].y+=(player[pn].speed);
 135                                         animatePlayer(pip, player, pn, 0);
 136                                         modexShowPage(pip[1].page);
 137                                         player[pn].q++;
 138                                 } else { player[pn].q = 1; player[pn].d = 2; player[pn].ty++; }
 139                         }
 140                         else
 141                         {
 142                                 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);
 143 #ifdef SPRITE
 144                                 modexDrawSpriteRegion(pip[1].page, player[pn].x-4, player[pn].y-TILEWH, 24, 64, 24, 32, &player[pn].data);
 145 #else
 146                                 modexClearRegion(pip[1].page, player[pn].x-4, player[pn].y-TILEWH, 24, 32, 9);
 147 #endif
 148                                 modexShowPage(pip[1].page);
 149                                 player[pn].d = 2;
 150                         }
 151                         player[pn].triggerx = player[pn].tx;
 152                         player[pn].triggery = player[pn].ty+1;
 153                 break;
 154
 155                 //up movement
 156                 case 0:
 157                         if(pip[0].ty > 0 && pip[0].ty+15 <= pip[0].map->height && player[pn].ty == pip[0].ty + 8 &&
 158                         !(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!
 159                         {
 160                                 if(player[pn].q<=(TILEWH/(player[pn].speed)))
 161                                 {
 162                                         INC_PER_FRAME;
 163                                         animatePlayer(pip, player, pn, 1);
 164                                         mapScrollUp(pip, player, 0, pn);
 165                                         mapScrollUp(pip, player, 1, pn);
 166                                         modexShowPage(pip[1].page);
 167                                         player[pn].q++;
 168                                 } else { player[pn].q = 1; player[pn].d = 2; player[pn].ty--; }
 169                         }
 170                         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))
 171                         {
 172                                 if(player[pn].q<=(TILEWH/(player[pn].speed)))
 173                                 {
 174                                         INC_PER_FRAME;
 175                                         player[pn].y-=(player[pn].speed);
 176                                         animatePlayer(pip, player, 0, pn);
 177                                         modexShowPage(pip[1].page);
 178                                         player[pn].q++;
 179                                 } else { player[pn].q = 1; player[pn].d = 2; player[pn].ty--; }
 180                         }
 181                         else
 182                         {
 183                                 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);
 184 #ifdef SPRITE
 185                                 modexDrawSpriteRegion(pip[1].page, player[pn].x-4, player[pn].y-TILEWH, 24, 0, 24, 32, &player[pn].data);
 186 #else
 187                                 modexClearRegion(pip[1].page, player[pn].x-4, player[pn].y-TILEWH, 24, 32, 12);
 188 #endif
 189                                 modexShowPage(pip[1].page);
 190                                 player[pn].d = 2;
 191                         }
 192                         player[pn].triggerx = player[pn].tx;
 193                         player[pn].triggery = player[pn].ty-1;
 194                 break;
 195         }
 196 }
 197
 198 /*map_t
 199 allocMap(int w, int h) {
 200         map_t result;
 201
 202         result.width =w;
 203         result.height=h;
 204         result.data = malloc(sizeof(byte) * w * h);
 205         //result.data = (byte *)alloc_emem(((int)sizeof(byte) * w * h)/1024);
 206         if(isEMS() || checkEMS())
 207         {
 208                 XMOVE mm;
 209                 //emmhandle = mallocEMS(coretotalEMS());//alloc_emem((int)sizeof(map))
 210                 mm.length=sizeof(result);
 211                 mm.sourceH=0;
 212                 mm.sourceOff=ptr2long(&result);
 213                 mm.destH=emmhandle;
 214                 mm.destOff=0;
 215                 ist = move_emem(&mm);
 216                 if(!ist){ dealloc_emem(emmhandle); exit(5); }
 217                 printf("%d\n", coretotalEMS());
 218         }
 219
 220         return result;
 221 }*/
 222
 223 /*void
 224 initMap(map_t *map) {
 225         // just a place holder to fill out an alternating pattern
 226         int x, y, xx, yy;
 227         int i, q;
 228 //      int tile = 1;
 229         //if(!isEMS() || !checkEMS())
 230 //              map->tiles = malloc(sizeof(tiles_t));
 231         //else
 232         //      map->tiles = (tiles_t *)alloc_emem(sizeof(tiles_t));
 233
 234          //create the tile set
 235         //if(!isEMS() || !checkEMS())
 236 //              map->tiles->data = malloc(sizeof(bitmap_t));
 237         //else
 238         //      map->tiles->data = (bitmap_t *)alloc_emem(sizeof(bitmap_t));
 239 //      map->tiles->data->width = (TILEWH);
 240 //      map->tiles->data->height= TILEWH;
 241         //if(!isEMS() || !checkEMS())
 242 //              map->tiles->data->data = malloc((TILEWH*2)*TILEWH);
 243         //else
 244         //      map->tiles->data->data = (byte *)alloc_emem((TILEWH*2)*TILEWH);
 245 //      map->tiles->tileHeight = TILEWH;
 246 //      map->tiles->tileWidth =TILEWH;
 247 //      map->tiles->rows = 1;
 248 //      map->tiles->cols = 1;//2;
 249
 250         q=0;
 251         //for(y=0; y<map->height; y++) {
 252         //for(x=0; x<map->width; x++) {
 253         i=0;
 254         for(yy=0; yy<TILEWH; yy++) {
 255         for(xx=0; xx<(TILEWH); xx++) {
 256                 //if(x<TILEWH){
 257                   map->tiles->data->data[i+1] = map->data[q];//28;//0x24;
 258 //                printf("[%d]", map->tiles->data->data[i]);
 259                 //}else{
 260                   //map->tiles->data->data[i] = map->data[q];//0;//0x34;
 261                   //printf("]%d[==[%d]", i, map->tiles->data->data[i]);
 262                 //}
 263                 i++;
 264         }
 265 //      printf("\n");
 266         }
 267 //      printf("[%d]", map->data[q]);
 268         q++;
 269 //      }
 270         //printf("\n\n");
 271 //      }
 272
 273         i=0;
 274         for(y=0; y<map->height; y++) {
 275                 for(x=0; x<map->width; x++) {
 276 //                      map->data[i]=255;
 277                         printf("[%d]", map->data[i]);
 278                         //tile = tile ? 0 : 1;
 279                         i++;
 280                 }
 281                 //tile = tile ? 0 : 1;
 282         }
 283 }*/
 284
 285 void mapScrollRight(map_view_t *mv, player_t *player, word id, word plid)
 286 {
 287         word x, y;  /* coordinate for drawing */
 288
 289         /* increment the pixel position and update the page */
 290         mv[id].page->dx += player[plid].speed;
 291
 292         /* check to see if this changes the tile */
 293         if(mv[id].page->dx >= mv[id].dxThresh )
 294         {
 295         /* go forward one tile */
 296         mv[id].tx++;
 297         /* Snap the origin forward */
 298         mv[id].page->data += 4;
 299         mv[id].page->dx = mv[id].map->tiles->tileWidth;
 300         }
 301
 302         /* draw the next column */
 303         x= SCREEN_WIDTH + mv[id].map->tiles->tileWidth;
 304         if(player[plid].q%4)
 305                 if(id==0)
 306                         mapDrawCol(&mv[0], mv[0].tx + 20 , mv[0].ty-1, x, player, mv->page->dx);
 307                 else
 308                         modexCopyPageRegion(mv[id].page, mv[0].page, x, 0, x, 0, mv[id].map->tiles->tileWidth, mv[id].map->tiles->tileHeight*17);
 309         //}
 310 }
 311
 312
 313 void mapScrollLeft(map_view_t *mv, player_t *player, word id, word plid)
 314 {
 315         word x, y;  /* coordinate for drawing */
 316
 317         /* increment the pixel position and update the page */
 318         mv[id].page->dx -= player[plid].speed;
 319
 320         /* check to see if this changes the tile */
 321         if(mv[id].page->dx == 0)
 322         {
 323         /* go backward one tile */
 324         mv[id].tx--;
 325
 326         /* Snap the origin backward */
 327         mv[id].page->data -= 4;
 328         mv[id].page->dx = mv[id].map->tiles->tileWidth;
 329         }
 330
 331         /* draw the next column */
 332         x= 0;
 333         if(player[plid].q%4)
 334                 if(id==0)
 335                         mapDrawCol(&mv[0], mv[0].tx - 1, mv[0].ty-1, x, player, mv->page->dx);
 336                 else
 337                         modexCopyPageRegion(mv[id].page, mv[0].page, x, 0, x, 0, mv[id].map->tiles->tileWidth, mv[id].map->tiles->tileHeight*17);
 338         //}
 339 }
 340
 341
 342 void mapScrollUp(map_view_t *mv, player_t *player, word id, word plid)
 343 {
 344         word x, y;  /* coordinate for drawing */
 345
 346         /* increment the pixel position and update the page */
 347         mv[id].page->dy -= player[plid].speed;
 348
 349         /* check to see if this changes the tile */
 350         if(mv[id].page->dy == 0 )
 351         {
 352         /* go down one tile */
 353         mv[id].ty--;
 354         /* Snap the origin downward */
 355         mv[id].page->data -= mv[id].page->width*4;
 356         mv[id].page->dy = mv[id].map->tiles->tileHeight;
 357         }
 358
 359         /* draw the next row */
 360         y= 0;
 361         if(player[plid].q%3)
 362                 if(id==0)
 363                         mapDrawRow(&mv[0], mv[0].tx - 1, mv[0].ty-1, y, player, mv->page->dy);
 364                 else
 365                         modexCopyPageRegion(mv[id].page, mv[0].page, 0, y, 0, y, mv[id].map->tiles->tileWidth*22, mv[id].map->tiles->tileHeight);
 366         //}
 367 }
 368
 369 void mapScrollDown(map_view_t *mv, player_t *player, word id, word plid)
 370 {
 371         word x, y;  /* coordinate for drawing */
 372
 373         /* increment the pixel position and update the page */
 374         mv[id].page->dy += player[plid].speed;
 375
 376         /* check to see if this changes the tile */
 377         if(mv[id].page->dy >= mv[id].dyThresh )
 378         {
 379         /* go down one tile */
 380         mv[id].ty++;
 381         /* Snap the origin downward */
 382         mv[id].page->data += mv[id].page->width*4;
 383         mv[id].page->dy = mv[id].map->tiles->tileHeight;
 384         }
 385
 386         /* draw the next row */
 387         y= SCREEN_HEIGHT + mv[id].map->tiles->tileHeight;
 388         if(player[plid].q%3)
 389                 if(id==0)
 390                         mapDrawRow(&mv[0], mv[0].tx - 1, mv[0].ty+15, y, player, mv->page->dy);
 391                 else
 392                         modexCopyPageRegion(mv[id].page, mv[0].page, 0, y, 0, y, mv[id].map->tiles->tileWidth*22, mv[id].map->tiles->tileHeight);
 393         //}
 394 }
 395
 396 sword chkmap(map_t *map, word q)
 397 {
 398 //      bitmap_t bp;
 399         static byte x[(MAPW*MAPH)+1] = /*{
 400 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20,
 401 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40,
 402 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60,
 403 61, 62, 63, 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80,
 404 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20,
 405 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40,
 406 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60,
 407 61, 62, 63, 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80,
 408 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20,
 409 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40,
 410 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60,
 411 61, 62, 63, 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80,
 412 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20,
 413 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40,
 414 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60
 415 };*/
 416 /*{
 417 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 1, 2, 3, 4,
 418 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 5, 6, 7, 8,
 419 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 1, 2, 3, 4,
 420 61, 62, 63, 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 5, 6, 7, 8,
 421 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 1, 2, 3, 4,
 422 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 5, 6, 7, 8,
 423 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 1, 2, 3, 4,
 424 61, 62, 63, 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 5, 6, 7, 8,
 425 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 1, 2, 3, 4,
 426 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 5, 6, 7, 8,
 427 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 1, 2, 3, 4,
 428 61, 62, 63, 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 5, 6, 7, 8,
 429 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 1, 2, 3, 4,
 430 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 5, 6, 7, 8,
 431 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 1, 2, 3, 4,
 432 61, 62, 63, 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 5, 6, 7, 8,
 433 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 1, 2, 3, 4,
 434 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 5, 6, 7, 8,
 435 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 1, 2, 3, 4
 436         };*/
 437 { 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 };
 438 /*1,    2,      3,      4,      0,      3,      3,      3,      3,      3,      3,      3,      3,      4,      1,      1,      1,      1,      1,      1,      \
 439 5,      6,      7,      8,      0,      1,      0,      1,      0,      0,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      \
 440 9,      10,     11,     12,     4,      1,      0,      1,      0,      0,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      \
 441 13,     14,     15,     16,     0,      1,      1,      1,      5,      8,      1,      11,     11,     1,      1,      1,      1,      1,      1,      1,      \
 442 0,      0,      4,      0,      0,      0,      0,      0,      8,      8,      1,      11,     11,     3,      1,      1,      1,      1,      1,      1,      \
 443 1,      1,      1,      1,      0,      0,      0,      0,      8,      8,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      \
 444 1,      1,      1,      1,      0,      0,      0,      0,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      \
 445 1,      1,      1,      1,      0,      0,      0,      0,      1,      1,      1,      1,      1,      1,      1,      1,      3,      1,      1,      1,      \
 446 1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      \
 447 1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      \
 448 1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      3,      1,      1,      1,      \
 449 1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      \
 450 1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      3,      1,      1,      1,      \
 451 1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      \
 452 1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      3,      3,      3,      3,      1,      2,      3,      4 };*/
 453         //check for failed to load map
 454         if((map->width == map->height == 0) || (q>0))
 455         {
 456                 //initiate a null map!
 457                 map->width=MAPW;///2;
 458                 map->height=MAPH;///2;
 459 //              map->data = malloc(((map->width*map->height)+1)*sizeof(byte));
 460                 map->data = &x;
 461                 map->tiles = malloc(sizeof(tiles_t));
 462                 //fix this to be far~
 463 //              bp = bitmapLoadPcx("data/ed.pcx");
 464 //              map->tiles->data = &bp;
 465                 map->tiles->debug_data = map->data;
 466                 map->tiles->tileHeight = 16;
 467                 map->tiles->tileWidth = 16;
 468                 map->tiles->rows = 1;
 469                 map->tiles->cols = 1;
 470 #ifndef TILESPRITE
 471                 map->tiles->debug_text = true;
 472 #else
 473                 map->tiles->debug_text = false;
 474 #endif
 475         }
 476         return 0;
 477 }
 478
 479 void mapGoTo(map_view_t *mv, int tx, int ty)
 480 {
 481         int px, py;
 482         unsigned int i;
 483
 484         /* set up the coordinates */
 485         mv->tx = tx;
 486         mv->ty = ty;
 487         mv->page->dx = mv->map->tiles->tileWidth;
 488         mv->page->dy = mv->map->tiles->tileHeight;
 489
 490         /* set up the thresholds */
 491         mv->dxThresh = mv->map->tiles->tileWidth * 2;
 492         mv->dyThresh = mv->map->tiles->tileHeight * 2;
 493
 494         /* draw the tiles */
 495         modexClearRegion(mv->page, 0, 0, mv->page->width, mv->page->height, 0);
 496         py=0;
 497         i=mv->ty * mv->map->width + mv->tx;
 498         for(ty=mv->ty-1; py < SCREEN_HEIGHT+mv->dyThresh && ty < mv->map->height; ty++, py+=mv->map->tiles->tileHeight) {
 499                 mapDrawWRow(mv, tx-1, ty, py);
 500         i+=mv->map->width - tx;
 501         }
 502 }
 503
 504
 505 void
 506 mapDrawTile(tiles_t *t, word i, page_t *page, word x, word y)
 507 {
 508         word rx;
 509         word ry;
 510         word textx=0;
 511         word texty=0;
 512         //if(i==0) i=2;
 513         if(i==0)
 514         {
 515                 //wwww
 516                 modexClearRegion(page, x, y, t->tileWidth, t->tileHeight, 0); //currently the over scan color!
 517         }
 518         else
 519         {
 520                 rx = (((i-1) % ((t->data->width)/t->tileWidth)) * t->tileWidth);
 521                 ry = (((i-1) / ((t->data->height)/t->tileHeight)) * t->tileHeight);
 522 ////0000printf("i=%d\n", i);
 523                 switch(t->debug_text)
 524                 {
 525                         case 0:
 526                                 modexDrawBmpRegion(page, x, y, rx, ry, t->tileWidth, t->tileHeight, (t->data));
 527                         break;
 528                         case 1:
 529                                 modexClearRegion(page, x, y, t->tileWidth, t->tileHeight, (t->debug_data[i])+1);
 530                                 //modexprintbig(page, x, y, 1, 15, 0, (t->debug_data));
 531                                 /*for(texty=0; texty<2; texty++)
 532                                 {
 533                                         for(textx=0; textx<2; textx++)
 534                                         {*/
 535 //                                              modexprint(page, x+(textx*8), y+(texty*8), 1, (word)(t->debug_data), 0, (t->debug_data));
 536 /*                                      }
 537                                 }*/
 538                         break;
 539                 }
 540         }
 541 }
 542
 543 void mapDrawRow(map_view_t *mv, int tx, int ty, word y, player_t *p, word poopoffset)
 544 {
 545         word x;
 546         int i;
 547         poopoffset%=p[0].speed;
 548 //printf("y: %d\n", poopoffset);
 549         /* the position within the map array */
 550         i=ty * mv->map->width + tx;
 551         for(x=poopoffset; x<(SCREEN_WIDTH+mv->dxThresh)/(poopoffset+1) && tx < mv->map->width; x+=mv->map->tiles->tileWidth, tx++) {
 552         if(i>=0) {
 553                 /* we are in the map, so copy! */
 554                 mapDrawTile(mv->map->tiles, mv->map->data[i], mv->page, x, y);
 555         }
 556         i++; /* next! */
 557         }
 558 }
 559
 560 void mapDrawCol(map_view_t *mv, int tx, int ty, word x, player_t *p, word poopoffset)
 561 {
 562         int y;
 563         int i;
 564         poopoffset%=p[0].speed;
 565 //printf("x: %d\n", poopoffset);
 566         /* location in the map array */
 567         i=ty * mv->map->width + tx;
 568
 569         /* We'll copy all of the columns in the screen,
 570            i + 1 row above and one below */
 571         for(y=poopoffset; y<(SCREEN_HEIGHT+mv->dyThresh)/(poopoffset+1) && ty < mv->map->height; y+=mv->map->tiles->tileHeight, ty++) {
 572         if(i>=0) {
 573                 /* we are in the map, so copy away! */
 574                 mapDrawTile(mv->map->tiles, mv->map->data[i], mv->page, x, y);
 575         }
 576         i += mv->map->width;
 577         }
 578 }
 579
 580 void mapDrawWRow(map_view_t *mv, int tx, int ty, word y)
 581 {
 582         word x;
 583         int i;
 584
 585         /* the position within the map array */
 586         i=ty * mv->map->width + tx;
 587         for(x=0; x<SCREEN_WIDTH+mv->dxThresh && tx < mv->map->width; x+=mv->map->tiles->tileWidth, tx++) {
 588         if(i>=0) {
 589                 /* we are in the map, so copy! */
 590                 mapDrawTile(mv->map->tiles, mv->map->data[i], mv->page, x, y);
 591         }
 592         i++; /* next! */
 593         }
 594 }
 595
 596 void mapDrawWCol(map_view_t *mv, int tx, int ty, word x)
 597 {
 598         int y;
 599         int i;
 600
 601         /* location in the map array */
 602         i=ty * mv->map->width + tx;
 603
 604         /* We'll copy all of the columns in the screen,
 605            i + 1 row above and one below */
 606         for(y=0; y<SCREEN_HEIGHT+mv->dyThresh && ty < mv->map->height; y+=mv->map->tiles->tileHeight, ty++) {
 607         if(i>=0) {
 608                 /* we are in the map, so copy away! */
 609                 mapDrawTile(mv->map->tiles, mv->map->data[i], mv->page, x, y);
 610         }
 611         i += mv->map->width;
 612         }
 613 }
 614
 615 /*void qclean()
 616 {
 617         modexLeave();
 618         //setkb(0);
 619 }*/
 620
 621 //sync!
 622 /*void shinku(page_t *page, global_game_variables_t *gv)
 623 {
 624         byte *pee;
 625         word x = (16);
 626         word y = (8+16);
 627         word col = 15;
 628         word bgcol = 0;
 629         word type = 1;
 630         //if(elapsed_timer(gv) >= (1.0 / gv->frames_per_second))
 631         //{
 632         //      pee = malloc(sizeof(double));
 633         //      sprintf(pee, "%f", ((*gv->clock) /18.2));
 634 //++++          modexprint(page, x, y, type, col, bgcol, pee);
 635                 //sprintf(pee, "%f", *gv->tiku/\*time_in_seconds(gv));
 636                 //modexprint(page, x, y+8, type, col, bgcol, pee);
 637         //}
 638 }*/
 639
 640 void animatePlayer(map_view_t *pip, player_t *player, word playnum, sword scrollswitch)
 641 {
 642         sword x = player[playnum].x;
 643         sword y = player[playnum].y;
 644 #ifdef SPRITE
 645         word dire=32; //direction
 646 #else
 647         word dire=8; //direction
 648 #endif
 649         sword qq; //scroll offset
 650         word ls = player[playnum].persist_aniframe;
 651
 652         if(scrollswitch==0) qq = 0;
 653         else qq = ((player[playnum].q)*(player[playnum].speed));
 654         x-=4;
 655         y-=TILEWH;
 656         switch (player[playnum].d)
 657         {
 658                 case 0:
 659                         //up
 660                         dire*=player[playnum].d;
 661                         y-=qq;
 662                 break;
 663                 case 3:
 664                         // right
 665                         dire*=(player[playnum].d-2);
 666                         x+=qq;
 667                 break;
 668                 case 2:
 669                 break;
 670                 case 4:
 671                         //down
 672                         dire*=(player[playnum].d-2);
 673                         y+=qq;
 674                 break;
 675                 case 1:
 676                         //left
 677                         dire*=(player[playnum].d+2);
 678                         x-=qq;
 679                 break;
 680         }
 681
 682 #ifdef SPRITE
 683 #ifdef BMPTYPE
 684 #define FRAME1 oldDrawBmp(VGA, x, y, &player[playnum].data, 1);
 685 #define FRAME2 oldDrawBmp(VGA, x, y, &player[playnum].data, 1);
 686 #define FRAME3 oldDrawBmp(VGA, x, y, &player[playnum].data, 1);
 687 #define FRAME4 oldDrawBmp(VGA, x, y, &player[playnum].data, 1);
 688 #else
 689 #define FRAME1 modexDrawSpriteRegion(pip[1].page, x, y, 48, dire, 24, 32, &player[playnum].data);
 690 #define FRAME2 modexDrawSpriteRegion(pip[1].page, x, y, 24, dire, 24, 32, &player[playnum].data);
 691 #define FRAME3 modexDrawSpriteRegion(pip[1].page, x, y, 0, dire, 24, 32, &player[playnum].data);
 692 #define FRAME4 modexDrawSpriteRegion(pip[1].page, x, y, 24, dire, 24, 32, &player[playnum].data);
 693 #endif
 694 #else
 695 #define FRAME1 modexClearRegion(pip[1].page, x, y, 24, 32, 2+dire);
 696 #define FRAME2 modexClearRegion(pip[1].page, x, y, 24, 32, 1+dire);
 697 #define FRAME3 modexClearRegion(pip[1].page, x, y, 24, 32, dire);
 698 #define FRAME4 modexClearRegion(pip[1].page, x, y, 24, 32, 1+dire);
 699 #endif
 700         modexCopyPageRegion(pip[1].page, pip[0].page, x-4, y-4, x-4, y-4, 28, 40);
 701         if(2>ls && ls>=1) { FRAME1 }else
 702         if(3>ls && ls>=2) { FRAME2 }else
 703         if(4>ls && ls>=3) { FRAME3 }else
 704         if(5>ls && ls>=4) { FRAME4 }
 705         //TODO: mask copy //modexCopyPageRegion(dest->page, src->page, x-4, y-4, x-4, y-4, 28, 40);
 706         //modexClearRegion(top->page, 66, 66, 2, 40, 0);
 707         //modexCopyPageRegion(dest->page, top->page, 66, 66, 66, 66, 2, 40);
 708         //turn this off if XT
 709         //XTif(detectcpu() > 0)
 710         modexWaitBorder();
 711 }