2 // This file is part of the PicoDrive Megadrive Emulator
\r
4 // Copyright (c) 2011 FinalDave (emudave (at) gmail.com)
\r
6 // This code is licensed under the GNU General Public License version 2.0 and the MAME License.
\r
7 // You can choose the license that has the most advantages for you.
\r
9 // SVN repository can be found at http://code.google.com/p/cyclone68000/
\r
13 TCHAR RomName[260]={0};
\r
14 static unsigned char *RomData=NULL;
\r
15 static unsigned int RomSize=0;
\r
17 static unsigned int LastSecond=0;
\r
18 static int FramesDone=0;
\r
19 static int FramesPerSecond=60;
\r
23 static int TargetInit()
\r
25 RECT rect={0,0,0,0};
\r
28 memset(&Targ,0,sizeof(Targ));
\r
32 ClientToScreen(FrameWnd,&Targ.point);
\r
34 GetClientRect(FrameWnd,&rect);
\r
35 // Find out where the top of the screen should go:
\r
36 rect.top=(rect.bottom-height)>>1;
\r
37 if (rect.top<0) rect.top=0;
\r
38 rect.bottom=rect.top+height;
\r
40 Targ.view=rect; // Save the view rectangle (client coordinates)
\r
42 Targ.offset=Targ.view.top+Targ.point.y;
\r
47 static int TargetUpdate()
\r
49 // Need to repaint the view rectangle:
\r
50 GetUpdateRect(FrameWnd,&Targ.update,0);
\r
52 Targ.top =Targ.update.top +Targ.point.y;
\r
53 Targ.bottom=Targ.update.bottom+Targ.point.y;
\r
62 EmulateExit(); // Make sure exited
\r
64 TargetInit(); // Find out where to put the screen
\r
69 f=_wfopen(RomName,L"rb"); if (f==NULL) return 1;
\r
70 PicoCartLoad(f,&RomData,&RomSize);
\r
73 PicoCartInsert(RomData,RomSize);
\r
75 LastSecond=GetTickCount(); FramesDone=0;
\r
83 PicoCartInsert(NULL,0);
\r
84 if (RomData) free(RomData); RomData=NULL; RomSize=0;
\r
89 // Callback for scanline data:
\r
90 static int EmulateScan(unsigned int scan,unsigned short *sdata)
\r
93 unsigned short *ps=NULL,*end=NULL;
\r
94 unsigned char *pd=NULL;
\r
97 if ((scan&3)==1) return 0;
\r
98 scan+=scan<<1; scan>>=2; // Reduce size to 75%
\r
101 if ((int)scan< Targ.top) return 0; // Out of range
\r
102 if ((int)scan>=Targ.bottom) return 0; // Out of range
\r
104 pd=Targ.screen+scan*GXDisp.cbyPitch;
\r
107 xpitch=GXDisp.cbxPitch;
\r
108 ps=sdata; end=ps+320;
\r
110 // Reduce 4 pixels into 3
\r
113 *(unsigned short *)pd=ps[0]; pd+=xpitch;
\r
114 *(unsigned short *)pd=(unsigned short)((ps[1]+ps[2])>>1); pd+=xpitch;
\r
115 *(unsigned short *)pd=ps[3]; pd+=xpitch;
\r
123 static int DoFrame()
\r
125 int pad=0,i=0,ks=0;
\r
126 char map[8]={0,1,2,3,5,6,4,7}; // u/d/l/r/b/c/a/start
\r
130 ks=GetAsyncKeyState(Config.key[map[i]]);
\r
139 static int DrawFrame()
\r
141 // Now final frame is drawn:
\r
142 InvalidateRect(FrameWnd,&Targ.view,0);
\r
144 if (Main3800) Targ.screen=(unsigned char *)0xac0755a0; // The real 3800 screen address
\r
145 else Targ.screen=(unsigned char *)GXBeginDraw();
\r
147 if (Targ.screen==NULL) return 1;
\r
151 PicoScan=EmulateScan; // Setup scanline callback
\r
157 if (Main3800==0) GXEndDraw();
\r
161 ValidateRect(FrameWnd,&Targ.update);
\r
165 // Print the status of the 68000:
\r
166 HDC hdc=GetDC(FrameWnd);
\r
167 RECT rect={0,220, 240,260};
\r
168 TCHAR status[128]={0};
\r
170 wsprintf(status,L"%.120S",PicoStatus);
\r
172 FillRect(hdc,&rect,(HBRUSH)GetStockObject(WHITE_BRUSH));
\r
173 SetBkMode(hdc,TRANSPARENT);
\r
175 DrawText(hdc,status,lstrlen(status),&rect,0);
\r
176 ReleaseDC(FrameWnd,hdc);
\r
185 int time=0,frame=0;
\r
187 if (RomData==NULL) return 1;
\r
190 time=GetTickCount()-LastSecond; // This will be about 0-1000 ms
\r
191 frame=time*FramesPerSecond/1000;
\r
192 need=frame-FramesDone;
\r
195 if (FramesPerSecond>0)
\r
197 // Carry over any >60 frame count to one second
\r
198 while (FramesDone>=FramesPerSecond) { FramesDone-=FramesPerSecond; LastSecond+=1000; }
\r
201 if (need<=0) { Sleep(2); return 1; }
\r
202 if (need>4) need=4; // Limit frame skipping
\r
204 for (i=0;i<need-1;i++) DoFrame(); // Frame skip if needed
\r
219 // Convert to signed:
\r
220 // for (p=0;p<PsndLen<<1;p++) PsndOut[p]+=0x8000;
\r
222 PsndRate=PsndLen=0;
\r