c62d2810 |
1 | /* FCE Ultra - NES/Famicom Emulator |
2 | * |
3 | * Copyright notice for this file: |
4 | * Copyright (C) 2002 Ben Parnell |
5 | * |
6 | * This program is free software; you can redistribute it and/or modify |
7 | * it under the terms of the GNU General Public License as published by |
8 | * the Free Software Foundation; either version 2 of the License, or |
9 | * (at your option) any later version. |
10 | * |
11 | * This program is distributed in the hope that it will be useful, |
12 | * but WITHOUT ANY WARRANTY; without even the implied warranty of |
13 | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
14 | * GNU General Public License for more details. |
15 | * |
16 | * You should have received a copy of the GNU General Public License |
17 | * along with this program; if not, write to the Free Software |
18 | * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA |
19 | */ |
20 | |
21 | static int RecalcCustom(void); |
22 | |
23 | #define VF_DDSTRETCHED 1 |
24 | |
25 | #define VEF_LOSTSURFACE 1 |
26 | #define VEF____INTERNAL 2 |
27 | |
28 | #define VMDF_DXBLT 1 |
29 | #define VMDF_STRFS 2 |
30 | |
31 | typedef struct { |
32 | int x; |
33 | int y; |
34 | int bpp; |
35 | int flags; |
36 | int xscale; |
37 | int yscale; |
38 | RECT srect; |
39 | RECT drect; |
40 | } vmdef; |
41 | |
42 | // left, top, right, bottom |
43 | static vmdef vmodes[11]={ |
44 | {320,240,8,0,1,1}, //0 |
45 | {320,240,8,0,1,1}, //1 |
46 | {512,384,8,0,1,1}, //2 |
47 | {640,480,8,0,1,1}, //3 |
48 | {640,480,8,0,1,1}, //4 |
49 | {640,480,8,0,1,1}, //5 |
50 | {640,480,8,VMDF_DXBLT,2,2}, //6 |
51 | {1024,768,8,VMDF_DXBLT,4,3}, //7 |
52 | {1280,1024,8,VMDF_DXBLT,5,4}, //8 |
53 | {1600,1200,8,VMDF_DXBLT,6,5}, //9 |
54 | {800,600,8,VMDF_DXBLT|VMDF_STRFS,0,0} //10 |
55 | }; |
56 | static DDCAPS caps; |
57 | static int mustrestore=0; |
58 | static DWORD CBM[3]; |
59 | |
60 | static int bpp; |
61 | static int vflags; |
62 | static int veflags; |
63 | |
64 | int fssync=0; |
65 | int winsync=0; |
66 | |
67 | static uint32 *palettetranslate=0; |
68 | |
69 | PALETTEENTRY color_palette[256]; |
70 | static int PaletteChanged=0; |
71 | |
72 | LPDIRECTDRAWCLIPPER lpClipper=0; |
73 | LPDIRECTDRAW lpDD=0; |
74 | LPDIRECTDRAW4 lpDD4=0; |
75 | LPDIRECTDRAWPALETTE lpddpal; |
76 | |
77 | DDSURFACEDESC2 ddsd; |
78 | |
79 | DDSURFACEDESC2 ddsdback; |
80 | LPDIRECTDRAWSURFACE4 lpDDSPrimary=0; |
81 | LPDIRECTDRAWSURFACE4 lpDDSDBack=0; |
82 | LPDIRECTDRAWSURFACE4 lpDDSBack=0; |
83 | |
84 | static void ShowDDErr(char *s) |
85 | { |
86 | char tempo[512]; |
87 | sprintf(tempo,"DirectDraw: %s",s); |
88 | FCEUD_PrintError(tempo); |
89 | } |
90 | |
91 | int RestoreDD(int w) |
92 | { |
93 | if(w) |
94 | { |
95 | if(!lpDDSBack) return 0; |
96 | if(IDirectDrawSurface4_Restore(lpDDSBack)!=DD_OK) return 0; |
97 | } |
98 | else |
99 | { |
100 | if(!lpDDSPrimary) return 0; |
101 | if(IDirectDrawSurface4_Restore(lpDDSPrimary)!=DD_OK) return 0; |
102 | } |
103 | veflags|=1; |
104 | return 1; |
105 | } |
106 | |
107 | void FCEUD_SetPalette(unsigned char index, unsigned char r, unsigned char g, unsigned char b) |
108 | { |
109 | color_palette[index].peRed=r; |
110 | color_palette[index].peGreen=g; |
111 | color_palette[index].peBlue=b; |
112 | PaletteChanged=1; |
113 | } |
114 | |
115 | void FCEUD_GetPalette(unsigned char i, unsigned char *r, unsigned char *g, unsigned char *b) |
116 | { |
117 | *r=color_palette[i].peRed; |
118 | *g=color_palette[i].peGreen; |
119 | *b=color_palette[i].peBlue; |
120 | } |
121 | |
122 | int InitializeDDraw(void) |
123 | { |
124 | ddrval = DirectDrawCreate(NULL, &lpDD, NULL); |
125 | if (ddrval != DD_OK) |
126 | { |
127 | ShowDDErr("Error creating DirectDraw object."); |
128 | return 0; |
129 | } |
130 | |
131 | ddrval = IDirectDraw_QueryInterface(lpDD,&IID_IDirectDraw4,(LPVOID *)&lpDD4); |
132 | IDirectDraw_Release(lpDD); |
133 | |
134 | if (ddrval != DD_OK) |
135 | { |
136 | ShowDDErr("Error querying interface."); |
137 | return 0; |
138 | } |
139 | |
140 | caps.dwSize=sizeof(caps); |
141 | if(IDirectDraw4_GetCaps(lpDD4,&caps,0)!=DD_OK) |
142 | { |
143 | ShowDDErr("Error getting capabilities."); |
144 | return 0; |
145 | } |
146 | return 1; |
147 | } |
148 | |
149 | static int GetBPP(void) |
150 | { |
151 | DDPIXELFORMAT ddpix; |
152 | |
153 | memset(&ddpix,0,sizeof(ddpix)); |
154 | ddpix.dwSize=sizeof(ddpix); |
155 | |
156 | ddrval=IDirectDrawSurface4_GetPixelFormat(lpDDSPrimary,&ddpix); |
157 | if (ddrval != DD_OK) |
158 | { |
159 | ShowDDErr("Error getting primary surface pixel format."); |
160 | return 0; |
161 | } |
162 | |
163 | if(ddpix.dwFlags&DDPF_RGB) |
164 | { |
165 | bpp=ddpix.DUMMYUNIONNAMEN(1).dwRGBBitCount; |
166 | CBM[0]=ddpix.DUMMYUNIONNAMEN(2).dwRBitMask; |
167 | CBM[1]=ddpix.DUMMYUNIONNAMEN(3).dwGBitMask; |
168 | CBM[2]=ddpix.DUMMYUNIONNAMEN(4).dwBBitMask; |
169 | } |
170 | else |
171 | { |
172 | ShowDDErr("RGB data not valid."); |
173 | return 0; |
174 | } |
175 | if(bpp==15) bpp=16; |
176 | |
177 | return 1; |
178 | } |
179 | |
180 | static int InitBPPStuff(void) |
181 | { |
182 | if(bpp==16) |
183 | palettetranslate=malloc(65536*4); |
184 | else if(bpp>=24) |
185 | palettetranslate=malloc(256*4); |
186 | else if(bpp==8) |
187 | { |
188 | ddrval=IDirectDraw4_CreatePalette( lpDD4, DDPCAPS_8BIT|DDPCAPS_ALLOW256|DDPCAPS_INITIALIZE,color_palette,&lpddpal,NULL); |
189 | if (ddrval != DD_OK) |
190 | { |
191 | ShowDDErr("Error creating palette object."); |
192 | return 0; |
193 | } |
194 | ddrval=IDirectDrawSurface4_SetPalette(lpDDSPrimary, lpddpal); |
195 | if (ddrval != DD_OK) |
196 | { |
197 | ShowDDErr("Error setting palette object."); |
198 | return 0; |
199 | } |
200 | } |
201 | return 1; |
202 | } |
203 | |
204 | int SetVideoMode(int fs) |
205 | { |
206 | if(!lpDD4) // DirectDraw not initialized |
207 | return(1); |
208 | |
209 | if(fs) |
210 | if(!vmod) |
211 | if(!RecalcCustom()) |
212 | return(0); |
213 | |
214 | vflags=0; |
215 | veflags=1; |
216 | PaletteChanged=1; |
217 | |
218 | ResetVideo(); |
219 | |
220 | if(!fs) |
221 | { |
222 | ShowCursorAbs(1); |
223 | windowedfailed=1; |
224 | HideFWindow(0); |
225 | |
226 | ddrval = IDirectDraw4_SetCooperativeLevel ( lpDD4, hAppWnd, DDSCL_NORMAL); |
227 | if (ddrval != DD_OK) |
228 | { |
229 | ShowDDErr("Error setting cooperative level."); |
230 | return 1; |
231 | } |
232 | |
233 | /* Beginning */ |
234 | memset(&ddsd,0,sizeof(ddsd)); |
235 | ddsd.dwSize = sizeof(ddsd); |
236 | ddsd.dwFlags = DDSD_CAPS; |
237 | ddsd.ddsCaps.dwCaps = DDSCAPS_PRIMARYSURFACE; |
238 | |
239 | ddrval = IDirectDraw4_CreateSurface ( lpDD4, &ddsd, &lpDDSPrimary,(IUnknown FAR*)NULL); |
240 | if (ddrval != DD_OK) |
241 | { |
242 | ShowDDErr("Error creating primary surface."); |
243 | return 1; |
244 | } |
245 | |
246 | memset(&ddsdback,0,sizeof(ddsdback)); |
247 | ddsdback.dwSize=sizeof(ddsdback); |
248 | ddsdback.dwFlags = DDSD_CAPS | DDSD_HEIGHT | DDSD_WIDTH; |
249 | ddsdback.ddsCaps.dwCaps= DDSCAPS_OFFSCREENPLAIN; |
250 | |
251 | ddsdback.dwWidth=256; |
252 | ddsdback.dwHeight=240; |
253 | |
254 | /* If no blit hardware is present, make sure buffer is created |
255 | in system memory. |
256 | */ |
257 | if(!(caps.dwCaps&DDCAPS_BLT)) |
258 | ddsdback.ddsCaps.dwCaps|=DDSCAPS_SYSTEMMEMORY; |
259 | |
260 | ddrval = IDirectDraw4_CreateSurface ( lpDD4, &ddsdback, &lpDDSBack, (IUnknown FAR*)NULL); |
261 | if (ddrval != DD_OK) |
262 | { |
263 | ShowDDErr("Error creating secondary surface."); |
264 | return 0; |
265 | } |
266 | |
267 | if(!GetBPP()) |
268 | return 0; |
269 | |
270 | if(bpp!=16 && bpp!=24 && bpp!=32) |
271 | { |
272 | ShowDDErr("Current bit depth not supported!"); |
273 | return 0; |
274 | } |
275 | |
276 | if(!InitBPPStuff()) |
277 | return 0; |
278 | |
279 | ddrval=IDirectDraw4_CreateClipper(lpDD4,0,&lpClipper,0); |
280 | if (ddrval != DD_OK) |
281 | { |
282 | ShowDDErr("Error creating clipper."); |
283 | return 0; |
284 | } |
285 | |
286 | ddrval=IDirectDrawClipper_SetHWnd(lpClipper,0,hAppWnd); |
287 | if (ddrval != DD_OK) |
288 | { |
289 | ShowDDErr("Error setting clipper window."); |
290 | return 0; |
291 | } |
292 | ddrval=IDirectDrawSurface4_SetClipper(lpDDSPrimary,lpClipper); |
293 | if (ddrval != DD_OK) |
294 | { |
295 | ShowDDErr("Error attaching clipper to primary surface."); |
296 | return 0; |
297 | } |
298 | |
299 | windowedfailed=0; |
300 | SetMainWindowStuff(); |
301 | } |
302 | else |
303 | { |
304 | HideFWindow(1); |
305 | |
306 | ddrval = IDirectDraw4_SetCooperativeLevel ( lpDD4, hAppWnd,DDSCL_EXCLUSIVE | DDSCL_FULLSCREEN | DDSCL_ALLOWREBOOT); |
307 | if (ddrval != DD_OK) |
308 | { |
309 | ShowDDErr("Error setting cooperative level."); |
310 | return 0; |
311 | } |
312 | |
313 | ddrval = IDirectDraw4_SetDisplayMode(lpDD4, vmodes[vmod].x, vmodes[vmod].y,vmodes[vmod].bpp,0,0); |
314 | if (ddrval != DD_OK) |
315 | { |
316 | ShowDDErr("Error setting display mode."); |
317 | return 0; |
318 | } |
319 | if(vmodes[vmod].flags&VMDF_DXBLT) |
320 | { |
321 | memset(&ddsdback,0,sizeof(ddsdback)); |
322 | ddsdback.dwSize=sizeof(ddsdback); |
323 | ddsdback.dwFlags = DDSD_CAPS | DDSD_HEIGHT | DDSD_WIDTH; |
324 | ddsdback.ddsCaps.dwCaps= DDSCAPS_OFFSCREENPLAIN; |
325 | |
326 | ddsdback.dwWidth=256; //vmodes[vmod].srect.right; |
327 | ddsdback.dwHeight=240; //vmodes[vmod].srect.bottom; |
328 | |
329 | if(!(caps.dwCaps&DDCAPS_BLT)) |
330 | ddsdback.ddsCaps.dwCaps|=DDSCAPS_SYSTEMMEMORY; |
331 | |
332 | ddrval = IDirectDraw4_CreateSurface ( lpDD4, &ddsdback, &lpDDSBack, (IUnknown FAR*)NULL); |
333 | if(ddrval!=DD_OK) |
334 | { |
335 | ShowDDErr("Error creating secondary surface."); |
336 | return 0; |
337 | } |
338 | } |
339 | |
340 | // create foreground surface |
341 | |
342 | memset(&ddsd,0,sizeof(ddsd)); |
343 | ddsd.dwSize = sizeof(ddsd); |
344 | |
345 | ddsd.dwFlags = DDSD_CAPS; |
346 | ddsd.ddsCaps.dwCaps = DDSCAPS_PRIMARYSURFACE; |
347 | |
348 | if(fssync==2) // Double buffering. |
349 | { |
350 | ddsd.dwFlags |= DDSD_BACKBUFFERCOUNT; |
351 | ddsd.dwBackBufferCount = 1; |
352 | ddsd.ddsCaps.dwCaps |= DDSCAPS_COMPLEX | DDSCAPS_FLIP; |
353 | } |
354 | |
355 | ddrval = IDirectDraw4_CreateSurface ( lpDD4, &ddsd, &lpDDSPrimary,(IUnknown FAR*)NULL); |
356 | if (ddrval != DD_OK) |
357 | { |
358 | ShowDDErr("Error creating primary surface."); |
359 | return 0; |
360 | } |
361 | |
362 | if(fssync==2) |
363 | { |
364 | DDSCAPS2 tmp; |
365 | |
366 | memset(&tmp,0,sizeof(tmp)); |
367 | tmp.dwCaps=DDSCAPS_BACKBUFFER; |
368 | |
369 | if(IDirectDrawSurface4_GetAttachedSurface(lpDDSPrimary,&tmp,&lpDDSDBack)!=DD_OK) |
370 | { |
371 | ShowDDErr("Error getting attached surface."); |
372 | return 0; |
373 | } |
374 | } |
375 | |
376 | if(!GetBPP()) |
377 | return 0; |
378 | if(!InitBPPStuff()) |
379 | return 0; |
380 | |
381 | mustrestore=1; |
382 | ShowCursorAbs(0); |
383 | } |
384 | |
385 | InputScreenChanged(fs); |
386 | fullscreen=fs; |
387 | return 1; |
388 | } |
389 | |
390 | static void BlitScreenWindow(uint8 *XBuf); |
391 | static void BlitScreenFull(uint8 *XBuf); |
392 | |
393 | void FCEUD_BlitScreen(uint8 *XBuf) |
394 | { |
395 | doagain: |
396 | |
397 | UpdateFCEUWindow(); |
398 | |
399 | if(!(eoptions&EO_BGRUN)) |
400 | while(nofocus) |
401 | { |
402 | Sleep(50); |
403 | BlockingCheck(); |
404 | } |
405 | |
406 | |
407 | /* This complex statement deserves some explanation. |
408 | Make sure this special speed throttling hasn't been disabled by the user |
409 | first. Second, we don't want to throttle the speed if the fast-forward |
410 | button is pressed down(or during certain network play conditions). |
411 | |
412 | Now, if we're at this point, we'll throttle speed if sound is disabled. |
413 | Otherwise, it gets a bit more complicated. We'll throttle speed if focus |
414 | to FCE Ultra has been lost and we're writing to the primary sound buffer |
415 | because our sound code won't block. Blocking does seem to work when |
416 | writing to a secondary buffer, so we won't throttle when a secondary |
417 | buffer is used. |
418 | */ |
419 | |
420 | if(!(eoptions&EO_NOTHROTTLE)) |
421 | if(!NoWaiting) |
422 | if(!soundo || (soundo && nofocus && !(soundoptions&SO_SECONDARY)) ) |
423 | SpeedThrottle(); |
424 | |
425 | if(fullscreen) |
426 | { |
427 | if(fssync==1 && !NoWaiting) |
428 | IDirectDraw4_WaitForVerticalBlank(lpDD4,DDWAITVB_BLOCKBEGIN,0); |
429 | |
430 | BlitScreenFull(XBuf); |
431 | } |
432 | else |
433 | { |
434 | if(winsync && !NoWaiting) |
435 | IDirectDraw4_WaitForVerticalBlank(lpDD4,DDWAITVB_BLOCKBEGIN,0); |
436 | |
437 | if(!windowedfailed) |
438 | BlitScreenWindow(XBuf); |
439 | } |
440 | if(userpause) |
441 | { |
442 | StopSound(); |
443 | Sleep(50); |
444 | BlockingCheck(); |
445 | goto doagain; |
446 | } |
447 | } |
448 | |
449 | static INLINE void BlitVidHi(uint8 *src, uint8 *dest, /*int xr,*/ int yr, int pitch) |
450 | { |
451 | int x,y; |
452 | int pinc; |
453 | |
454 | if(!(eoptions&EO_CLIPSIDES)) |
455 | switch(bpp) |
456 | { |
457 | case 32: |
458 | |
459 | pinc=pitch-(256<<2); |
460 | for(y=yr;y;y--) |
461 | { |
462 | for(x=256;x;x--) |
463 | { |
464 | *(uint32 *)dest=palettetranslate[(uint32)*src]; |
465 | dest+=4; |
466 | src++; |
467 | } |
468 | dest+=pinc; |
469 | src+=16; |
470 | } |
471 | break; |
472 | |
473 | case 24: |
474 | pinc=pitch-(256*3); |
475 | for(y=yr;y;y--) |
476 | { |
477 | for(x=256;x;x--) |
478 | { |
479 | uint32 tmp; |
480 | tmp=palettetranslate[(uint32)*src]; |
481 | *(uint16*)dest=(uint16)tmp; |
482 | *&dest[2]=(uint8)(tmp>>16); |
483 | dest+=3; |
484 | src++; |
485 | } |
486 | dest+=pinc; |
487 | src+=16; |
488 | } |
489 | break; |
490 | |
491 | case 16: |
492 | pinc=pitch-(256<<1); |
493 | for(y=yr;y;y--) |
494 | { |
495 | for(x=256>>1;x;x--) |
496 | { |
497 | *(unsigned long *)dest=palettetranslate[*(unsigned short *)src]; |
498 | dest+=4; |
499 | src+=2; |
500 | } |
501 | dest+=pinc; |
502 | src+=16; |
503 | } |
504 | break; |
505 | } |
506 | else |
507 | switch(bpp) |
508 | { |
509 | case 32: |
510 | |
511 | pinc=pitch-(240<<2); |
512 | for(y=yr;y;y--) |
513 | { |
514 | for(x=240;x;x--) |
515 | { |
516 | *(uint32 *)dest=palettetranslate[(uint32)*src]; |
517 | dest+=4; |
518 | src++; |
519 | } |
520 | dest+=pinc; |
521 | src+=32; |
522 | } |
523 | break; |
524 | |
525 | case 24: |
526 | pinc=pitch-(240*3); |
527 | for(y=yr;y;y--) |
528 | { |
529 | for(x=240;x;x--) |
530 | { |
531 | uint32 tmp; |
532 | tmp=palettetranslate[(uint32)*src]; |
533 | *(uint16*)dest=(uint16)tmp; |
534 | *&dest[2]=(uint8)(tmp>>16); |
535 | dest+=3; |
536 | src++; |
537 | } |
538 | dest+=pinc; |
539 | src+=32; |
540 | } |
541 | break; |
542 | case 16: |
543 | pinc=pitch-(240<<1); |
544 | for(y=yr;y;y--) |
545 | { |
546 | for(x=240>>1;x;x--) |
547 | { |
548 | *(unsigned long *)dest=palettetranslate[*(unsigned short *)src]; |
549 | dest+=4; |
550 | src+=2; |
551 | } |
552 | dest+=pinc; |
553 | src+=32; |
554 | } |
555 | break; |
556 | } |
557 | } |
558 | |
559 | static INLINE void FixPaletteHi(void) |
560 | { |
561 | int x; |
562 | |
563 | switch(bpp) |
564 | { |
565 | case 16:{ |
566 | int cshiftr[3]; |
567 | int cshiftl[3]; |
568 | int a,x,z,y; |
569 | |
570 | cshiftl[0]=cshiftl[1]=cshiftl[2]=-1; |
571 | for(a=0;a<3;a++) |
572 | { |
573 | for(x=0,y=-1,z=0;x<16;x++) |
574 | { |
575 | if(CBM[a]&(1<<x)) |
576 | { |
577 | if(cshiftl[a]==-1) cshiftl[a]=x; |
578 | z++; |
579 | } |
580 | } |
581 | cshiftr[a]=(8-z); |
582 | } |
583 | |
584 | for(x=0;x<65536;x++) |
585 | { |
586 | uint16 lower,upper; |
587 | lower=(color_palette[x&255].peRed>>cshiftr[0])<<cshiftl[0]; |
588 | lower|=(color_palette[x&255].peGreen>>cshiftr[1])<<cshiftl[1]; |
589 | lower|=(color_palette[x&255].peBlue>>cshiftr[2])<<cshiftl[2]; |
590 | upper=(color_palette[x>>8].peRed>>cshiftr[0])<<cshiftl[0]; |
591 | upper|=(color_palette[x>>8].peGreen>>cshiftr[1])<<cshiftl[1]; |
592 | upper|=(color_palette[x>>8].peBlue>>cshiftr[2])<<cshiftl[2]; |
593 | palettetranslate[x]=lower|(upper<<16); |
594 | } |
595 | } |
596 | break; |
597 | case 24: |
598 | case 32: |
599 | for(x=0;x<256;x++) |
600 | { |
601 | uint32 t; |
602 | t=0; |
603 | t=color_palette[x].peBlue; |
604 | t|=color_palette[x].peGreen<<8; |
605 | t|=color_palette[x].peRed<<16; |
606 | palettetranslate[x]=t; |
607 | } |
608 | break; |
609 | } |
610 | } |
611 | |
612 | static void BlitScreenWindow(unsigned char *XBuf) |
613 | { |
614 | int pitch; |
615 | unsigned char *ScreenLoc; |
616 | static RECT srect; |
617 | RECT drect; |
618 | |
619 | srect.top=srect.left=0; |
620 | srect.right=VNSWID; |
621 | srect.bottom=totallines; |
622 | |
623 | if(PaletteChanged==1) |
624 | { |
625 | FixPaletteHi(); |
626 | PaletteChanged=0; |
627 | } |
628 | if(!GetClientAbsRect(&drect)) return; |
629 | |
630 | ddrval=IDirectDrawSurface4_Lock(lpDDSBack,NULL,&ddsdback, 0, NULL); |
631 | if(ddrval!=DD_OK) |
632 | { |
633 | if(ddrval==DDERR_SURFACELOST) RestoreDD(1); |
634 | return; |
635 | } |
636 | pitch=ddsdback.DUMMYUNIONNAMEN(1).lPitch; |
637 | ScreenLoc=ddsdback.lpSurface; |
638 | |
639 | if(veflags&1) |
640 | { |
641 | memset(ScreenLoc,0,pitch*240); |
642 | veflags&=~1; |
643 | } |
644 | |
645 | BlitVidHi(XBuf+srendline*272+VNSCLIP, ScreenLoc, /*VNSWID,*/ totallines, pitch); |
646 | |
647 | IDirectDrawSurface4_Unlock(lpDDSBack, NULL); |
648 | |
649 | if(IDirectDrawSurface4_Blt(lpDDSPrimary, &drect,lpDDSBack,&srect,DDBLT_ASYNC,0)!=DD_OK) |
650 | { |
651 | ddrval=IDirectDrawSurface4_Blt(lpDDSPrimary, &drect,lpDDSBack,&srect,DDBLT_WAIT,0); |
652 | if(ddrval!=DD_OK) |
653 | { |
654 | if(ddrval==DDERR_SURFACELOST) {RestoreDD(1);RestoreDD(0);} |
655 | return; |
656 | } |
657 | } |
658 | } |
659 | |
660 | static void BlitScreenFull(uint8 *XBuf) |
661 | { |
662 | static int pitch; |
663 | char *ScreenLoc; |
664 | unsigned long x; |
665 | uint8 y; |
666 | RECT srect,drect; |
667 | LPDIRECTDRAWSURFACE4 lpDDSVPrimary; |
668 | |
669 | |
670 | if(fssync==2) |
671 | lpDDSVPrimary=lpDDSDBack; |
672 | else |
673 | lpDDSVPrimary=lpDDSPrimary; |
674 | |
675 | if(PaletteChanged==1) |
676 | { |
677 | if(bpp>=16) |
678 | FixPaletteHi(); |
679 | else |
680 | for(x=0;x<=0x80;x+=0x80) |
681 | { |
682 | ddrval=IDirectDrawPalette_SetEntries(lpddpal,0,0x80^x,128,&color_palette[x]); |
683 | if(ddrval!=DD_OK) |
684 | { |
685 | if(ddrval==DDERR_SURFACELOST) RestoreDD(0); |
686 | return; |
687 | } |
688 | } |
689 | PaletteChanged=0; |
690 | } |
691 | |
692 | if(vmodes[vmod].flags&VMDF_DXBLT) |
693 | { |
694 | ddrval=IDirectDrawSurface4_Lock(lpDDSBack,NULL,&ddsdback, 0, NULL); |
695 | if(ddrval!=DD_OK) |
696 | { |
697 | if(ddrval==DDERR_SURFACELOST) RestoreDD(1); |
698 | return; |
699 | } |
700 | ScreenLoc=ddsdback.lpSurface; |
701 | pitch=ddsdback.DUMMYUNIONNAMEN(1).lPitch; |
702 | |
703 | srect.top=0; |
704 | srect.left=0; |
705 | srect.right=VNSWID; |
706 | srect.bottom=totallines; |
707 | if(vmodes[vmod].flags&VMDF_STRFS) |
708 | { |
709 | drect.top=0; |
710 | drect.left=0; |
711 | drect.right=vmodes[vmod].x; |
712 | drect.bottom=vmodes[vmod].y; |
713 | } |
714 | else |
715 | { |
716 | drect.top=(vmodes[vmod].y-(totallines*vmodes[vmod].yscale))>>1; |
717 | drect.bottom=drect.top+(totallines*vmodes[vmod].yscale); |
718 | drect.left=(vmodes[vmod].x-VNSWID*vmodes[vmod].xscale)>>1; |
719 | drect.right=drect.left+VNSWID*vmodes[vmod].xscale; |
720 | } |
721 | } |
722 | else |
723 | { |
724 | ddrval=IDirectDrawSurface4_Lock(lpDDSVPrimary,NULL,&ddsd, 0, NULL); |
725 | if(ddrval!=DD_OK) |
726 | { |
727 | if(ddrval==DDERR_SURFACELOST) RestoreDD(0); |
728 | return; |
729 | } |
730 | |
731 | ScreenLoc=ddsd.lpSurface; |
732 | pitch=ddsd.DUMMYUNIONNAMEN(1).lPitch; |
733 | } |
734 | |
735 | if(veflags&1) |
736 | { |
737 | if(vmodes[vmod].flags&VMDF_DXBLT) |
738 | { |
739 | veflags|=2; |
740 | memset((char *)ScreenLoc,0,pitch*srect.bottom); |
741 | } |
742 | else |
743 | { |
744 | memset((char *)ScreenLoc,0,pitch*vmodes[vmod].y); |
745 | } |
746 | PaletteChanged=1; |
747 | veflags&=~1; |
748 | } |
749 | |
750 | if(vmod==5) |
751 | { |
752 | if(eoptions&EO_CLIPSIDES) |
753 | { |
754 | asm volatile( |
755 | "xorl %%edx, %%edx\n\t" |
756 | "akoop1:\n\t" |
757 | "movb $120,%%al \n\t" |
758 | "akoop2:\n\t" |
759 | "movb 1(%%esi),%%dl\n\t" |
760 | "shl $16,%%edx\n\t" |
761 | "movb (%%esi),%%dl\n\t" |
762 | "xorl $0x00800080,%%edx\n\t" |
763 | "movl %%edx,(%%edi)\n\t" |
764 | "addl $2,%%esi\n\t" |
765 | "addl $4,%%edi\n\t" |
766 | "decb %%al\n\t" |
767 | "jne akoop2\n\t" |
768 | "addl $32,%%esi\n\t" |
769 | "addl %%ecx,%%edi\n\t" |
770 | "decb %%bl\n\t" |
771 | "jne akoop1\n\t" |
772 | : |
773 | : "S" (XBuf+srendline*272+VNSCLIP), "D" (ScreenLoc+((240-totallines)/2)*pitch+(640-(VNSWID<<1))/2),"b" (totallines), "c" ((pitch-VNSWID)<<1) |
774 | : "%al", "%edx", "%cc" ); |
775 | } |
776 | else |
777 | { |
778 | asm volatile( |
779 | "xorl %%edx, %%edx\n\t" |
780 | "koop1:\n\t" |
781 | "movb $128,%%al \n\t" |
782 | "koop2:\n\t" |
783 | "movb 1(%%esi),%%dl\n\t" |
784 | "shl $16,%%edx\n\t" |
785 | "movb (%%esi),%%dl\n\t" |
786 | "xorl $0x00800080,%%edx\n\t" |
787 | "movl %%edx,(%%edi)\n\t" |
788 | "addl $2,%%esi\n\t" |
789 | "addl $4,%%edi\n\t" |
790 | "decb %%al\n\t" |
791 | "jne koop2\n\t" |
792 | "addl $16,%%esi\n\t" |
793 | "addl %%ecx,%%edi\n\t" |
794 | "decb %%bl\n\t" |
795 | "jne koop1\n\t" |
796 | : |
797 | : "S" (XBuf+srendline*272), "D" (ScreenLoc+((240-totallines)/2)*pitch+(640-512)/2),"b" (totallines), "c" (pitch-512+pitch) |
798 | : "%al", "%edx", "%cc" ); |
799 | } |
800 | } |
801 | else if(vmod==4) |
802 | { |
803 | if(eoptions&EO_CLIPSIDES) |
804 | { |
805 | asm volatile( |
806 | "ayoop1:\n\t" |
807 | "movb $120,%%al \n\t" |
808 | "ayoop2:\n\t" |
809 | "movb 1(%%esi),%%dh\n\t" |
810 | "movb %%dh,%%dl\n\t" |
811 | "shl $16,%%edx\n\t" |
812 | "movb (%%esi),%%dl\n\t" |
813 | "movb %%dl,%%dh\n\t" // Ugh |
814 | "xorl $0x80808080,%%edx\n\t" |
815 | "movl %%edx,(%%edi)\n\t" |
816 | "addl $2,%%esi\n\t" |
817 | "addl $4,%%edi\n\t" |
818 | "decb %%al\n\t" |
819 | "jne ayoop2\n\t" |
820 | "addl $32,%%esi\n\t" |
821 | "addl %%ecx,%%edi\n\t" |
822 | "decb %%bl\n\t" |
823 | "jne ayoop1\n\t" |
824 | : |
825 | : "S" (XBuf+srendline*272+VNSCLIP), "D" (ScreenLoc+((240-totallines)/2)*pitch+(640-(VNSWID<<1))/2),"b" (totallines), "c" ((pitch-VNSWID)<<1) |
826 | : "%al", "%edx", "%cc" ); |
827 | } |
828 | else |
829 | { |
830 | asm volatile( |
831 | "yoop1:\n\t" |
832 | "movb $128,%%al \n\t" |
833 | "yoop2:\n\t" |
834 | "movb 1(%%esi),%%dh\n\t" |
835 | "movb %%dh,%%dl\n\t" |
836 | "shl $16,%%edx\n\t" |
837 | "movb (%%esi),%%dl\n\t" |
838 | "movb %%dl,%%dh\n\t" // Ugh |
839 | "xorl $0x80808080,%%edx\n\t" |
840 | "movl %%edx,(%%edi)\n\t" |
841 | "addl $2,%%esi\n\t" |
842 | "addl $4,%%edi\n\t" |
843 | "decb %%al\n\t" |
844 | "jne yoop2\n\t" |
845 | "addl $16,%%esi\n\t" |
846 | "addl %%ecx,%%edi\n\t" |
847 | "decb %%bl\n\t" |
848 | "jne yoop1\n\t" |
849 | : |
850 | : "S" (XBuf+srendline*272), "D" (ScreenLoc+((240-totallines)/2)*pitch+(640-512)/2),"b" (totallines), "c" (pitch-512+pitch) |
851 | : "%al", "%edx", "%cc" ); |
852 | } |
853 | } |
854 | else |
855 | { |
856 | if(!(vmodes[vmod].flags&VMDF_DXBLT)) |
857 | { |
858 | ScreenLoc+=((vmodes[vmod].x-VNSWID)>>1)*(bpp>>3)+(((vmodes[vmod].y-totallines)>>1))*pitch; |
859 | } |
860 | if(bpp>=16) |
861 | { |
862 | BlitVidHi(XBuf+srendline*272+VNSCLIP, ScreenLoc, /*VNSWID,*/ totallines, pitch); |
863 | } |
864 | else |
865 | { |
866 | XBuf+=srendline*272+VNSCLIP; |
867 | if(eoptions&EO_CLIPSIDES) |
868 | { |
869 | for(y=totallines;y;y--) |
870 | { |
871 | for(x=60;x;x--) |
872 | { |
873 | *(long *)ScreenLoc=(*(long *)XBuf)^0x80808080; |
874 | ScreenLoc+=4; |
875 | XBuf+=4; |
876 | } |
877 | ScreenLoc+=pitch-240; |
878 | XBuf+=32; |
879 | } |
880 | } |
881 | else |
882 | { |
883 | for(y=totallines;y;y--) |
884 | { |
885 | for(x=64;x;x--) |
886 | { |
887 | *(long *)ScreenLoc=(*(long *)XBuf)^0x80808080; |
888 | ScreenLoc+=4; |
889 | XBuf+=4; |
890 | } |
891 | ScreenLoc+=pitch-256; |
892 | XBuf+=16; |
893 | } |
894 | } |
895 | } |
896 | } |
897 | |
898 | if(vmodes[vmod].flags&VMDF_DXBLT) |
899 | { |
900 | IDirectDrawSurface4_Unlock(lpDDSBack, NULL); |
901 | |
902 | if(veflags&2) |
903 | { |
904 | if(IDirectDrawSurface4_Lock(lpDDSVPrimary,NULL,&ddsd, 0, NULL)==DD_OK) |
905 | { |
906 | memset(ddsd.lpSurface,0,ddsd.DUMMYUNIONNAMEN(1).lPitch*vmodes[vmod].y); |
907 | IDirectDrawSurface4_Unlock(lpDDSVPrimary, NULL); |
908 | veflags&=~2; |
909 | } |
910 | } |
911 | |
912 | |
913 | if(IDirectDrawSurface4_Blt(lpDDSVPrimary, &drect,lpDDSBack,&srect,DDBLT_ASYNC,0)!=DD_OK) |
914 | { |
915 | ddrval=IDirectDrawSurface4_Blt(lpDDSVPrimary, &drect,lpDDSBack,&srect,DDBLT_WAIT,0); |
916 | if(ddrval!=DD_OK) |
917 | { |
918 | if(ddrval==DDERR_SURFACELOST) |
919 | { |
920 | RestoreDD(0); |
921 | RestoreDD(1); |
922 | } |
923 | return; |
924 | } |
925 | |
926 | } |
927 | } |
928 | else |
929 | IDirectDrawSurface4_Unlock(lpDDSVPrimary, NULL); |
930 | if(fssync==2) |
931 | { |
932 | IDirectDrawSurface4_Flip(lpDDSPrimary,0,0); |
933 | |
934 | } |
935 | } |
936 | |
937 | void ResetVideo(void) |
938 | { |
939 | ShowCursorAbs(1); |
940 | if(palettetranslate) {free(palettetranslate);palettetranslate=0;} |
941 | if(lpDD4) |
942 | if(mustrestore) |
943 | {IDirectDraw4_RestoreDisplayMode(lpDD4);mustrestore=0;} |
944 | if(lpDDSBack) {IDirectDrawSurface4_Release(lpDDSBack);lpDDSBack=0;} |
945 | if(lpDDSPrimary) {IDirectDrawSurface4_Release(lpDDSPrimary);lpDDSPrimary=0;} |
946 | if(lpClipper) {IDirectDrawClipper_Release(lpClipper);lpClipper=0;} |
947 | } |
948 | |
949 | static int RecalcCustom(void) |
950 | { |
951 | vmodes[0].flags&=~VMDF_DXBLT; |
952 | |
953 | if(vmodes[0].flags&VMDF_STRFS) |
954 | { |
955 | vmodes[0].flags|=VMDF_DXBLT; |
956 | |
957 | vmodes[0].srect.top=srendline; |
958 | vmodes[0].srect.left=VNSCLIP; |
959 | vmodes[0].srect.right=256-VNSCLIP; |
960 | vmodes[0].srect.bottom=erendline+1; |
961 | |
962 | vmodes[0].drect.top=vmodes[0].drect.left=0; |
963 | vmodes[0].drect.right=vmodes[0].x; |
964 | vmodes[0].drect.bottom=vmodes[0].y; |
965 | } |
966 | else if(vmodes[0].xscale!=1 || vmodes[0].yscale!=1) |
967 | { |
968 | vmodes[0].flags|=VMDF_DXBLT; |
969 | if(VNSWID*vmodes[0].xscale>vmodes[0].x) |
970 | { |
971 | FCEUD_PrintError("Scaled width is out of range. Reverting to no horizontal scaling."); |
972 | vmodes[0].xscale=1; |
973 | } |
974 | if(totallines*vmodes[0].yscale>vmodes[0].y) |
975 | { |
976 | FCEUD_PrintError("Scaled height is out of range. Reverting to no vertical scaling."); |
977 | vmodes[0].yscale=1; |
978 | } |
979 | |
980 | vmodes[0].srect.left=VNSCLIP; |
981 | vmodes[0].srect.top=srendline; |
982 | vmodes[0].srect.right=256-VNSCLIP; |
983 | vmodes[0].srect.bottom=erendline+1; |
984 | |
985 | vmodes[0].drect.top=(vmodes[0].y-(totallines*vmodes[0].yscale))>>1; |
986 | vmodes[0].drect.bottom=vmodes[0].drect.top+totallines*vmodes[0].yscale; |
987 | |
988 | vmodes[0].drect.left=(vmodes[0].x-(VNSWID*vmodes[0].xscale))>>1; |
989 | vmodes[0].drect.right=vmodes[0].drect.left+VNSWID*vmodes[0].xscale; |
990 | } |
991 | |
992 | if(vmodes[0].x<VNSWID) |
993 | { |
994 | FCEUD_PrintError("Horizontal resolution is too low."); |
995 | return(0); |
996 | } |
997 | if(vmodes[0].y<totallines && !(vmodes[0].flags&VMDF_STRFS)) |
998 | { |
999 | FCEUD_PrintError("Vertical resolution must not be less than the total number of drawn scanlines."); |
1000 | return(0); |
1001 | } |
1002 | |
1003 | return(1); |
1004 | } |
1005 | |
1006 | BOOL CALLBACK VideoConCallB(HWND hwndDlg, UINT uMsg, WPARAM wParam, LPARAM lParam) |
1007 | { |
1008 | static char *vmstr[11]={ |
1009 | "Custom", |
1010 | "320x240 Full Screen", |
1011 | "512x384 Centered", |
1012 | "640x480 Centered", |
1013 | "640x480 Scanlines", |
1014 | "640x480 \"4 per 1\"", |
1015 | "640x480 2x,2y", |
1016 | "1024x768 4x,3y", |
1017 | "1280x1024 5x,4y", |
1018 | "1600x1200 6x,5y", |
1019 | "800x600 Stretched" |
1020 | }; |
1021 | int x; |
1022 | |
1023 | switch(uMsg) |
1024 | { |
1025 | case WM_INITDIALOG: |
1026 | for(x=0;x<11;x++) |
1027 | SendDlgItemMessage(hwndDlg,100,CB_ADDSTRING,0,(LPARAM)(LPSTR)vmstr[x]); |
1028 | SendDlgItemMessage(hwndDlg,100,CB_SETCURSEL,vmod,(LPARAM)(LPSTR)0); |
1029 | |
1030 | SendDlgItemMessage(hwndDlg,202,CB_ADDSTRING,0,(LPARAM)(LPSTR)"8"); |
1031 | SendDlgItemMessage(hwndDlg,202,CB_ADDSTRING,0,(LPARAM)(LPSTR)"16"); |
1032 | SendDlgItemMessage(hwndDlg,202,CB_ADDSTRING,0,(LPARAM)(LPSTR)"24"); |
1033 | SendDlgItemMessage(hwndDlg,202,CB_ADDSTRING,0,(LPARAM)(LPSTR)"32"); |
1034 | SendDlgItemMessage(hwndDlg,202,CB_SETCURSEL,(vmodes[0].bpp>>3)-1,(LPARAM)(LPSTR)0); |
1035 | |
1036 | SetDlgItemInt(hwndDlg,200,vmodes[0].x,0); |
1037 | SetDlgItemInt(hwndDlg,201,vmodes[0].y,0); |
1038 | |
1039 | SetDlgItemInt(hwndDlg,302,vmodes[0].xscale,0); |
1040 | SetDlgItemInt(hwndDlg,303,vmodes[0].yscale,0); |
1041 | CheckRadioButton(hwndDlg,300,301,(vmodes[0].flags&VMDF_STRFS)?301:300); |
1042 | if(eoptions&EO_FSAFTERLOAD) |
1043 | CheckDlgButton(hwndDlg,102,BST_CHECKED); |
1044 | |
1045 | if(eoptions&EO_CLIPSIDES) |
1046 | CheckDlgButton(hwndDlg,106,BST_CHECKED); |
1047 | |
1048 | SetDlgItemInt(hwndDlg,500,srendlinen,0); |
1049 | SetDlgItemInt(hwndDlg,501,erendlinen,0); |
1050 | |
1051 | SetDlgItemInt(hwndDlg,502,srendlinep,0); |
1052 | SetDlgItemInt(hwndDlg,503,erendlinep,0); |
1053 | |
1054 | |
1055 | SetDlgItemInt(hwndDlg,103,winsizemul,0); |
1056 | |
1057 | SendDlgItemMessage(hwndDlg,104,CB_ADDSTRING,0,(LPARAM)(LPSTR)"<none>"); |
1058 | SendDlgItemMessage(hwndDlg,105,CB_ADDSTRING,0,(LPARAM)(LPSTR)"<none>"); |
1059 | |
1060 | SendDlgItemMessage(hwndDlg,104,CB_ADDSTRING,0,(LPARAM)(LPSTR)"Wait for VBlank"); |
1061 | SendDlgItemMessage(hwndDlg,105,CB_ADDSTRING,0,(LPARAM)(LPSTR)"Wait for VBlank"); |
1062 | |
1063 | SendDlgItemMessage(hwndDlg,105,CB_ADDSTRING,0,(LPARAM)(LPSTR)"Double Buffering"); |
1064 | |
1065 | SendDlgItemMessage(hwndDlg,104,CB_SETCURSEL,winsync,(LPARAM)(LPSTR)0); |
1066 | SendDlgItemMessage(hwndDlg,105,CB_SETCURSEL,fssync,(LPARAM)(LPSTR)0); |
1067 | break; |
1068 | case WM_CLOSE: |
1069 | case WM_QUIT: goto gornk; |
1070 | case WM_COMMAND: |
1071 | if(!(wParam>>16)) |
1072 | switch(wParam&0xFFFF) |
1073 | { |
1074 | case 1: |
1075 | gornk: |
1076 | |
1077 | if(IsDlgButtonChecked(hwndDlg,106)==BST_CHECKED) |
1078 | eoptions|=EO_CLIPSIDES; |
1079 | else |
1080 | eoptions&=~EO_CLIPSIDES; |
1081 | |
1082 | srendlinen=GetDlgItemInt(hwndDlg,500,0,0); |
1083 | erendlinen=GetDlgItemInt(hwndDlg,501,0,0); |
1084 | srendlinep=GetDlgItemInt(hwndDlg,502,0,0); |
1085 | erendlinep=GetDlgItemInt(hwndDlg,503,0,0); |
1086 | |
1087 | |
1088 | if(erendlinen>239) erendlinen=239; |
1089 | if(srendlinen>erendlinen) srendlinen=erendlinen; |
1090 | |
1091 | if(erendlinep>239) erendlinep=239; |
1092 | if(srendlinep>erendlinen) srendlinep=erendlinep; |
1093 | |
1094 | UpdateRendBounds(); |
1095 | |
1096 | if(IsDlgButtonChecked(hwndDlg,301)==BST_CHECKED) |
1097 | vmodes[0].flags|=VMDF_STRFS; |
1098 | else |
1099 | vmodes[0].flags&=~VMDF_STRFS; |
1100 | |
1101 | vmod=SendDlgItemMessage(hwndDlg,100,CB_GETCURSEL,0,(LPARAM)(LPSTR)0); |
1102 | vmodes[0].x=GetDlgItemInt(hwndDlg,200,0,0); |
1103 | vmodes[0].y=GetDlgItemInt(hwndDlg,201,0,0); |
1104 | vmodes[0].bpp=(SendDlgItemMessage(hwndDlg,202,CB_GETCURSEL,0,(LPARAM)(LPSTR)0)+1)<<3; |
1105 | |
1106 | vmodes[0].xscale=GetDlgItemInt(hwndDlg,302,0,0); |
1107 | vmodes[0].yscale=GetDlgItemInt(hwndDlg,303,0,0); |
1108 | |
1109 | if(IsDlgButtonChecked(hwndDlg,101)==BST_CHECKED) |
1110 | fullscreen=1; |
1111 | else |
1112 | fullscreen=0; |
1113 | if(IsDlgButtonChecked(hwndDlg,102)==BST_CHECKED) |
1114 | eoptions|=EO_FSAFTERLOAD; |
1115 | else |
1116 | eoptions&=~EO_FSAFTERLOAD; |
1117 | |
1118 | { |
1119 | int t=GetDlgItemInt(hwndDlg,103,0,0); |
1120 | if(t>0 && t<60) |
1121 | winsizemul=t; |
1122 | } |
1123 | winsync=SendDlgItemMessage(hwndDlg,104,CB_GETCURSEL,0,(LPARAM)(LPSTR)0); |
1124 | fssync=SendDlgItemMessage(hwndDlg,105,CB_GETCURSEL,0,(LPARAM)(LPSTR)0); |
1125 | EndDialog(hwndDlg,0); |
1126 | break; |
1127 | } |
1128 | } |
1129 | return 0; |
1130 | } |
1131 | |
1132 | static void SetFSVideoMode(void) |
1133 | { |
1134 | changerecursive=1; |
1135 | if(!SetVideoMode(1)) |
1136 | SetVideoMode(0); |
1137 | changerecursive=0; |
1138 | } |
1139 | |
1140 | |
1141 | |
1142 | void ConfigVideo(void) |
1143 | { |
1144 | DialogBox(fceu_hInstance,"VIDEOCONFIG",hAppWnd,VideoConCallB); |
1145 | UpdateRendBounds(); |
1146 | if(fullscreen) |
1147 | SetFSVideoMode(); |
1148 | else |
1149 | SetMainWindowStuff(); |
1150 | } |
1151 | |
1152 | void DoVideoConfigFix(void) |
1153 | { |
1154 | UpdateRendBounds(); |
1155 | } |
1156 | |
1157 | |
1158 | #ifdef moo |
1159 | if(!vmod) |
1160 | { |
1161 | if(vmodes[0].x<VNSWID) |
1162 | { |
1163 | FCEUD_PrintError("Horizontal resolution is too low."); |
1164 | return 0; |
1165 | } |
1166 | if(vmodes[0].y<totallines && !(vmodes[0].flags&VMDF_STRFS)) |
1167 | { |
1168 | FCEUD_PrintError("Vertical resolution must not be less than the total number of drawn scanlines."); |
1169 | return 0; |
1170 | } |
1171 | } |
1172 | |
1173 | |
1174 | #endif |