DOS下看真彩BMP位图的小程序

很久以前编的DOS看真彩BMP位图的小程序给贴上来了,有兴趣的就自己编译着玩玩,里边还有我写的一个画直线的算法,不过很笨拙。 初学者可以试着看看源码挺简单的,看到有不少人看这个贴子我就给注释了,不过画直线的函数就不用看了,很乱我自己都懒得看所以就没有注释
另外几个函数的功能在后面的跟贴我简单的介绍了一下

A.c main文件

[code:1:9253783525]
#include <stdio.h>
#include <conio.h>
#include “a.h”

/*extern void print();
*extern void init(int);
*extern void vinfo(int)
*extern void demo(int,int,int);
*extern void Pixel16HiC(int,int,int);
*extern void Pixel24TrC(unsigned long int,int,int);
*extern void Pixel256C(char,int,int);

*#define Hi15(R,G,B)
*#define HiColor(R,G,B) R*2048+G*32+B
*#define TrColor(R,G,B) R*65536+G*256+B
*#define Tr_HColor(R,G,B)
*#define H_TColor(RGB)
*#define T_HColor(RGB)
*/



main()
{
unsigned int i,j,x,y;
FILE *fp;

if((fp=fopen(“d:\\BC4\\Ship\\24.bmp”,”rb”))==NULL)/*自己选择路径*/
printf(“Can’t open 256.bmp\n”);

init(Tr800_600);/*初始化显示模式为24位真彩色,800*600分辨率*/

readpic(fp);/*主函数*/
fclose(fp);

/*for(i=0;i<=767;i++)
* line(i,i,1023,0,TrC(i,i*3,i/2));/*这里是画直线函数*/
*/
getch();
return;
}

[/code:1:9253783525]



BMP.C 主文件,里边有画直线函数 www.xker.com(小新)
[code:1:9253783525]
#include<stdio.h>
#include<alloc.h>
#include<dos.h>
#include”a.h”



unsigned far* readpic(FILE *fp)
{

struct bmp_head far* bhead;
int x,y;
unsigned long size,length,width;
void far * farmem;
unsigned char far *RGB;
char temp[30],over;


fread(temp,30L,1,fp); /*读BMP文件头信息*/

bhead=(char far*)temp;

over=bhead->width%4;/*BMP格式每行多出的位,我也不清楚为什么要多出这几位,当时我这里让我很头痛费了好大劲才查出来*/

width=bhead->width*3+over;/*位图宽*/

if((farmem=farmalloc(width*10+10))==NULL)/*分配缓冲区因为DOS最大可分配内存是一个段64K字节这里我分配了位图宽度*10 +10*/
printf(“Not enough Memory\n”);

fseek(fp,bhead->offset,0);/*读指针跳到位图数据起点*/

fread(farmem,width,10,fp);/*读位图数据到缓冲区*/

RGB=farmem;/*RGB画像素用的指针,每像素3个字节*/

for(y=bhead->hight;y>=0;y–)/*bhead->hight 位图高度*/
{
for(x=0;x<bhead->width;x++)/*bhead->width 位图宽度*/
{
Pixel24TrC(TrC(*(RGB+2),*(RGB+1),*RGB),x,y);/*画点*/
RGB=RGB+3;/*一个像素点3个字节*/
if(FP_OFF(RGB)==width*10+FP_OFF(farmem)||FP_OFF(RGB)==width*10+FP_OFF(farmem)+3)/*FP_OFF取远指针偏移,这个条件语句判断画完一个缓冲区*/
{
fread(farmem,width,10,fp);
RGB=farmem;
}/*把BMP位图分成缓冲区大小的段*/
}
RGB=RGB+over;/*每行最后多出over个字节*/
}
farfree(farmem);


return farmem;

}


/*画直线函数*/

