]> 4ch.mooo.com Git - 16.git/blobdiff - src/vrstest.c
__seguse.txt added to show _seg usage also OpenVGMFile needs to be ported to 16_snd...
[16.git] / src / vrstest.c
index fe532b84eb6e6a9f5842c3a5f8d198a28497563f..166a10e0e0ad68ef2eb5fc8c50ab0cd8613fc498 100755 (executable)
-/* Project 16 Source Code~
- * Copyright (C) 2012-2016 sparky4 & pngwen & andrius4669 & joncampbell123 & yakui-lover
- *
- * This file is part of Project 16.
- *
- * Project 16 is free software; you can redistribute it and/or modify
- * it under the terms of the GNU General Public License as published by
- * the Free Software Foundation; either version 3 of the License, or
- * (at your option) any later version.
- *
- * Project 16 is distributed in the hope that it will be useful,
- * but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
- * GNU General Public License for more details.
- *
- * You should have received a copy of the GNU General Public License
- * along with this program.  If not, see <http://www.gnu.org/licenses/>, or
- * write to the Free Software Foundation, Inc., 51 Franklin Street,
- * Fifth Floor, Boston, MA 02110-1301 USA.
- *
- */
-
-#include <stdio.h>
-#include <dos.h>
-#include <string.h>
-#include "src/lib/modex16.h"
-#include "src/lib/16_sprit.h"
-#include "src/lib/16_ca.h"
-#include "src/lib/16_mm.h"
-
-global_game_variables_t gvar;
-
-void main() {
-       mminfo_t mm; mminfotype mmi;
-       __segment sega;
-       void __based(sega)* bigbuffer;
-       int i;
-       word start;
-       int plane;
-       float t1, t2;
-       boolean baka;
-       byte *pal;
-       int fd, size, size1;
-       struct sprite spri;
-       vrl1_vgax_offset_t * off, *off1;
-       struct vrs_container vrs;
-       vrl1_vgax_offset_t **vrl_line_offsets;
-       uint32_t huge *vrl_headers_offsets;
-       uint16_t huge *vrl_id_iter;
-       uint32_t vrl_size;
-       int num_of_vrl;
-       struct vrl1_vgax_header huge *curr_vrl;
-       struct vrl_container *vrl;
-       int success;
-       word w=0;
-
-
-
-       // DOSLIB: check our environment
-       probe_dos();
-
-       // DOSLIB: what CPU are we using?
-       // NTS: I can see from the makefile Sparky4 intends this to run on 8088 by the -0 switch in CFLAGS.
-       //      So this code by itself shouldn't care too much what CPU it's running on. Except that other
-       //      parts of this project (DOSLIB itself) rely on CPU detection to know what is appropriate for
-       //      the CPU to carry out tasks. --J.C.
-       cpu_probe();
-
-       // DOSLIB: check for VGA
-       if (!probe_vga()) {
-               printf("VGA probe failed\n");
-               return;
-       }
-       // hardware must be VGA or higher!
-       if (!(vga_state.vga_flags & VGA_IS_VGA)) {
-               printf("This program requires VGA or higher graphics hardware\n");
-               return;
-       }
-
-       //bmp = bitmapLoadPcx("data/chikyuu.pcx");
-       gvar.video.page[0]=modexDefaultPage(&gvar.video.page[0]);
-
-       mm.mmstarted=0;
-       MM_Startup(&mm, &mmi);
-       CA_Startup(&gvar);
-       // What should be done by read_vrs:
-       //sega = (mm.bufferseg);
-       if(CA_LoadFile("data/spri/chikyuu.vrs", &bigbuffer, &mm, &mmi)) baka=1; else baka=0;
-       fd = open("data/spri/chikyuu.vrs", O_RDONLY|O_BINARY);
-       size = lseek(fd, 0, SEEK_END);
-       lseek(fd, 0, SEEK_SET);
-       close(fd);
-       // Insert sanity cheks later
-       vrs.buffer = bigbuffer;
-       vrs.data_size = size - sizeof(struct vrl1_vgax_header);
-       num_of_vrl = 0;
-       vrl_id_iter = (uint16_t huge *)(vrs.buffer + vrs.vrs_hdr->offset_table[VRS_HEADER_OFFSET_SPRITE_ID_LIST]);
-       while(vrl_id_iter[num_of_vrl]){
-               num_of_vrl++;
-       }
-
-       // Allocate memory for vrl line offsets table
-       vrl_line_offsets = malloc(sizeof(vrl1_vgax_offset_t *)*num_of_vrl);
-
-       vrl_headers_offsets = (uint32_t huge *)(vrs.buffer + vrs.vrs_hdr->offset_table[VRS_HEADER_OFFSET_VRS_LIST]);
-       // Calculate line offsets for each vrl
-       for(i = 0; i < num_of_vrl; i++){
-               curr_vrl = (struct vrl1_vgax_header huge *)(vrs.buffer + vrl_headers_offsets[i]);
-
-               // Calc. vrl size as (next_offset - curr_offset)
-               if (i != num_of_vrl - 1){
-                       vrl_size = vrl_headers_offsets[i+1] - vrl_headers_offsets[i] - sizeof(struct vrl1_vgax_header);
-               }
-               // If it's the last vrl, size is (next_vrs_struct_offset - curr_offset)
-               else{
-                       vrl_size = vrs.vrs_hdr->offset_table[VRS_HEADER_OFFSET_SPRITE_ID_LIST] - vrl_headers_offsets[i] - sizeof(struct vrl1_vgax_header);
-               }
-               vrl_line_offsets[i] = vrl1_vgax_genlineoffsets(curr_vrl, (byte *)curr_vrl + sizeof(struct vrl1_vgax_header), vrl_size);
-       }
-       vrs.vrl_line_offsets = vrl_line_offsets;
-
-
-       //read_vrs(&gvar, "data/spri/chikyuu.vrs", &vrs);
-       spri.spritesheet = &vrs;
-       spri.sprite_vrl_cont = malloc(sizeof(struct vrl_container));
-       i = set_anim_by_id(&spri, 11);
-       if (i == -1)
-       {
-               return;
-       }
-       spri.x = 5;
-       spri.y = 100;
-
-//     Uncomment to see broken sprites
-/*     sega = mm.bufferseg;
-       if(CA_LoadFile("data/spri/CHUBACW1.vrl", &bigbuffer, &mm, &mmi)) baka=1; else baka=0;*/
-
-       /* clear and draw one sprite and one bitmap */
-       VGAmodeX(1, 1, &gvar);
-       modexClearRegion(&gvar.video.page[0], 0, 0, gvar.video.page[0].sw, gvar.video.page[0].sh, 1);
-
-       /* non sprite comparison */
-       start = *clockw;
-       modexCopyPageRegion(&gvar.video.page[0], &gvar.video.page[0], 0, 0, 0, 0, 320, 240);
-       t1 = (*clockw-start) /18.2;
-
-       start = *clockw;
-
-       t2 = (*clockw-start)/18.2;
-
-       for (i = 0; i < 5; i++){
-       spri.delay = 1; animate_spri(&spri); spri.x += 20; sleep(2); }
-
-       while(!kbhit())
-       {
-               switch(w)
-               {
-                       case 1024:
-                               modexPalUpdate0(pal);
-                               w=0;
-                       default:
-                               w++;
-                       break;
-               }
-       }
-       VGAmodeX(0, 1, &gvar);
-       free(spri.sprite_vrl_cont);
-       MM_FreePtr(&bigbuffer, &mm);
-       //MM_FreePtr(&((void __based(sega)*)spri.spritesheet->buffer), &mm);
-       MM_Shutdown(&mm);
-       CA_Shutdown(&gvar);
-       //printf("CPU to VGA: %f\n", t1);
-       //printf("VGA to VGA: %f\n", t2);
-       printf("t1: %f\n", t1);
-       printf("t2: %f\n", t2);
-       printf("gvar.video.page[0].width: %u\n", gvar.video.page[0].width);
-       printf("gvar.video.page[0].height: %u\n", gvar.video.page[0].height);
-       printf("Num %d", num_of_vrl);
-       if(baka) printf("\nyay!\n");
-       else printf("\npoo!\n");
-}
+/* Project 16 Source Code~\r
+ * Copyright (C) 2012-2017 sparky4 & pngwen & andrius4669 & joncampbell123 & yakui-lover\r
+ *\r
+ * This file is part of Project 16.\r
+ *\r
+ * Project 16 is free software; you can redistribute it and/or modify\r
+ * it under the terms of the GNU General Public License as published by\r
+ * the Free Software Foundation; either version 3 of the License, or\r
+ * (at your option) any later version.\r
+ *\r
+ * Project 16 is distributed in the hope that it will be useful,\r
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of\r
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the\r
+ * GNU General Public License for more details.\r
+ *\r
+ * You should have received a copy of the GNU General Public License\r
+ * along with this program.  If not, see <http://www.gnu.org/licenses/>, or\r
+ * write to the Free Software Foundation, Inc., 51 Franklin Street,\r
+ * Fifth Floor, Boston, MA 02110-1301 USA.\r
+ *\r
+ */\r
+\r
+#include "src/lib/16_head.h"\r
+#include "src/lib/16_tail.h"\r
+#include "src/lib/16_vl.h"\r
+#include "src/lib/16_spri.h"\r
+#include "src/lib/16_pm.h"\r
+#include "src/lib/16_ca.h"\r
+#include "src/lib/16_mm.h"\r
+\r
+extern boolean dbg_nointest;\r
+boolean panswitch;\r
+\r
+static word far* clockw= (word far*) 0x046C; /* 18.2hz clock */\r
+\r
+void main()\r
+{\r
+       static global_game_variables_t gvar;\r
+       //__segment sega;\r
+       memptr bigbuffer;\r
+       int i;\r
+       word start,w;\r
+       float t1, t2;\r
+       //boolean baka;\r
+       entity_t enti;\r
+       //vrl1_vgax_offset_t * off, *off1;\r
+/*     struct vrs_container vrs; vrl1_vgax_offset_t **vrl_line_offsets;\r
+       uint32_t far *vrl_headers_offsets;\r
+       uint16_t far *vrl_id_iter;\r
+       uint32_t vrl_size;\r
+       int num_of_vrl;\r
+       struct vrl1_vgax_header far *curr_vrl;\r
+       int size=0;\r
+*/\r
+\r
+       dbg_nointest=0;\r
+       Startup16(&gvar);\r
+\r
+/*     CA_LoadFile("data/spri/chikyuu.vrs", &bigbuffer, &gvar);\r
+\r
+       // Insert sanity cheks later\r
+       vrs.buffer = bigbuffer;\r
+       vrs.data_size = size - sizeof(struct vrl1_vgax_header);\r
+       num_of_vrl = 0;\r
+       vrl_id_iter = (uint16_t far *)(vrs.buffer + vrs.vrs_hdr->offset_table[VRS_HEADER_OFFSET_SPRITE_ID_LIST]);\r
+       while(vrl_id_iter[num_of_vrl]){\r
+               num_of_vrl++;\r
+       }\r
+\r
+       // Allocate memory for vrl line offsets table\r
+       vrl_line_offsets = malloc(sizeof(vrl1_vgax_offset_t *)*num_of_vrl);\r
+\r
+       vrl_headers_offsets = (uint32_t far *)(vrs.buffer + vrs.vrs_hdr->offset_table[VRS_HEADER_OFFSET_VRS_LIST]);\r
+       // Calculate line offsets for each vrl\r
+       for(i = 0; i < num_of_vrl; i++){\r
+               curr_vrl = (struct vrl1_vgax_header far *)(vrs.buffer + vrl_headers_offsets[i]);\r
+\r
+               // Calc. vrl size as (next_offset - curr_offset)\r
+               if (i != num_of_vrl - 1){\r
+                       vrl_size = vrl_headers_offsets[i+1] - vrl_headers_offsets[i] - sizeof(struct vrl1_vgax_header);\r
+               }\r
+               // If it's the last vrl, size is (next_vrs_struct_offset - curr_offset)\r
+               else{\r
+                       vrl_size = vrs.vrs_hdr->offset_table[VRS_HEADER_OFFSET_SPRITE_ID_LIST] - vrl_headers_offsets[i] - sizeof(struct vrl1_vgax_header);\r
+               }\r
+               vrl_line_offsets[i] = vrl1_vgax_genlineoffsets(curr_vrl, (byte *)curr_vrl + sizeof(struct vrl1_vgax_header), vrl_size);\r
+       }\r
+       vrs.vrl_line_offsets = vrl_line_offsets;\r
+\r
+\r
+//     read_vrs(&gvar, "data/spri/chikyuu.vrs", &vrs);\r
+\r
+\r
+       enti.spri.spritesheet = &vrs;\r
+       enti.spri.sprite_vrl_cont = malloc(sizeof(struct vrl_container));*/\r
+       VRS_LoadVRS("data/spri/chikyuu.vrs", &enti, &gvar);\r
+       i = set_anim_by_id(&(enti.spri), 31);\r
+       if (i == -1)\r
+       {\r
+               //Quit(&gvar, "ERROR!! glitch IN FILE!\n");\r
+       }\r
+       enti.spri.x = TILEWH-4;\r
+       enti.spri.y = TILEWH;\r
+\r
+//     Uncomment to see broken sprites\r
+/*     sega = mm.bufferseg;\r
+       if(CA_LoadFile("data/spri/CHUBACW1.vrl", &bigbuffer, &mm, &mmi)) baka=1; else baka=0;*/\r
+\r
+       VGAmodeX(1, 1, &gvar);\r
+       modexHiganbanaPageSetup(&gvar.video);\r
+       VL_ShowPage(&gvar.video.page[0], 1, 0);\r
+\r
+       /* non sprite comparison */\r
+       start = *clockw;\r
+       //modexCopyPageRegion(&gvar.video.page[0], &gvar.video.page[0], 0, 0, 0, 0, 320, 240);\r
+       t1 = (*clockw-start) /18.2;\r
+\r
+       start = *clockw;\r
+\r
+       t2 = (*clockw-start)/18.2;\r
+\r
+       /*modexLoadPalFile("data/spri/chikyuu.pal", &pal);\r
+       modexPalUpdate(pal);*/\r
+       //modexClearRegion(&gvar.video.page[0], 0, 0, gvar.video.page[0].width, gvar.video.page[0].height, 2);\r
+       VL_LoadPalFile("data/spri/chikyuu.pal", &gvar.video.palette);\r
+       for (i = 0; i < 10; i++){\r
+               enti.spri.delay = 1;\r
+\r
+               if(i==5) set_anim_by_id(&enti.spri, 21);\r
+\r
+               animate_spri(&enti, &gvar.video);// enti.spri.x += 16;\r
+               delay(500);\r
+       }\r
+\r
+       while(!IN_KeyDown(sc_Escape))\r
+       {\r
+               switch(w)\r
+               {\r
+                       case 768:\r
+//                             modexPalUpdate0(pal);\r
+                               w=0;\r
+                       default:\r
+                               w++;\r
+//                             gvar.video.palette[w]=rand();\r
+                       break;\r
+               }\r
+               TAIL_FUNCTIONKEYDRAWJUNKNOMV\r
+               if(IN_KeyDown(sc_F7)){ VL_ShowPage(&gvar.video.page[0], 1, 1);                                                  IN_UserInput(1, &gvar); }\r
+               if(IN_KeyDown(sc_F6)){ VL_ShowPage(&gvar.video.page[0], 1, 0);                                                  IN_UserInput(1, &gvar); }\r
+               if(IN_KeyDown(25)){ modexpdump(&gvar.video.page[0]);  IN_UserInput(1, &gvar); } //p\r
+       }\r
+       VGAmodeX(0, 1, &gvar);\r
+       MM_ShowMemory(&gvar);\r
+       MM_DumpData(&gvar);\r
+       MM_Report_(&gvar);\r
+       Shutdown16(&gvar);\r
+       MM_FreePtr(&bigbuffer, &gvar);\r
+       //MM_FreePtr(&((void __based(sega)*)enti.spri.spritesheet->buffer), &mm);\r
+       //printf("CPU to VGA: %f\n", t1);\r
+       //printf("VGA to VGA: %f\n", t2);\r
+       //HC_heapdump(&gvar);\r
+       printf("Project 16 vrstest.exe. This is just a test file!\n");\r
+       printf("version %s\n", VERSION);\r
+       printf("t1: %f\n", t1);\r
+       printf("t2: %f\n", t2);\r
+//0000 printf("gvar.video.page[0].width: %u\n", gvar.video.page[0].width);\r
+//0000 printf("gvar.video.page[0].height: %u\n", gvar.video.page[0].height);\r
+//     printf("Num %d", num_of_vrl);\r
+//     if(baka) printf("\nyay!\n");\r
+//     else printf("\npoo!\n");\r
+}\r