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+pip[0].page->tilesw < pip[0].map->width && player[pn].tx == pip[0].tx+pip[0].page->tilemidposscreenx &&
  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+pip[0].page->tilesw <= pip[0].map->width && player[pn].tx == pip[0].tx+pip[0].page->tilemidposscreenx &&
  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+pip[0].page->tilesh < pip[0].map->height && player[pn].ty == pip[0].ty+pip[0].page->tilemidposscreeny &&
 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+pip[0].page->tilesh <= pip[0].map->height && player[pn].ty == pip[0].ty+pip[0].page->tilemidposscreeny &&
 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 near 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= mv[id].page->sw + 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 near 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 near 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 near 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= mv[id].page->sh + 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, 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 };
 401 /*1,    2,      3,      4,      0,      3,      3,      3,      3,      3,      3,      3,      3,      4,      1,      1,      1,      1,      1,      1,      \
 402 5,      6,      7,      8,      0,      1,      0,      1,      0,      0,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      \
 403 9,      10,     11,     12,     4,      1,      0,      1,      0,      0,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      \
 404 13,     14,     15,     16,     0,      1,      1,      1,      5,      8,      1,      11,     11,     1,      1,      1,      1,      1,      1,      1,      \
 405 0,      0,      4,      0,      0,      0,      0,      0,      8,      8,      1,      11,     11,     3,      1,      1,      1,      1,      1,      1,      \
 406 1,      1,      1,      1,      0,      0,      0,      0,      8,      8,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      \
 407 1,      1,      1,      1,      0,      0,      0,      0,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      \
 408 1,      1,      1,      1,      0,      0,      0,      0,      1,      1,      1,      1,      1,      1,      1,      1,      3,      1,      1,      1,      \
 409 1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      \
 410 1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      \
 411 1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      3,      1,      1,      1,      \
 412 1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      \
 413 1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      3,      1,      1,      1,      \
 414 1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      \
 415 1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      3,      3,      3,      3,      1,      2,      3,      4 };*/
 416         //check for failed to load map
 417         if((map->width == map->height == 0) && (q>0))
 418         {
 419                 //initiate a null map!
 420                 map->width=MAPW;///2;
 421                 map->height=MAPH;///2;
 422 //              map->data = malloc(((map->width*map->height)+1)*sizeof(byte));
 423                 map->data = &x;
 424                 map->tiles = malloc(sizeof(tiles_t));
 425                 //fix this to be far~
 426 //              bp = bitmapLoadPcx("data/ed.pcx");
 427 //              map->tiles->data = &bp;
 428                 map->tiles->debug_data = map->data;
 429                 map->tiles->tileHeight = 16;
 430                 map->tiles->tileWidth = 16;
 431                 map->tiles->rows = 1;
 432                 map->tiles->cols = 1;
 433                 map->tiles->debug_text = true;
 434         }
 435         else map->tiles->debug_text = false;
 436         return 0;
 437 }
 438
 439 void mapGoTo(map_view_t *mv, int tx, int ty)
 440 {
 441         int px, py;
 442         unsigned int i;
 443
 444         /* set up the coordinates */
 445         mv->tx = tx;
 446         mv->ty = ty;
 447         mv->page->dx = mv->map->tiles->tileWidth;
 448         mv->page->dy = mv->map->tiles->tileHeight;
 449
 450         /* set up the thresholds */
 451         mv->dxThresh = mv->map->tiles->tileWidth * 2;
 452         mv->dyThresh = mv->map->tiles->tileHeight * 2;
 453
 454         /* draw the tiles */
 455         modexClearRegion(mv->page, 0, 0, mv->page->width, mv->page->height, 0);
 456         py=0;
 457         i=mv->ty * mv->map->width + mv->tx;
 458         for(ty=mv->ty-1; py < mv->page->sh+mv->dyThresh && ty < mv->map->height; ty++, py+=mv->map->tiles->tileHeight) {
 459                 mapDrawWRow(mv, tx-1, ty, py);
 460         i+=mv->map->width - tx;
 461         }
 462 }
 463
 464
 465 void near
 466 mapDrawTile(tiles_t *t, word i, page_t *page, word x, word y)
 467 {
 468         word rx;
 469         word ry;
 470         word textx=0;
 471         word texty=0;
 472         //if(i==0) i=2;
 473         if(i==0)
 474         {
 475                 //wwww
 476                 modexClearRegion(page, x, y, t->tileWidth, t->tileHeight, 0); //currently the over scan color!
 477         }
 478         else
 479         {
 480                 rx = (((i-1) % ((t->data->width)/t->tileWidth)) * t->tileWidth);
 481                 ry = (((i-1) / ((t->data->height)/t->tileHeight)) * t->tileHeight);
 482 ////0000printf("i=%d\n", i);
 483                 switch(t->debug_text)
 484                 {
 485                         case 0:
 486 #ifndef SPRITE
 487                                 modexClearRegion(page, x, y, t->tileWidth, t->tileHeight, ((t->debug_data[i])+1)*2);
 488                                 //cannot print number value du to it being slow as bakapee
 489 #else
 490                                 modexDrawBmpRegion(page, x, y, rx, ry, t->tileWidth, t->tileHeight, (t->data));
 491 #endif
 492                         break;
 493                         case 1:
 494                                 modexClearRegion(page, x, y, t->tileWidth, t->tileHeight, (t->debug_data[i])+1);
 495                                 //modexprintbig(page, x, y, 1, 15, 0, (t->debug_data));
 496                                 /*for(texty=0; texty<2; texty++)
 497                                 {
 498                                         for(textx=0; textx<2; textx++)
 499                                         {*/
 500 //                                              modexprint(page, x+(textx*8), y+(texty*8), 1, (word)(t->debug_data), 0, (t->debug_data));
 501 /*                                      }
 502                                 }*/
 503                         break;
 504                 }
 505         }
 506 }
 507
 508 void near mapDrawRow(map_view_t *mv, int tx, int ty, word y, player_t *p, word poopoffset)
 509 {
 510         word x;
 511         int i;
 512         poopoffset%=p[0].speed;
 513 //printf("y: %d\n", poopoffset);
 514         /* the position within the map array */
 515         i=ty * mv->map->width + tx;
 516         for(x=poopoffset; x<(mv->page->sw+mv->dxThresh)/(poopoffset+1) && tx < mv->map->width; x+=mv->map->tiles->tileWidth, tx++) {
 517         if(i>=0) {
 518                 /* we are in the map, so copy! */
 519                 mapDrawTile(mv->map->tiles, mv->map->data[i], mv->page, x, y);
 520         }
 521         i++; /* next! */
 522         }
 523 }
 524
 525 void near mapDrawCol(map_view_t *mv, int tx, int ty, word x, player_t *p, word poopoffset)
 526 {
 527         int y;
 528         int i;
 529         poopoffset%=p[0].speed;
 530 //printf("x: %d\n", poopoffset);
 531         /* location in the map array */
 532         i=ty * mv->map->width + tx;
 533
 534         /* We'll copy all of the columns in the screen,
 535            i + 1 row above and one below */
 536         for(y=poopoffset; y<(mv->page->sh+mv->dyThresh)/(poopoffset+1) && ty < mv->map->height; y+=mv->map->tiles->tileHeight, ty++) {
 537         if(i>=0) {
 538                 /* we are in the map, so copy away! */
 539                 mapDrawTile(mv->map->tiles, mv->map->data[i], mv->page, x, y);
 540         }
 541         i += mv->map->width;
 542         }
 543 }
 544
 545 void mapDrawWRow(map_view_t *mv, int tx, int ty, word y)
 546 {
 547         word x;
 548         int i;
 549
 550         /* the position within the map array */
 551         i=ty * mv->map->width + tx;
 552         for(x=0; x<mv->page->sw+mv->dxThresh && tx < mv->map->width; x+=mv->map->tiles->tileWidth, tx++) {
 553         if(i>=0) {
 554                 /* we are in the map, so copy! */
 555                 mapDrawTile(mv->map->tiles, mv->map->data[i], mv->page, x, y);
 556         }
 557         i++; /* next! */
 558         }
 559 }
 560
 561 void mapDrawWCol(map_view_t *mv, int tx, int ty, word x)
 562 {
 563         int y;
 564         int i;
 565
 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=0; y<mv->page->sh+mv->dyThresh && 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 qclean()
 581 {
 582         //setkb(0);
 583 }*/
 584
 585 /*      sync    */
 586 void shinku(map_view_t *pip, global_game_variables_t *gv)
 587 {
 588         //float t;
 589         //modexCopyPageRegion(pip[1].page, pip[2].page, 16, 16, 16, 16, (14*8)+4, 8+4);
 590         if(elapsed_timer(gv) >= (1.0 / gv->kurokku.frames_per_second))
 591         {
 592                 word x = (16);
 593                 word y = (8+16);
 594                 word col = 15;
 595                 word bgcol = 0;
 596                 word type = 1;
 597                 //t=(((*(gv->clock))-gv->clock_start) /18.2);
 598                 sprintf(gv->pee, "%f fps", (double)gv->kurokku.tiku/ticktock(gv));
 599                 modexprint(pip[1].page, 16, 16, 1, 15, 0, gv->pee);
 600                 //(gv->clock_start)=*(gv->clock);
 601                 gv->kurokku.tiku=0;
 602         }
 603         //modexprint(page, 16, 16, 1, 15, 0, pee);
 604         gv->kurokku.tiku++;
 605         switch(gv->kurokku.fpscap)
 606         {
 607                 case 0:
 608                         //modexprint(page, 16, 32, 1, 15, 0, "sanic!");
 609                         gv->kurokku.frames_per_second=1;
 610                 break;
 611                 case 1:
 612                         //turn this off if XT
 613                         modexWaitBorder();
 614                         gv->kurokku.frames_per_second=60;
 615                 break;
 616         }
 617 }
 618
 619 void near animatePlayer(map_view_t *pip, player_t *player, word playnum, sword scrollswitch)
 620 {
 621         sword x = player[playnum].x;
 622         sword y = player[playnum].y;
 623 #ifdef SPRITE
 624         word dire=32; //direction
 625 #else
 626         word dire=8; //direction
 627 #endif
 628         sword qq; //scroll offset
 629         word ls = player[playnum].persist_aniframe;
 630
 631         if(scrollswitch==0) qq = 0;
 632         else qq = ((player[playnum].q)*(player[playnum].speed));
 633         x-=4;
 634         y-=TILEWH;
 635         switch (player[playnum].d)
 636         {
 637                 case 0:
 638                         //up
 639                         dire*=player[playnum].d;
 640                         y-=qq;
 641                 break;
 642                 case 3:
 643                         // right
 644                         dire*=(player[playnum].d-2);
 645                         x+=qq;
 646                 break;
 647                 case 2:
 648                 break;
 649                 case 4:
 650                         //down
 651                         dire*=(player[playnum].d-2);
 652                         y+=qq;
 653                 break;
 654                 case 1:
 655                         //left
 656                         dire*=(player[playnum].d+2);
 657                         x-=qq;
 658                 break;
 659         }
 660
 661 #ifdef SPRITE
 662 #ifdef BMPTYPE
 663 #define FRAME1 oldDrawBmp(VGA, x, y, &player[playnum].data, 1);
 664 #define FRAME2 oldDrawBmp(VGA, x, y, &player[playnum].data, 1);
 665 #define FRAME3 oldDrawBmp(VGA, x, y, &player[playnum].data, 1);
 666 #define FRAME4 oldDrawBmp(VGA, x, y, &player[playnum].data, 1);
 667 #else
 668 #define FRAME1 modexDrawSpriteRegion(pip[1].page, x, y, 48, dire, 24, 32, &player[playnum].data);
 669 #define FRAME2 modexDrawSpriteRegion(pip[1].page, x, y, 24, dire, 24, 32, &player[playnum].data);
 670 #define FRAME3 modexDrawSpriteRegion(pip[1].page, x, y, 0, dire, 24, 32, &player[playnum].data);
 671 #define FRAME4 modexDrawSpriteRegion(pip[1].page, x, y, 24, dire, 24, 32, &player[playnum].data);
 672 #endif
 673 #else
 674 #define FRAME1 modexClearRegion(pip[1].page, x, y, 24, 32, 2+dire);
 675 #define FRAME2 modexClearRegion(pip[1].page, x, y, 24, 32, 1+dire);
 676 #define FRAME3 modexClearRegion(pip[1].page, x, y, 24, 32, dire);
 677 #define FRAME4 modexClearRegion(pip[1].page, x, y, 24, 32, 1+dire);
 678 #endif
 679         modexCopyPageRegion(pip[1].page, pip[0].page, x-4, y-4, x-4, y-4, 28, 40);
 680         //modexCopyPageRegion(pip[2].page, pip[1].page, 16, 16, 16, 16, (14*8)+4, 8+4);
 681         if(2>ls && ls>=1) { FRAME1 }else
 682         if(3>ls && ls>=2) { FRAME2 }else
 683         if(4>ls && ls>=3) { FRAME3 }else
 684         if(5>ls && ls>=4) { FRAME4 }
 685         //TODO: mask copy //modexCopyPageRegion(dest->page, src->page, x-4, y-4, x-4, y-4, 28, 40);
 686         //modexClearRegion(top->page, 66, 66, 2, 40, 0);
 687         //modexCopyPageRegion(dest->page, top->page, 66, 66, 66, 66, 2, 40);
 688 }