src/lib/16_sprit.c

   1 /* Project 16 Source Code~\r
   2  * Copyright (C) 2012-2016 sparky4 & pngwen & andrius4669 & joncampbell123 & yakui-lover\r
   3  *\r
   4  * This file is part of Project 16.\r
   5  *\r
   6  * Project 16 is free software; you can redistribute it and/or modify\r
   7  * it under the terms of the GNU General Public License as published by\r
   8  * the Free Software Foundation; either version 3 of the License, or\r
   9  * (at your option) any later version.\r
  10  *\r
  11  * Project 16 is distributed in the hope that it will be useful,\r
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of\r
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the\r
  14  * GNU General Public License for more details.\r
  15  *\r
  16  * You should have received a copy of the GNU General Public License\r
  17  * along with this program.  If not, see <http://www.gnu.org/licenses/>, or\r
  18  * write to the Free Software Foundation, Inc., 51 Franklin Street,\r
  19  * Fifth Floor, Boston, MA 02110-1301 USA.\r
  20  *\r
  21  */\r
  22 \r
  23 #include "src/lib/16_sprit.h"\r
  24 \r
  25 char* get_curr_anim_name(struct sprite *spri)\r
  26 {\r
  27         // Retrive animation name list\r
  28         struct vrs_header far *vrs = spri->spritesheet->vrs_hdr;\r
  29         uint32_t far *anim_names_offsets =      (uint32_t far *)\r
  30                                                 ((byte far *)vrs +\r
  31                                                  vrs->offset_table[VRS_HEADER_OFFSET_ANIMATION_NAME_LIST]);\r
  32 \r
  33         return (char *)(vrs + anim_names_offsets[spri->curr_anim]);\r
  34 }\r
  35 \r
  36 void init_anim(struct sprite *spri, int anim_index)\r
  37 {\r
  38         struct vrs_header far *vrs = spri->spritesheet->vrs_hdr;\r
  39         uint32_t far *anim_lists_offsets =      (uint32_t far *)\r
  40                                                 ((byte far *)vrs +\r
  41                                                  vrs->offset_table[VRS_HEADER_OFFSET_ANIMATION_LIST]);\r
  42         struct vrs_animation_list_entry_t far *anim_list =      (struct vrs_animation_list_entry_t far *)\r
  43                                                                 ((byte far *)vrs +\r
  44                                                                  anim_lists_offsets[anim_index]);\r
  45 \r
  46         // Upon new animation, start from the first sprite in it\r
  47         spri->curr_anim = anim_index;\r
  48         spri->curr_anim_spri = 0;\r
  49         spri->curr_spri_id = anim_list[0].sprite_id;\r
  50         spri->delay = anim_list[0].delay;\r
  51 \r
  52         spri->curr_anim_list = anim_list;\r
  53 }\r
  54 \r
  55 int set_anim_by_id(struct sprite *spri, int anim_id)\r
  56 {\r
  57         int new_anim_index = 0;\r
  58         int iter_id;\r
  59         struct vrs_header far *vrs = spri->spritesheet->vrs_hdr;\r
  60         // Retruve animation ids list\r
  61         uint16_t far *anim_ids =        (uint16_t far *)\r
  62                                         ((byte far *)vrs +\r
  63                                          vrs->offset_table[VRS_HEADER_OFFSET_ANIMATION_ID_LIST]);\r
  64 \r
  65         // Loop through animation id untill match or end of list\r
  66         while(iter_id = anim_ids[new_anim_index])\r
  67         {\r
  68                 // Return on successful match\r
  69                 if (iter_id == anim_id)\r
  70                 {\r
  71                         init_anim(spri, new_anim_index);\r
  72                         return 0;\r
  73                 }\r
  74                 new_anim_index++;\r
  75         }\r
  76         return -1;\r
  77 }\r
  78 \r
  79 void print_anim_ids(struct sprite *spri)\r
  80 {\r
  81         int new_anim_index = 0;\r
  82         int iter_id;\r
  83         struct vrs_header far *vrs = spri->spritesheet->vrs_hdr;\r
  84         // Retruve animation ids list\r
  85         uint16_t far *anim_ids =        (uint16_t far *)\r
  86                                         ((byte far *)vrs +\r
  87                                          vrs->offset_table[VRS_HEADER_OFFSET_ANIMATION_ID_LIST]);\r
  88 \r
  89         if(!anim_ids[new_anim_index])\r
  90                 return;\r
  91         // Loop through animation id untill match or end of list\r
  92         while(iter_id = anim_ids[new_anim_index])\r
  93         {\r
  94                 printf("s%d ", iter_id);\r
  95                 new_anim_index++;\r
  96         }\r
  97 }\r
  98 \r
  99 void animate_spri(entity_t *enti, video_t *video)\r
 100 {\r
 101 #define GVARVIDEO video\r
 102 #define VMEMPAGESIZE2   GVARVIDEO->page[0].pagesize+GVARVIDEO->page[1].pagesize\r
 103 #define VMEMPAGEDATA2   GVARVIDEO->page[2].data\r
 104         unsigned int i,o,o2; int j;\r
 105         int x,y,rx,ry,w,h;\r
 106 \r
 107         VGA_RAM_PTR omemptr;\r
 108 \r
 109         // Depending on delay, update indices\r
 110 //#define FRAME1 modexDrawSpriteRegion(pip[(pip->video->p)].page, x, y, 48, player[pn].enti.dire, 24, 32,       PLAYERBMPDATAPTR);\r
 111 //#define FRAME2 modexDrawSpriteRegion(pip[(pip->video->p)].page, x, y, 24, player[pn].enti.dire, 24, 32,       PLAYERBMPDATAPTR); stand\r
 112 //#define FRAME3 modexDrawSpriteRegion(pip[(pip->video->p)].page, x, y, 0, player[pn].enti.dire, 24, 32,        PLAYERBMPDATAPTR);\r
 113 //#define FRAME4 modexDrawSpriteRegion(pip[(pip->video->p)].page, x, y, 24, player[pn].enti.dire, 24, 32,       PLAYERBMPDATAPTR); stand\r
 114         switch(enti->spri->delay)\r
 115 {\r
 116                 // Delay = 0 means that sprite should loop. Nothing to change here\r
 117                 case 0:\r
 118                 break;\r
 119 \r
 120                 // Delay = 1 means that on next time unit sprite should be changed\r
 121                 case 1:\r
 122                         if(enti->invq)  enti->spri->curr_anim_spri++;\r
 123                         else                    enti->spri->curr_anim_spri--;\r
 124 //printf("1[%u] %u", enti->invq, enti->spri->curr_anim_spri);\r
 125                         // If we hit the end of an animation sequence, restart it\r
 126                         if(!(   enti->spri->curr_spri_id = enti->spri->curr_anim_list[enti->spri->curr_anim_spri].sprite_id)){\r
 127                                 //enti->spri->curr_anim_spri = 1;\r
 128                                 enti->invq=!enti->invq;\r
 129                                 if(enti->invq)                          enti->spri->curr_anim_spri+=2;\r
 130                                 else if(enti->spri->curr_anim_spri)     enti->spri->curr_anim_spri-=2;\r
 131                                 enti->spri->curr_spri_id = enti->spri->curr_anim_list[enti->spri->curr_anim_spri].sprite_id;\r
 132 //printf("      enti->spri->curr_anim_spri=%u   ", enti->spri->curr_anim_spri);\r
 133                         }\r
 134                         enti->spri->delay = enti->spri->curr_anim_list[enti->spri->curr_anim_spri].delay;\r
 135 //printf("\n");\r
 136 //break;\r
 137                 // Delay > 1 means that we should not change sprite yet. Decrease delay\r
 138                 default:\r
 139 //printf("2[%u] %u\n", enti->invq, enti->spri->curr_anim_spri);\r
 140                         enti->spri->delay--;\r
 141                 break;\r
 142         }\r
 143 \r
 144         // Events go here\r
 145 \r
 146 \r
 147         omemptr = (VGA_RAM_PTR)video->page[0].data;// save original mem ptr\r
 148         x=enti->spri->x;\r
 149         y=enti->spri->y;\r
 150 \r
 151         // Draw sprite\r
 152         j = get_vrl_by_id(enti->spri->spritesheet, enti->spri->curr_spri_id, enti->spri->sprite_vrl_cont);\r
 153         if(j < 0)\r
 154         {\r
 155                 //Quit (gv, "Error retriving required sprite");\r
 156                 return;\r
 157         }\r
 158 \r
 159         // render box bounds. y does not need modification, but x and width must be multiple of 4\r
 160         if(!GVARVIDEO->rss){\r
 161         if (x >= enti->overdraww) rx = (x - enti->overdraww) & (~3);\r
 162                 else rx = -(GVARVIDEO->page[0].dx);\r
 163         if (y >= enti->overdrawh) ry = (y - enti->overdrawh);\r
 164                 else ry = -(GVARVIDEO->page[0].dy);\r
 165         h = enti->spri->sprite_vrl_cont->vrl_header->height + enti->overdrawh + y - ry;\r
 166         w = (x + enti->spri->sprite_vrl_cont->vrl_header->width + (enti->overdraww*2) + 3 - rx) & (~3) - enti->overdraww;//round up\r
 167         if ((rx+w) > GVARVIDEO->page[0].width) w = GVARVIDEO->page[0].width-rx;\r
 168         if ((ry+h) > GVARVIDEO->page[0].height) h = GVARVIDEO->page[0].height-ry;\r
 169 \r
 170         // block copy pattern to where we will draw the sprite\r
 171         vga_setup_wm1_block_copy();\r
 172         o2 = VMEMPAGESIZE2;\r
 173         o = (0x10000UL - (uint16_t)VMEMPAGEDATA2) + (ry * GVARVIDEO->page[0].stridew) + (rx >> 2); // source offscreen\r
 174         for (i=0;i < h;i++,o += GVARVIDEO->page[0].stridew,o2 += (w >> 2)) vga_wm1_mem_block_copy(o2,o,w >> 2);\r
 175 \r
 176         // must restore Write Mode 0/Read Mode 0 for this code to continue drawing normally\r
 177         vga_restore_rm0wm0();\r
 178 \r
 179         // replace VGA stride with our own and mem ptr. then sprite rendering at this stage is just (0,0)\r
 180         vga_state.vga_draw_stride = w >> 2;\r
 181         vga_state.vga_graphics_ram = omemptr + VMEMPAGESIZE2;\r
 182         }else{ rx=ry=w=h=0; vga_state.vga_graphics_ram = (VGA_RAM_PTR)video->page[0].data; }\r
 183         vga_state.vga_draw_stride_limit = (GVARVIDEO->page[0].width + 3 - x) >> 2;//round up\r
 184 \r
 185         // then the sprite. note modding ram ptr means we just draw to (x&3,0)\r
 186 #ifndef SPRITE\r
 187         modexClearRegion(&GVARVIDEO->page[0], x, y, 16, 32, 1);\r
 188 #else\r
 189         draw_vrl1_vgax_modex(\r
 190                 x-rx,\r
 191                 y-ry,\r
 192                 enti->spri->sprite_vrl_cont->vrl_header,\r
 193                 enti->spri->sprite_vrl_cont->line_offsets,\r
 194                 enti->spri->sprite_vrl_cont->buffer + sizeof(struct vrl1_vgax_header),\r
 195                 enti->spri->sprite_vrl_cont->data_size\r
 196         );\r
 197 #endif\r
 198         if(!GVARVIDEO->rss){\r
 199         // restore ptr\r
 200         vga_state.vga_graphics_ram = omemptr;\r
 201 \r
 202         // block copy to visible RAM from offscreen\r
 203         vga_setup_wm1_block_copy();\r
 204         o = VMEMPAGESIZE2; // source offscreen\r
 205         o2 = (ry * GVARVIDEO->page[0].stridew) + (rx >> 2); // dest visible (original stride)\r
 206         for (i=0;i < h;i++,o += vga_state.vga_draw_stride,o2 += GVARVIDEO->page[0].stridew) vga_wm1_mem_block_copy(o2,o,w >> 2);\r
 207         // must restore Write Mode 0/Read Mode 0 for this code to continue drawing normally\r
 208         vga_restore_rm0wm0();\r
 209         }\r
 210         // restore stride\r
 211         vga_state.vga_draw_stride_limit = vga_state.vga_draw_stride = GVARVIDEO->page[0].stridew;\r
 212 \r
 213         vga_state.vga_graphics_ram = video->omemptr;\r
 214 }\r