]> 4ch.mooo.com Git - 16.git/blobdiff - src/zcroll.c
__seguse.txt added to show _seg usage also OpenVGMFile needs to be ported to 16_snd...
[16.git] / src / zcroll.c
index 333d027e4b2719a76073e9955ef0913d00d68f45..888a00341c67bed7dffab102e30475518044f91a 100755 (executable)
@@ -1,5 +1,5 @@
 /* Project 16 Source Code~\r
- * Copyright (C) 2012-2016 sparky4 & pngwen & andrius4669 & joncampbell123 & yakui-lover\r
+ * Copyright (C) 2012-2017 sparky4 & pngwen & andrius4669 & joncampbell123 & yakui-lover\r
  *\r
  * This file is part of Project 16.\r
  *\r
 #include "src/lib/16render.h"\r
 #include "src/lib/16_dbg.h"\r
 \r
-#define MODEXZ\r
+#define FADE\r
 \r
-//bitmap_t p;\r
+//map_view_t mv[4];\r
 static map_t map;\r
-map_view_t mv[4];\r
 float t;\r
-sword bakapee;\r
-pan_t pan;\r
+\r
 //debugswitches\r
 boolean panswitch=0,baka=0;\r
 //extern boolean pageflipflop=1;\r
+extern boolean pagenorendermap;        //default: 0\r
 unsigned int i;\r
-//static int persist_aniframe = 0;    /* gonna be increased to 1 before being used, so 0 is ok for default */\r
 \r
-//map_view_db_t pgid[4];\r
-word pg;\r
 #ifdef FADE\r
-static word paloffset=0;\r
-byte *dpal;\r
+//static word paloffset=0;\r
 #endif\r
-byte *gpal;\r
 byte *ptr;\r
 memptr pal;\r
 \r
