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