SecondReality/GRID/DOLINE.OK
2017-09-24 01:45:36 +02:00

105 lines
1.8 KiB
Text

// create code for line blitter
#include <stdio.h>
#include <string.h>
char *vram=(char *)0xa0000000L;
FILE *out;
int isor;
void line(int x1,int y1,int x2,int y2)
{
int xd=x2-x1;
int yd=y2-y1;
int a,d,x,y;
memset(vram,0,16*320);
if(xd>yd)
{
d=-xd/2;
while(x1<x2 || y1<y2)
{
vram[x1+y1*320]=2;
x1++;
d+=yd;
if(d>0)
{
d-=xd;
y1++;
}
}
}
else
{
d=-yd/2;
while(x1<x2 || y1<y2)
{
vram[x1+y1*320]=2;
y1++;
d+=xd;
if(d>0)
{
d-=yd;
x1++;
}
}
}
//vram[x2+y2*320]=1;
for(y=0;y<16;y++) for(x=0;x<16;x++) if(vram[x+y*320])
{
if(vram[x+y*320+1])
{
fprintf(out,"mov ax,gs:[di+%i]\n",x+y*320);
if(isor) fprintf(out,"or ax,dx\n");
else fprintf(out,"xor ax,dx\n");
fprintf(out,"mov gs:[di+%i],ax\n",x+y*320);
fprintf(out,"mov es:[di+%i],ax\n",x+y*320);
vram[x+y*320]=vram[x+y*320+1]=0;
}
else
{
fprintf(out,"mov al,gs:[di+%i]\n",x+y*320);
if(isor) fprintf(out,"or al,dl\n");
else fprintf(out,"xor al,dl\n");
fprintf(out,"mov gs:[di+%i],al\n",x+y*320);
fprintf(out,"mov es:[di+%i],al\n",x+y*320);
vram[x+y*320]=0;
}
}
}
main()
{
int x,y;
_asm mov ax,13h
_asm int 10h
out=fopen("lineblit.inc","wt");
fprintf(out,";LineBlitter core - created by doline.c\n");
fprintf(out,"lblt_table LABEL WORD\n");
for(isor=0;isor>=0;isor--)
{
for(y=0;y<12;y++)
{
for(x=0;x<12;x++)
{
fprintf(out,"dw OFFSET lblt_%i%c%i\n",x,isor?'o':'a',y);
}
}
}
for(isor=0;isor>=0;isor--)
{
for(y=0;y<12;y++)
{
for(x=0;x<12;x++)
{
fprintf(out,"lblt_%i%c%i:\n",x,isor?'o':'a',y);
line(0,0,x,y);
fprintf(out,"ret\n",x,y);
}
}
}
fclose(out);
_asm mov ax,3h
_asm int 10h
}