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 INC_PER_FRAME if(enti->q&1) enti->persist_aniframe++; if(enti->persist_aniframe>4) enti->persist_aniframe = 1;\r
 102         const unsigned int offscreen_ofs = video->page[0].pagesize+video->page[1].pagesize;//(vga_state.vga_stride * vga_state.vga_height);\r
 103         const unsigned int pattern_ofs = 0x10000UL - (uint16_t)video->page[2].data;//(vga_state.vga_stride * vga_state.vga_height);\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                         INC_PER_FRAME\r
 123                         enti->spri->curr_anim_spri++;\r
 124 \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 = 0;\r
 128                                 enti->spri->curr_spri_id = enti->spri->curr_anim_list[enti->spri->curr_anim_spri].sprite_id;\r
 129                         }\r
 130                         enti->spri->delay = enti->spri->curr_anim_list[enti->spri->curr_anim_spri].delay;\r
 131 \r
 132                 // Delay > 1 means that we should not change sprite yet. Decrease delay\r
 133                 default:\r
 134                         enti->spri->delay--;\r
 135                 break;\r
 136         }\r
 137 \r
 138         // Events go here\r
 139 \r
 140 \r
 141         omemptr = (VGA_RAM_PTR)video->page[0].data;// save original mem ptr\r
 142         x=enti->spri->x;\r
 143         y=enti->spri->y;\r
 144 \r
 145         // Draw sprite\r
 146         j = get_vrl_by_id(enti->spri->spritesheet, enti->spri->curr_spri_id, enti->spri->sprite_vrl_cont);\r
 147         if(j < 0)\r
 148         {\r
 149                 //Quit (gv, "Error retriving required sprite");\r
 150                 return;\r
 151         }\r
 152 \r
 153         // render box bounds. y does not need modification, but x and width must be multiple of 4\r
 154         if(!video->rss){\r
 155         if (x >= enti->overdraww) rx = (x - enti->overdraww) & (~3);\r
 156                 else rx = -(video->page[0].dx);\r
 157         if (y >= enti->overdrawh) ry = (y - enti->overdrawh);\r
 158                 else ry = -(video->page[0].dy);\r
 159         h = enti->spri->sprite_vrl_cont->vrl_header->height + enti->overdrawh + y - ry;\r
 160         w = (x + enti->spri->sprite_vrl_cont->vrl_header->width + (enti->overdraww*2) + 3 - rx) & (~3) - enti->overdraww;//round up\r
 161         if ((rx+w) > video->page[0].width) w = video->page[0].width-rx;\r
 162         if ((ry+h) > video->page[0].height) h = video->page[0].height-ry;\r
 163 \r
 164         // block copy pattern to where we will draw the sprite\r
 165         vga_setup_wm1_block_copy();\r
 166         o2 = offscreen_ofs;\r
 167         o = pattern_ofs + (ry * video->page[0].stridew) + (rx >> 2); // source offscreen                0x10000UL -\r
 168         for (i=0;i < h;i++,o += video->page[0].stridew,o2 += (w >> 2)) vga_wm1_mem_block_copy(o2,o,w >> 2);\r
 169 \r
 170         // must restore Write Mode 0/Read Mode 0 for this code to continue drawing normally\r
 171         vga_restore_rm0wm0();\r
 172 \r
 173         // replace VGA stride with our own and mem ptr. then sprite rendering at this stage is just (0,0)\r
 174         vga_state.vga_draw_stride = w >> 2;\r
 175         vga_state.vga_graphics_ram = omemptr + offscreen_ofs;\r
 176         }else{ rx=ry=w=h=0; vga_state.vga_graphics_ram = (VGA_RAM_PTR)video->page[0].data; }\r
 177         vga_state.vga_draw_stride_limit = (video->page[0].width + 3 - x) >> 2;//round up\r
 178 \r
 179         // then the sprite. note modding ram ptr means we just draw to (x&3,0)\r
 180 #ifndef SPRITE\r
 181         modexClearRegion(&video->page[0], x, y, 16, 32, 1);\r
 182 #else\r
 183         draw_vrl1_vgax_modex(\r
 184                 x-rx,\r
 185                 y-ry,\r
 186                 enti->spri->sprite_vrl_cont->vrl_header,\r
 187                 enti->spri->sprite_vrl_cont->line_offsets,\r
 188                 enti->spri->sprite_vrl_cont->buffer + sizeof(struct vrl1_vgax_header),\r
 189                 enti->spri->sprite_vrl_cont->data_size\r
 190         );\r
 191 #endif\r
 192         if(!video->rss){\r
 193         // restore ptr\r
 194         vga_state.vga_graphics_ram = omemptr;\r
 195 \r
 196         // block copy to visible RAM from offscreen\r
 197         vga_setup_wm1_block_copy();\r
 198         o = offscreen_ofs; // source offscreen\r
 199         o2 = (ry * video->page[0].stridew) + (rx >> 2); // dest visible (original stride)\r
 200         for (i=0;i < h;i++,o += vga_state.vga_draw_stride,o2 += video->page[0].stridew) vga_wm1_mem_block_copy(o2,o,w >> 2);\r
 201         // must restore Write Mode 0/Read Mode 0 for this code to continue drawing normally\r
 202         vga_restore_rm0wm0();\r
 203         }\r
 204         // restore stride\r
 205         vga_state.vga_draw_stride_limit = vga_state.vga_draw_stride = video->page[0].stridew;\r
 206 \r
 207         vga_state.vga_graphics_ram = video->omemptr;\r
 208 }\r
 209 \r
 210 \r
 211 \r
 212 \r