void line(unsigned long left_x,unsigned long left_y,unsigned long right_x,unsigned long right_y,unsigned long color)
{

unsigned long x=left_x,y=left_y;
if(left_x>right_x)
if(left_y>right_y)
{
while(left_x-right_x>left_x-x)
{
Pixel24TrC(color,x,y);
if((left_x-right_x)>(left_y-right_y))
while((left_y-right_y)*(left_x-x)<(left_x-right_x)*(left_y-y))
{
x–;
Pixel24TrC(color,x,y);
}
x–;
if(y<=right_y)
continue;
if((left_y-right_y)>(left_x-right_x))
while((left_y-right_y)*(left_x-x)>(left_x-right_x)*(left_y-y))
{
y–;
Pixel24TrC(color,x,y);
}
y–;
};
while(y>right_y)
{
Pixel24TrC(color,x,y);
y–;
};

}
else
{
while(x>right_x)
{
Pixel24TrC(color,x,y);
if((left_x-right_x)>(right_y-left_y))

#p#副标题#e#
while((right_y-left_y)*(left_x-x)<(left_x-right_x)*(y-left_y))
{
x–;
Pixel24TrC(color,x,y);
}
x–;
if(!(y<right_y))
continue;
if((right_y-left_y)>(left_x-right_x))
while((right_y-left_y)*(left_x-x)>(left_x-right_x)*(y-left_y))
{
y++;
Pixel24TrC(color,x,y);
}
y++;
};

while(y<=right_y)
{
Pixel24TrC(color,x,y);
y++;
};
}

else
if(left_y>right_y)
{
while(x<right_x)
{
Pixel24TrC(color,x,y);
if((right_x-left_x)>(left_y-right_y))
while((left_y-right_y)*(x-left_x)<(right_x-left_x)*(left_y-y))
{
x++;
Pixel24TrC(color,x,y);
}
x++;
if(left_y-y>left_y-right_y)
continue;
if((left_y-right_y)>(right_x-left_x))
while((left_y-right_y)*(x-left_x)>(right_x-left_x)*(left_y-y))
{
y–;
Pixel24TrC(color,x,y);
}
y–;
};

while(left_y-y<=left_y-right_y)
{
Pixel24TrC(color,x,y);
y–;
};

}
else
{
while(x<right_x)
{
Pixel24TrC(color,x,y);
if((right_x-left_x)>(right_y-left_y))
while((right_y-left_y)*(x-left_x)<(right_x-left_x)*(y-left_y))
{
x++;
Pixel24TrC(color,x,y);
}

x++;

if(y>=right_y)
continue;
if((right_y-left_y)>(right_x-left_x))
while((right_y-left_y)*(x-left_x)>(right_x-left_x)*(y-left_y))
{
y++;
Pixel24TrC(color,x,y);
}
y++;
};

while(y<=right_y)
{
Pixel24TrC(color,x,y);
y++;
};
}

return 0;
}


[/code:1:9253783525]


a.h 头文件

[code:1:9253783525]
#define LINE 640


#define C256(R,G,B) (unsigned char)R*0x20%0x100+(unsigned char)G*0x4%0x20+B

#define Hi15(R,G,B) (unsigned)R*0x400%0x8000+(unsigned)G*0x20%0x400+(char)B%0x20

#define HiC(R,G,B) (unsigned)R*0x800%0x10000+(unsigned)G*32%0x800+(char)B%0x20
#define TrC(R,G,B) (unsigned long)R*0x10000%0x1000000+(unsigned long)G*0x100%0x10000+(unsigned)B%0x100
#define Hi-TrC(RGB) (unsigned long)RGB%0x10000/2048*65536+(unsigned long)RGB%2048/32*256+(unsigned char)RGB%32
#define Tr-HiC(RGB) (unsigned long)RGB%0x1000000/65536%32*2048+(unsigned long)RGB%65536/64*32+(unsigned char)(RGB%32)


#define C256_640_400 0x100
#define C256_640_480 0x101
#define C16_800_600 0x102
#define C256_800_600 0x103
#define C16_1024_768 0x104
#define C256_1024_768 0x105
#define Hi15_640_480 0x110
#define Hi640_480 0x111
#define Tr640_480 0x112
#define Hi15_800_600 0x113
#define Hi800_600 0x114
#define Tr800_600 0x115
#define Hi15_1024_768 0x116
#define Hi1024_768 0x117
#define Tr1024_768 0x118




extern void Demo(unsigned long,int,int);

extern void init(int);
extern void Pixel16HiC(int,int,int);
extern void Pixel24TrC(unsigned long,int,int);
extern void Pixel256C(char,int,int);
extern void line(unsigned long x1,unsigned long y1,unsigned long x2,unsigned long y2,unsigned long color);

/*seepic*/
extern unsigned far* readpic(FILE *fp);

extern void mouse(void);


struct bmp_head
{
int other1;
unsigned long length;
char other2[4];
unsigned int offset;
char other3[6];
unsigned int width;
char other4[2];
unsigned int hight;
char other5[4];
unsigned char color;
};
[/code:1:9253783525]


mybmp.c这是嵌入式汇编的画点函数
[code:1:9253783525]
void init(int mode)
{
asm mov bx,mode
asm mov ax,4f02h
asm int 10h
return;
}




void Pixel24TrC(unsigned long color,int x,int y)

