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
34 // адрес экранного буфера
38 unsigned char scrbuf
[64000];
44 SDL_Surface
* screen
= NULL
;
48 char fullscreen
= OFF
;
52 vgaimg
*V_getvgaimg (int id
) {
53 int loaded
= M_was_locked(id
);
54 vgaimg
*v
= M_lock(id
);
55 if (v
!= NULL
&& !loaded
) {
56 v
->w
= short2host(v
->w
);
57 v
->h
= short2host(v
->h
);
58 v
->sx
= short2host(v
->sx
);
59 v
->sy
= short2host(v
->sy
);
64 vgaimg
*V_loadvgaimg (char *name
) {
65 return V_getvgaimg(F_getresid(name
));
70 Uint32 flags
= SDL_SWSURFACE
|SDL_DOUBLEBUF
|SDL_HWPALETTE
;
71 if (fullscreen
) flags
= flags
| SDL_FULLSCREEN
;
72 screen
= SDL_SetVideoMode(SCRW
, SCRH
, 8, flags
);
73 if (!screen
) ERR_failinit("Unable to set video mode: %s\n", SDL_GetError());
79 // переключение в текстовый режим
85 void draw_rect (int x
, int y
, int w
, int h
, int c
)
92 SDL_FillRect(screen
, &dstrect
, c
);
95 // установить область вывода
96 void V_setrect(short x
,short w
,short y
,short h
)
103 SDL_SetClipRect(screen
, &r
);
104 SDL_GetClipRect(screen
, &r
);
110 if (cx2
>=SCRW
) cx2
=SCRW
-1;
112 if (cy2
>=SCRH
) cy2
=SCRH
-1;
115 void putpixel(int x
, int y
, Uint8 color
)
117 if(x
>=cx1
&& x
<=cx2
&& y
>=cy1
&& y
<=cy2
) {
120 Uint8
*p
= (Uint8
*)screen
->pixels
+ y
*screen
->pitch
+ x
;
129 byte
getpixel(int x
, int y
)
131 if(x
>=cx1
&& x
<=cx2
&& y
>=cy1
&& y
<=cy2
) {
134 return *((Uint8
*)screen
->pixels
+ y
*screen
->pitch
+ x
);
139 void mappixel(int x
,int y
,byte
* cmap
)
141 byte c
= getpixel(x
,y
);
142 putpixel(x
,y
,cmap
[c
]);
150 if (f
) V_offset(SCRW
/2-320/2, SCRH
/2-200/2);
154 void V_offset(int ox
, int oy
)
160 void draw_spr(short x
,short y
,vgaimg
*i
, int d
, int c
)
165 if (d
& 1) x
=x
-i
->w
+i
->sx
; else x
-=i
->sx
;
166 if (d
& 2) y
=y
-i
->h
+i
->sy
; else y
-=i
->sy
;
167 if(x
+i
->w
>=cx1
&& x
<=cx2
&& y
+i
->h
>=cy1
&& y
<=cy2
) {
169 byte
*p
= (byte
*)i
+ sizeof(vgaimg
);
170 for (ly
=0; ly
<i
->h
; ly
++) {
171 for(lx
=0; lx
<i
->w
; lx
++) {
173 rx
= (d
& 1) ? (i
->w
-lx
-1) : (rx
=lx
);
174 ry
= (d
& 2) ? (i
->h
-ly
-1) : (ry
=ly
);
177 if (c
) if (t
>=0x70 && t
<=0x7F) t
=t
-0x70+c
;
178 putpixel(x
+rx
,y
+ry
,t
);
186 void V_rotspr (int x
, int y
, vgaimg
* i
, int d
)
193 void V_pic(short x
,short y
,vgaimg
*i
)
195 draw_spr(x
,y
,i
, 0, 0);
198 void V_manspr(int x
,int y
,void *p
, unsigned char c
)
200 draw_spr(x
,y
,p
, 0, c
);
203 void V_manspr2(int x
,int y
,void *p
, unsigned char c
)
205 draw_spr(x
,y
,p
, 1, c
);
208 // вывести точку цвета c в координатах (x,y)
209 void V_dot(short x
,short y
, unsigned char c
)
215 extern byte bright
[256];
216 extern byte flametab
[16];
217 extern byte mixmap
[256][256];
219 void smoke_sprf(int x
, int y
, byte c
)
221 byte t
= getpixel(x
,y
);
225 putpixel(x
,y
,mixmap
[c
][t
]);
228 void flame_sprf(int x
, int y
, byte c
)
230 byte t
= getpixel(x
,y
);
232 putpixel(x
,y
,flametab
[c
]);
235 void V_sprf(short x
,short y
,vgaimg
*i
,spr_f
*f
)
243 for (cy
=y
; cy
<y
+i
->h
; cy
++) {
244 for(cx
=x
; cx
<x
+i
->w
; cx
++) {
253 void V_spr(short x
,short y
,vgaimg
*i
)
255 draw_spr(x
,y
,i
,0, 0);
258 void V_spr2(short x
,short y
,vgaimg
*i
)
263 void V_clr(short x
,short w
,short y
,short h
,unsigned char c
)
265 draw_rect(x
,y
,w
,h
, c
);
268 // установить палитру из массива p
269 void VP_setall(void *p
)
274 // установить n цветов, начиная с f, из массива p
275 void VP_set(void *p
,short f
,short n
)
277 byte
*ptr
= (byte
*)p
;
278 SDL_Color colors
[256];
282 colors
[i
].r
=ptr
[0]*4;
283 colors
[i
].g
=ptr
[1]*4;
284 colors
[i
].b
=ptr
[2]*4;
287 SDL_SetPalette(screen
, SDL_LOGPAL
|SDL_PHYSPAL
, colors
, f
, n
);
290 // установить адрес экранного буфера
291 // NULL - реальный экран
292 void V_setscr(void *p
)
294 if (screen
) SDL_Flip(screen
);
297 // скопировать прямоугольник на экран
298 void V_copytoscr(short x
,short w
,short y
,short h
)
300 x
*=HQ
; y
*=HQ
; w
*=HQ
; h
*=HQ
;
301 SDL_UpdateRect(screen
, x
, y
, w
, h
);
304 void V_maptoscr(int x
,int w
,int y
,int h
,void *cmap
)
307 for (cx
=x
; cx
<x
+w
; cx
++)
308 for (cy
=y
; cy
<y
+h
; cy
++)
309 mappixel(cx
,cy
,(byte
*)cmap
);
310 V_copytoscr(x
,w
,y
,h
);
313 void V_remap_rect(int x
,int y
,int w
,int h
,byte
*cmap
)
316 for (cx
=x
; cx
<x
+w
; cx
++)
317 for (cy
=y
; cy
<y
+h
; cy
++)
318 mappixel(cx
,cy
,cmap
);
321 extern void *walp
[256];
322 extern byte clrmap
[256*12];
324 void Z_drawfld (byte
*fld
, int bg
)
328 for (y
= 0; y
< FLDH
; y
++) {
329 for (x
= 0; x
< FLDW
; x
++) {
330 int sx
= x
* CELW
- w_x
+ WD
/ 2;
331 int sy
= y
* CELH
- w_y
+ HT
/ 2 + 1 + w_o
;
333 vgaimg
*pic
= walp
[*p
];
334 // special pointer value setted for _WATER_* in view.c
335 if ((intptr_t)pic
<= 3) {
337 byte
*cmap
= clrmap
+ ((intptr_t)pic
+7)*256;
338 V_remap_rect(sx
, sy
, CELW
, CELH
, cmap
);
351 if (!SDL_WM_ToggleFullScreen(screen
)) {
352 int ncolors
= screen
->format
->palette
->ncolors
;
353 SDL_Color colors
[256];
355 for (i
=0; i
<ncolors
; i
++) {
356 colors
[i
].r
= screen
->format
->palette
->colors
[i
].r
;
357 colors
[i
].g
= screen
->format
->palette
->colors
[i
].g
;
358 colors
[i
].b
= screen
->format
->palette
->colors
[i
].b
;
361 Uint32 flags
= screen
->flags
;
363 SDL_FreeSurface(screen
);
365 screen
= SDL_SetVideoMode(0, 0, 0, flags
^ SDL_FULLSCREEN
);
367 ERR_fatal("Unable to set video mode\n");
371 SDL_SetPalette(screen
, SDL_LOGPAL
|SDL_PHYSPAL
, colors
, 0, ncolors
);