1 /* Project 16 Source Code~
\r
2 * Copyright (C) 2012-2017 sparky4 & pngwen & andrius4669 & joncampbell123 & yakui-lover
\r
4 * This file is part of Project 16.
\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
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
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
24 #include "src/lib/16_vl.h"
\r
25 #include "src/lib/16_vlpal.h"
\r
26 #include "src/lib/16_in.h"
\r
27 #include "src/lib/scroll16.h"
\r
32 static word far* clockw= (word far*) 0x046C; /* 18.2hz clock */
\r
33 static byte *palette;//[PAL_SIZE];
\r
35 void main(int argc, char *argv[])
\r
37 static word paloffset=0;
\r
38 static global_game_variables_t gvar;
\r
39 static player_t player[MaxPlayers];
\r
45 word startclk, endclk;
\r
48 imgtestpal_t bmp1, bmp2;
\r
51 bmp1.width=bmp2.width= 40;
\r
52 bmp1.width=bmp2.height= 30;
\r
54 //====word colo=LGQ;
\r
56 // DOSLIB: check our environment
\r
59 // DOSLIB: what CPU are we using?
\r
60 // NTS: I can see from the makefile Sparky4 intends this to run on 8088 by the -0 switch in CFLAGS.
\r
61 // So this code by itself shouldn't care too much what CPU it's running on. Except that other
\r
62 // parts of this project (DOSLIB itself) rely on CPU detection to know what is appropriate for
\r
63 // the CPU to carry out tasks. --J.C.
\r
66 // DOSLIB: check for VGA
\r
68 printf("VGA probe failed\n");
\r
71 // hardware must be VGA or higher!
\r
72 if (!(vga_state.vga_flags & VGA_IS_VGA)) {
\r
73 printf("This program requires VGA or higher graphics hardware\n");
\r
77 if (_DEBUG_INIT() == 0) {
\r
79 printf("WARNING: Failed to initialize DEBUG output\n");
\r
82 _DEBUG("Serial debug output started\n"); // NTS: All serial output must end messages with newline, or DOSBox-X will not emit text to log
\r
83 _DEBUGF("Serial debug output printf test %u %u %u\n",1U,2U,3U);*/
\r
86 /* save the palette */
\r
87 palette = modexNewPal();
\r
88 //====modexPalSave(pal);
\r
89 //====modexFadeOff(1, pal);
\r
90 //====modexPalBlack();
\r
93 IN_Default(0,&player,ctrl_Keyboard1);
\r
94 EN_initplayer(&player, 0, &gvar.video);
\r
96 VGAmodeX(1, 1, &gvar);
\r
99 /* load our palette */
\r
100 VL_LoadPalFile("data/16.pal", &gvar.video.palette);
\r
101 bmp1.offset=(paloffset/3);
\r
102 VL_palette(&bmp1, &gvar.video.palette, &paloffset, 0, 0);
\r
104 //VL_LoadPalFilewithoffset("data/default.pal", &palette, paloffset);
\r
105 modexLoadPalFile("data/16t.pal", &palette);
\r
106 bmp2.offset=(paloffset/3);
\r
107 VL_palette(&bmp2, palette, &paloffset, 0, 0);
\r
108 //====modexLoadPalFile("data/default.pal", &pal2);
\r
110 /* overscan show */
\r
111 //modexPalOverscan(44+1);
\r
113 /* set up the page, but with 16 pixels on all borders in offscreen mem */
\r
114 modexHiganbanaPageSetup(&gvar.video);
\r
115 ZC_MVSetup(&mv, &map, &gvar);
\r
117 /* fill the page with one color, but with a black border */
\r
118 /*modexClearRegion(&gvar.video.page[1], 0, 0, gvar.video.page[1].width, gvar.video.page[1].height, 15);
\r
119 modexClearRegion(&gvar.video.page[1], 16, 16, gvar.video.page[1].sw, gvar.video.page[1].sh, 128);
\r
120 modexClearRegion(&gvar.video.page[1], 32, 32, gvar.video.page[1].sw-32, gvar.video.page[1].sh-32, 42);
\r
121 modexClearRegion(&gvar.video.page[1], 48, 48, gvar.video.page[1].sw-64, gvar.video.page[1].sh-64, 128);
\r
122 modexShowPage(&gvar.video.page[1]);
\r
123 modexClearRegion(&gvar.video.page[0], 0, 0, gvar.video.page[0].width, gvar.video.page[0].height, 15);
\r
124 modexClearRegion(&gvar.video.page[0], 16, 16, gvar.video.page[0].sw, gvar.video.page[0].sh, 128);
\r
125 modexClearRegion(&gvar.video.page[0], 32, 32, gvar.video.page[0].sw-32, gvar.video.page[0].sh-32, 42);
\r
126 modexClearRegion(&gvar.video.page[0], 48, 48, gvar.video.page[0].sw-64, gvar.video.page[0].sh-64, 128);
\r
127 modexShowPage(&gvar.video.page[0]);*/
\r
130 modexClearRegion(&gvar.video.page[0], 0, 0, gvar.video.page[0].width, gvar.video.page[0].height, 1);
\r
131 modexClearRegion(&gvar.video.page[0], 16, 16, gvar.video.page[0].sw, gvar.video.page[0].sh, 2);
\r
132 modexClearRegion(&gvar.video.page[0], 32, 32, gvar.video.page[0].sw-32, gvar.video.page[0].sh-32, 3);
\r
133 modexClearRegion(&gvar.video.page[0], 48, 48, gvar.video.page[0].sw-64, gvar.video.page[0].sh-64, 2);
\r
134 modexCopyPageRegion(&gvar.video.page[1], &gvar.video.page[0], 0, 0, 0, 0, gvar.video.page[0].width, gvar.video.page[0].height);
\r
135 modexClearRegion(&gvar.video.page[2], 0, 0, gvar.video.page[2].sw, gvar.video.page[2].sh, 4);
\r
136 modexClearRegion(&gvar.video.page[3], 0, 0, gvar.video.page[3].sw, gvar.video.page[3].sh, 6);
\r
140 //====modexFadeOn(1, pal2);
\r
143 startclk = *clockw;
\r
144 while(!IN_KeyDown(sc_Escape))
\r
146 IN_ReadControl(0,&player);
\r
147 ZC_panPageManual(&mv, &player, 0);
\r
157 gvar.video.page[gvar.video.sp].dx++;
\r
158 if(i==5){ if(j>=31){ i++; j=0; goto baka; }else j++; }else
\r
159 if(j>=32){ k++; j=0; }else j++;
\r
163 gvar.video.page[gvar.video.sp].dx--;
\r
164 if(j>=32){ k++; j=0; }else j++;
\r
168 gvar.video.page[gvar.video.sp].dy++;
\r
169 if(j>=32){ k++; j=0; }else j++;
\r
173 gvar.video.page[gvar.video.sp].dy--;
\r
174 if(j>=32){ k=0; j=0; i++; }else j++;
\r
183 modexClearRegion(&gvar.video.page[1], 0, gvar.video.page[0].height/2, gvar.video.page[0].width-32, 16, 45);*/
\r
184 // if(IN_KeyDown(6))
\r
186 // modexClearRegion(&gvar.video.page[1], gvar.video.page[1].sw, 16, 8, 4, 45);
\r
188 // if(IN_KeyDown(4+1)){
\r
189 // modexClearRegion(&gvar.video.page[1], 16, 16, gvar.video.page[1].sw, gvar.video.page[1].sh, 128);
\r
190 // modexClearRegion(&gvar.video.page[1], 32, 32, gvar.video.page[1].sw-32, gvar.video.page[1].sh-32, 42);
\r
191 // modexClearRegion(&gvar.video.page[1], 48, 48, gvar.video.page[1].sw-64, gvar.video.page[1].sh-64, 128);
\r
195 if(IN_KeyDown(12)) modexClearRegion(&gvar.video.page[0], (gvar.video.page[0].width/2)-4, (gvar.video.page[0].height/2)-16, 24, 32, 15);
\r
196 if(IN_KeyDown(13)) modexClearRegion(&gvar.video.page[1], (gvar.video.page[1].width/2)-4, (gvar.video.page[1].height/2)-16, 24, 32, 15);
\r
197 /*==== if(IN_KeyDown(7)){
\r
200 pal2[i] = rand()%64;
\r
201 modexPalUpdate(pal2);
\r
203 if(colo>HGQ) colo=LGQ;
\r
205 // if(i>PAL_SIZE) i=0;
\r
207 if(IN_KeyDown(25)){ modexpdump(&gvar.video.page[gvar.video.sp]); IN_UserInput(1,1); }//p
\r
208 //VL_ShowPage(&gvar.video.page[gvar.video.sp], 0, 0);
\r
209 ZC_ShowMV(&mv, 0, 0);
\r
214 /* fade back to text mode */
\r
215 //====modexFadeOff(1, pal2);
\r
216 //====modexPalBlack();
\r
217 VGAmodeX(0, 1, &gvar);
\r
219 printf("Project 16 test.exe. This is just a test file!\n");
\r
220 printf("version %s\n", VERSION);
\r
221 VL_PrintmodexmemInfo(&gvar.video);
\r
222 printf("tx=%d ", mv[gvar.video.sp].tx); printf("ty=%d ", mv[gvar.video.sp].ty); printf("player.d=%d\n", player[0].enti.d);
\r
223 printf("\n====\n");
\r
224 printf("0 paloffset= %d\n", paloffset/3);
\r
225 printf("====\n\n");
\r
227 //====modexPalBlack();
\r
228 //====modexFadeOn(1, pal);
\r