#p#副标题#e#
{

asm push es
asm push di

asm mov ax,4f03h
asm int 10h

pi112:
asm cmp bx,112h
asm jnz pi115

asm mov dx,640
asm jmp write_24t


pi115:
asm cmp bx,115h
asm jnz pi118

asm mov dx,800
asm jmp write_24t

pi118:
asm cmp bx,118h
asm jnz Tr_exit

asm mov dx,1024

write_24t:
asm mov ax,0a000h
asm mov es,ax
asm mov ax,y
asm mul dx
asm mov bx,ax
asm mov cx,dx
asm add ax,bx
asm adc dx,cx
asm add ax,bx
asm adc dx,cx
asm add ax,bx
asm adc dx,cx

asm mov bx,x
asm add bx,x
asm add bx,x
asm add bx,x
asm add ax,bx
asm adc dx,0
asm mov di,ax

asm mov ax,4f05h
asm mov bx,0
asm int 10h

asm mov cx,word ptr color
asm mov word ptr es:[di],cx
asm add di,2
asm mov cx,word ptr color+2
asm mov word ptr es:[di],cx

Tr_exit:
asm pop di
asm pop es

return;
}


void Pixel16HiC(int color,int x,int y)
{
asm push es
asm push di

asm mov ax,4f03h
asm int 10h

pi110:
asm cmp bx,110h
asm jnz pi111

asm mov dx,640
asm jmp write_16h



pi111:
asm cmp bx,111h
asm jnz pi113

asm mov dx,640
asm jmp write_16h



pi113:
asm cmp bx,113h
asm jnz pi114

asm mov dx,800
asm jmp write_16h


pi114:
asm cmp bx,114h
asm jnz pi116

asm mov dx,800
asm jmp write_16h


pi116:
asm cmp bx,116h
asm jnz pi117

asm mov dx,1024
asm jmp write_16h


pi117:
asm cmp bx,117h
asm jnz Hi_exit

asm mov dx,1024


write_16h:
asm mov ax,0a000h
asm mov es,ax
asm mov ax,word ptr [y]
asm mul dx
asm shl ax,1
asm jc a1
asm shl dx,1
asm jmp cont
a1:
asm shl dx,1
asm inc dx

cont:
asm shl word ptr [x],1
asm add ax,word ptr [x]
asm adc dx,0
asm mov di,ax

asm mov ax,4f05h
asm mov bx,0
asm int 10h

asm mov cx,word ptr [color]
asm mov word ptr es:[di],cx

Hi_exit:
asm pop di
asm pop es

return;
}


void Pixel256C(char color,int x,int y)
{
asm push es
asm push di


asm mov ax,4f03h
asm int 10h


pi100:
asm cmp bx,100h
asm jnz pi101

asm mov dx,640
asm jmp write_256

pi101:
asm cmp bx,101h
asm jnz pi103

asm mov dx,640
asm jmp write_256



pi103:
asm cmp bx,103h
asm jnz pi105

asm mov dx,800
asm jmp write_256



pi105:
asm cmp bx,105h
asm jnz exit_256

asm mov dx,1024

write_256:
asm mov ax,0a000h
asm mov es,ax
asm mov ax,word ptr [y]
asm mul dx
asm add ax,word ptr [x]
asm adc dl,0
asm mov di,ax

asm mov ax,4f05h
asm mov bx,0
asm int 10h

asm mov cl,byte ptr [color]
asm mov byte ptr es:[di],cl


exit_256:
asm pop di
asm pop es

return;
}
[/code:1:9253783525]
www.xker.com(小新)

gl.asm 底层画点函数要用TASM编译,不过有上边的嵌入式汇编这个可以不用了

[code:1:9253783525]
.386

public _init
public _Demo
public _Pixel16HiC
public _Pixel24TrC
public _Pixel256C


_ATTRI struc

MODE_ATTR DW ?
WIN_A_ATTR DB ?
WIN_B_ATTR DB ?
WIN_GRAN DB ?
WIN_SIZE DW ?
WIN_A_SEG DW ?
WIN_B_SEG DW ?
WIN_FUNC_PTR DD ?
LINE_BYTE DW ?

_ATTRI ends



mpusha macro
push ax
push cx
push dx
push bx
push sp
push bp
push si
push di
endm


mpopa macro
pop di
pop si
pop bp
pop sp
pop bx
pop dx
pop cx
pop ax
endm


DGROUP group _DATA,_BSS




extrn _printf:far




_TEXT segment use16 byte public ‘code’
assume cs:_TEXT,ds:DGROUP


;初始化图型模式
;入口参数:显示模式压入?

_init proc far

enterw 0,0
mov bx,[bp+6]
mov ax,4f02h
int 10h
leavew
ret

_init endp

#p#副标题#e#


;画点



_Pixel24TrC proc far

enterw 0,0
push es
push di

mov ax,4f03h
int 10h

pi112: cmp bx,112h
jnz pi115

mov dx,640
jmp write_24t


pi115: cmp bx,115h
jnz pi118

mov dx,800
jmp write_24t

pi118: cmp bx,118h
jnz Tr_exit

mov dx,1024

write_24t: mov ax,0a000h
mov es,ax
mov ax,word ptr [bp+12]
mul dx
mov bx,ax
mov cx,dx
add ax,bx
adc dx,cx
add ax,bx
adc dx,cx
add ax,bx
adc dx,cx