+#define FILENAME_1     "data/spri/chikyuu.vrs"\r
+#define FILENAME_1P    "data/spri/chikyuu.pal"\r
+#define FILENAME_2     "data/spri/me.vrs"\r
+#define FILENAME_2P    "data/spri/me.pal"\r
+\r
 void main(int argc, char *argv[])\r
 {\r
        static global_game_variables_t gvar;\r
-       static player_t player[MaxPlayers];\r
-       if(argv[1]) bakapee = atoi(argv[1]);\r
-       else bakapee = 1;\r
-\r
-       player[0].data = _fmalloc(72*128); //TODO use exmm\r
-       *player[0].data = bitmapLoadPcx("data/chikyuu.pcx", &gvar); // load sprite\r
+       char *bakapee1,*bakapee1p;\r
+//     sword bakapee;\r
+//     if(argv[1]) bakapee = atoi(argv[1]);\r
+//     else bakapee = 1;\r
 \r
        Startup16(&gvar);\r
 \r
-       pan.pn=0;\r
+       bakapee1=malloc(64);\r
+       bakapee1p=malloc(64);\r
+\r
+       if (argc < 2) {\r
+               //fprintf(stderr,"drawvrl <VRL file> <palette file>\n palette file optional\n");\r
+               bakapee1 =              FILENAME_1;\r
+               bakapee1p =     FILENAME_1P;\r
+\r
+       }else{\r
+               if(argv[1]) bakapee1 = argv[1];\r
+               if(argv[2]) bakapee1p = argv[2];\r
+       }\r
 \r
        // OK, this one takes hellova time and needs to be done in farmalloc or MM_...\r
        //IN CA i think you use CAL_SetupGrFile but i do think we should work together on this part --sparky4\r
-       player[0].ent = malloc(sizeof(entity_t));\r
-       player[0].ent->spri = malloc(sizeof(struct sprite));\r
-       player[0].ent->spri->spritesheet = malloc(sizeof(struct vrs_container));\r
+       //----gvar.player[0].enti.spri.spritesheet = malloc(sizeof(struct vrs_container));\r
 \r
        // create the map\r
 //     fprintf(stderr, "testing map load~      ");\r
-       loadmap("data/test.map", &map);\r
+       CA_loadmap("data/test.map", &map, &gvar);\r
        chkmap(&map, 0);\r
+//     initMap(&map);\r
 //     printf("chkmap ok       ");\r
 //     fprintf(stderr, "yay map loaded~~\n");\r
 \r
        // data\r
-       read_vrs(&gvar, "data/spri/chikyuu.vrs", player[0].ent->spri->spritesheet);\r
-//     player[0].data = malloc(72*128); //TODO use exmm\r
-//     *player[0].data = bitmapLoadPcx("data/chikyuu.pcx", &gvar); // load sprite\r
+       VRS_LoadVRS(bakapee1, &gvar.player[0].enti, &gvar);\r
 \r
-       //      input!\r
-       IN_Default(0, &player,ctrl_Keyboard1);\r
+       // input!\r
+       IN_Default(0, &gvar.player[0],ctrl_Keyboard1, &gvar);\r
 \r
        // save the palette\r
 #ifdef FADE\r
-       dpal = modexNewPal();\r
-       modexPalSave(dpal);\r
-       modexFadeOff(4, dpal);\r
+       modexPalSave(&gvar.video.dpal);\r
+       modexFadeOff(4, &gvar.video.dpal);\r
+       modexPalBlack();\r
 #endif\r
-       //textInit();\r
-       VGAmodeX(bakapee, 1, &gvar);\r
-#ifdef MODEXZ\r
-#ifdef FADE\r
-       modexPalBlack();        //reset the palette~\r
-#endif\r
-       CA_LoadFile("data/spri/chikyuu.pal", &pal, &gvar);\r
-       modexPalUpdate1(pal);\r
+\r
+       VGAmodeX(1/*bakapee*/, 1, &gvar);\r
+\r
+       /* load color palette */\r
+       /*ptmp.offset=(paloffset/3);\r
+       modexPalUpdate(&ptmp, &paloffset, 0, 0);\r
+       //modexClearRegion(bg->page, 0, 0, 320, 240, 255);\r
+       //printf("      %d\n", sizeof(ptmp.data));\r
+       //printf("1:    %d\n", paloffset);\r
+       map.tiles->data->offset=(paloffset/3);\r
+       modexPalUpdate(map.tiles->data, &paloffset, 0, 0);*/\r
+       VL_LoadPalFile(bakapee1p, &gvar.video.palette);\r
+       //VL_LoadPalFile("data/default.pal", &gvar.video.palette);\r
+\r
 #ifdef FADE\r
-       gpal = modexNewPal();\r
-       modexPalSave(gpal);\r
-       modexSavePalFile("data/g.pal", gpal);\r
-       modexPalBlack();        //so player will not see loadings~\r
+       modexPalSave(&gvar.video.palette);\r
+       modexSavePalFile("data/g.pal", &gvar.video.palette);\r
+       modexPalBlack();        //so gvar.player will not see loadings~\r
 #endif\r
 \r
        // setup camera and screen~\r
        modexHiganbanaPageSetup(&gvar.video);\r
-       modexMVSetup(&mv, &map, &pan, &gvar);\r
-       player[0].ent->spri->x = player[0].ent->spri->y = TILEWH;\r
+       ZC_MVSetup(&gvar.mv, &map, &gvar);\r
 \r
        // set up paging\r
        //TODO: LOAD map data and position the map in the middle of the screen if smaller then screen\r
-       mapGoTo(mv, 0, 0);\r
-#endif\r
-\r
-       //TODO: put player in starting position of spot\r
-       //default player position on the viewable map\r
-       player[0].tx = mv[0].tx + mv[0].page->tilemidposscreenx;\r
-       player[0].ty = mv[0].ty + mv[0].page->tilemidposscreeny;\r
-       IN_initplayer(&player, 0);\r
+       mapGoTo(&gvar.mv, 0, 0);\r
 \r
-       i = set_anim_by_id(player[0].ent->spri, 11);\r
-       print_anim_ids(player[0].ent->spri);\r
-       if (i == -1)\r
+       ZC_PlayerXYpos(0, 0, &gvar.player, &gvar.mv, 0, 1);\r
+       EN_initPlayer(&gvar.player[0], &gvar.video);\r
+       //print_anim_ids(gvar.player[0].enti.spri);\r
+       if (gvar.video.sprifilei == -1)\r
        {\r
 #ifdef FADE\r
-               modexFadeOff(4, gpal);\r
+               modexFadeOff(4, &gvar.video.palette);\r
 #endif\r
-               Quit(&gvar, "Wrong");\r
+               Quit(&gvar, "Wrong ID for sprite");\r
 #ifdef FADE\r
-               modexFadeOn(4, dpal);\r
+               modexFadeOn(4, &gvar.video.dpal);\r
 #endif\r
        }\r
-       animate_spri((player[0].ent->spri), &gvar);\r
 \r
-       modexShowPage(mv[0].page);//!(gvar.video.p)\r
-       shinku_fps_indicator_page = 0; // we're on page 1 now, shinku(). follow along please or it will not be visible.\r
+//     while(!IN_KeyDown(sc_Escape) && !IN_KeyDown(sc_Space) && !IN_KeyDown(sc_Enter)){ FUNCTIONKEYSHOWMV }\r
+       gvar.video.page[0].tlx=gvar.mv[0].tx*TILEWH;\r
+       gvar.video.page[0].tly=gvar.mv[0].ty*TILEWH;\r
+       shinku(&gvar);\r
+//modexpdump(gvar.mv[0].page);\r
 #ifdef FADE\r
-       modexFadeOn(4, gpal);\r
+       modexFadeOn(4, &gvar.video.palette);\r
 #endif\r
-       /*strcpy(global_temp_status_text, "press enter for the loop of zcroll\nescape to quit");\r
-       modexprint(&gvar.video.page[0], 144, 72, 1, 7, 0, global_temp_status_text);\r
-       while(!IN_KeyDown(sc_Enter)){ if(IN_KeyDown(sc_Escape)) goto quit; } IN_UserInput(1,1);*///wwww\r
-       while(!IN_KeyDown(sc_Escape))// && player[0].hp>0)\r
+       while(!IN_KeyDown(sc_Escape) && gvar.player[0].enti.hp>0)\r
        {\r
+               gvar.video.page[0].tlx=gvar.mv[0].tx*TILEWH;\r
+               gvar.video.page[0].tly=gvar.mv[0].ty*TILEWH;\r
                shinku(&gvar);\r
                //top left corner & bottem right corner of map veiw be set as map edge trigger since maps are actually square\r
-               //to stop scrolling and have the player position data move to the edge of the screen with respect to the direction\r
-               //when player[0].tx or player[0].ty == 0 or player[0].tx == 20 or player[0].ty == 15 then stop because that is edge of map and you do not want to walk of the map\r
+               //to stop scrolling and have the gvar.player position data move to the edge of the screen with respect to the direction\r
+               //when gvar.player[0].tx or gvar.player[0].ty == 0 or gvar.player[0].tx == 20 or gvar.player[0].ty == 15 then stop because that is edge of map and you do not want to walk of the map\r
 \r
-               //player movement\r
-               IN_ReadControl(0, &player);\r
+               //gvar.player movement\r
+               IN_ReadControl(&gvar.player[0], &gvar);\r
                if(!panswitch){\r
-                       //ZC_walk(player[0].ent, mv);\r
-                       walk(mv, &player, 0);\r
+                       //ZC_walk2(gvar.player[0].ent, mv);\r
+                       ZC_walk(&gvar.mv, &gvar.player, 0);\r
+               }else{\r
+                       TAIL_PANKEYFUNZC;\r
+                       //printf("      gvar.player[0].enti.q: %d", gvar.player[0].enti.q);     printf("        gvar.player[0].d: %d\n", gvar.player[0].d);\r
                }\r
 \r
                //the scripting stuff....\r
-/*             if(((mv[0].map->data[(player[0].triggerx-1)+(map.width*(player[0].triggery-1))] == 0) && IN_KeyDown(0x1C))||(player[0].tx == 5 && player[0].ty == 5))\r
+               //if(((gvar.player[0].enti.triggerx == TRIGGX && gvar.player[0].enti.triggery == TRIGGY) && IN_KeyDown(0x1C))||(gvar.player[0].enti.tx == 5 && gvar.player[0].enti.ty == 5))\r
+               if(((gvar.mv[0].map->layerdata[0].data[(gvar.player[0].enti.triggerx-1)+(map.width*(gvar.player[0].enti.triggery-1))] == 0) && IN_KeyDown(0x1C))||(gvar.player[0].enti.tx == 5 && gvar.player[0].enti.ty == 5))\r
                {\r
                        short i;\r
                        for(i=800; i>=400; i--)\r
@@ -167,80 +175,54 @@ void main(int argc, char *argv[])
                        }\r
                        nosound();\r
                }\r
-               if(player[0].q == (TILEWH/(player[0].speed))+1 && player[0].info.dir != 2 && (player[0].triggerx == 5 && player[0].triggery == 5)){ player[0].hp--; }\r
-*/             //debugging binds!\r
-               if(IN_KeyDown(2)){ modexShowPage(mv[0].page); pan.pn=0; }\r
-               if(IN_KeyDown(25)){ modexpdump(mv[0].page);\r
-                        IN_UserInput(1,1);\r
-               }       //p\r
-\r
-               if(IN_KeyDown(24)){ modexPalUpdate0(gpal); /*paloffset=0;*/ modexpdump(mv[0].page); IN_UserInput(1,1); } //o\r
-               if(IN_KeyDown(22)){ modexPalUpdate0(gpal); } //u\r
-\r
-               //pan switch\r
-               if(IN_KeyDown(88)){panswitch=!panswitch; IN_UserInput(1,1);}    //f12\r
-               if(IN_KeyDown(87))      //f11\r
-               {\r
-                       pageflipflop=!pageflipflop;\r
-                       IN_UserInput(1,1);\r
-               }\r
-               if(IN_KeyDown(68))      //f10\r
-               {\r
-                       gvar.kurokku.fpscap=!gvar.kurokku.fpscap;\r
-                       IN_UserInput(1,1);\r
-               }\r
-               if(IN_KeyDown(67))      //f9\r
-               {\r
-                       modexClearRegion(mv[0].page, 0, 0, mv[0].page->width, mv[0].page->height, 2);\r
-               }\r
-               if(IN_KeyDown(66))      //f8\r
+               if(gvar.player[0].enti.q == (TILEWH/(gvar.player[0].enti.speed))+1 && gvar.player[0].info.dir != 2 && (gvar.player[0].enti.triggerx == 5 && gvar.player[0].enti.triggery == 5)){ gvar.player[0].enti.hp--; }\r
+               //debugging binds!\r
+\r
+               if(IN_KeyDown(24)){ modexPalUpdate0(&gvar.video.palette); /*paloffset=0;*/ modexpdump(gvar.mv[0].page); IN_UserInput(1, &gvar); } //o\r
+               if(IN_KeyDown(22)){ modexPalUpdate0(&gvar.video.palette); } //u\r
+\r
+               TAIL_FUNCTIONKEYFUNCTIONS\r
+               TAIL_FUNCTIONKEYDRAWJUNK\r
+               if(IN_KeyDown(sc_L)){ modexClearRegion(&gvar.video.page[0], gvar.player[0].enti.x, gvar.player[0].enti.y, 16, 16, 1); }\r
+               if(IN_KeyDown(sc_J) || IN_KeyDown(sc_K))\r
                {\r
-//                     modexDrawSprite(mv[0].page, 16, 16, &p);\r
-//                     modexDrawSprite(mv[0].page, 32+72, 16, (player[0].data));\r
-                       switch(i)\r
+                       if(IN_KeyDown(sc_J))\r
                        {\r
-                               case 11:\r
-                                       i=0;\r
-                                       player[0].ent->spri->x = 0;\r
-                               default:\r
-                                       i++;\r
-                                       player[0].ent->spri->delay = 1; animate_spri((player[0].ent->spri), &gvar); player[0].ent->spri->x += 20;\r
-                               break;\r
+                               bakapee1=FILENAME_1;\r
+                               bakapee1p=FILENAME_1P;\r
+                               gvar.player[0].enti.overdraww=0;\r
                        }\r
-               }\r
-               FUNCTIONKEYFUNCTIONS;\r
-               // fmemtest into page\r
-               /*if(IN_KeyDown(4+1))   //4\r
-               {\r
-                       pg=1;\r
-                       SELECT_ALL_PLANES();\r
-                       _fmemset(((mv[pg].page->data+4)+(16*(mv[pg].page->width/4))), 15, 4);\r
-               }*/\r
-\r
-               //9\r
+                       if(IN_KeyDown(sc_K))\r
+                       {\r
+                               bakapee1=FILENAME_2;\r
+                               bakapee1p=FILENAME_2P;\r
+                               gvar.player[0].enti.overdraww=2;\r
+                       }\r
+                       //read_vrs(&gvar, bakapee1, gvar.player[0].enti.spri->spritesheet);\r
+                       VRS_ReadVRS(bakapee1, &gvar.player[0].enti, &gvar);\r
+                       VL_LoadPalFile(bakapee1p, &gvar.video.palette);\r
+               }//JK\r
 #ifdef FADE\r
-               if(IN_KeyDown(10)){ modexPalOverscan(rand()%56); modexPalUpdate1(dpal); IN_UserInput(1,1); }\r
+               if(IN_KeyDown(10)){ modexPalOverscan(rand()%56); modexPalUpdate(gvar.video.dpal); IN_UserInput(1, &gvar); }\r
 #endif\r
                if(IN_KeyDown(sc_R)){ modexPalOverscan(rand()%56); } //r\r
 \r
-               if((player[0].q==1) && !(player[0].x%TILEWH==0 && player[0].y%TILEWH==0)) break;        //incase things go out of sync!\r
-               player[0].hp = 0;\r
+               if((gvar.player[0].enti.q==1) && !(gvar.player[0].enti.x%TILEWH==0 && gvar.player[0].enti.y%TILEWH==0)) Quit(&gvar, "PLAYER OFF THE RAILS!");//break;   //incase things go out of sync!\r
        }\r
 \r
        /* fade back to text mode */\r
        /* but 1st lets save the game palette~ */\r
 #ifdef FADE\r
-       modexPalSave(gpal);\r
-       modexSavePalFile("data/g.pal", gpal);\r
-       modexFadeOff(4, gpal);\r
+       modexPalSave(&gvar.video.palette);\r
+       modexSavePalFile("data/g.pal", &gvar.video.palette);\r
+       modexFadeOff(4, &gvar.video.palette);\r
 #endif\r
-       VGAmodeX(0, 1, &gvar);\r
        Shutdown16(&gvar);\r
        printf("\nProject 16 zcroll.exe. This is just a test file!\n");\r
        printf("version %s\n", VERSION);\r
        SCROLLEXITMESG;\r
        WCPU_cpufpumesg();\r
 #ifdef FADE\r
-       modexFadeOn(4, dpal);\r
+       modexFadeOn(4, gvar.video.dpal);\r
 #endif\r
 }\r