]> 4ch.mooo.com Git - 16.git/blobdiff - src/lib/scroll16.c
textInit() for font. add variable so shinku() knows what page we're on.
[16.git] / src / lib / scroll16.c
old mode 100644 (file)
new mode 100755 (executable)
index f02a5be..1780d96
@@ -1,5 +1,5 @@
 /* Project 16 Source Code~
- * Copyright (C) 2012-2015 sparky4 & pngwen & andrius4669
+ * Copyright (C) 2012-2016 sparky4 & pngwen & andrius4669 & joncampbell123
  *
  * This file is part of Project 16.
  *
        scroll16 library~
 */
 #include "src/lib/scroll16.h"
+
+void walk(map_view_t *pip, player_t *player, word pn)
+{
+       #define INC_PER_FRAME if(player[pn].q&1) player[pn].persist_aniframe++; if(player[pn].persist_aniframe>4) player[pn].persist_aniframe = 1;
+       switch(player[pn].d)
+       {
+               //right movement
+               case 3:
+                       //printf("pip[0].page->tilesw=%d\n", pip[0].page->tilesw);
+                       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 &&
+                       !(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!
+                       {
+                               if(player[pn].q<=(TILEWH/(player[pn].speed)))
+                               {
+                                       INC_PER_FRAME;
+                                       animatePlayer(pip, player, pn, 1);
+                                       mapScrollRight(pip, player, 0, pn);
+                                       mapScrollRight(pip, player, 1, pn);
+                                       modexShowPage(pip[1].page);
+                                       player[pn].q++;
+                               } else { player[pn].q = 1; player[pn].d = 2; player[pn].tx++; }
+                       }
+                       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))
+                       {
+                               if(player[pn].q<=(TILEWH/(player[pn].speed)))
+                               {
+                                       INC_PER_FRAME;
+                                       player[pn].x+=(player[pn].speed);
+                                       animatePlayer(pip, player, pn, 0);
+                                       modexShowPage(pip[1].page);
+                                       player[pn].q++;
+                               } else { player[pn].q = 1; player[pn].d = 2; player[pn].tx++; }
+                       }
+                       else
+                       {
+                               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);
+#ifdef SPRITE
+                               PBUFSFUN(pip[1].page, player[pn].x-4, player[pn].y-TILEWH, 24, 32, 24, 32, PLAYERBMPDATA);
+#else
+                               modexClearRegion(pip[1].page, player[pn].x-4, player[pn].y-TILEWH, 24, 32, 14);
+#endif
+                               modexShowPage(pip[1].page);
+                               player[pn].d = 2;
+                       }
+                       player[pn].triggerx = player[pn].tx+1;
+                       player[pn].triggery = player[pn].ty;
+               break;
+
+               //left movement
+               case 1:
+                       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 &&
+                       !(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!
+                       {
+                               if(player[pn].q<=(TILEWH/(player[pn].speed)))
+                               {
+                                       INC_PER_FRAME;
+                                       animatePlayer(pip, player, pn, 1);
+                                       mapScrollLeft(pip, player, 0, pn);
+                                       mapScrollLeft(pip, player, 1, pn);
+                                       modexShowPage(pip[1].page);
+                                       player[pn].q++;
+                               } else { player[pn].q = 1; player[pn].d = 2; player[pn].tx--; }
+                       }
+                       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))
+                       {
+                               if(player[pn].q<=(TILEWH/(player[pn].speed)))
+                               {
+                                       INC_PER_FRAME;
+                                       player[pn].x-=(player[pn].speed);
+                                       animatePlayer(pip, player, pn, 0);
+                                       modexShowPage(pip[1].page);
+                                       player[pn].q++;
+                               } else { player[pn].q = 1; player[pn].d = 2; player[pn].tx--; }
+                       }
+                       else
+                       {
+                               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);
+#ifdef SPRITE
+                               PBUFSFUN(pip[1].page, player[pn].x-4, player[pn].y-TILEWH, 24, 96, 24, 32, PLAYERBMPDATA);
+#else
+                               modexClearRegion(pip[1].page, player[pn].x-4, player[pn].y-TILEWH, 24, 32, 10);
+#endif
+                               modexShowPage(pip[1].page);
+                               player[pn].d = 2;
+                       }
+                       player[pn].triggerx = player[pn].tx-1;
+                       player[pn].triggery = player[pn].ty;
+               break;
+
+               //down movement
+               case 4:
+                       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 &&
+                       !(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!
+                       {
+                               if(player[pn].q<=(TILEWH/(player[pn].speed)))
+                               {
+                                       INC_PER_FRAME;
+                                       animatePlayer(pip, player, pn, 1);
+                                       mapScrollDown(pip, player, 0, pn);
+                                       mapScrollDown(pip, player, 1, pn);
+                                       modexShowPage(pip[1].page);
+                                       player[pn].q++;
+                               } else { player[pn].q = 1; player[pn].d = 2; player[pn].ty++; }
+                       }
+                       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))
+                       {
+                               if(player[pn].q<=(TILEWH/(player[pn].speed)))
+                               {
+                                       INC_PER_FRAME;
+                                       player[pn].y+=(player[pn].speed);
+                                       animatePlayer(pip, player, pn, 0);
+                                       modexShowPage(pip[1].page);
+                                       player[pn].q++;
+                               } else { player[pn].q = 1; player[pn].d = 2; player[pn].ty++; }
+                       }
+                       else
+                       {
+                               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);
+#ifdef SPRITE
+                               PBUFSFUN(pip[1].page, player[pn].x-4, player[pn].y-TILEWH, 24, 64, 24, 32, PLAYERBMPDATA);
+#else
+                               modexClearRegion(pip[1].page, player[pn].x-4, player[pn].y-TILEWH, 24, 32, 9);
+#endif
+                               modexShowPage(pip[1].page);
+                               player[pn].d = 2;
+                       }
+                       player[pn].triggerx = player[pn].tx;
+                       player[pn].triggery = player[pn].ty+1;
+               break;
+
+               //up movement
+               case 0:
+                       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 &&
+                       !(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!
+                       {
+                               if(player[pn].q<=(TILEWH/(player[pn].speed)))
+                               {
+                                       INC_PER_FRAME;
+                                       animatePlayer(pip, player, pn, 1);
+                                       mapScrollUp(pip, player, 0, pn);
+                                       mapScrollUp(pip, player, 1, pn);
+                                       modexShowPage(pip[1].page);
+                                       player[pn].q++;
+                               } else { player[pn].q = 1; player[pn].d = 2; player[pn].ty--; }
+                       }
+                       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))
+                       {
+                               if(player[pn].q<=(TILEWH/(player[pn].speed)))
+                               {
+                                       INC_PER_FRAME;
+                                       player[pn].y-=(player[pn].speed);
+                                       animatePlayer(pip, player, 0, pn);
+                                       modexShowPage(pip[1].page);
+                                       player[pn].q++;
+                               } else { player[pn].q = 1; player[pn].d = 2; player[pn].ty--; }
+                       }
+                       else
+                       {
+                               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);
+#ifdef SPRITE
+                               PBUFSFUN(pip[1].page, player[pn].x-4, player[pn].y-TILEWH, 24, 0, 24, 32, PLAYERBMPDATA);
+#else
+                               modexClearRegion(pip[1].page, player[pn].x-4, player[pn].y-TILEWH, 24, 32, 12);
+#endif
+                               modexShowPage(pip[1].page);
+                               player[pn].d = 2;
+                       }
+                       player[pn].triggerx = player[pn].tx;
+                       player[pn].triggery = player[pn].ty-1;
+               break;
+       }
+}
+
+/*map_t
+allocMap(int w, int h) {
+       map_t result;
+
+       result.width =w;
+       result.height=h;
+       result.data = malloc(sizeof(byte) * w * h);
+       //result.data = (byte *)alloc_emem(((int)sizeof(byte) * w * h)/1024);
+       if(isEMS() || checkEMS())
+       {
+               XMOVE mm;
+               //emmhandle = mallocEMS(coretotalEMS());//alloc_emem((int)sizeof(map))
+               mm.length=sizeof(result);
+               mm.sourceH=0;
+               mm.sourceOff=ptr2long(&result);
+               mm.destH=emmhandle;
+               mm.destOff=0;
+               ist = move_emem(&mm);
+               if(!ist){ dealloc_emem(emmhandle); exit(5); }
+               printf("%d\n", coretotalEMS());
+       }
+
+       return result;
+}*/
+
+/*void
+initMap(map_t *map) {
+       // just a place holder to fill out an alternating pattern
+       int x, y, xx, yy;
+       int i, q;
+//     int tile = 1;
+       //if(!isEMS() || !checkEMS())
+//             map->tiles = malloc(sizeof(tiles_t));
+       //else
+       //      map->tiles = (tiles_t *)alloc_emem(sizeof(tiles_t));
+
+        //create the tile set
+       //if(!isEMS() || !checkEMS())
+//             map->tiles->data = malloc(sizeof(bitmap_t));
+       //else
+       //      map->tiles->data = (bitmap_t *)alloc_emem(sizeof(bitmap_t));
+//     map->tiles->data->width = (TILEWH);
+//     map->tiles->data->height= TILEWH;
+       //if(!isEMS() || !checkEMS())
+//             map->tiles->data->data = malloc((TILEWH*2)*TILEWH);
+       //else
+       //      map->tiles->data->data = (byte *)alloc_emem((TILEWH*2)*TILEWH);
+//     map->tiles->tileHeight = TILEWH;
+//     map->tiles->tileWidth =TILEWH;
+//     map->tiles->rows = 1;
+//     map->tiles->cols = 1;//2;
+
+       q=0;
+       //for(y=0; y<map->height; y++) {
+       //for(x=0; x<map->width; x++) {
+       i=0;
+       for(yy=0; yy<TILEWH; yy++) {
+       for(xx=0; xx<(TILEWH); xx++) {
+               //if(x<TILEWH){
+                 map->tiles->data->data[i+1] = map->data[q];//28;//0x24;
+//               printf("[%d]", map->tiles->data->data[i]);
+               //}else{
+                 //map->tiles->data->data[i] = map->data[q];//0;//0x34;
+                 //printf("]%d[==[%d]", i, map->tiles->data->data[i]);
+               //}
+               i++;
+       }
+//     printf("\n");
+       }
+//     printf("[%d]", map->data[q]);
+       q++;
+//     }
+       //printf("\n\n");
+//     }
+
+       i=0;
+       for(y=0; y<map->height; y++) {
+               for(x=0; x<map->width; x++) {
+//                     map->data[i]=255;
+                       printf("[%d]", map->data[i]);
+                       //tile = tile ? 0 : 1;
+                       i++;
+               }
+               //tile = tile ? 0 : 1;
+       }
+}*/
+
+void near mapScrollRight(map_view_t *mv, player_t *player, word id, word plid)
+{
+       word x, y;  /* coordinate for drawing */
+
+       /* increment the pixel position and update the page */
+       mv[id].page->dx += player[plid].speed;
+
+       /* check to see if this changes the tile */
+       if(mv[id].page->dx >= mv[id].dxThresh )
+       {
+       /* go forward one tile */
+       mv[id].tx++;
+       /* Snap the origin forward */
+       mv[id].page->data += 4;
+       mv[id].page->dx = mv[id].map->tiles->tileWidth;
+       }
+
+       /* draw the next column */
+       x= mv[0].page->sw + mv[id].map->tiles->tileWidth;
+       if(player[plid].q%4)
+               if(id==0)
+                       mapDrawCol(&mv[0], mv[0].tx + mv[0].page->tilesw, mv[0].ty-1, x, player, mv->page->dx);
+               else
+                       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));
+       //}
+}
+
+
+void near mapScrollLeft(map_view_t *mv, player_t *player, word id, word plid)
+{
+       word x, y;  /* coordinate for drawing */
+
+       /* increment the pixel position and update the page */
+       mv[id].page->dx -= player[plid].speed;
+
+       /* check to see if this changes the tile */
+       if(mv[id].page->dx == 0)
+       {
+       /* go backward one tile */
+       mv[id].tx--;
+
+       /* Snap the origin backward */
+       mv[id].page->data -= 4;
+       mv[id].page->dx = mv[id].map->tiles->tileWidth;
+       }
+
+       /* draw the next column */
+       x= 0;
+       if(player[plid].q%4)
+               if(id==0)
+                       mapDrawCol(&mv[0], mv[0].tx - 1, mv[0].ty-1, x, player, mv->page->dx);
+               else
+                       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));
+       //}
+}
+
+
+void near mapScrollUp(map_view_t *mv, player_t *player, word id, word plid)
+{
+       word x, y;  /* coordinate for drawing */
+
+       /* increment the pixel position and update the page */
+       mv[id].page->dy -= player[plid].speed;
+
+       /* check to see if this changes the tile */
+       if(mv[id].page->dy == 0 )
+       {
+       /* go down one tile */
+       mv[id].ty--;
+       /* Snap the origin downward */
+       mv[id].page->data -= mv[id].page->width*4;
+       mv[id].page->dy = mv[id].map->tiles->tileHeight;
+       }
+
+       /* draw the next row */
+       y= 0;
+       if(player[plid].q%3)
+               if(id==0)
+                       mapDrawRow(&mv[0], mv[0].tx - 1, mv[0].ty-1, y, player, mv->page->dy);
+               else
+                       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);
+       //}
+}
+
+void near mapScrollDown(map_view_t *mv, player_t *player, word id, word plid)
+{
+       word x, y;  /* coordinate for drawing */
+
+       /* increment the pixel position and update the page */
+       mv[id].page->dy += player[plid].speed;
+
+       /* check to see if this changes the tile */
+       if(mv[id].page->dy >= mv[id].dyThresh )
+       {
+       /* go down one tile */
+       mv[id].ty++;
+       /* Snap the origin downward */
+       mv[id].page->data += mv[id].page->width*4;
+       mv[id].page->dy = mv[id].map->tiles->tileHeight;
+       }
+
+       /* draw the next row */
+       y= mv[0].page->sh + mv[id].map->tiles->tileHeight;
+       if(player[plid].q%3)
+               if(id==0)
+                       mapDrawRow(&mv[0], mv[0].tx - 1, mv[0].ty+mv[0].page->tilesh, y, player, mv->page->dy);
+               else
+                       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);
+       //}
+}
+
+sword chkmap(map_t *map, word q)
+{
+//     bitmap_t bp;
+       static byte x[(MAPW*MAPH)+1] =
+{ 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 };
+/*1,   2,      3,      4,      0,      3,      3,      3,      3,      3,      3,      3,      3,      4,      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,      \
+9,     10,     11,     12,     4,      1,      0,      1,      0,      0,      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,      \
+0,     0,      4,      0,      0,      0,      0,      0,      8,      8,      1,      11,     11,     3,      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,      0,      0,      0,      0,      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,      1,      1,      1,      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 };*/
+       //check for failed to load map
+       if((map->width == map->height == 0) && (q>0))
+       {
+               //initiate a null map!
+               map->width=MAPW;///2;
+               map->height=MAPH;///2;
+//             map->data = malloc(((map->width*map->height)+1)*sizeof(byte));
+               map->data = &x;
+               map->tiles = malloc(sizeof(tiles_t));
+               //fix this to be far~
+//             bp = bitmapLoadPcx("data/ed.pcx");
+//             map->tiles->data = &bp;
+               map->tiles->debug_data = map->data;
+               map->tiles->tileHeight = 16;
+               map->tiles->tileWidth = 16;
+               map->tiles->rows = 1;
+               map->tiles->cols = 1;
+               map->tiles->debug_text = true;
+       }
+       else map->tiles->debug_text = false;
+       return 0;
+}
+
+void mapGoTo(map_view_t *mv, int tx, int ty)
+{
+       int px, py;
+       unsigned int i;
+
+       /* set up the coordinates */
+       mv->tx = tx;
+       mv->ty = ty;
+       mv->page->dx = mv->map->tiles->tileWidth;
+       mv->page->dy = mv->map->tiles->tileHeight;
+
+       /* set up the thresholds */
+       mv->dxThresh = mv->map->tiles->tileWidth * 2;
+       mv->dyThresh = mv->map->tiles->tileHeight * 2;
+
+       /* draw the tiles */
+       modexClearRegion(mv->page, 0, 0, mv->page->width, mv->page->height, 0);
+       py=0;
+       i=mv->ty * mv->map->width + mv->tx;
+       for(ty=mv->ty-1; py < mv->page->sh+mv->dyThresh && ty < mv->map->height; ty++, py+=mv->map->tiles->tileHeight) {
+               mapDrawWRow(mv, tx-1, ty, py);
+       i+=mv->map->width - tx;
+       }
+}
+
+
+void near
+mapDrawTile(tiles_t *t, word i, page_t *page, word x, word y)
+{
+       word rx;
+       word ry;
+       word textx=0;
+       word texty=0;
+       //if(i==0) i=2;
+       if(i==0)
+       {
+               //wwww
+               modexClearRegion(page, x, y, t->tileWidth, t->tileHeight, 0); //currently the over scan color!
+       }
+       else
+       {
+               rx = (((i-1) % ((t->data->width)/t->tileWidth)) * t->tileWidth);
+               ry = (((i-1) / ((t->data->height)/t->tileHeight)) * t->tileHeight);
+////0000printf("i=%d\n", i);
+               switch(t->debug_text)
+               {
+                       case 0:
+#ifndef TILERENDER
+                               modexClearRegion(page, x, y, t->tileWidth, t->tileHeight, ((t->debug_data[i])+1));
+                               //cannot print number value du to it being slow as bakapee
+#else
+                               PBUFBFUN                (page, x, y, rx, ry, t->tileWidth, t->tileHeight, (t->data));
+                               /* then the sprite. note modding ram ptr means we just draw to (x&3,0) */
+                               //draw_vrl1_vgax_modex(x-rx,y-ry,vrl_header,vrl_lineoffs,buffer+sizeof(*vrl_header),bufsz-sizeof(*vrl_header));
+                               //modexDrawBmpRegion    (page, x, y, rx, ry, t->tileWidth, t->tileHeight, (t->data));
+#endif
+                       break;
+                       case 1:
+                               modexClearRegion(page, x, y, t->tileWidth, t->tileHeight, (t->debug_data[i]+1));
+                               //modexprintbig(page, x, y, 1, 15, 0, (t->debug_data));
+                               /*for(texty=0; texty<2; texty++)
+                               {
+                                       for(textx=0; textx<2; textx++)
+                                       {*/
+//                                             modexprint(page, x+(textx*8), y+(texty*8), 1, (word)(t->debug_data), 0, (t->debug_data));
+/*                                     }
+                               }*/
+                       break;
+               }
+       }
+}
+
+void near mapDrawRow(map_view_t *mv, int tx, int ty, word y, player_t *p, word poopoffset)
+{
+       word x;
+       int i;
+       poopoffset%=p[0].speed;
+//printf("y: %d\n", poopoffset);
+       /* the position within the map array */
+       i=ty * mv->map->width + tx;
+       for(x=poopoffset; x<(mv->page->sw+mv->dxThresh)/(poopoffset+1) && tx < mv->map->width; x+=mv->map->tiles->tileWidth, tx++) {
+       if(i>=0) {
+               /* we are in the map, so copy! */
+               mapDrawTile(mv->map->tiles, mv->map->data[i], mv->page, x, y);
+       }
+       i++; /* next! */
+       }
+}
+
+void near mapDrawCol(map_view_t *mv, int tx, int ty, word x, player_t *p, word poopoffset)
+{
+       int y;
+       int i;
+       poopoffset%=p[0].speed;
+//printf("x: %d\n", poopoffset);
+       /* location in the map array */
+       i=ty * mv->map->width + tx;
+
+       /* We'll copy all of the columns in the screen,
+          i + 1 row above and one below */
+       for(y=poopoffset; y<(mv->page->sh+mv->dyThresh)/(poopoffset+1) && ty < mv->map->height; y+=mv->map->tiles->tileHeight, ty++) {
+       if(i>=0) {
+               /* we are in the map, so copy away! */
+               mapDrawTile(mv->map->tiles, mv->map->data[i], mv->page, x, y);
+       }
+       i += mv->map->width;
+       }
+}
+
+void mapDrawWRow(map_view_t *mv, int tx, int ty, word y)
+{
+       word x;
+       int i;
+
+       /* the position within the map array */
+       i=ty * mv->map->width + tx;
+       for(x=0; x<mv->page->sw+mv->dxThresh && tx < mv->map->width; x+=mv->map->tiles->tileWidth, tx++) {
+       if(i>=0) {
+               /* we are in the map, so copy! */
+               mapDrawTile(mv->map->tiles, mv->map->data[i], mv->page, x, y);
+       }
+       i++; /* next! */
+       }
+}
+
+void mapDrawWCol(map_view_t *mv, int tx, int ty, word x)
+{
+       int y;
+       int i;
+
+       /* location in the map array */
+       i=ty * mv->map->width + tx;
+
+       /* We'll copy all of the columns in the screen,
+          i + 1 row above and one below */
+       for(y=0; y<mv->page->sh+mv->dyThresh && ty < mv->map->height; y+=mv->map->tiles->tileHeight, ty++) {
+       if(i>=0) {
+               /* we are in the map, so copy away! */
+               mapDrawTile(mv->map->tiles, mv->map->data[i], mv->page, x, y);
+       }
+       i += mv->map->width;
+       }
+}
+
+/*void qclean()
+{
+       //setkb(0);
+}*/
+
+unsigned char shinku_fps_indicator_page = 0;
+
+/*     sync    */
+void shinku(global_game_variables_t *gv)
+{
+       //modexCopyPageRegion(pip[1].page, pip[2].page, 16, 16, 16, 16, (14*8)+4, 8+4);
+       if(elapsed_timer(gv) >= (1.0 / gv->kurokku.frames_per_second))
+       {
+               word x = (16) + gv->video.page[shinku_fps_indicator_page].dx; // follow the screen
+               word y = (16) + gv->video.page[shinku_fps_indicator_page].dy; // follow the screen
+               word col = 7;
+               word bgcol = 0;
+               word type = 0;
+
+               //t=(((*(gv->clock))-gv->clock_start) /18.2);
+               sprintf(gv->pee, "%f fps", (double)gv->kurokku.tiku/ticktock(gv));
+//             printf("%s\n", gv->pee);
+               //FIXME PLEASE!!
+               modexprint(&(gv->video.page[shinku_fps_indicator_page]), x, y, type, col, bgcol, gv->pee);
+//++++ modexprint(&(gv->video.page[0]), x, y, type, col, bgcol, gv->pee);
+               //(gv->clock_start)=*(gv->clock);
+               gv->kurokku.tiku=0;
+       }
+       //modexprint(page, 16, 16, 1, 15, 0, pee);
+       gv->kurokku.tiku++;
+       switch(gv->kurokku.fpscap)
+       {
+               case 0:
+                       //modexprint(page, 16, 32, 1, 15, 0, "sanic!");
+                       gv->kurokku.frames_per_second=1;
+               break;
+               case 1:
+                       //turn this off if XT
+                       modexWaitBorder();
+                       //vga_wait_for_vsync();
+                       gv->kurokku.frames_per_second=60;
+               break;
+       }
+}
+
+void near animatePlayer(map_view_t *pip, player_t *player, word pn, sword scrollswitch)
+{
+       sword x = player[pn].x;
+       sword y = player[pn].y;
+#ifdef SPRITE
+       word dire=32; //direction
+#else
+       word dire=8; //direction
+#endif
+       sword qq; //scroll offset
+       word ls = player[pn].persist_aniframe;
+
+       if(scrollswitch==0) qq = 0;
+       else qq = ((player[pn].q)*(player[pn].speed));
+       x-=4;
+       y-=TILEWH;
+       switch (player[pn].d)
+       {
+               case 0:
+                       //up
+                       dire*=player[pn].d;
+                       y-=qq;
+               break;
+               case 3:
+                       // right
+                       dire*=(player[pn].d-2);
+                       x+=qq;
+               break;
+               case 2:
+               break;
+               case 4:
+                       //down
+                       dire*=(player[pn].d-2);
+                       y+=qq;
+               break;
+               case 1:
+                       //left
+                       dire*=(player[pn].d+2);
+                       x-=qq;
+               break;
+       }
+
+#ifdef SPRITE
+// #define FRAME1 PBUFSFUN(pip[1].page, x, y, 48, dire, 24, 32,        PLAYERBMPDATA);
+// #define FRAME2 PBUFSFUN(pip[1].page, x, y, 24, dire, 24, 32,        PLAYERBMPDATA);
+// #define FRAME3 PBUFSFUN(pip[1].page, x, y, 0, dire, 24, 32, PLAYERBMPDATA);
+// #define FRAME4 PBUFSFUN(pip[1].page, x, y, 24, dire, 24, 32,        PLAYERBMPDATA);
+#define FRAME1 PBUFSFUN(pip[1].page, x, y, 48, dire, 24, 32,   PLAYERBMPDATA);
+#define FRAME2 PBUFSFUN(pip[1].page, x, y, 24, dire, 24, 32,   PLAYERBMPDATA);
+#define FRAME3 PBUFSFUN(pip[1].page, x, y, 0, dire, 24, 32,    PLAYERBMPDATA);
+#define FRAME4 PBUFSFUN(pip[1].page, x, y, 24, dire, 24, 32,   PLAYERBMPDATA);
+#else
+#define FRAME1 modexClearRegion(pip[1].page, x, y, 24, 32, 2+dire);
+#define FRAME2 modexClearRegion(pip[1].page, x, y, 24, 32, 1+dire);
+#define FRAME3 modexClearRegion(pip[1].page, x, y, 24, 32, dire);
+#define FRAME4 modexClearRegion(pip[1].page, x, y, 24, 32, 1+dire);
+#endif
+       modexCopyPageRegion(pip[1].page, pip[0].page, x-4, y-4, x-4, y-4, 28, 40);
+       //modexCopyPageRegion(pip[2].page, pip[1].page, 16, 16, 16, 16, (14*8)+4, 8+4);
+       if(2>ls && ls>=1) { FRAME1 }else
+       if(3>ls && ls>=2) { FRAME2 }else
+       if(4>ls && ls>=3) { FRAME3 }else
+       if(5>ls && ls>=4) { FRAME4 }
+       //TODO: mask copy //modexCopyPageRegion(dest->page, src->page, x-4, y-4, x-4, y-4, 28, 40);
+       //modexClearRegion(top->page, 66, 66, 2, 40, 0);
+       //modexCopyPageRegion(dest->page, top->page, 66, 66, 66, 66, 2, 40);
+}