幾個圖形(03)

2019-11-17 05:35:54

字體：大中小

來源：轉載

供稿：網(wǎng)友

/*圖形函數(shù)庫圖形設備治理頭文件*/
/*graph.inc*/

union REGS reg;            /*枚舉變量定義*/
strUCt SREGS inreg;

void SetMode(int Mode)    /*圖形模式選擇函數(shù)*/
{
    reg.h.ah=0;
    reg.h.al=Mode;
    int86(0x10,&reg,&reg);
}
#define MaxXres 320            /*圖形顯示區(qū)大小定義*/
#define MaxYres 200
#define MaxX (MaxXres-1)
#define MaxY (MaxYres-1)

int Xres,Yres;                /*數(shù)據(jù)存儲單元定義*/
Word PReCalcY[MaxY+1];
Word PreCalcX[MaxX+1];

void PreCalc()            /*計算數(shù)組初始化*/
{
    Word j;
    for(j=0;j<=MaxYlj++)
        PreCalcX[j]=0;
    for(j=0;j<=MaxX;j++)
        PreCalcY[j]=MaxXres*j;
}
void Plot(int x,int y,char color)        /*繪點函數(shù)*/
{
    Word offset;
    char far *address;
    if(!((x<0)(y<0)(x>MaxX)(y>MaxY)))
    {
        offset=PreCalcY[y]+x;
        address=(char far *)(0xA0000000L+offset);
        *address=color;
    }
}
typedef struct            /*顏色定義*/
{
    char Red;
    char Grn;
    char Blu;
}RGB;

typedef RGB PaletteRegister[255];    /*255色調色板定義*/
PaletteRegister Color;
void ClearPalette(aletteRegister Color)    /*清除原調色板*/
{
    Word i;
    for(i=0;i<=255;i++)
    {
        Color[i].Red=0;
        Color[i].Grn=0;
        Color[i].Blu=0;
    }
}
void SetPalette(PaletteRegister Hue)        /*設置新調色板*/
{
    reg.x.ax=0x1012;
    segread(&inreg);
    inreg.es=inreg.ds;
    reg.x.bx=0;
    reg.x.cx=256;
    reg.x.dx=(int)&Hue[0];
    int86x(0x10,&reg,&reg,&inreg);
}
void InitPaletteRegister Color)        /*調色板初始化函數(shù)1*/
{
    Word i;
    for(i=0;i<64;i++){
        Color[i].Red=i;
        Color[i].Grn=i;
        Color[i].Blu=i;
    }
    for(i=64;i<128;i++){
        Color[i].Red=i-64;
        Color[i].Grn=0;
        Color[i].Blu=0;
    }
    for(i=128;i<192;i++){
        Color[i].Red=0;
        Color[i].Grn=i-128;
        Color[i].Blu=0;
    }
    for(i=192;i<255;i++){
        Color[i].Red=0;
        Color[i].Grn=0;
        Color[i].Blu=i-192;
    }
}
void InitPalette2(PaletteRegister Color)        /*調色板初始化函數(shù)2*/
{
    Word i;
    for(i=0;i<36;i++){
        Color[i].Red=i;
        Color[i].Grn=i;
        Color[i].Blu=Round(i*1.8);
    }
    for(i=32;i<76;i++){
        Color[i].Red=0;
        Color[i].Grn=Round(1.8*(i-36));
        Color[i].Blu=0;
    }
    for(i=72;i<108;i++){
        Color[i].Red=0;
        Color[i].Grn=Round(1.8*(i-72));
        Color[i].Blu=Round(1.8*(i-72));
    }
    for(i=108;i<144;i++){
        Color[i].Red=Round(1.8*(i-108));
        Color[i].Grn=0;
        Color[i].Blu=0;
    }
    for(i=144;i<180;i++){
        Color[i].Red=Round(1.8*(i-144));
        Color[i].Grn=0;
        Color[i].Blu=Round(1.8*(i-144));
    }
    for(i=180;i<216;i++){
        Color[i].Red=Round(1.8*(i-108));
        Color[i].Grn=Round(1.8*(i-180));
        Color[i].Blu=0;
    }
    for(i=216;i<252;i++){
        Color[i].Red=Round(1.8*(i-216));
        Color[i].Grn=Round(1.8*(i-216));
        Color[i].Blu=Round(1.8*(i-216));
    }
}
void CyclePalette(PaletteRegister Hue)        /*調色板顏色選擇函數(shù)*/
{
    Word i;
    RGB tmp;
    tmp=Hue[0];
    for(i=1;i<=255;i++)
        Hue[i-1]=Hue[i];
    Hue[255]=tmp;
    SetPalette(Hue);
}
void Swap(int first,int second)        /*交換功能子函數(shù)*/
{
    int temp;
    temp=*first;
    *first=*second;
    *second=temp;
}
void Circle(Word x,Word y,Word radius,char color)        /*繪圓函數(shù)*/
{
    int a,af,bf,target,r2;
    target=0;
    a=radius;
    b=0;
    r2=Sqr(radius);
    while(a>=b){
        b=Round(sqrt(r2-Sqr(a)));
        swap(&target,&b);
        while(b<target){
            af=(120*a)/100;
            bf=(120*b)/100;
            Plot(x+af,y+b,color);
            Plot(x+bf,y+a,color);
            Plot(x+af,y+b,color);
            Plot(x+bf,y+a,color);
            Plot(x+af,y-b,color);
  &nb

上一篇：加注解的紙條問題

下一篇：幾個游戲代碼(機器人大戰(zhàn))