mov bx,word ptr [bp+10]
add bx,word ptr [bp+10]
add bx,word ptr [bp+10]
add bx,word ptr [bp+10]
add ax,bx
adc dx,0
mov di,ax

mov ax,4f05h
mov bx,0
int 10h

mov cx,word ptr [bp+6]
mov word ptr es:[di],cx
add di,2
mov cx,word ptr [bp+8]
mov word ptr es:[di],cx

Tr_exit: pop di
pop es

leavew
ret

_Pixel24TrC endp




_Pixel16HiC proc far

enterw 0,0
push es
push di

mov ax,4f03h
int 10h

pi110: cmp bx,110h
jnz pi111

mov dx,640
jmp write_16h



pi111: cmp bx,111h
jnz pi113

mov dx,640
jmp write_16h



pi113: cmp bx,113h
jnz pi114

mov dx,800
jmp write_16h


pi114: cmp bx,114h
jnz pi116

mov dx,800
jmp write_16h


pi116: cmp bx,116h
jnz pi117

mov dx,1024
jmp write_16h


pi117: cmp bx,117h
jnz Hi_exit

mov dx,1024


write_16h: mov ax,0a000h
mov es,ax
mov ax,word ptr [bp+10]
mul dx
shl ax,1
jc a1
shl dx,1
jmp cont
a1: shl dx,1
inc dx

cont: shl word ptr [bp+8],1
add ax,word ptr [bp+8]
adc dx,0
mov di,ax

mov ax,4f05h
mov bx,0
int 10h

mov cx,word ptr [bp+6]
mov word ptr es:[di],cx

Hi_exit: pop di
pop es

leavew
ret

_Pixel16HiC endp




_Pixel256C proc far

enterw 0,0
push es
push di


mov ax,4f03h
int 10h


pi100: cmp bx,100h
jnz pi101

mov dx,640
jmp write_256

pi101: cmp bx,101h
jnz pi103

mov dx,640
jmp write_256



pi103: cmp bx,103h
jnz pi105

mov dx,800
jmp write_256



pi105: cmp bx,105h
jnz exit_256

mov dx,1024

write_256: mov ax,0a000h
mov es,ax
mov ax,word ptr [bp+10]
mul dx
add ax,word ptr [bp+8]
adc dl,0
mov di,ax

mov ax,4f05h
mov bx,0
int 10h

mov cl,byte ptr [bp+6]
mov byte ptr es:[di],cl


exit_256: pop di
pop es

leavew
ret

_Pixel256C endp



;入口参数: ax=要转换的二进制数

;出口参数 dx:ax=转换十进数
B_O proc near

enterw 5,0
push es
push di
push si
mov bx,10
mov cx,5
mov di,sp
mov ax,ss
mov es,ax

getover: div bx
add dl,30h
mov byte ptr es:[di],dl
dec cx
jz return
inc di
cmp ax,0
jnz getover
mov byte ptr es:[di],dl

return: xor dx,dx
xor ax,ax
std
mov si,di
relod: mov cx,4
lodsb
re: shl dx,1
shl ax,1
jnc d0
inc dx
d0: dec cx
jnz re

cmp si,sp
jnz relod

pop si
pop di
pop es
leavew
ret

B_O endp


_Demo proc far

enterw 0,0
push es
push di

mov ax,0a000h
mov es,ax
mov dx,1024
mov ax,word ptr [bp+12]
mul dx
mov bx,ax
mov cx,dx
add ax,bx
adc dx,cx
add ax,bx
adc dx,cx
add ax,bx
adc dx,cx

mov bx,word ptr [bp+10]
add bx,word ptr [bp+10]
add bx,word ptr [bp+10]
add bx,word ptr [bp+10]
add ax,bx
adc dx,0
; cmp ax,0fffdh
; jnbe exit_Tr

mov di,ax

mov ax,4f05h
mov bx,0
int 10h

mov cx,word ptr [bp+6]
mov word ptr es:[di],cx
add di,2
mov cx,word ptr [bp+8]
mov word ptr es:[di],cx

exit_Tr: pop di
pop es
leavew

ret

_Demo endp


_TEXT ends




_DATA segment use16 byte public ‘data’

c@ label byte
db 37
db 63h
db 10
db 0

s@ label byte
db 37
db 73h
db 10
db 0

d@ label byte

#p#副标题#e#
db 37
db 64h
db 10
db 0

x@ label byte
db 37
db 78h
db 10
db 0

u@ label byte
db 37
db 75h
db 10
db 0

o@ label byte
db 37
db 6fh
db 10
db 0


_DATA ends




_BSS segment use16 byte public ‘data’

attr _ATTRI ?
db 0f0h dup(0)

_BSS ends

end