![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to whsmk.c CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [Witchaven II] / src|
Return to whsmk.c CVS log | Up to [Witchaven II] / src |
1.1 root 1: /***************************************************************************
2: * WHSMK.C - Smacker code for Witchaven II
3: *
4: * 03/01/96 Les Bird
5: ***************************************************************************/
6:
7: #include "smack.h"
8: #include "svga.h"
9: #include "icorp.h"
10: #include <memcheck.h>
11:
12: #define MAXRADBUFFS 64
13:
14: #pragma pack(1);
15:
16: char *levelname[16] = {
17: "antechamber of asmodeus",
18: "halls of ragnoth",
19: "lokis tomb",
20: "forsaken realm",
21: "eye of midian",
22: "dungeon of disembowlment",
23: "stronghold of chaos",
24: "jaws of venom",
25: "descent into doom",
26: "hack n sniff",
27: "straits of perdition",
28: "plateau of insanity",
29: "crypt of decay",
30: "mausoleum of madness",
31: "gateway into oblivion",
32: "lungs of hell"
33: };
34:
35: Smack *smk;
36:
37: struct radbuftype {
38: long cache_ptr;
39: long cache_length;
40: char cache_lock;
41: };
42:
43: struct radbuftype radbuf[MAXRADBUFFS];
44:
45: extern
46: unsigned vixen;
47:
48: extern
49: long frameplace;
50:
51: extern
52: char palshifted;
53:
54: extern
55: int treasurescnt,
56: treasuresfound,
57: killcnt,
58: kills,
59: expgained,
60: bonus;
61:
62: extern
63: int mapon;
64:
65: extern
66: long qsetmode;
67:
68: RCFUNC
69: void PTR4 *RADLINK
70: radmalloc(u32 numbytes)
71: {
72: int i;
73:
74: for (i = 0; i < MAXRADBUFFS; i++) {
75: if (radbuf[i].cache_ptr == 0L) {
76: break;
77: }
78: }
79: if (i == MAXRADBUFFS) {
80: crash("no more radbuff pointers");
81: }
82: radbuf[i].cache_lock = 200;
83: radbuf[i].cache_length = numbytes;
84: allocache(&(radbuf[i].cache_ptr), radbuf[i].cache_length,
85: &(radbuf[i].cache_lock));
86: if (radbuf[i].cache_ptr == 0L) {
87: crash("radmalloc failed on");
88: }
89: return((void PTR4 *) radbuf[i].cache_ptr);
90: }
91:
92: RCFUNC
93: void RADLINK
94: radfree(void PTR4 * ptr)
95: {
96: int i;
97:
98: for (i = 0; i < MAXRADBUFFS; i++) {
99: if (radbuf[i].cache_ptr == (long) ptr) {
100: radbuf[i].cache_lock = 1;
101: break;
102: }
103: }
104: }
105:
106: void
107: smkinit(unsigned int digifh)
108: {
109: if (digifh != -1) {
110: SmackSoundUseSOS3(digifh, 120);
111: }
112: else {
113: SmackSoundUseSOS3(0, 120);
114: }
115: SmackTimerSetup();
116: }
117:
118: #include <ctype.h>
119: #pragma off (argsused)
120: void
121: texttobuf(char *buffer,short x,short y,short fontstart,char *text,short pal)
122: {
123: short letter,i,offset,sl;
124: char ltr,space;
125: short xl,yl,termxl,termyl;
126: char *buf=NULL;
127: char *pic=NULL;
128:
129: /* ASSUMES BUF of 320 x 200 DIMENSION */
130:
131: offset=0;
132: sl=strlen(text);
133: for( i=0; i<sl; i++ ) {
134: space=0;
135: ltr=toupper(text[i]);
136: if( (x+offset) > 320 ) {
137: break;
138: }
139: if( ltr == ' ' ) {
140: offset+=6;
141: continue;
142: }
143: if( (ltr >= 'A') && (ltr <= 'Z') ) {
144: letter=ltr-'A';
145: }
146: else {
147: if( (ltr >= '0') && (ltr <= '9') ) {
148: letter=ltr-'0'+26;
149: }
150: else {
151: letter=0;
152: }
153: }
154: letter+=fontstart;
155: if( waloff[letter] == 0 ) loadtile(letter);
156: termxl=tilesizx[letter];
157: termyl=tilesizy[letter];
158: yl=0;
159: yloop:
160: xl=0;
161: buf=( char *)(buffer+(yl*320)+(y*320));
162: pic=( char *)(waloff[letter]);
163: xloop:
164: if( *(pic+(xl*termyl)+yl) != 255 ) {
165: *(buf+x+offset+xl)=*(pic+(xl*termyl)+yl);
166: }
167: xl++;
168: if( xl < termxl ) goto xloop;
169: yl++;
170: if( yl < termyl ) goto yloop;
171: offset+=termxl;
172: }
173: }
174: #pragma on (argsused)
175:
176: void
177: smkplayseq(int s)
178: {
179: int frames=0;
180: long dax,
181: dax2,
182: day,
183: day2;
184: long bonus,i,killp,rating,treap;
185: char *ratings[]={
186: "poor",
187: "average",
188: "good",
189: "perfect"
190: },*smklist[]={
191: "intro.smk",
192: "ending1.smk",
193: "stairs.smk",
194: "ending2.smk",
195: "ending3.smk"
196: };
197: struct radbuftype smkbuf;
198: struct player *plr;
199:
200: sprintf(tempbuf,"%c:\\smk\\%s",vixen,smklist[s]);
201: if (access(tempbuf,F_OK) != 0) {
202: strcpy(tempbuf,smklist[s]);
203: }
204: if ((s == 0 || s == 1 || s == 3 || s == 4) && SoundMode) {
205: smk=SmackOpen(tempbuf,SMACKTRACK1,SMACKAUTOEXTRA);
206: }
207: else {
208: smk=SmackOpen(tempbuf,0,SMACKAUTOEXTRA);
209: }
210: if (smk) {
211: smkbuf.cache_ptr=0L;
212: smkbuf.cache_length=(320*200);
213: smkbuf.cache_lock=200;
214: allocache(&(smkbuf.cache_ptr),smkbuf.cache_length,
215: &(smkbuf.cache_lock));
216: if( smkbuf.cache_ptr == 0L ) return;
217: plr=&player[0];
218: switch (s) {
219: case 0:
220: case 1:
221: case 3:
222: case 4:
223: SND_StopMusic();
224: break;
225: case 2:
226: if (kills > killcnt) {
227: kills = killcnt;
228: }
229: killp = (kills * 100) / (killcnt+1);
230: if (treasuresfound > treasurescnt) {
231: treasuresfound = treasurescnt;
232: }
233: treap = (treasuresfound * 100) / (treasurescnt+1);
234: rating = (killp + treap) / 2;
235: if (rating >= 95) {
236: rating = 3;
237: }
238: else if (rating >= 70) {
239: rating = 2;
240: }
241: else if (rating >= 40) {
242: rating = 1;
243: }
244: else {
245: rating = 0;
246: }
247: bonus = rating * 500;
248: plr->score += bonus;
249: break;
250: }
251: keystatus[1] = 0;
252: keystatus[28] = 0;
253: keystatus[57] = 0;
254: SVGADetect(0);
255: if( !SVGASetup(320,200) ) {
256: goto done;
257: }
258: SmackToBuffer(smk,0L,0L,320L,200L,(void *)smkbuf.cache_ptr,0);
259: finishpaletteshifts();
260: SVGASetGraph();
261: while (1) {
262: if (smk->NewPalette) {
263: SVGASetPalette(smk->Palette);
264: }
265: SmackDoFrame(smk);
266: SmackNextFrame(smk);
267: if (s == 2) {
268: texttobuf(( void *)smkbuf.cache_ptr,10,13,THEFONT,levelname[mapon],0);
269: texttobuf(( void *)smkbuf.cache_ptr,10, 31, THEFONT, "level conquered", 0);
270: texttobuf(( void *)smkbuf.cache_ptr,10, 64, THEFONT, "enemies killed", 0);
271: sprintf(tempbuf, "%d of %d", kills, killcnt);
272: texttobuf(( void *)smkbuf.cache_ptr,160 + 48 + 14, 64, THEFONT, tempbuf, 0);
273:
274: texttobuf(( void *)smkbuf.cache_ptr,10, 64 + 18, THEFONT, "treasures found", 0);
275: sprintf(tempbuf, "%d of %d",treasuresfound, treasurescnt);
276: texttobuf(( void *)smkbuf.cache_ptr,160 + 48 + 14, 64 + 18, THEFONT, tempbuf, 0);
277:
278: texttobuf(( void *)smkbuf.cache_ptr,10, 64 + (18 * 2), THEFONT,
279: "experience gained", 0);
280: sprintf(tempbuf, "%d", expgained + bonus);
281: texttobuf(( void *)smkbuf.cache_ptr,160 + 48 + 14, 64 + (18 * 2), THEFONT,
282: tempbuf, 0);
283:
284: texttobuf(( void *)smkbuf.cache_ptr,10, 64 + (18 * 3), THEFONT,
285: "rating", 0);
286: texttobuf(( void *)smkbuf.cache_ptr,160 + 48 + 14, 64 + (18 * 3), THEFONT,
287: ratings[rating], 0);
288:
289: texttobuf(( void *)smkbuf.cache_ptr,10, 64 + (18 * 4), THEFONT,
290: "bonus", 0);
291: sprintf(tempbuf, "%d", bonus);
292: texttobuf(( void *)smkbuf.cache_ptr,160 + 48 + 14, 64 + (18 * 4), THEFONT,
293: tempbuf, 0);
294: }
295: SVGABlit(( void *)smkbuf.cache_ptr,0,0,320,200,320,0,0);
296: while (SmackWait(smk)) {
297: #ifdef ALLOWSCREENCAPTURE
298: if( (svga == 0) && (keystatus[0x58] != 0) ) {
299: keystatus[0x58] = 0;
300: screencapture("captxxxx.pcx", keystatus[0x2A]|keystatus[0x36]);
301: }
302: #endif
303: if (keystatus[1] || keystatus[57] || keystatus[28]) {
304: goto done;
305: }
306: }
307: if (keystatus[1] || keystatus[57] || keystatus[28]) {
308: goto done;
309: }
310: if (s == 1 || s == 3 || s == 4) {
311: frames++;
312: if (frames == smk->Frames) {
313: goto done;
314: }
315: }
316: }
317: done:
318: smkbuf.cache_lock=1;
319: SmackClose(smk);
320: for (i = 0 ; i < MAXRADBUFFS ; i++) {
321: radbuf[i].cache_lock = 1;
322: }
323: qsetmode=201;
324: setgamemode();
325: if( plr->dimension == 3 && svga == 0 ) {
326: dax = (XDIM >> 1) - (plr->screensize >> 1);
327: dax2 = dax + plr->screensize - 1;
328: day = (STATUSSCREEN >> 1) - (((plr->screensize * STATUSSCREEN) / XDIM) >> 1);
329: day2 = day + ((plr->screensize * STATUSSCREEN) / XDIM) - 1;
330: setview(dax, day, dax2, day2);
331: updatestatusbar();
332: }
333: if( plr->dimension == 3 && svga == 1 ) {
334: if( plr->screensize == 320 ) {
335: setview(0L, 0L, 639L, 371L);
336: }
337: else {
338: setview(0L, 0L, 639L, 479L);
339: }
340: updatestatusbar();
341: }
342: }
343: }
344:
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.