Add v0.7 source

This commit is contained in:
TomW 2013-04-21 14:54:35 +01:00
commit 3c253c2cf8
188 changed files with 52566 additions and 0 deletions

254
src/vid_mda.c Normal file
View file

@ -0,0 +1,254 @@
/*MDA emulation*/
#include "ibm.h"
#include "video.h"
void mda_recalctimings();
static uint8_t mda_ctrl,mda_stat;
uint8_t crtcm[32],crtcmreg;
void mda_out(uint16_t addr, uint8_t val)
{
switch (addr)
{
case 0x3B0: case 0x3B2: case 0x3B4: case 0x3B6:
crtcmreg = val & 31;
return;
case 0x3B1: case 0x3B3: case 0x3B5: case 0x3B7:
crtcm[crtcmreg] = val;
if (crtcm[10]==6 && crtcm[11]==7) /*Fix for Generic Turbo XT BIOS, which sets up cursor registers wrong*/
{
crtcm[10]=0xB;
crtcm[11]=0xC;
}
mda_recalctimings();
return;
case 0x3B8:
mda_ctrl = val;
return;
}
}
uint8_t mda_in(uint16_t addr)
{
switch (addr)
{
case 0x3B0: case 0x3B2: case 0x3B4: case 0x3B6:
return crtcmreg;
case 0x3B1: case 0x3B3: case 0x3B5: case 0x3B7:
return crtcm[crtcmreg];
case 0x3BA:
return mda_stat | 0xF0;
}
}
void mda_write(uint32_t addr, uint8_t val)
{
vram[addr&0xFFF]=val;
}
uint8_t mda_read(uint32_t addr)
{
return vram[addr&0xFFF];
}
void mda_recalctimings()
{
disptime=crtc[0]+1;
dispontime=crtc[1];
dispofftime=disptime-dispontime;
dispontime*=MDACONST;
dispofftime*=MDACONST;
}
int mdacols[256][2][2];
static int linepos,displine;
static int vc,sc;
static uint16_t ma,maback,ca;
static int con,coff,cursoron;
static int cgadispon,cgablink;
static int vsynctime,vadj;
void mda_poll()
{
uint16_t ca=(crtcm[15]|(crtcm[14]<<8))&0x3FFF;
int drawcursor;
int x,c;
int oldvc;
uint8_t chr,attr;
uint16_t dat,dat2,dat3,dat4;
int cols[4];
int col;
int oldsc;
int blink;
if (!linepos)
{
vidtime+=dispofftime;
mda_stat|=1;
linepos=1;
oldsc=sc;
if ((crtcm[8]&3)==3) sc=(sc<<1)&7;
if (cgadispon)
{
if (displine<firstline)
{
firstline=displine;
}
lastline=displine;
cols[0]=0;
cols[1]=7;
for (x=0;x<crtcm[1];x++)
{
chr=vram[(ma<<1)&0x3FFF];
attr=vram[((ma<<1)+1)&0x3FFF];
drawcursor=((ma==ca) && con && cursoron);
blink=((cgablink&16) && (mda_ctrl&0x20) && (attr&0x80) && !drawcursor);
if (sc==12 && ((attr&7)==1))
{
for (c=0;c<9;c++)
buffer->line[displine][(x*9)+c]=mdacols[attr][blink][1];
}
else
{
for (c=0;c<8;c++)
buffer->line[displine][(x*9)+c]=mdacols[attr][blink][(fontdatm[chr][sc]&(1<<(c^7)))?1:0];
if ((chr&~0x1F)==0xC0) buffer->line[displine][(x*9)+8]=mdacols[attr][blink][fontdatm[chr][sc]&1];
else buffer->line[displine][(x*9)+8]=mdacols[attr][blink][0];
}
ma++;
if (drawcursor)
{
for (c=0;c<9;c++)
buffer->line[displine][(x*9)+c]^=mdacols[attr][0][1];
}
}
}
sc=oldsc;
if (vc==crtcm[7] && !sc)
{
mda_stat|=8;
// printf("VSYNC on %i %i\n",vc,sc);
}
displine++;
if (displine>=500) displine=0;
}
else
{
vidtime+=dispontime;
if (cgadispon) mda_stat&=~1;
linepos=0;
if (vsynctime)
{
vsynctime--;
if (!vsynctime)
{
mda_stat&=~8;
// printf("VSYNC off %i %i\n",vc,sc);
}
}
if (sc==(crtcm[11]&31) || ((crtcm[8]&3)==3 && sc==((crtcm[11]&31)>>1))) { con=0; coff=1; }
if (vadj)
{
sc++;
sc&=31;
ma=maback;
vadj--;
if (!vadj)
{
cgadispon=1;
ma=maback=(crtcm[13]|(crtcm[12]<<8))&0x3FFF;
sc=0;
}
}
else if (sc==crtcm[9] || ((crtcm[8]&3)==3 && sc==(crtcm[9]>>1)))
{
maback=ma;
sc=0;
oldvc=vc;
vc++;
vc&=127;
if (vc==crtcm[6]) cgadispon=0;
if (oldvc==crtcm[4])
{
// printf("Display over at %i\n",displine);
vc=0;
vadj=crtcm[5];
if (!vadj) cgadispon=1;
if (!vadj) ma=maback=(crtcm[13]|(crtcm[12]<<8))&0x3FFF;
if ((crtcm[10]&0x60)==0x20) cursoron=0;
else cursoron=cgablink&16;
}
if (vc==crtcm[7])
{
cgadispon=0;
displine=0;
vsynctime=16;//(crtcm[3]>>4)+1;
if (crtcm[7])
{
// printf("Lastline %i Firstline %i %i\n",lastline,firstline,lastline-firstline);
x=crtcm[1]*9;
lastline++;
if (x!=xsize || (lastline-firstline)!=ysize)
{
xsize=x;
ysize=lastline-firstline;
// printf("Resize to %i,%i - R1 %i\n",xsize,ysize,crtcm[1]);
if (xsize<64) xsize=656;
if (ysize<32) ysize=200;
updatewindowsize(xsize,ysize);
}
startblit();
video_blit_memtoscreen_8(0, firstline, xsize, lastline - firstline);
endblit();
frames++;
video_res_x = crtcm[1];
video_res_y = crtcm[6];
video_bpp = 0;
}
firstline=1000;
lastline=0;
cgablink++;
}
}
else
{
sc++;
sc&=31;
ma=maback;
}
if ((sc==(crtcm[10]&31) || ((crtcm[8]&3)==3 && sc==((crtcm[10]&31)>>1))))
{
con=1;
// printf("Cursor on - %02X %02X %02X\n",crtcm[8],crtcm[10],crtcm[11]);
}
}
}
int mda_init()
{
mem_sethandler(0xb0000, 0x08000, mda_read, NULL, NULL, mda_write, NULL, NULL);
return 0;
}
GFXCARD vid_mda =
{
mda_init,
/*IO at 3Cx/3Dx*/
video_out_null,
video_in_null,
/*IO at 3Ax/3Bx*/
mda_out,
mda_in,
mda_poll,
mda_recalctimings,
video_write_null,
mda_write,
video_write_null,
video_read_null,
mda_read,
video_read_null
};