src/lib/scroll16.c

   1 /* Project 16 Source Code~
   2  * Copyright (C) 2012-2016 sparky4 & pngwen & andrius4669 & joncampbell123
   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         //printf("player[%d].d=%d\n", pn, player[pn].d);
  31         switch(player[pn].d)
  32         {
  33                 //no direction
  34                 case 2:
  35                         //0000pip[0].video->startclk = (*clockw);
  36                 break;
  37                 //right movement
  38                 case 3:
  39                         //printf("pip[0].page->tilesw=%d        ", pip[0].page->tilesw); printf("pip[0].page->tw=%d\n", pip[0].page->tw);
  40                         if(pip[0].tx >= 0 && pip[0].tx+pip[0].page->tw < pip[0].map->width && player[pn].tx == pip[0].tx+pip[0].page->tilemidposscreenx &&
  41                         !(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!
  42                         {
  43                                 if(player[pn].q<=player[pn].spt)
  44                                 {
  45                                         INC_PER_FRAME;
  46                                         animatePlayer(pip, player, pn, 1);
  47                                         ScrollRight(pip, player, 3, pn);
  48                                         ScrollRight(pip, player, 2, pn);
  49                                         mapScrollRight(pip, player, !(pip[0].video->p), pn);
  50                                         mapScrollRight(pip, player, (pip[0].video->p), pn);
  51                                         if(!pageflipflop) modexShowPage(pip[1].page);
  52                                         player[pn].q++;
  53                                         //0000pip[0].video->clk = ((*clockw)-pip[0].video->startclk)/18.2;
  54                                 } else { player[pn].q = 1; player[pn].d = 2; player[pn].tx++; }
  55                         }
  56                         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))
  57                         {
  58                                 if(player[pn].q<=player[pn].spt)
  59                                 {
  60                                         INC_PER_FRAME;
  61                                         player[pn].x+=(player[pn].speed);
  62                                         animatePlayer(pip, player, pn, 0);
  63                                         if(!pageflipflop) modexShowPage(pip[1].page);
  64                                         player[pn].q++;
  65                                 } else { player[pn].q = 1; player[pn].d = 2; player[pn].tx++; }
  66                         }
  67                         else
  68                         {
  69                                 if(!pageflipflop) modexCopyPageRegion(pip[1].page, pip[0].page, player[pn].x, player[pn].y-TILEWH, player[pn].x, player[pn].y-TILEWH, 16, 32);
  70 #ifdef SPRITE
  71                                 PBUFSFUN(pip[1].page, player[pn].x, player[pn].y-TILEWH, 16, 32, 16, 32, PLAYERBMPDATA);
  72 #else
  73                                 modexClearRegion(pip[1].page, player[pn].x, player[pn].y-TILEWH, 16, 32, 14);
  74 #endif
  75                                 if(!pageflipflop) modexShowPage(pip[1].page);
  76                                 player[pn].d = 2;
  77                         }
  78                         player[pn].triggerx = player[pn].tx+1;
  79                         player[pn].triggery = player[pn].ty;
  80                 break;
  81
  82                 //left movement
  83                 case 1:
  84                         if(pip[0].tx > 0 && pip[0].tx+pip[0].page->tw <= pip[0].map->width && player[pn].tx == pip[0].tx+pip[0].page->tilemidposscreenx &&
  85                         !(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!
  86                         {
  87                                 if(player[pn].q<=player[pn].spt)
  88                                 {
  89                                         INC_PER_FRAME;
  90                                         animatePlayer(pip, player, pn, 1);
  91                                         ScrollLeft(pip, player, 3, pn);
  92                                         ScrollLeft(pip, player, 2, pn);
  93                                         mapScrollLeft(pip, player, !(pip[0].video->p), pn);
  94                                         mapScrollLeft(pip, player, (pip[0].video->p), pn);
  95                                         if(!pageflipflop) modexShowPage(pip[1].page);
  96                                         player[pn].q++;
  97                                         //0000pip[0].video->clk = ((*clockw)-pip[0].video->startclk)/18.2;
  98                                 } else { player[pn].q = 1; player[pn].d = 2; player[pn].tx--; }
  99                         }
 100                         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))
 101                         {
 102                                 if(player[pn].q<=player[pn].spt)
 103                                 {
 104                                         INC_PER_FRAME;
 105                                         player[pn].x-=(player[pn].speed);
 106                                         animatePlayer(pip, player, pn, 0);
 107                                         if(!pageflipflop) modexShowPage(pip[1].page);
 108                                         player[pn].q++;
 109                                 } else { player[pn].q = 1; player[pn].d = 2; player[pn].tx--; }
 110                         }
 111                         else
 112                         {
 113                                 if(!pageflipflop) modexCopyPageRegion(pip[1].page, pip[0].page, player[pn].x, player[pn].y-TILEWH, player[pn].x, player[pn].y-TILEWH, 16, 32);
 114 #ifdef SPRITE
 115                                 PBUFSFUN(pip[1].page, player[pn].x, player[pn].y-TILEWH, 16, 96, 16, 32, PLAYERBMPDATA);
 116 #else
 117                                 modexClearRegion(pip[1].page, player[pn].x, player[pn].y-TILEWH, 16, 32, 10);
 118 #endif
 119                                 if(!pageflipflop) modexShowPage(pip[1].page);
 120                                 player[pn].d = 2;
 121                         }
 122                         player[pn].triggerx = player[pn].tx-1;
 123                         player[pn].triggery = player[pn].ty;
 124                 break;
 125
 126                 //down movement
 127                 case 4:
 128                         if(pip[0].ty >= 0 && pip[0].ty+pip[0].page->th < pip[0].map->height && player[pn].ty == pip[0].ty+pip[0].page->tilemidposscreeny &&
 129                         !(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!
 130                         {
 131                                 if(player[pn].q<=player[pn].spt)
 132                                 {
 133                                         INC_PER_FRAME;
 134                                         animatePlayer(pip, player, pn, 1);
 135                                         ScrollDown(pip, player, 3, pn);
 136                                         ScrollDown(pip, player, 2, pn);
 137                                         mapScrollDown(pip, player, !(pip[0].video->p), pn);
 138                                         mapScrollDown(pip, player, (pip[0].video->p), pn);
 139                                         if(!pageflipflop) modexShowPage(pip[1].page);
 140                                         player[pn].q++;
 141                                         //0000pip[0].video->clk = ((*clockw)-pip[0].video->startclk)/18.2;
 142                                 } else { player[pn].q = 1; player[pn].d = 2; player[pn].ty++; }
 143                         }
 144                         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))
 145                         {
 146                                 if(player[pn].q<=player[pn].spt)
 147                                 {
 148                                         INC_PER_FRAME;
 149                                         player[pn].y+=(player[pn].speed);
 150                                         animatePlayer(pip, player, pn, 0);
 151                                         if(!pageflipflop) modexShowPage(pip[1].page);
 152                                         player[pn].q++;
 153                                 } else { player[pn].q = 1; player[pn].d = 2; player[pn].ty++; }
 154                         }
 155                         else
 156                         {
 157                                 if(!pageflipflop) modexCopyPageRegion(pip[1].page, pip[0].page, player[pn].x, player[pn].y-TILEWH, player[pn].x, player[pn].y-TILEWH, 16, 32);
 158 #ifdef SPRITE
 159                                 PBUFSFUN(pip[1].page, player[pn].x, player[pn].y-TILEWH, 16, 64, 16, 32, PLAYERBMPDATA);
 160 #else
 161                                 modexClearRegion(pip[1].page, player[pn].x, player[pn].y-TILEWH, 16, 32, 9);
 162 #endif
 163                                 if(!pageflipflop) modexShowPage(pip[1].page);
 164                                 player[pn].d = 2;
 165                         }
 166                         player[pn].triggerx = player[pn].tx;
 167                         player[pn].triggery = player[pn].ty+1;
 168                 break;
 169
 170                 //up movement
 171                 case 0:
 172                         if(pip[0].ty > 0 && pip[0].ty+pip[0].page->th <= pip[0].map->height && player[pn].ty == pip[0].ty+pip[0].page->tilemidposscreeny &&
 173                         !(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!
 174                         {
 175                                 if(player[pn].q<=player[pn].spt)
 176                                 {
 177                                         INC_PER_FRAME;
 178                                         animatePlayer(pip, player, pn, 1);
 179                                         ScrollUp(pip, player, 3, pn);
 180                                         ScrollUp(pip, player, 2, pn);
 181                                         mapScrollUp(pip, player, !(pip[0].video->p), pn);
 182                                         mapScrollUp(pip, player, (pip[0].video->p), pn);
 183                                         if(!pageflipflop) modexShowPage(pip[1].page);
 184                                         player[pn].q++;
 185                                         //0000pip[0].video->clk = ((*clockw)-pip[0].video->startclk)/18.2;
 186                                 } else { player[pn].q = 1; player[pn].d = 2; player[pn].ty--; }
 187                         }
 188                         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))
 189                         {
 190                                 if(player[pn].q<=player[pn].spt)
 191                                 {
 192                                         INC_PER_FRAME;
 193                                         player[pn].y-=(player[pn].speed);
 194                                         animatePlayer(pip, player, 0, pn);
 195                                         if(!pageflipflop) modexShowPage(pip[1].page);
 196                                         player[pn].q++;
 197                                 } else { player[pn].q = 1; player[pn].d = 2; player[pn].ty--; }
 198                         }
 199                         else
 200                         {
 201                                 if(!pageflipflop) modexCopyPageRegion(pip[1].page, pip[0].page, player[pn].x, player[pn].y-TILEWH, player[pn].x, player[pn].y-TILEWH, 16, 32);
 202 #ifdef SPRITE
 203                                 PBUFSFUN(pip[1].page, player[pn].x, player[pn].y-TILEWH, 16, 0, 16, 32, PLAYERBMPDATA);
 204 #else
 205                                 modexClearRegion(pip[1].page, player[pn].x, player[pn].y-TILEWH, 16, 32, 12);
 206 #endif
 207                                 if(!pageflipflop) modexShowPage(pip[1].page);
 208                                 player[pn].d = 2;
 209                         }
 210                         player[pn].triggerx = player[pn].tx;
 211                         player[pn].triggery = player[pn].ty-1;
 212                 break;
 213         }
 214 }
 215
 216 //panning page
 217 void panpagemanual(map_view_t *pip, player_t *player, word pn)
 218 {
 219         switch(player[pn].d)
 220         {
 221                 //right movement
 222                 case 3:
 223                         if(pip[pip[0].pan->pn].tx >= 0 && pip[pip[0].pan->pn].tx+pip[pip[0].pan->pn].page->tw < pip[pip[0].pan->pn].page->tilesw)
 224                         {
 225                                 if(player[pn].q<=player[pn].spt)
 226                                 {
 227                                         pip[pip[0].pan->pn].page->dx+=4;
 228                                         modexShowPage(pip[pip[0].pan->pn].page);
 229                                         player[pn].q++;
 230                                 } else { player[pn].q = 1; player[pn].d = 2; pip[pip[0].pan->pn].tx++; }
 231                         }
 232                 break;
 233
 234                 //left movement
 235                 case 1:
 236                         if(pip[pip[0].pan->pn].tx > 0 && pip[pip[0].pan->pn].tx+pip[pip[0].pan->pn].page->tw <= pip[pip[0].pan->pn].page->tilesw)
 237                         {
 238                                 if(player[pn].q<=player[pn].spt)
 239                                 {
 240                                         pip[pip[0].pan->pn].page->dx-=4;
 241                                         modexShowPage(pip[pip[0].pan->pn].page);
 242                                         player[pn].q++;
 243                                 } else { player[pn].q = 1; player[pn].d = 2; pip[pip[0].pan->pn].tx--; }
 244                         }
 245                 break;
 246
 247                 //down movement
 248                 case 4:
 249                         if(pip[pip[0].pan->pn].ty >= 0 && pip[pip[0].pan->pn].ty+pip[pip[0].pan->pn].page->th < pip[pip[0].pan->pn].page->tilesh)
 250                         {
 251                                 if(player[pn].q<=player[pn].spt)
 252                                 {
 253                                         pip[pip[0].pan->pn].page->dy+=4;
 254                                         modexShowPage(pip[pip[0].pan->pn].page);
 255                                         player[pn].q++;
 256                                 } else { player[pn].q = 1; player[pn].d = 2; pip[pip[0].pan->pn].ty++; }
 257                         }
 258                 break;
 259
 260                 //up movement
 261                 case 0:
 262                         if(pip[pip[0].pan->pn].ty > 0 && pip[pip[0].pan->pn].ty+pip[pip[0].pan->pn].page->th <= pip[pip[0].pan->pn].page->tilesh)
 263                         {
 264                                 if(player[pn].q<=player[pn].spt)
 265                                 {
 266                                         pip[pip[0].pan->pn].page->dy-=4;
 267                                         modexShowPage(pip[pip[0].pan->pn].page);
 268                                         player[pn].q++;
 269                                 } else { player[pn].q = 1; player[pn].d = 2; pip[pip[0].pan->pn].ty--; }
 270                         }
 271                         break;
 272         }
 273         //if (player[pn].d!=2) printf("player[%u].d=%u player[%u].q=%u\n", pn, player[pn].d, pn, player[pn].q);
 274 }
 275
 276 /*map_t
 277 allocMap(int w, int h) {
 278         map_t result;
 279
 280         result.width =w;
 281         result.height=h;
 282         result.data = malloc(sizeof(byte) * w * h);
 283         //result.data = (byte *)alloc_emem(((int)sizeof(byte) * w * h)/1024);
 284         if(isEMS() || checkEMS())
 285         {
 286                 XMOVE mm;
 287                 //emmhandle = mallocEMS(coretotalEMS());//alloc_emem((int)sizeof(map))
 288                 mm.length=sizeof(result);
 289                 mm.sourceH=0;
 290                 mm.sourceOff=ptr2long(&result);
 291                 mm.destH=emmhandle;
 292                 mm.destOff=0;
 293                 ist = move_emem(&mm);
 294                 if(!ist){ dealloc_emem(emmhandle); exit(5); }
 295                 printf("%d\n", coretotalEMS());
 296         }
 297
 298         return result;
 299 }*/
 300
 301 /*void
 302 initMap(map_t *map) {
 303         // just a place holder to fill out an alternating pattern
 304         int x, y, xx, yy;
 305         int i, q;
 306 //      int tile = 1;
 307         //if(!isEMS() || !checkEMS())
 308 //              map->tiles = malloc(sizeof(tiles_t));
 309         //else
 310         //      map->tiles = (tiles_t *)alloc_emem(sizeof(tiles_t));
 311
 312          //create the tile set
 313         //if(!isEMS() || !checkEMS())
 314 //              map->tiles->data = malloc(sizeof(bitmap_t));
 315         //else
 316         //      map->tiles->data = (bitmap_t *)alloc_emem(sizeof(bitmap_t));
 317 //      map->tiles->data->width = (TILEWH);
 318 //      map->tiles->data->height= TILEWH;
 319         //if(!isEMS() || !checkEMS())
 320 //              map->tiles->data->data = malloc((TILEWH*2)*TILEWH);
 321         //else
 322         //      map->tiles->data->data = (byte *)alloc_emem((TILEWH*2)*TILEWH);
 323 //      map->tiles->tileHeight = TILEWH;
 324 //      map->tiles->tileWidth =TILEWH;
 325 //      map->tiles->rows = 1;
 326 //      map->tiles->cols = 1;//2;
 327
 328         q=0;
 329         //for(y=0; y<map->height; y++) {
 330         //for(x=0; x<map->width; x++) {
 331         i=0;
 332         for(yy=0; yy<TILEWH; yy++) {
 333         for(xx=0; xx<(TILEWH); xx++) {
 334                 //if(x<TILEWH){
 335                   map->tiles->data->data[i+1] = map->data[q];//28;//0x24;
 336 //                printf("[%d]", map->tiles->data->data[i]);
 337                 //}else{
 338                   //map->tiles->data->data[i] = map->data[q];//0;//0x34;
 339                   //printf("]%d[==[%d]", i, map->tiles->data->data[i]);
 340                 //}
 341                 i++;
 342         }
 343 //      printf("\n");
 344         }
 345 //      printf("[%d]", map->data[q]);
 346         q++;
 347 //      }
 348         //printf("\n\n");
 349 //      }
 350
 351         i=0;
 352         for(y=0; y<map->height; y++) {
 353                 for(x=0; x<map->width; x++) {
 354 //                      map->data[i]=255;
 355                         printf("[%d]", map->data[i]);
 356                         //tile = tile ? 0 : 1;
 357                         i++;
 358                 }
 359                 //tile = tile ? 0 : 1;
 360         }
 361 }*/
 362
 363 void near mapScrollRight(map_view_t *mv, player_t *player, word id, word plid)
 364 {
 365         word x, y;  /* coordinate for drawing */
 366
 367         /* increment the pixel position and update the page */
 368         mv[id].page->dx += player[plid].speed;
 369
 370         /* check to see if this changes the tile */
 371         if(mv[id].page->dx >= mv[id].dxThresh )
 372         {
 373         /* go forward one tile */
 374         mv[id].tx++;
 375         /* Snap the origin forward */
 376         mv[id].page->data += 4;
 377         mv[id].page->dx = mv[id].map->tiles->tileWidth;
 378         }
 379
 380         /* draw the next column */
 381         x= mv[0].page->sw + mv[id].map->tiles->tileWidth;
 382         if(player[plid].q%4)
 383                 if(!pageflipflop){
 384                 if(id==0)
 385                         mapDrawCol(&mv[0], mv[0].tx + mv[0].page->tw, mv[0].ty-1, x, player, mv->page->dx);
 386                 else
 387                         modexCopyPageRegion(mv[id].page, mv[0].page, x, 0, x, 0, mv[id].map->tiles->tileWidth, mv[id].map->tiles->tileHeight*(mv[0].page->th+2));
 388                 }else mapDrawCol(&mv[(!mv[0].video->p)], mv[0].tx + mv[0].page->tw, mv[0].ty-1, x, player, mv->page->dx);
 389 }
 390
 391
 392 void near mapScrollLeft(map_view_t *mv, player_t *player, word id, word plid)
 393 {
 394         word x, y;  /* coordinate for drawing */
 395
 396         /* decrement the pixel position and update the page */
 397         mv[id].page->dx -= player[plid].speed;
 398
 399         /* check to see if this changes the tile */
 400         if(mv[id].page->dx == 0)
 401         {
 402         /* go backward one tile */
 403         mv[id].tx--;
 404
 405         /* Snap the origin backward */
 406         mv[id].page->data -= 4;
 407         mv[id].page->dx = mv[id].map->tiles->tileWidth;
 408         }
 409
 410         /* draw the next column */
 411         x= 0;
 412         if(player[plid].q%4)
 413                 if(!pageflipflop){
 414                 if(id==0)
 415                         mapDrawCol(&mv[0], mv[0].tx - 1, mv[0].ty-1, x, player, mv->page->dx);
 416                 else
 417                         modexCopyPageRegion(mv[id].page, mv[0].page, x, 0, x, 0, mv[id].map->tiles->tileWidth, mv[id].map->tiles->tileHeight*(mv[0].page->th+2));
 418         }else mapDrawCol(&mv[(!mv[0].video->p)], mv[0].tx - 1, mv[0].ty-1, x, player, mv->page->dx);
 419 }
 420
 421
 422 void near mapScrollUp(map_view_t *mv, player_t *player, word id, word plid)
 423 {
 424         word x, y;  /* coordinate for drawing */
 425
 426         /* decrement the pixel position and update the page */
 427         mv[id].page->dy -= player[plid].speed;
 428
 429         /* check to see if this changes the tile */
 430         if(mv[id].page->dy == 0 )
 431         {
 432         /* go down one tile */
 433         mv[id].ty--;
 434         /* Snap the origin downward */
 435         mv[id].page->data -= mv[id].page->width*4;
 436         mv[id].page->dy = mv[id].map->tiles->tileHeight;
 437         }
 438
 439         /* draw the next row */
 440         y= 0;
 441         if(player[plid].q%3)
 442                 if(!pageflipflop){
 443                 if(id==0)
 444                         mapDrawRow(&mv[0], mv[0].tx - 1, mv[0].ty-1, y, player, mv->page->dy);
 445                 else
 446                         modexCopyPageRegion(mv[id].page, mv[0].page, 0, y, 0, y, mv[id].map->tiles->tileWidth*(mv[0].page->tw+2), mv[id].map->tiles->tileHeight);
 447         }else mapDrawRow(&mv[(!mv[0].video->p)], mv[0].tx - 1, mv[0].ty-1, y, player, mv->page->dy);
 448 }
 449
 450 void near mapScrollDown(map_view_t *mv, player_t *player, word id, word plid)
 451 {
 452         word x, y;  /* coordinate for drawing */
 453
 454         /* increment the pixel position and update the page */
 455         mv[id].page->dy += player[plid].speed;
 456
 457         /* check to see if this changes the tile */
 458         if(mv[id].page->dy >= mv[id].dyThresh )
 459         {
 460         /* go down one tile */
 461         mv[id].ty++;
 462         /* Snap the origin downward */
 463         mv[id].page->data += mv[id].page->width*4;
 464         mv[id].page->dy = mv[id].map->tiles->tileHeight;
 465         }
 466
 467         /* draw the next row */
 468         y= mv[0].page->sh + mv[id].map->tiles->tileHeight;
 469         if(player[plid].q%3)
 470                 if(!pageflipflop){
 471                 if(id==0)
 472                         mapDrawRow(&mv[0], mv[0].tx - 1, mv[0].ty+mv[0].page->th, y, player, mv->page->dy);
 473                 else
 474                         modexCopyPageRegion(mv[id].page, mv[0].page, 0, y, 0, y, mv[id].map->tiles->tileWidth*(mv[0].page->tw+2), mv[id].map->tiles->tileHeight);
 475         }else mapDrawRow(&mv[(!mv[0].video->p)], mv[0].tx - 1, mv[0].ty+mv[0].page->th, y, player, mv->page->dy);
 476 }
 477
 478
 479 //TODO finish this wwww
 480 void near ScrollRight(map_view_t *mv, player_t *player, word id, word plid)
 481 {
 482         /* increment the pixel position and update the page */
 483         mv[0].video->page[id].dx += player[plid].speed;
 484
 485         /* check to see if this changes the tile */
 486         if(mv[0].video->page[id].dx >= mv[0].dxThresh )
 487         {
 488                 /* block copy pattern to where we will draw the sprite */
 489                 vga_setup_wm1_block_copy();
 490 //              {
 491 //                      word i;
 492 //                      byte o,o2;
 493 //                      o2 = *mv[0].video->page[id].data+4;
 494 //                      o = *mv[0].video->page[id].data;
 495 //                      for (i=0;i < mv[0].video->page[id].height;i++,o += mv[0].video->page[id].width+vga_state.vga_stride,o2 += (*mv[0].video->page[id].data >> 2)) vga_wm1_mem_block_copy(o2,o,*mv[0].video->page[id].data >> 2);
 496 //              }
 497                 _fmemmove(mv[0].video->page[id].data+4, mv[0].video->page[id].data, mv[0].video->page[id].pagesize);
 498                 /* must restore Write Mode 0/Read Mode 0 for this code to continue drawing normally */
 499                 vga_restore_rm0wm0();
 500                 /* Snap the origin forward */
 501                 mv[0].video->page[id].data += 4;
 502                 mv[0].video->page[id].dx = mv[0].map->tiles->tileWidth;
 503         }
 504 }
 505
 506 void near ScrollLeft(map_view_t *mv, player_t *player, word id, word plid)
 507 {
 508         /* decrement the pixel position and update the page */
 509         mv[0].video->page[id].dx -= player[plid].speed;
 510
 511         /* check to see if this changes the tile */
 512         if(mv[0].video->page[id].dx == 0)
 513         {
 514                 /* block copy pattern to where we will draw the sprite */
 515                 vga_setup_wm1_block_copy();
 516 //              {
 517 //                      word i;
 518 //                      byte o,o2;
 519 //                      o2 = *mv[0].video->page[id].data-4;
 520 //                      o = *mv[0].video->page[id].data;
 521 //                      for (i=0;i < mv[0].video->page[id].height;i++,o += mv[0].video->page[id].width+vga_state.vga_stride,o2 += (*mv[0].video->page[id].data >> 2)) vga_wm1_mem_block_copy(o2,o,*mv[0].video->page[id].data >> 2);
 522 //              }
 523                 _fmemmove(mv[0].video->page[id].data-4, mv[0].video->page[id].data, mv[0].video->page[id].pagesize);
 524                 /* must restore Write Mode 0/Read Mode 0 for this code to continue drawing normally */
 525                 vga_restore_rm0wm0();
 526                 /* Snap the origin backward */
 527                 mv[0].video->page[id].data -= 4;
 528                 mv[0].video->page[id].dx = mv[0].map->tiles->tileWidth;
 529         }
 530 }
 531
 532 void near ScrollUp(map_view_t *mv, player_t *player, word id, word plid)
 533 {
 534         /* decrement the pixel position and update the page */
 535         mv[0].video->page[id].dy -= player[plid].speed;
 536
 537         /* check to see if this changes the tile */
 538         if(mv[0].video->page[id].dy == 0)
 539         {
 540                 /* block copy pattern to where we will draw the sprite */
 541                 vga_setup_wm1_block_copy();
 542 //              {
 543 //                      word i;
 544 //                      byte o,o2;
 545 //                      o2 = *mv[0].video->page[id].data-mv[0].video->page[id].pi;
 546 //                      o = *mv[0].video->page[id].data;
 547 //                      for (i=0;i < mv[0].video->page[id].height;i++,o += mv[0].video->page[id].width+vga_state.vga_stride,o2 += (*mv[0].video->page[id].data >> 2)) vga_wm1_mem_block_copy(o2,o,*mv[0].video->page[id].data >> 2);
 548 //              }
 549                 _fmemmove(mv[0].video->page[id].data-mv[0].video->page[id].pi, mv[0].video->page[id].data, mv[0].video->page[id].pagesize);
 550                 /* must restore Write Mode 0/Read Mode 0 for this code to continue drawing normally */
 551                 vga_restore_rm0wm0();
 552                 /* Snap the origin backward */
 553                 mv[0].video->page[id].data -= mv[0].video->page[id].pi;
 554                 mv[0].video->page[id].dy = mv[0].map->tiles->tileWidth;
 555         }
 556 }
 557
 558 void near ScrollDown(map_view_t *mv, player_t *player, word id, word plid)
 559 {
 560         /* increment the pixel position and update the page */
 561         mv[0].video->page[id].dy += player[plid].speed;
 562
 563         /* check to see if this changes the tile */
 564         if(mv[0].video->page[id].dy >= mv[0].dxThresh )
 565         {
 566                 /* block copy pattern to where we will draw the sprite */
 567                 vga_setup_wm1_block_copy();
 568 //              {
 569 //                      word i;
 570 //                      byte o,o2;
 571 //                      o2 = *mv[0].video->page[id].data+mv[0].video->page[id].pi;
 572 //                      o = *mv[0].video->page[id].data;
 573 //                      for (i=0;i < mv[0].video->page[id].height;i++,o += mv[0].video->page[id].width+vga_state.vga_stride,o2 += (*mv[0].video->page[id].data >> 2)) vga_wm1_mem_block_copy(o2,o,*mv[0].video->page[id].data >> 2);
 574 //              }
 575                 _fmemmove(mv[0].video->page[id].data+mv[0].video->page[id].pi, mv[0].video->page[id].data, mv[0].video->page[id].pagesize);
 576                 /* must restore Write Mode 0/Read Mode 0 for this code to continue drawing normally */
 577                 vga_restore_rm0wm0();
 578                 /* Snap the origin forward */
 579                 mv[0].video->page[id].data += mv[0].video->page[id].pi;
 580                 mv[0].video->page[id].dy = mv[0].map->tiles->tileWidth;
 581         }
 582 }
 583
 584 sword chkmap(map_t *map, word q)
 585 {
 586 //      bitmap_t bp;
 587         static byte x[(MAPW*MAPH)+1] =
 588 { 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 };
 589 /*1,    2,      3,      4,      0,      3,      3,      3,      3,      3,      3,      3,      3,      4,      1,      1,      1,      1,      1,      1,      \
 590 5,      6,      7,      8,      0,      1,      0,      1,      0,      0,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      \
 591 9,      10,     11,     12,     4,      1,      0,      1,      0,      0,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      \
 592 13,     14,     15,     16,     0,      1,      1,      1,      5,      8,      1,      11,     11,     1,      1,      1,      1,      1,      1,      1,      \
 593 0,      0,      4,      0,      0,      0,      0,      0,      8,      8,      1,      11,     11,     3,      1,      1,      1,      1,      1,      1,      \
 594 1,      1,      1,      1,      0,      0,      0,      0,      8,      8,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      \
 595 1,      1,      1,      1,      0,      0,      0,      0,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      \
 596 1,      1,      1,      1,      0,      0,      0,      0,      1,      1,      1,      1,      1,      1,      1,      1,      3,      1,      1,      1,      \
 597 1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      \
 598 1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      \
 599 1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      3,      1,      1,      1,      \
 600 1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      \
 601 1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      3,      1,      1,      1,      \
 602 1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      \
 603 1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      1,      3,      3,      3,      3,      1,      2,      3,      4 };*/
 604         //check for failed to load map
 605         if((map->width == map->height == 0) && (q>0))
 606         {
 607                 //initiate a null map!
 608                 map->width=MAPW;///2;
 609                 map->height=MAPH;///2;
 610 //              map->data = malloc(((map->width*map->height)+1)*sizeof(byte));
 611                 map->data = &x;
 612                 map->tiles = malloc(sizeof(tiles_t));
 613                 //fix this to be far~
 614 //              bp = bitmapLoadPcx("data/ed.pcx");
 615 //              map->tiles->data = &bp;
 616                 map->tiles->debug_data = map->data;
 617                 map->tiles->tileHeight = 16;
 618                 map->tiles->tileWidth = 16;
 619                 map->tiles->rows = 1;
 620                 map->tiles->cols = 1;
 621                 map->tiles->debug_text = true;
 622         }
 623         else map->tiles->debug_text = false;
 624         return 0;
 625 }
 626
 627 //TODO: player position here
 628 void mapGoTo(map_view_t *mv, int tx, int ty)
 629 {
 630         int px, py;
 631         unsigned int i;
 632
 633         /* set up the coordinates */
 634         mv[0].tx = mv[1].tx = tx;
 635         mv[0].ty = mv[1].ty = ty;
 636         mv[0].page->dx = mv[1].page->dx = mv[2].page->dx = mv[3].page->dx = mv->map->tiles->tileWidth;
 637         mv[0].page->dy = mv[1].page->dy = mv[2].page->dy = mv[3].page->dy = mv->map->tiles->tileHeight;
 638
 639         /* set up the thresholds */
 640         mv[0].dxThresh = mv[1].dxThresh = mv[2].dxThresh = mv[3].dxThresh = mv->map->tiles->tileWidth * 2;
 641         mv[0].dyThresh = mv[1].dyThresh = mv[2].dxThresh = mv[3].dxThresh = mv->map->tiles->tileHeight * 2;
 642
 643         /* draw the tiles */
 644         modexClearRegion(mv[0].page, 0, 0, mv[0].page->width, mv[0].page->height, 0);
 645         py=0;
 646         i=mv[0].ty * mv[0].map->width + mv[0].tx;
 647         for(ty=mv[0].ty-1; py < mv[0].page->sh+mv->dyThresh && ty < mv[0].map->height; ty++, py+=mv[0].map->tiles->tileHeight) {
 648                 mapDrawWRow(&mv[0], tx-1, ty, py);
 649         i+=mv->map->width - tx;
 650         }
 651         modexCopyPageRegion(mv[1].page, mv[0].page, 0, 0, 0, 0, mv[0].page->width, mv[0].page->height);
 652 //      {
 653 //              unsigned int k,j,o;
 654 //              /* fill screen with a distinctive pattern */
 655 //              for (k=0;k < vga_state.vga_width;k++) {
 656 //                      o = k >> 2;
 657 //                      vga_write_sequencer(0x02/*map mask*/,1 << (k&3));
 658 //                              for (j=0;j < (mv[0].page->height)+(mv[1].page->height)+(mv[2].page->height)+(mv[3].page->height);j++,o += vga_state.vga_stride)
 659 //                                      vga_state.vga_graphics_ram[o] = (k^j)&15; // VRL samples put all colors in first 15!
 660 //              }
 661 //      }
 662         modexCopyPageRegion(mv[3].page, mv[!(mv->video->p)].page, 0/**/, 0/**/, 0, 128, 20, 36);
 663 }
 664
 665
 666 void near
 667 mapDrawTile(tiles_t *t, word i, page_t *page, word x, word y)
 668 {
 669         word rx;
 670         word ry;
 671         word textx=0;
 672         word texty=0;
 673         //if(i==0) i=2;
 674         if(i==0)
 675         {
 676                 //wwww
 677                 modexClearRegion(page, x, y, t->tileWidth, t->tileHeight, 0); //currently the over scan color!
 678         }
 679         else
 680         {
 681                 rx = (((i-1) % ((t->data->width)/t->tileWidth)) * t->tileWidth);
 682                 ry = (((i-1) / ((t->data->height)/t->tileHeight)) * t->tileHeight);
 683 ////0000printf("i=%d\n", i);
 684                 switch(t->debug_text)
 685                 {
 686                         case 0:
 687 #ifndef TILERENDER
 688                                 modexClearRegion(page, x, y, t->tileWidth, t->tileHeight, ((t->debug_data[i])+1));
 689                                 //modexprint(page, x, y, 1, 15, 0, (char const *)(t->debug_data[i]));
 690 #else
 691                                 PBUFBFUN                (page, x, y, rx, ry, t->tileWidth, t->tileHeight, (t->data));
 692                                 /* then the sprite. note modding ram ptr means we just draw to (x&3,0) */
 693                                 //draw_vrl1_vgax_modex(x-rx,y-ry,vrl_header,vrl_lineoffs,buffer+sizeof(*vrl_header),bufsz-sizeof(*vrl_header));
 694                                 //modexDrawBmpRegion    (page, x, y, rx, ry, t->tileWidth, t->tileHeight, (t->data));
 695 #endif
 696                         break;
 697                         case 1:
 698                                 modexClearRegion(page, x, y, t->tileWidth, t->tileHeight, (t->debug_data[i]+1));
 699                                 //modexprintbig(page, x, y, 1, 15, 0, (t->debug_data));
 700                                 /*for(texty=0; texty<2; texty++)
 701                                 {
 702                                         for(textx=0; textx<2; textx++)
 703                                         {*/
 704 //                                              modexprint(page, x+(textx*8), y+(texty*8), 1, (word)(t->debug_data), 0, (t->debug_data));
 705 /*                                      }
 706                                 }*/
 707                         break;
 708                 }
 709         }
 710 }
 711
 712 void near mapDrawRow(map_view_t *mv, int tx, int ty, word y, player_t *p, word poopoffset)
 713 {
 714         word x;
 715         int i;
 716         poopoffset%=p[0].speed;
 717 //printf("y: %d\n", poopoffset);
 718         /* the position within the map array */
 719         i=ty * mv->map->width + tx;
 720         for(x=poopoffset; x<(mv->page->sw+mv->dxThresh)/(poopoffset+1) && tx < mv->map->width; x+=mv->map->tiles->tileWidth, tx++) {
 721         if(i>=0) {
 722                 /* we are in the map, so copy! */
 723                 mapDrawTile(mv->map->tiles, mv->map->data[i], mv->page, x, y);
 724         }
 725         i++; /* next! */
 726         }
 727 }
 728
 729 void near mapDrawCol(map_view_t *mv, int tx, int ty, word x, player_t *p, word poopoffset)
 730 {
 731         int y;
 732         int i;
 733         poopoffset%=p[0].speed;
 734 //printf("x: %d\n", poopoffset);
 735         /* location in the map array */
 736         i=ty * mv->map->width + tx;
 737
 738         /* We'll copy all of the columns in the screen,
 739            i + 1 row above and one below */
 740         for(y=poopoffset; y<(mv->page->sh+mv->dyThresh)/(poopoffset+1) && ty < mv->map->height; y+=mv->map->tiles->tileHeight, ty++) {
 741         if(i>=0) {
 742                 /* we are in the map, so copy away! */
 743                 mapDrawTile(mv->map->tiles, mv->map->data[i], mv->page, x, y);
 744         }
 745         i += mv->map->width;
 746         }
 747 }
 748
 749 void mapDrawWRow(map_view_t *mv, int tx, int ty, word y)
 750 {
 751         word x;
 752         int i;
 753
 754         /* the position within the map array */
 755         i=ty * mv->map->width + tx;
 756         for(x=0; x<mv->page->sw+mv->dxThresh && tx < mv->map->width; x+=mv->map->tiles->tileWidth, tx++) {
 757         if(i>=0) {
 758                 /* we are in the map, so copy! */
 759                 mapDrawTile(mv->map->tiles, mv->map->data[i], mv->page, x, y);
 760         }
 761         i++; /* next! */
 762         }
 763 }
 764
 765 void mapDrawWCol(map_view_t *mv, int tx, int ty, word x)
 766 {
 767         int y;
 768         int i;
 769
 770         /* location in the map array */
 771         i=ty * mv->map->width + tx;
 772
 773         /* We'll copy all of the columns in the screen,
 774            i + 1 row above and one below */
 775         for(y=0; y<mv->page->sh+mv->dyThresh && ty < mv->map->height; y+=mv->map->tiles->tileHeight, ty++) {
 776         if(i>=0) {
 777                 /* we are in the map, so copy away! */
 778                 mapDrawTile(mv->map->tiles, mv->map->data[i], mv->page, x, y);
 779         }
 780         i += mv->map->width;
 781         }
 782 }
 783
 784 /*void qclean()
 785 {
 786         //setkb(0);
 787 }*/
 788
 789 unsigned char shinku_fps_indicator_page = 2;
 790 boolean pageflipflop;
 791 //gv->video.p
 792
 793 /*      sync    */
 794 void shinku(global_game_variables_t *gv)
 795 {
 796         word x = (0) + gv->video.page[!(gv->video.p)].dx; // follow the screen
 797         word y = (0) + gv->video.page[!(gv->video.p)].dy; // follow the screen
 798         word w = 64;
 799         word h = 8;
 800         word col = 7;
 801         word bgcol = 0;
 802         word type = 1;
 803         byte o,o2,i;
 804         //modexClearRegion(&gv->video.page[2], 0, 0, gv->video.page[2].sw, gv->video.page[2].sh, 47);
 805         //modexClearRegion(&gv->video.page[3], 0, 0, gv->video.page[3].sw, gv->video.page[3].sh, 45);
 806         //modexCopyPageRegion(pip[1].page, pip[2].page, 16, 16, 16, 16, (14*8)+4, 8+4);
 807         /* block copy to visible RAM from offscreen */
 808 //      vga_setup_wm1_block_copy();
 809 //      modexCopyPageRegion(&(gv->video.page[shinku_fps_indicator_page]), &(gv->video.page[!shinku_fps_indicator_page]), x, y, x+w, 0, w, h);
 810 //      o =     *(gv->video.page[2].data); // source offscreen
 811 //      o2 =    *(gv->video.page[shinku_fps_indicator_page].data)+(y * vga_state.vga_stride) + (x >> 2); // dest visible (original stride)
 812 //      for (i=0;i < h;i++,o += vga_state.vga_draw_stride,o2 += vga_state.vga_stride) vga_wm1_mem_block_copy(o2,o,w >> 2);
 813         /* must restore Write Mode 0/Read Mode 0 for this code to continue drawing normally */
 814 //      vga_restore_rm0wm0();
 815         if(elapsed_timer(gv) >= (1.0 / gv->kurokku.frames_per_second))
 816         {
 817                 sprintf(gv->pee, "%.0f fps", (double)gv->kurokku.tiku/ticktock(gv));
 818                 //modexClearRegion(&(gv->video.page[shinku_fps_indicator_page]), x, y, w, h, 45);
 819                 modexprint(&(gv->video.page[!(gv->video.p)]), x, y, type, col, bgcol, gv->pee);
 820                 gv->kurokku.tiku=0;
 821                 /* block copy to visible RAM from offscreen */
 822 //              vga_setup_wm1_block_copy();
 823 //              o =     *(gv->video.page[shinku_fps_indicator_page].data); // source offscreen
 824 //              o2 =    *(gv->video.page[2].data)+(y * vga_state.vga_stride) + (x >> 2); // dest visible (original stride)
 825 //              for (i=0;i < h;i++,o += vga_state.vga_draw_stride,o2 += vga_state.vga_stride) vga_wm1_mem_block_copy(o2,o,w >> 2);
 826 //              modexCopyPageRegion(&(gv->video.page[shinku_fps_indicator_page]), &(gv->video.page[!shinku_fps_indicator_page]), x, y, x, 0, w, h);
 827                 /* must restore Write Mode 0/Read Mode 0 for this code to continue drawing normally */
 828 //              vga_restore_rm0wm0();
 829         }else //copy dat sheet
 830         gv->kurokku.tiku++;
 831
 832         switch(gv->kurokku.fpscap)
 833         {
 834                 case 0:
 835                         //modexprint(&(gv->video.page[shinku_fps_indicator_page]), x, y+8, type, col, bgcol, "sanic!");
 836                         gv->kurokku.frames_per_second=1;
 837                 break;
 838                 case 1:
 839                         //turn this off if XT
 840                         modexWaitBorder();
 841                         //vga_wait_for_vsync();
 842                         gv->kurokku.frames_per_second=60;
 843                 break;
 844         }
 845         if(pageflipflop){
 846         if(gv->video.r){
 847                 //vga_setup_wm1_block_copy();
 848                 //_fmemcpy((gv->video.page[(gv->video.p)]).data, (gv->video.page[(!gv->video.p)]).data, gv->video.page[(!gv->video.p)].pagesize);
 849                 //vga_restore_rm0wm0();
 850                 modexCopyPageRegion(&(gv->video.page[(gv->video.p)]), &(gv->video.page[(!gv->video.p)]), 0, 0, 0, 0, gv->video.page[gv->video.p].width, gv->video.page[!gv->video.p].height);
 851                 modexShowPage(&(gv->video.page[gv->video.p]));
 852                 gv->video.p=!gv->video.p;
 853                 gv->video.r=!gv->video.r;
 854                 //0000gv->video.tickclk = ((*clockw)-gv->video.startclk)/18.2;
 855         }
 856         }
 857 }
 858
 859 void near animatePlayer(map_view_t *pip, player_t *player, word pn, sword scrollswitch)
 860 {
 861         sword x = player[pn].x;
 862         sword y = player[pn].y;
 863         word dire=32; //direction
 864         sword qq; //scroll offset
 865         word ls = player[pn].persist_aniframe;
 866
 867         if(scrollswitch==0) qq = 0;
 868         else qq = ((player[pn].q)*(player[pn].speed));
 869         //x-=4;
 870         y-=TILEWH;
 871         switch (player[pn].d)
 872         {
 873                 case 0:
 874                         //up
 875                         dire*=player[pn].d;
 876                         y-=qq;
 877                 break;
 878                 case 3:
 879                         // right
 880                         dire*=(player[pn].d-2);
 881                         x+=qq;
 882                 break;
 883                 case 2:
 884                 break;
 885                 case 4:
 886                         //down
 887                         dire*=(player[pn].d-2);
 888                         y+=qq;
 889                 break;
 890                 case 1:
 891                         //left
 892                         dire*=(player[pn].d+2);
 893                         x-=qq;
 894                 break;
 895         }
 896         //modexCopyPageRegion(pip[!(pip->video->p)].page, pip[3].page, 0, 128, x-4, y-4, 28, 36);
 897 #ifdef SPRITE
 898 // #define FRAME1 PBUFSFUN(pip[1].page, x, y, 32, dire, 16, 32, PLAYERBMPDATA);
 899 // #define FRAME2 PBUFSFUN(pip[1].page, x, y, 16, dire, 16, 32, PLAYERBMPDATA);
 900 // #define FRAME3 PBUFSFUN(pip[1].page, x, y, 0, dire, 16, 32,  PLAYERBMPDATA);
 901 // #define FRAME4 PBUFSFUN(pip[1].page, x, y, 16, dire, 16, 32, PLAYERBMPDATA);
 902 #define FRAME1 PBUFSFUN(pip[!(pip->video->p)].page, x, y, 32, dire, 16, 32,     PLAYERBMPDATA);
 903 #define FRAME2 PBUFSFUN(pip[!(pip->video->p)].page, x, y, 16, dire, 16, 32,     PLAYERBMPDATA);
 904 #define FRAME3 PBUFSFUN(pip[!(pip->video->p)].page, x, y, 0, dire, 16, 32,      PLAYERBMPDATA);
 905 #define FRAME4 PBUFSFUN(pip[!(pip->video->p)].page, x, y, 16, dire, 16, 32,     PLAYERBMPDATA);
 906 #else
 907 #define FRAME1 modexClearRegion(pip[!(pip->video->p)].page, x, y, 16, 32, 2+dire);
 908 #define FRAME2 modexClearRegion(pip[!(pip->video->p)].page, x, y, 16, 32, 1+dire);
 909 #define FRAME3 modexClearRegion(pip[!(pip->video->p)].page, x, y, 16, 32, dire);
 910 #define FRAME4 modexClearRegion(pip[!(pip->video->p)].page, x, y, 16, 32, 1+dire);
 911         #endif
 912         if(!pageflipflop)
 913                 modexCopyPageRegion(pip[1].page, pip[0].page, x-4, y-4, x-4, y-4, 28, 36);
 914 //modexCopyPageRegion(page_t *dest, page_t *src, word sx, word sy, word dx, word dy, word width, word height);
 915         //modexCopyPageRegion(pip[3].page, pip[!(pip->video->p)].page, x-4, y-4, 0, 128, 28, 36);
 916         /*modexCopyPageRegion(pip[pip->video->p].page,
 917  pip[!(pip->video->p)].page, x-4, y-4, x-4, y-4, 28, 36);*/
 918 //      else modexCopyPageRegion(pip[1].page, pip[0].page, x-4, y-4, x-4, y-4, 28, 40);
 919         switch(ls)
 920         {
 921                 case 1:
 922                         FRAME1
 923                 break;
 924                 case 2:
 925                         FRAME2
 926                 break;
 927                 case 3:
 928                         FRAME3
 929                 break;
 930                 case 4:
 931                         FRAME4
 932                 break;
 933         }
 934 //      if(2>ls && ls>=1) { FRAME1 }else
 935 //      if(3>ls && ls>=2) { FRAME2 }else
 936 //      if(4>ls && ls>=3) { FRAME3 }else
 937 //      if(5>ls && ls>=4) { FRAME4 }
 938         pip->video->r=1;
 939         //TODO: mask copy //modexCopyPageRegion(dest->page, src->page, x-4, y-4, x-4, y-4, 28, 40);
 940         //modexClearRegion(top->page, 66, 66, 2, 40, 0);
 941         //modexCopyPageRegion(dest->page, top->page, 66, 66, 66, 66, 2, 40);
 942 }