2 Copyright (C) Prikol Software 1996-1997
3 Copyright (C) Aleksey Volynskov 1996-1997
4 Copyright (C) <ARembo@gmail.com> 2011
6 This file is part of the Doom2D:Rembo project.
8 Doom2D:Rembo is free software; you can redistribute it and/or modify
9 it under the terms of the GNU General Public License version 2 as
10 published by the Free Software Foundation.
12 Doom2D:Rembo is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 GNU General Public License for more details.
17 You should have received a copy of the GNU General Public License
18 along with this program; if not, see <http://www.gnu.org/licenses/> or
19 write to the Free Software Foundation, Inc.,
20 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
33 // адрес экранного буфера
37 unsigned char scrbuf
[64000];
43 SDL_Surface
* screen
= NULL
;
47 char fullscreen
= OFF
;
51 vgaimg
*V_getvgaimg (int id
) {
52 int loaded
= M_was_locked(id
);
53 vgaimg
*v
= M_lock(id
);
54 if (v
!= NULL
&& !loaded
) {
55 v
->w
= short2host(v
->w
);
56 v
->h
= short2host(v
->h
);
57 v
->sx
= short2host(v
->sx
);
58 v
->sy
= short2host(v
->sy
);
63 vgaimg
*V_loadvgaimg (char *name
) {
64 return V_getvgaimg(F_getresid(name
));
69 Uint32 flags
= SDL_SWSURFACE
|SDL_DOUBLEBUF
|SDL_HWPALETTE
;
70 if (fullscreen
) flags
= flags
| SDL_FULLSCREEN
;
71 screen
= SDL_SetVideoMode(SCRW
, SCRH
, 8, flags
);
72 if (!screen
) ERR_failinit("Unable to set video mode: %s\n", SDL_GetError());
78 // переключение в текстовый режим
84 void draw_rect (int x
, int y
, int w
, int h
, int c
)
91 SDL_FillRect(screen
, &dstrect
, c
);
94 // установить область вывода
95 void V_setrect(short x
,short w
,short y
,short h
)
102 SDL_SetClipRect(screen
, &r
);
103 SDL_GetClipRect(screen
, &r
);
109 if (cx2
>=SCRW
) cx2
=SCRW
-1;
111 if (cy2
>=SCRH
) cy2
=SCRH
-1;
114 void putpixel(int x
, int y
, Uint8 color
)
116 if(x
>=cx1
&& x
<=cx2
&& y
>=cy1
&& y
<=cy2
) {
119 Uint8
*p
= (Uint8
*)screen
->pixels
+ y
*screen
->pitch
+ x
;
128 byte
getpixel(int x
, int y
)
130 if(x
>=cx1
&& x
<=cx2
&& y
>=cy1
&& y
<=cy2
) {
133 return *((Uint8
*)screen
->pixels
+ y
*screen
->pitch
+ x
);
138 void mappixel(int x
,int y
,byte
* cmap
)
140 byte c
= getpixel(x
,y
);
141 putpixel(x
,y
,cmap
[c
]);
149 if (f
) V_offset(SCRW
/2-320/2, SCRH
/2-200/2);
153 void V_offset(int ox
, int oy
)
159 void draw_spr(short x
,short y
,vgaimg
*i
, int d
, int c
)
164 if (d
& 1) x
=x
-i
->w
+i
->sx
; else x
-=i
->sx
;
165 if (d
& 2) y
=y
-i
->h
+i
->sy
; else y
-=i
->sy
;
166 if(x
+i
->w
>=cx1
&& x
<=cx2
&& y
+i
->h
>=cy1
&& y
<=cy2
) {
168 byte
*p
= (byte
*)i
+ sizeof(vgaimg
);
169 for (ly
=0; ly
<i
->h
; ly
++) {
170 for(lx
=0; lx
<i
->w
; lx
++) {
172 rx
= (d
& 1) ? (i
->w
-lx
-1) : (rx
=lx
);
173 ry
= (d
& 2) ? (i
->h
-ly
-1) : (ry
=ly
);
176 if (c
) if (t
>=0x70 && t
<=0x7F) t
=t
-0x70+c
;
177 putpixel(x
+rx
,y
+ry
,t
);
185 void V_rotspr (int x
, int y
, vgaimg
* i
, int d
)
192 void V_pic(short x
,short y
,vgaimg
*i
)
194 draw_spr(x
,y
,i
, 0, 0);
197 void V_manspr(int x
,int y
,void *p
, unsigned char c
)
199 draw_spr(x
,y
,p
, 0, c
);
202 void V_manspr2(int x
,int y
,void *p
, unsigned char c
)
204 draw_spr(x
,y
,p
, 1, c
);
207 // вывести точку цвета c в координатах (x,y)
208 void V_dot(short x
,short y
, unsigned char c
)
214 extern byte bright
[256];
215 extern byte flametab
[16];
216 extern byte mixmap
[256][256];
218 void smoke_sprf(int x
, int y
, byte c
)
220 byte t
= getpixel(x
,y
);
224 putpixel(x
,y
,mixmap
[c
][t
]);
227 void flame_sprf(int x
, int y
, byte c
)
229 byte t
= getpixel(x
,y
);
231 putpixel(x
,y
,flametab
[c
]);
234 void V_sprf(short x
,short y
,vgaimg
*i
,spr_f
*f
)
242 for (cy
=y
; cy
<y
+i
->h
; cy
++) {
243 for(cx
=x
; cx
<x
+i
->w
; cx
++) {
252 void V_spr(short x
,short y
,vgaimg
*i
)
254 draw_spr(x
,y
,i
,0, 0);
257 void V_spr2(short x
,short y
,vgaimg
*i
)
262 void V_clr(short x
,short w
,short y
,short h
,unsigned char c
)
264 draw_rect(x
,y
,w
,h
, c
);
267 // установить палитру из массива p
268 void VP_setall(void *p
)
273 // установить n цветов, начиная с f, из массива p
274 void VP_set(void *p
,short f
,short n
)
276 byte
*ptr
= (byte
*)p
;
277 SDL_Color colors
[256];
281 colors
[i
].r
=ptr
[0]*4;
282 colors
[i
].g
=ptr
[1]*4;
283 colors
[i
].b
=ptr
[2]*4;
286 SDL_SetPalette(screen
, SDL_LOGPAL
|SDL_PHYSPAL
, colors
, f
, n
);
289 // установить адрес экранного буфера
290 // NULL - реальный экран
291 void V_setscr(void *p
)
293 if (screen
) SDL_Flip(screen
);
296 // скопировать прямоугольник на экран
297 void V_copytoscr(short x
,short w
,short y
,short h
)
299 x
*=HQ
; y
*=HQ
; w
*=HQ
; h
*=HQ
;
300 SDL_UpdateRect(screen
, x
, y
, w
, h
);
303 void V_maptoscr(int x
,int w
,int y
,int h
,void *cmap
)
306 for (cx
=x
; cx
<x
+w
; cx
++)
307 for (cy
=y
; cy
<y
+h
; cy
++)
308 mappixel(cx
,cy
,(byte
*)cmap
);
309 V_copytoscr(x
,w
,y
,h
);
312 void V_remap_rect(int x
,int y
,int w
,int h
,byte
*cmap
)
315 for (cx
=x
; cx
<x
+w
; cx
++)
316 for (cy
=y
; cy
<y
+h
; cy
++)
317 mappixel(cx
,cy
,cmap
);
320 extern void *walp
[256];
321 extern byte clrmap
[256*12];
323 void Z_drawfld(byte
*fld
, int bg
)
327 for (y
=0; y
<FLDH
; y
++)
329 for (x
=0; x
<FLDW
; x
++)
331 int sx
= x
*CELW
-w_x
+WD
/2;
332 int sy
= y
*CELH
-w_y
+HT
/2+1+w_o
;
336 vgaimg
*pic
= walp
[*p
];
339 byte
*cmap
= clrmap
+ ((int)pic
+7)*256;
340 V_remap_rect(sx
, sy
, CELW
, CELH
, cmap
);
355 if (!SDL_WM_ToggleFullScreen(screen
)) {
356 int ncolors
= screen
->format
->palette
->ncolors
;
357 SDL_Color colors
[256];
359 for (i
=0; i
<ncolors
; i
++) {
360 colors
[i
].r
= screen
->format
->palette
->colors
[i
].r
;
361 colors
[i
].g
= screen
->format
->palette
->colors
[i
].g
;
362 colors
[i
].b
= screen
->format
->palette
->colors
[i
].b
;
365 Uint32 flags
= screen
->flags
;
367 SDL_FreeSurface(screen
);
369 screen
= SDL_SetVideoMode(0, 0, 0, flags
^ SDL_FULLSCREEN
);
371 ERR_fatal("Unable to set video mode\n");
375 SDL_SetPalette(screen
, SDL_LOGPAL
|SDL_PHYSPAL
, colors
, 0, ncolors
);