122
123
FCF_AUTOICON | FCF_MINBUTTON | FCF_CLOSEBUTTON;
124
125
/* ------------------------------------------------------------------------ */
125
/* Video-related resources. */
126
/* Video-related resources. */
127
128
int stretch; // Strech factor for window (1,2,3,...)
128
129
static int border; // PM Border Type
792
791
video_render_initraw();
794
video_canvas_t *initcanvas;
795
796
MRESULT WmCreate(HWND hwnd)
799
800
/*video_canvas_t *canvas_new = (video_canvas_t *)calloc(1, sizeof(video_canvas_t));*/
800
video_canvas_t *canvas_new = video_canvas_init();
801
video_canvas_t *canvas_new = initcanvas; //video_canvas_init();
802
803
archdep_create_mutex_sem(&canvas_new->hmtx, "Video", FALSE);
1152
1158
if (rc!=DIVE_SUCCESS)
1154
log_error(vidlog, "Call to DiveBeginImageBufferAccess failed, rc = 0x%x", rc);
1160
log_error(vidlog, "Call to DiveBeginImageBufferAccess(%d, %d) failed, rc = 0x%x", c->hDiveInst, c->ulBuffer, rc);
1157
1163
video_canvas_render(c,
1158
targetbuffer, // c->bitmaptrg, // bitmap target (screen/dive)
1159
w, h, // f->width, f->height, // bitmap width, height (2copy)
1160
xs/dsx, ys/dsy, // 0, 0, // top, left source
1161
xi, yi, // 0, 0, // top, left target
1162
scanlinesize, // fccColorEncoding, // c->width, // line size target
1164
targetbuffer, // c->bitmaptrg, // bitmap target (screen/dive)
1165
w, h, // f->width, f->height, // bitmap width, height (2copy)
1166
xs/dsx, ys/dsy, // 0, 0, // top, left source
1167
xi, yi, // 0, 0, // top, left target
1168
scanlinesize, // fccColorEncoding, // c->width, // line size target
1172
// and blit the image to the screen
1174
rc = DiveBlitImage(c->hDiveInst, c->ulBuffer, DIVE_BUFFER_SCREEN);
1175
if (rc!=DIVE_SUCCESS)
1177
log_error(vidlog, "Call to DiveBlitImage failed, rc = 0x%x", rc);
1182
// It seems, that this must be _after_ DiveBlitImage!
1165
1184
rc = DiveEndImageBufferAccess(c->hDiveInst, c->ulBuffer);
1166
1185
if (rc!=DIVE_SUCCESS)
1168
1187
log_error(vidlog, "Call to DiveEndImageBufferAccess failed, rc = 0x%x", rc);
1173
// and blit the image to the screen
1175
rc = DiveBlitImage(c->hDiveInst, c->ulBuffer, DIVE_BUFFER_SCREEN);
1176
if (rc!=DIVE_SUCCESS)
1178
log_error(vidlog, "Call to DiveBlitImage failed, rc = 0x%x", rc);
1183
1192
BYTE mask[500];
1647
1654
// 16 Byte Memory (Used eg for the Anchor Blocks)
1648
// CS_MOVENOTIFY, CS_SIZEREDRAW skipped
1655
// CS_MOVENOTI8FY, CS_SIZEREDRAW skipped
1649
1656
// CS_SYNCPAINT: send WM_PAINT messages immediately
1650
1657
// don't send WM_PAINT befor canvas is resized
1651
1658
// CS_BYTEALIGNWINDOW: 0x2000
1656
1663
// create window on desktop, FIXME: WS_ANIMATE looks sometimes strange
1658
1666
hwndFrame = WinCreateStdWindow(HWND_DESKTOP, WS_ANIMATE|WS_VISIBLE,
1659
1667
&flFrameFlags, szClientClass,
1660
ini->title, 0L, 0, IDM_VICE2,
1668
c->title, 0L, 0, IDM_VICE2,
1663
1670
if (!hwndFrame)
1665
1672
ERRORID id = WinGetLastError(hab);
1669
1676
c = GetCanvas(hwndClient);
1673
ini->canvas = (void*)-1;
1679
initcanvas->initialized = 0;
1677
c->hwndFrame = hwndFrame;
1678
c->hwndClient = hwndClient;
1679
c->title = ini->title;
1680
c->width = ini->width;
1681
c->height = ini->height;
1682
c->stretch = ini->stretch;
1683
c->videoconfig = ini->videoconfig;
1684
c->draw_buffer = ini->draw_buffer;
1685
c->viewport = ini->viewport;
1686
c->geometry = ini->geometry;
1687
c->palette = ini->palette;
1683
c->hwndFrame = hwndFrame;
1684
c->hwndClient = hwndClient;
1689
1686
VideoBufferAlloc(c);
1739
1736
if (rc=DosSetPriority(PRTYS_THREAD, PRTYC_REGULAR, +1, 0))
1740
1737
log_error(vidlog, "DosSetPriority (rc=%li)", rc);
1742
log_message(vidlog, "'%s' completely initialized.", ini->title);
1739
log_message(vidlog, "'%s' completely initialized.", c->title);
1745
1742
// Now wake up the emulation thread by setting ini->canvas
1821
1818
video_canvas_t *video_canvas_create(video_canvas_t *canvas, UINT *width,
1822
1819
UINT *height, int mapped)
1824
canvas_init_t canvini;
1826
1821
log_message(vidlog, "Creation of '%s' (%ix%i) requested%s.",
1827
1822
canvas->viewport->title, *width, *height,
1828
1823
vsid_mode ? " (vsid mode)" : "");
1830
1825
*strrchr(canvas->viewport->title, ' ') = 0; // FIXME?
1832
canvini.title = util_concat(szTitleBarText, " - ",
1827
canvas->title = util_concat(szTitleBarText, " - ",
1833
1828
canvas->viewport->title + 6, NULL);
1834
canvini.width = *width;
1835
canvini.height = *height;
1836
canvini.stretch = stretch;
1837
canvini.canvas = NULL;
1838
canvini.videoconfig = canvas->videoconfig;
1839
canvini.draw_buffer = canvas->draw_buffer;
1840
canvini.viewport = canvas->viewport;
1841
canvini.geometry = canvas->geometry;
1842
canvini.palette = canvas->palette;
1829
canvas->width = *width;
1830
canvas->height = *height;
1831
canvas->stretch = stretch;
1832
canvas->initialized = 2;
1844
1834
if (canvas->videoconfig->doublesizex)
1847
1837
if (canvas->videoconfig->doublesizey)
1848
canvini.height *= 2;
1838
canvas->height *= 2;
1850
_beginthread(CanvasMainLoop, NULL, 0x4000, &canvini);
1840
_beginthread(CanvasMainLoop, NULL, 0x4000, canvas);
1853
1843
// Wait until the canvas as either created successfully or
1854
1844
// the canvas creation failed
1856
while (!canvini.canvas)
1846
while (canvas->initialized==2)
1860
1850
// If initialization of canvas failed
1861
1851
// canvas_ini.canvas is set to -1
1863
if (canvini.canvas == (void*)-1)
1866
1856
log_message(vidlog, "Canvas '%s' (%ix%i) created: hwnd=0x%x.",
1867
1857
canvas->viewport->title, *width, *height,
1868
canvini.canvas->hwndClient);
1870
video_canvas_set_palette(canvini.canvas, canvas->palette);
1872
canvini.canvas->initialized = 1;
1874
return canvini.canvas;
1858
canvas->hwndClient);
1860
video_canvas_set_palette(canvas, canvas->palette);
1877
1865
void video_canvas_destroy(video_canvas_t *c)
added
removed
src/arch/os2/video.c
