Mercurial > hg > forks > pwpunix
changeset 51:53676367d46f
Hack Final Isi to "work", kind of. Requires a nasty hack in pwplib to actually run (without it, it quits abruptly .. not yet sure why.)
| author | Matti Hamalainen <ccr@tnsp.org> |
|---|---|
| date | Mon, 24 May 2010 11:48:48 +0300 |
| parents | e2b6a35bcb0c |
| children | 411c1c8d810e |
| files | final_isi/Makefile final_isi/fisi3d.c final_isi/fisidemo.c final_isi/fisieffu.c final_isi/fisifont.c final_isi/fisimain.c final_isi/wrapper.c final_isi/wrapper.h pwplib/pwplib-unix.c |
| diffstat | 9 files changed, 951 insertions(+), 911 deletions(-) [+] |
line wrap: on
line diff
--- a/final_isi/Makefile Mon May 24 08:48:18 2010 +0300 +++ b/final_isi/Makefile Mon May 24 11:48:48 2010 +0300 @@ -1,17 +1,12 @@ -TARGETS=fisi - -all: fisi +include ../config.mak -CFLAGS = -g -O2 -W -Wall -LDFLAGS = -g +TARGETS=fisi$(BINEXT) -OBJS = fiscroll.o fisi3d.o fisidemo.o fisieffu.o fisifont.o fisimain.o fisitime.o wrapper.o +all: $(TARGETS) -%.o: %.c - $(CC) $(CFLAGS) -c -o $@ $< +OBJS = wrapper.o fiscroll.o fisi3d.o fisidemo.o fisieffu.o fisifont.o fisimain.o fisitime.o ../pwplib.a -fisi: $(OBJS) ../pwplib.a - $(CC) $(LDFLAGS) -c -o $@ $+ `sdl-config --libs` +include ../Makefile.inc -clean: - $(RM) $(TARGETS) *.o +fisi$(BINEXT): $(OBJS) + $(CC) $(CFLAGS) -o $@ $+ $(LDFLAGS)
--- a/final_isi/fisi3d.c Mon May 24 08:48:18 2010 +0300 +++ b/final_isi/fisi3d.c Mon May 24 11:48:48 2010 +0300 @@ -297,8 +297,6 @@ #define jmul32(a,b) (((long)(a)*(long)(b))>>16) -extern int taimeri; - eggine_do(char*b,sint rot,int zoom,int basex,int basey) { register sint i; sint j; sint fzed[20],fcez[20];
--- a/final_isi/fisidemo.c Mon May 24 08:48:18 2010 +0300 +++ b/final_isi/fisidemo.c Mon May 24 11:48:48 2010 +0300 @@ -3,750 +3,953 @@ #include "fisi.h" #include "fisiansi.h" -#ifdef TURBOC - #define FAR far -#else - #define FAR -#endif - -extern volatile int taimeri; - -extern int bgcol,txtcol,ansifrom; +extern int bgcol, txtcol, ansifrom; extern char buffclass; -extern char fx_main; /* p„„effu: 1=tunneli */ +extern char fx_main; extern char fx_main_spex; extern char fx_3d; extern char fx_flare; -extern char FAR *ruutu,*txb,*abb,*vib; +extern char *ruutu, *txb, *abb, *vib; extern framekey o0[]; -prforhyb(char*h) +void prforhyb(char *h) { - int i; - for(i=80*25;i;i--){ - if((*h==32)||(!*h))if(!(*(h+1)&0xf0)){*h=253;*(h+1)=1;} - h+=2; - } + int i; + for (i = 80 * 25; i; i--) + { + if ((*h == 32) || (!*h)) + if (!(*(h + 1) & 0xf0)) + { + *h = 253; + *(h + 1) = 1; + } + h += 2; + } } -demoloop() +void demoloop() { - char lastkey=0; - int dt=0; - int fader=0,fadetype=1; - - while(lastkey!=27){ - if(kbhit()){lastkey=getch(); - -/* if(lastkey=='0'){o0[OY].targ=25*32;o0[OROT].targ=150; - o0[OZOOM].targ=25000;} - if(lastkey=='9')fx_3d=0; - - if(lastkey=='1')o0[OHGT].targ=45*256; - if(lastkey=='2')o0[OHGT].targ=25*256; - if(lastkey=='3')o0[OHGT].targ=5*256;*/ - } - - while(dt<taimeri){ - - -/***********************************************************/ - - #define b break - #define sc strcpy + int quit = 0; + char lastkey = 0; + int dt = 0; + int fader = 0, fadetype = 1; - signed int d=dt; - -/* d+=5*256;*/ - - loopflush(); /* <-- muualle! */ + while (!quit) + { + int t = pwplib_timer(); - if(d<5*384) - if(!(d%5))switch(d/5){ - case(0): - scroller_init(0); - preparebuff(SINGLE); - fx_main=SCROLLER; - fx_main_spex=0; - b; - case(64): - fader=7;fadetype=1; - txtline(txb+80*10,"elet{{n","the`year"); - b; - case(66): - txtline(txb+80*20,"vuotta","is");b; - case(68): - txtline(txb+80*30,"}o}~","}o}~");b; - case(96): - fader=31;fadetype=2;b; - case(100): - clrline(txb+80*10);b; - case(116): - clrline(txb+80*10);b; + while (dt < t) + { + int d = dt; - case(128): - fader=7;fadetype=1; - memset(txb,0,80*50); - txtline(txb+80*10,"kaaos","chaos"); - b; - case(132): - txtline(txb+80*20,"on`t{ytt{nyt","has`taken");b; - case(134): - txtline(txb+80*30,"maan","the`earth");b; - case(128+32): - fader=31;fadetype=2;b; - case(128+48): - clrline(txb+80*20);b; - case(128+64): - fader=7;fadetype=1; - memset(txb,0,80*50); - txtline(txb+80*2,"maailman","the`great"); - b; - case(192+4): - txtline(txb+80*14,"suuri","leader`of");b; - case(192+8): - txtline(txb+80*26,"johtaja","the`world`has");b; - case(192+12): - txtline(txb+80*38,"on`vangittu","been`captured");b; - case(192+32): - fader=31;fadetype=2;b; - case(192+64): - fader=7;fadetype=1; - memset(txb,0,80*50); - txtline(txb+80*2,"ja`vain","and"); - b; - case(192+70): - txtline(txb+80*11,"yksi`mies","only");b; - case(192+72): - txtline(txb+80*20,"voi","one`man");b; - case(192+74): - txtline(txb+80*29,"pelastaa","can");b; - case(192+76): - txtline(txb+80*38,"h{net","save`him");b; - case(192+96): - fader=31;fadetype=2;b; - case(256+64): - memset(txb,0,80*50); - fader=7;fadetype=1; - txtline(txb+80*20,"i`s`i","i`s`i"); - b; - case(256+64+32): - txtline(txb+80*8,"final","final");b; - case(256+104): - fader=31;fadetype=2;b; - case(256+112): - memset(txb,0xff,80*50); - fader=15;fadetype=3;b; - case(256+118): - preparebuff(NONE);fx_main=NONE; - uncrunch(LOGO,ruutu,sizeof(LOGO)); - b; - } - - d-=5*(256+128+28); - if(d>=0)if(!(d&3))switch(d>>2){ - case(0):preparebuff(SINGLE);fx_main=SCROLLER; - scroller_init(HORIZON|NOSKRAMBLE); - memset(txb,0,80*25*2); - scr_txr(1); - o0[OHGT].curr=48*256;o0[OHGT].targ=22*256; - o0[OHGT].frac=2048; - o0[OZOOM].curr=o0[OZOOM].targ=10;fx_3d=1; - txtline(txb+80*8,"isi","daddy"); - txtline(txb+80*18,"ei`turhia","wont`wait"); - txtline(txb+80*28,"aikaile","too`long");fader=7;fadetype=1; - b; - case(32):fader=31;fadetype=2;b; - case(64): - memset(txb,0,80*25*2); - txtline(txb+80*5,"isi`laittaa","daddy"); - txtline(txb+80*15,"p{{h{ns{","puts`on`his"); - txtline(txb+80*25,"virtuaalisen","virtual"); - txtline(txb+80*35,"kyp{r{n","helm"); - fader=7;fadetype=3;b; - - case(64+32): - fader=31;fadetype=2;b; - - case(64+40):preparebuff(NONE); - memset(ruutu,0,80*25*2); - uncrunch(SYBER0,ruutu,sizeof(SYBER0)); - b; - - case(64+44): - memset(ruutu,0,80*25*2); - uncrunch(SYBER1,ruutu,sizeof(SYBER1)); - b; - - case(64+48): - memset(ruutu,0,80*25*2); - uncrunch(SYBER2,ruutu,sizeof(SYBER2)); - b; - - case(64+52):preparebuff(SINGLE); - memset(txb,0xee,80*25*2); - fader=31;fadetype=2; - o0[OFLX].curr=o0[OFLX].targ=20*256; - o0[OFLY].curr=o0[OFLY].targ=-15*256;fx_flare=1; - b; - - case(64+58):fader=31;fadetype=2;fx_flare=0;b; - - case(64+64):fx_flare=1; - memset(txb,0,80*25*2); - txtline(txb+80*5,"ja`hetkess{","and"); - txtline(txb+80*15,"h{nest{","instantly"); - txtline(txb+80*25,"tulee","he`becomes"); - fader=7;fadetype=3; - b; + if (d < 5 * 384) + if (!(d % 5)) + switch (d / 5) + { + case (0): + scroller_init(0); + preparebuff(SINGLE); + fx_main = SCROLLER; + fx_main_spex = 0; + break; + case (64): + fader = 7; + fadetype = 1; + txtline(txb + 80 * 10, "elet{{n", "the`year"); + break; + case (66): + txtline(txb + 80 * 20, "vuotta", "is"); + break; + case (68): + txtline(txb + 80 * 30, "}o}~", "}o}~"); + break; + case (96): + fader = 31; + fadetype = 2; + break; + case (100): + clrline(txb + 80 * 10); + break; + case (116): + clrline(txb + 80 * 10); + break; - case(64+64+32):fx_flare=0; - memset(txb,0,80*25*2); - txtline(txb+80*30,"salaper{inen","the"); - txtline(txb+80*40,"","mysterious"); - b; - - case(64+64+32+16): - fx_3d=1;eggine_load(0); - o0[OY].curr=70*32;o0[OY].targ=25*32; - o0[OROT].targ=800; - o0[OZOOM].targ=31000; - b; - - case(64+64+64): - memset(txb,0,80*25*2); - o0[OY].targ=25*32; - txtline(txb+80*20,"virtuaalimies","virtual`man"); - b; - - case(64+64+64+16): - o0[OROT].targ=760;o0[OROT].frac=512;b; - - case(64+64+64+32): - fadetype=4;fader=1; - fx_3d=1;eggine_load(0); - b; - - case(64+64+64+40): - o0[OZOOM].targ=100;o0[OZOOM].frac=4096; - b; - - case(64+64+64+48):memset(txb,0xff,80*25*2); - b; - - } + case (128): + fader = 7; + fadetype = 1; + memset(txb, 0, 80 * 50); + txtline(txb + 80 * 10, "kaaos", "chaos"); + break; + case (132): + txtline(txb + 80 * 20, "on`t{ytt{nyt", "has`taken"); + break; + case (134): + txtline(txb + 80 * 30, "maan", "the`earth"); + break; + case (128 + 32): + fader = 31; + fadetype = 2; + break; + case (128 + 48): + clrline(txb + 80 * 20); + break; + case (128 + 64): + fader = 7; + fadetype = 1; + memset(txb, 0, 80 * 50); + txtline(txb + 80 * 2, "maailman", "the`great"); + break; + case (192 + 4): + txtline(txb + 80 * 14, "suuri", "leader`of"); + break; + case (192 + 8): + txtline(txb + 80 * 26, "johtaja", "the`world`has"); + break; + case (192 + 12): + txtline(txb + 80 * 38, "on`vangittu", "been`captured"); + break; + case (192 + 32): + fader = 31; + fadetype = 2; + break; + case (192 + 64): + fader = 7; + fadetype = 1; + memset(txb, 0, 80 * 50); + txtline(txb + 80 * 2, "ja`vain", "and"); + break; + case (192 + 70): + txtline(txb + 80 * 11, "yksi`mies", "only"); + break; + case (192 + 72): + txtline(txb + 80 * 20, "voi", "one`man"); + break; + case (192 + 74): + txtline(txb + 80 * 29, "pelastaa", "can"); + break; + case (192 + 76): + txtline(txb + 80 * 38, "h{net", "save`him"); + break; + case (192 + 96): + fader = 31; + fadetype = 2; + break; + case (256 + 64): + memset(txb, 0, 80 * 50); + fader = 7; + fadetype = 1; + txtline(txb + 80 * 20, "i`s`i", "i`s`i"); + break; + case (256 + 64 + 32): + txtline(txb + 80 * 8, "final", "final"); + break; + case (256 + 104): + fader = 31; + fadetype = 2; + break; + case (256 + 112): + memset(txb, 0xff, 80 * 50); + fader = 15; + fadetype = 3; + break; + case (256 + 118): + preparebuff(NONE); + fx_main = NONE; + uncrunch(LOGO, ruutu, sizeof(LOGO)); + break; + } - d-=8*128; - if(d>=0)if(!(d&3))switch(d>>2){ - case(0): - fx_3d=fx_flare=0; - preparebuff(HYBRID); - memset(abb,0x0000,80*25*2); - memset(txb,0x0000,80*25*2); - memset(vib,0,80*50); - fx_main=NONE; - uncrunch(VPELU0,abb,sizeof(VPELU0)); - uncrunch(VPELU1,txb,sizeof(VPELU1)); - prforhyb(abb);prforhyb(txb); - ansifrom=2; - atxtline(vib,"kuka`sin{","who`are",0); - atxtline(vib+9*80,"``olet","``you",0); - b; - case(64): - memset(vib,0,80*50); - atxtline(vib,"ja","and",0); - atxtline(vib+9*80,"``miksi`olet","why`have`you",0); - b; - case(64+16): - memset(vib,0,80*50); - atxtline(vib,"vanginnut","captured",0); - atxtline(vib+9*80,"``minut","``me",0); - b; - case(64+32): - ansifrom=0; - memset(txb,0,80*25*2); - uncrunch(VPELU2,txb,sizeof(VPELU2)); - prforhyb(txb); - b; - case(128): - ansifrom=2; - memset(vib,0,80*50); - atxtline(vib,"min{`olen","i`am",1); - b; - case(128+16): - atxtline(vib+9*80,"sinun","your",1); - b; - case(128+32): - memset(vib,0,80*50); - atxtline(vib,"pime{","dark",1); - atxtline(vib+9*80,"puoliskosi","half",1); - b; - case(128+64): - memset(abb,0x0000,80*25*2); - memset(txb,0x0000,80*25*2); - memset(vib,0,80*50); - ansifrom=2; - uncrunch(VMPELU0,abb,sizeof(VMPELU0)); - uncrunch(VMPELU1,txb,sizeof(VMPELU1)); - prforhyb(abb);prforhyb(txb); - atxtline(vib,"musta","the`black",0); - atxtline(vib+9*80,"``pelu","``pelu",0); - b; - } + d -= 5 * (256 + 128 + 28); + if (d >= 0) + if (!(d & 3)) + switch (d >> 2) + { + case (0): + preparebuff(SINGLE); + fx_main = SCROLLER; + scroller_init(HORIZON | NOSKRAMBLE); + memset(txb, 0, 80 * 25 * 2); + scr_txr(1); + o0[OHGT].curr = 48 * 256; + o0[OHGT].targ = 22 * 256; + o0[OHGT].frac = 2048; + o0[OZOOM].curr = o0[OZOOM].targ = 10; + fx_3d = 1; + txtline(txb + 80 * 8, "isi", "daddy"); + txtline(txb + 80 * 18, "ei`turhia", "wont`wait"); + txtline(txb + 80 * 28, "aikaile", "too`long"); + fader = 7; + fadetype = 1; + break; + case (32): + fader = 31; + fadetype = 2; + break; + case (64): + memset(txb, 0, 80 * 25 * 2); + txtline(txb + 80 * 5, "isi`laittaa", "daddy"); + txtline(txb + 80 * 15, "p{{h{ns{", "puts`on`his"); + txtline(txb + 80 * 25, "virtuaalisen", "virtual"); + txtline(txb + 80 * 35, "kyp{r{n", "helm"); + fader = 7; + fadetype = 3; + break; + + case (64 + 32): + fader = 31; + fadetype = 2; + break; + + case (64 + 40): + preparebuff(NONE); + memset(ruutu, 0, 80 * 25 * 2); + uncrunch(SYBER0, ruutu, sizeof(SYBER0)); + break; + + case (64 + 44): + memset(ruutu, 0, 80 * 25 * 2); + uncrunch(SYBER1, ruutu, sizeof(SYBER1)); + break; + + case (64 + 48): + memset(ruutu, 0, 80 * 25 * 2); + uncrunch(SYBER2, ruutu, sizeof(SYBER2)); + break; - d-=((128+128)*4); - if(d>=0)if(!(d&3))switch(d>>2){ - case(0): - memset(txb,0,80*25*2); - preparebuff(SINGLE); - scroller_init(HORIZON|NOSKRAMBLE); - scr_txr(1); - fx_main=SCROLLER; - fx_main_spex=1; - fx_3d=1;eggine_load(0); - o0[OY].curr=70*32;o0[OY].targ=25*32; - o0[OY].frac=2048; - - o0[OZOOM].curr=25000; - o0[OZOOM].targ=100;o0[OZOOM].frac=1024; + case (64 + 52): + preparebuff(SINGLE); + memset(txb, 0xee, 80 * 25 * 2); + fader = 31; + fadetype = 2; + o0[OFLX].curr = o0[OFLX].targ = 20 * 256; + o0[OFLY].curr = o0[OFLY].targ = -15 * 256; + fx_flare = 1; + break; - fader=7;fadetype=1; - memset(txb,0,80*25*2); - txtline(txb+9*80,"isi","daddy"); - txtline(txb+18*80,"etsii","looks`for"); - txtline(txb+27*80,"poikaansa","his`son"); - txtline(txb+36*80,"urheasti","bravely"); - b; + case (64 + 58): + fader = 31; + fadetype = 2; + fx_flare = 0; + break; - case(32):fader=31;fadetype=2;b; - - case(48):o0[OHGT].targ=5*256;o0[OHGT].frac=4096;b; - - case(64):eggine_load(1); - memset(txb,0,80*25*2); - o0[OY].curr=70*32;o0[OY].targ=25*32; - o0[OY].frac=2048; - o0[OZOOM].curr=20000;o0[OZOOM].targ=27000; - o0[OROT].targ=1000;o0[OROT].frac=4096; + case (64 + 64): + fx_flare = 1; + memset(txb, 0, 80 * 25 * 2); + txtline(txb + 80 * 5, "ja`hetkess{", "and"); + txtline(txb + 80 * 15, "h{nest{", "instantly"); + txtline(txb + 80 * 25, "tulee", "he`becomes"); + fader = 7; + fadetype = 3; + break; - txtline(txb+2*80,"mutta","but"); - txtline(txb+11*80,"pimeyden","the`dark"); - txtline(txb+20*80,"varjostajat","shadows"); - txtline(txb+29*80,"huomaavat","notice"); - txtline(txb+38*80,"h{net","him"); - fader=7;fadetype=1; - b; - case(64+32):fader=31;fadetype=2; - o0[OROT].targ=700;o0[OROT].frac=2048; - o0[OROT].frac=1024; - b; - case(64+48):o0[OROT].targ=1000;b; - case(64+56):o0[OROT].targ=200;b; - case(64+64):o0[OZOOM].targ=100;o0[OZOOM].frac=4096;b; + case (64 + 64 + 32): + fx_flare = 0; + memset(txb, 0, 80 * 25 * 2); + txtline(txb + 80 * 30, "salaper{inen", "the"); + txtline(txb + 80 * 40, "", "mysterious"); + break; + + case (64 + 64 + 32 + 16): + fx_3d = 1; + eggine_load(0); + o0[OY].curr = 70 * 32; + o0[OY].targ = 25 * 32; + o0[OROT].targ = 800; + o0[OZOOM].targ = 31000; + break; -/* case(64+64): - o0[OY].curr=70*32;o0[OY].targ=25*32; - o0[OY].frac=4096; - o0[OROT].targ=50; - o0[OZOOM].curr=31000; - o0[OZOOM].targ=100;o0[OZOOM].frac=4096; - b;*/ - case(64+64+16): - o0[OY].curr=70*32;o0[OY].targ=25*32; - o0[OY].frac=4096; - o0[OROT].targ=500; - o0[OZOOM].curr=31000; - o0[OZOOM].targ=100;o0[OZOOM].frac=4096; - memset(txb,0,80*25*2); - txtline(txb+8*80,"pimeyden","there`is"); - txtline(txb+18*80,"varjostajia","a`lot`of"); - txtline(txb+28*80,"tulee","dark"); - txtline(txb+38*80,"paljon","shadows"); - fader=7;fadetype=1; - b; - case(64+64+32): - o0[OY].curr=70*32;o0[OY].targ=25*32; - o0[OY].frac=4096; - o0[OROT].targ=50; - o0[OZOOM].curr=31000; - o0[OZOOM].targ=100;o0[OZOOM].frac=4096; + case (64 + 64 + 64): + memset(txb, 0, 80 * 25 * 2); + o0[OY].targ = 25 * 32; + txtline(txb + 80 * 20, "virtuaalimies", "virtual`man"); + break; + + case (64 + 64 + 64 + 16): + o0[OROT].targ = 760; + o0[OROT].frac = 512; + break; + + case (64 + 64 + 64 + 32): + fadetype = 4; + fader = 1; + fx_3d = 1; + eggine_load(0); + break; - b; - case(64+64+48): - o0[OY].curr=70*32;o0[OY].targ=25*32; - o0[OY].frac=4096; - o0[OROT].targ=500; - o0[OZOOM].curr=31000; - o0[OZOOM].targ=100;o0[OZOOM].frac=4096; - fader=31;fadetype=2; - b; - case(64+64+64): - memset(txb,0,80*25*2); - txtline(txb+8*80,"ja`isi","and`daddy"); - txtline(txb+18*80,"on`nyt","is`now"); - txtline(txb+28*80,"katalassa","in`quite"); - txtline(txb+38*80,"pinteess{","`a`trouble"); - fader=7;fadetype=1; - b; - case(64+64+64+32):fader=31;fadetype=2;b; - } + case (64 + 64 + 64 + 40): + o0[OZOOM].targ = 100; + o0[OZOOM].frac = 4096; + break; - d-=256*4; - if(d>=0)if(!(d&3))switch(d>>2){ - case(0): - preparebuff(HYBRID); - memset(txb,0,80*25*2);ansifrom=2; - uncrunch(P_SPR,txb+11*160,sizeof(P_SPR)); - uncrunch(MP_SPR,txb+60*2+10*160,sizeof(MP_SPR)); - memset(abb,0,80*25*2); - uncrunch(P_SPR,abb+11*160,sizeof(P_SPR)); - uncrunch(MP_SPR1,abb+60*2+10*160,sizeof(MP_SPR1)); - prforhyb(abb);prforhyb(txb); - fx_main=0;fx_3d=0; - memset(vib,0,80*25*2); - atxtline(vib,"lapsena","as`children",1); - atxtline(vib+9*80,"olimme`yksi`","we`were`one``",1); - b; + case (64 + 64 + 64 + 48): + memset(txb, 0xff, 80 * 25 * 2); + break; - case(32): - uncrunch(SINIPELU,abb+20*2+7*160,sizeof(SINIPELU)); - b; - - case(64): - ansifrom=2;memset(abb,0,80*25*2); - uncrunch(P_SPR,abb+11*160,sizeof(P_SPR1)); - uncrunch(MP_SPR1,abb+60*2+10*160,sizeof(MP_SPR1)); - prforhyb(abb); - memset(vib,0,80*25*2); - atxtline(vib,"sitten`meid{t","then`we`were",1); - atxtline(vib+9*80,"erotettiin`","separated``",1); - b; - - case(96): -/* uncrunch(JINJANG,abb+20*2+7*160,sizeof(JINJANG));*/ - memset(vib,0,80*25*2); - atxtline(vib,"sin{`olet","you`are`good",1); - atxtline(vib+9*80,"hyv{```","i`am`evil",1); - atxtline(vib+18*80,"min{`paha`","",1); - b; + } - case(96+16): - memset(vib,0,80*25*2); - atxtline(vib,"sin{`valkea","you`are`white",1); - atxtline(vib+9*80,"min{`musta`","i`am`dark",1); - b; - -/* case(96+24): - - b;*/ - - case(128): - ansifrom=2;memset(abb,0,80*25*2); - uncrunch(P_SPR,abb+11*160,sizeof(P_SPR1)); - uncrunch(MP_SPR1,abb+60*2+10*160,sizeof(MP_SPR1)); - prforhyb(abb); - memset(vib,0,80*25*2); - atxtline(vib,"meid{n","we`should",1); - atxtline(vib+9*80,"pit{isi`taas","unite`again",1); - atxtline(vib+18*80,"yhdisty{``","",1); - b; - - case(128+32): - uncrunch(JINJANG,abb+20*2+7*160,sizeof(JINJANG)); - prforhyb(abb); - b; + d -= 8 * 128; + if (d >= 0) + if (!(d & 3)) + switch (d >> 2) + { + case (0): + fx_3d = fx_flare = 0; + preparebuff(HYBRID); + memset(abb, 0x0000, 80 * 25 * 2); + memset(txb, 0x0000, 80 * 25 * 2); + memset(vib, 0, 80 * 50); + fx_main = NONE; + uncrunch(VPELU0, abb, sizeof(VPELU0)); + uncrunch(VPELU1, txb, sizeof(VPELU1)); + prforhyb(abb); + prforhyb(txb); + ansifrom = 2; + atxtline(vib, "kuka`sin{", "who`are", 0); + atxtline(vib + 9 * 80, "``olet", "``you", 0); + break; + case (64): + memset(vib, 0, 80 * 50); + atxtline(vib, "ja", "and", 0); + atxtline(vib + 9 * 80, "``miksi`olet", "why`have`you", 0); + break; + case (64 + 16): + memset(vib, 0, 80 * 50); + atxtline(vib, "vanginnut", "captured", 0); + atxtline(vib + 9 * 80, "``minut", "``me", 0); + break; + case (64 + 32): + ansifrom = 0; + memset(txb, 0, 80 * 25 * 2); + uncrunch(VPELU2, txb, sizeof(VPELU2)); + prforhyb(txb); + break; + case (128): + ansifrom = 2; + memset(vib, 0, 80 * 50); + atxtline(vib, "min{`olen", "i`am", 1); + break; + case (128 + 16): + atxtline(vib + 9 * 80, "sinun", "your", 1); + break; + case (128 + 32): + memset(vib, 0, 80 * 50); + atxtline(vib, "pime{", "dark", 1); + atxtline(vib + 9 * 80, "puoliskosi", "half", 1); + break; + case (128 + 64): + memset(abb, 0x0000, 80 * 25 * 2); + memset(txb, 0x0000, 80 * 25 * 2); + memset(vib, 0, 80 * 50); + ansifrom = 2; + uncrunch(VMPELU0, abb, sizeof(VMPELU0)); + uncrunch(VMPELU1, txb, sizeof(VMPELU1)); + prforhyb(abb); + prforhyb(txb); + atxtline(vib, "musta", "the`black", 0); + atxtline(vib + 9 * 80, "``pelu", "``pelu", 0); + break; + } - case(128+64): - memset(txb,0,80*25*2);ansifrom=2; - uncrunch(P_SPR,txb+11*160,sizeof(P_SPR)); - uncrunch(MP_SPR,txb+60*2+10*160,sizeof(MP_SPR)); - memset(abb,0,80*25*2); - uncrunch(P_SPR1,abb+11*160,sizeof(P_SPR1)); - uncrunch(MP_SPR,abb+60*2+10*160,sizeof(MP_SPR)); - prforhyb(abb);prforhyb(txb); - memset(vib,0,80*25*2); - atxtline(vib,"mutta","but",0); - atxtline(vib+9*80,"mit{`siit{","what`would`it",0); - atxtline(vib+18*80,"``seuraisi","``lead`to",0); - b; + d -= ((128 + 128) * 4); + if (d >= 0) + if (!(d & 3)) + switch (d >> 2) + { + case (0): + memset(txb, 0, 80 * 25 * 2); + preparebuff(SINGLE); + scroller_init(HORIZON | NOSKRAMBLE); + scr_txr(1); + fx_main = SCROLLER; + fx_main_spex = 1; + fx_3d = 1; + eggine_load(0); + o0[OY].curr = 70 * 32; + o0[OY].targ = 25 * 32; + o0[OY].frac = 2048; + + o0[OZOOM].curr = 25000; + o0[OZOOM].targ = 100; + o0[OZOOM].frac = 1024; - case(128+64+32): - uncrunch(MP_SPR2,abb+60*2+10*160,sizeof(MP_SPR2));ansifrom=1; - memset(vib,0,80*25*2); - atxtline(vib,"maailmanloppu","the`end",1); - atxtline(vib+9*80,"","of`the`world",1); - b; - } + fader = 7; + fadetype = 1; + memset(txb, 0, 80 * 25 * 2); + txtline(txb + 9 * 80, "isi", "daddy"); + txtline(txb + 18 * 80, "etsii", "looks`for"); + txtline(txb + 27 * 80, "poikaansa", "his`son"); + txtline(txb + 36 * 80, "urheasti", "bravely"); + break; + + case (32): + fader = 31; + fadetype = 2; + break; - d-=4*256; - if(d>=0)if(!(d&3))switch(d>>2){ - case(0):preparebuff(SINGLE);fx_main=SCROLLER; - scroller_init(HORIZON|NOSKRAMBLE); -/* scr_txr(4);*/ - memset(txb,0,80*25*2);txtcol=0; - o0[OHGT].curr=o0[OHGT].targ=256*25;o0[OHGT].frac=2048; - o0[OFLX].curr=-50*256; - o0[OFLY].curr=-30*256; - o0[OFLX].targ=10*256; - o0[OFLY].targ=-20*256; - fx_3d=fx_flare=1;eggine_load(0); - o0[OZOOM].curr=100; - o0[OZOOM].targ=25000; - o0[OZOOM].frac=4096; - o0[OROT].curr=500; - o0[OX].curr=40*32;o0[OY].curr=25*32; + case (48): + o0[OHGT].targ = 5 * 256; + o0[OHGT].frac = 4096; + break; + + case (64): + eggine_load(1); + memset(txb, 0, 80 * 25 * 2); + o0[OY].curr = 70 * 32; + o0[OY].targ = 25 * 32; + o0[OY].frac = 2048; + o0[OZOOM].curr = 20000; + o0[OZOOM].targ = 27000; + o0[OROT].targ = 1000; + o0[OROT].frac = 4096; - case(16):o0[OROT].targ=80; - b; - case(32):o0[OY].targ=70*32;o0[OZOOM].targ=15000; - o0[OFLX].targ=-20*256;o0[OFLY].targ=-7*256; - o0[OHGT].targ=10*256; - b; - case(40):eggine_load(1); - o0[OZOOM].curr=100;o0[OZOOM].targ=31000; - o0[OY].curr=o0[OY].targ=25*32; - o0[OFLX].targ=0*256; - b; - case(48): - o0[OZOOM].targ=25000; - b; - case(56): - memset(txb,0,80*50); - txtline(txb+9*80,"isi","daddy"); - txtline(txb+18*80,"on`nyt","is`now"); - txtline(txb+27*80,"saarrettu","trapped"); - fader=7;fadetype=1; - b; - case(64+16):fader=31;fadetype=2;b; - case(64+32): - o0[OROT].targ=400;o0[OROT].frac=4096; - memset(txb,0xee,80*50);fader=7;fadetype=1; - b; - case(64+36):fader=7;fadetype=1; - o0[OROT].targ=10;o0[OFLX].targ=10*32; - o0[OFLY].targ=-20*32;b; - case(64+40):fader=31;fadetype=2; - eggine_load(0);o0[OY].curr=10*32;o0[OY].targ=30*32; - o0[OROT].targ=600; - fx_flare=0; - o0[OHGT].curr=o0[OHGT].targ=40*256; - o0[OZOOM].curr=o0[OZOOM].targ=20000; - b; - case(64+48):o0[OY].targ=20*32;b; - case(64+56):o0[OZOOM].targ=30000;b; - case(64+64):o0[OHGT].targ=25*256;o0[OY].targ=30*32; - memset(txb,0,80*50); - txtline(txb+4*80,"onneksi","fortunately"); - txtline(txb+14*80,"isill{`on","daddy`has"); - txtline(txb+24*80,"salainen","a`secret"); - txtline(txb+34*80,"ase","weapon"); - fader=7;fadetype=1; - b; - case(64+64+16):o0[OROT].targ=500; - fx_flare=1;o0[OFLX].curr=-40*256;o0[OFLX].targ=30*256;b; - case(64+64+24):fader=31;fadetype=2;b; - case(64+64+32): - preparebuff(HYBRID); - memset(txb,0,80*50); - memset(abb,0,80*50); - uncrunch(WINNUKE0,txb,sizeof(WINNUKE0)); - uncrunch(WINNUKE1,abb,sizeof(WINNUKE1)); - ansifrom=1; - fx_flare=0;eggine_load(1); - o0[OY].targ=o0[OY].curr=15*32; - o0[OROT].curr=500;o0[OROT].targ=200; - o0[OZOOM].curr=o0[OZOOM].targ=25000; - o0[OHGT].curr=o0[OHGT].targ=40*256; - b; - case(64+64+32+16):ansifrom=0;b; - case(64+64+32+24): - preparebuff(SINGLE); - o0[OZOOM].curr=o0[OZOOM].targ=25000; - o0[OROT].curr=o0[OROT].targ=500; - o0[OHGT].curr=o0[OHGT].targ=15*256; - fx_flare=1; - b; - case(64+64+32+32):o0[OROT].targ=200; - o0[OHGT].targ=45*256; - o0[OFLY].targ=-25*256;o0[OFLX].targ=-30*256; - - b; - case(64+64+32+36):o0[OZOOM].targ=100; - fx_flare=1; - - o0[OFLY].curr=(15-25)*256; - o0[OFLX].curr=0; - - o0[OFLY].targ=(35-25)*256; - o0[OFLX].targ=(10-40)*256; - o0[OY].targ=35*32; - o0[OX].targ=10*32; - - o0[OX].frac=8192; - o0[OY].frac=8192; - o0[OFLX].frac=8192; - o0[OFLY].frac=8192; - b; - case(64+64+32+48):memset(txb,0xcc,80*50); - fader=31;fadetype=2;fx_flare=0; - b; - case(64+64+32+52):fx_flare=1;b; - case(64+64+32+56):fader=31;fadetype=2;fx_flare=0;b; - } - - d-=4*256; - - if(d>=0)if(!(d&3))switch(d>>2){ - case(0): - eggine_load(0); - o0[OHGT].targ=5*256; - o0[OZOOM].targ=o0[OZOOM].curr=28000; - o0[OROT].targ=300; - o0[OX].curr=o0[OX].targ=40*32; - o0[OY].curr=60*32; - o0[OY].targ=25*32; + txtline(txb + 2 * 80, "mutta", "but"); + txtline(txb + 11 * 80, "pimeyden", "the`dark"); + txtline(txb + 20 * 80, "varjostajat", "shadows"); + txtline(txb + 29 * 80, "huomaavat", "notice"); + txtline(txb + 38 * 80, "h{net", "him"); + fader = 7; + fadetype = 1; + break; + case (64 + 32): + fader = 31; + fadetype = 2; + o0[OROT].targ = 700; + o0[OROT].frac = 2048; + o0[OROT].frac = 1024; + break; + case (64 + 48): + o0[OROT].targ = 1000; + break; + case (64 + 56): + o0[OROT].targ = 200; + break; + case (64 + 64): + o0[OZOOM].targ = 100; + o0[OZOOM].frac = 4096; + break; +# 338 "tmp" + case (64 + 64 + 16): + o0[OY].curr = 70 * 32; + o0[OY].targ = 25 * 32; + o0[OY].frac = 4096; + o0[OROT].targ = 500; + o0[OZOOM].curr = 31000; + o0[OZOOM].targ = 100; + o0[OZOOM].frac = 4096; + memset(txb, 0, 80 * 25 * 2); + txtline(txb + 8 * 80, "pimeyden", "there`is"); + txtline(txb + 18 * 80, "varjostajia", "a`lot`of"); + txtline(txb + 28 * 80, "tulee", "dark"); + txtline(txb + 38 * 80, "paljon", "shadows"); + fader = 7; + fadetype = 1; + break; + case (64 + 64 + 32): + o0[OY].curr = 70 * 32; + o0[OY].targ = 25 * 32; + o0[OY].frac = 4096; + o0[OROT].targ = 50; + o0[OZOOM].curr = 31000; + o0[OZOOM].targ = 100; + o0[OZOOM].frac = 4096; - b; - case(16):o0[OZOOM].targ=100; - memset(txb,0,80*50); - txtline(txb+4*80,"isi`jatkaa","daddy"); - txtline(txb+14*80,"matkaansa","journeys`on"); - txtline(txb+24*80,"mustan`pelun","to`black`pelu"); - txtline(txb+34*80,"linnakkeelle","fortress"); - fader=7;fadetype=1; - b; - case(48):fader=31;fadetype=2;b; - case(64):preparebuff(HYBRID);fx_main=0; - memset(txb,0,80*25*2);ansifrom=0; - uncrunch(P_SPR,txb+11*160,sizeof(P_SPR)); - uncrunch(MP_SPR2,txb+30*2+10*160,sizeof(MP_SPR2));b; - case(64+16): - memset(txb,0,80*25*2); - memset(vib,0,80*25*2); - uncrunch(P_SPR,txb+11*160,sizeof(P_SPR)); - uncrunch(MP_SPR2,txb+27*2+10*160,sizeof(MP_SPR2)); - atxtline(vib,"isiiii","daddeeeee",0); - atxtline(vib+9*80,"pelasta`jo","save`meeee",0); - prforhyb(txb); - b; - case(64+32): - memset(txb,0,80*25*2); - uncrunch(P_SPR,txb+11*160,sizeof(P_SPR)); - uncrunch(MP_SPR2,txb+24*2+10*160,sizeof(MP_SPR2)); - prforhyb(txb); - b; - case(64+48): - memset(txb,0,80*25*2); - uncrunch(P_SPR,txb+11*160,sizeof(P_SPR)); - uncrunch(MP_SPR2,txb+2*21+10*160,sizeof(MP_SPR2)); - b; - case(64+56):preparebuff(SINGLE);fx_main=SCROLLER; - txtcol=0;memset(vib,0,80*25*2); - o0[OHGT].targ=5*256; - o0[OZOOM].curr=100;o0[OZOOM].targ=28000; - o0[OROT].curr=200;o0[OROT].targ=700; - o0[OFLX].curr=30*256;o0[OFLY].curr=-15*256; - o0[OFLX].targ=-30*256;o0[OFLY].targ=15*256; - o0[OY].targ=40*32; - b; - case(128+5): - o0[OY].targ=60*32;o0[OZOOM].targ=20000;b; - case(128+16): - preparebuff(HYBRID);fx_main=0;ansifrom=0; - fx_3d=0; - memset(vib,0,80*50); - memset(txb,0,80*50); - uncrunch(SAVE0,txb,sizeof(SAVE0));b; - case(128+20): - memset(txb,0,80*50); - uncrunch(SAVE1,txb,sizeof(SAVE1));b; - case(128+24): - memset(txb,0,80*50); - uncrunch(SAVE2,txb,sizeof(SAVE2));b; - case(128+28): - memset(txb,0,80*50); - uncrunch(SAVE3,txb,sizeof(SAVE3));b; - case(128+32): - memset(txb,0,80*50); - uncrunch(SAVE4,txb,sizeof(SAVE4));b; - case(128+36): - memset(txb,0,80*50); - uncrunch(SAVE5,txb,sizeof(SAVE5));b; - case(128+48): - prforhyb(txb); - atxtline(vib,"oho","uh`oh",0);b; - case(128+64): - memset(vib,0,80*50); - atxtline(vib,"isiiii","daddeeee",1);b; - case(128+64+16): - uncrunch(XFOR,txb+50*160,sizeof(XFOR)); - memset(vib,0,80*50); - atxtline(vib,"pelastit","you`saved",1);b; - case(128+64+32): - /*uncrunch(XFOR,txb+50*160,sizeof(XFOR));*/ - memset(vib,0,80*50); - atxtline(vib,"minut`ja","me`and",1);b; - case(128+64+48): - /*uncrunch(XFOR,txb+50*160,sizeof(XFOR));*/ - memset(vib,0,80*50); - atxtline(vib,"maailman","the`world``",1);b; - b; - case(256):preparebuff(SINGLE);memset(txb,0,80*50); - memset(abb,0,80*50);memset(vib,0,80*50); - txtline(txb+8*80,"mites`nyt","how`can"); - txtline(txb+24*80,"noin`k{vi","this`happen"); - fader=31;fadetype=1; - b; - case(256+64): - memset(txb,0,80*50); - txtline(txb+6*80,"no`eip{`ole","well"); - txtline(txb+16*80,"meid{n","thats`not"); - txtline(txb+26*80,"ongelma","our`problem");b; - case(256+128): - memset(txb,0,80*50); - txtline(txb+22*80,"the`end","the`end");b; - case(256+128+64):lastkey=27;b; - } + break; + case (64 + 64 + 48): + o0[OY].curr = 70 * 32; + o0[OY].targ = 25 * 32; + o0[OY].frac = 4096; + o0[OROT].targ = 500; + o0[OZOOM].curr = 31000; + o0[OZOOM].targ = 100; + o0[OZOOM].frac = 4096; + fader = 31; + fadetype = 2; + break; + case (64 + 64 + 64): + memset(txb, 0, 80 * 25 * 2); + txtline(txb + 8 * 80, "ja`isi", "and`daddy"); + txtline(txb + 18 * 80, "on`nyt", "is`now"); + txtline(txb + 28 * 80, "katalassa", "in`quite"); + txtline(txb + 38 * 80, "pinteess{", "`a`trouble"); + fader = 7; + fadetype = 1; + break; + case (64 + 64 + 64 + 32): + fader = 31; + fadetype = 2; + break; + } - if(fader){ - int f=fader;int joo[8]={ - 0x0000, - 0x0808, - 0x0707, - 0x7070, - 0x7777, - 0x7f7f, - 0xf7f7, - 0xffff }; - if(fadetype==2)f=7-f/4; - if(fadetype==3)f=f/2; - if(fadetype==4){f&=7;fader+=2;} + d -= 256 * 4; + if (d >= 0) + if (!(d & 3)) + switch (d >> 2) + { + case (0): + preparebuff(HYBRID); + memset(txb, 0, 80 * 25 * 2); + ansifrom = 2; + uncrunch(P_SPR, txb + 11 * 160, sizeof(P_SPR)); + uncrunch(MP_SPR, txb + 60 * 2 + 10 * 160, sizeof(MP_SPR)); + memset(abb, 0, 80 * 25 * 2); + uncrunch(P_SPR, abb + 11 * 160, sizeof(P_SPR)); + uncrunch(MP_SPR1, abb + 60 * 2 + 10 * 160, sizeof(MP_SPR1)); + prforhyb(abb); + prforhyb(txb); + fx_main = 0; + fx_3d = 0; + memset(vib, 0, 80 * 25 * 2); + atxtline(vib, "lapsena", "as`children", 1); + atxtline(vib + 9 * 80, "olimme`yksi`", "we`were`one``", 1); + break; - if(f>7)f=7;if(f<0)f=0; - txtcol=joo[7-f]; - fader--; - } - -/* + case (32): + uncrunch(SINIPELU, abb + 20 * 2 + 7 * 160, sizeof(SINIPELU)); + break; -^@pwp^@pwp^@final`isi^@final`isi - -^@code^@code^@musax^@musax^@gfx^@gfx^@viznut^@viznut + case (64): + ansifrom = 2; + memset(abb, 0, 80 * 25 * 2); + uncrunch(P_SPR, abb + 11 * 160, sizeof(P_SPR1)); + uncrunch(MP_SPR1, abb + 60 * 2 + 10 * 160, sizeof(MP_SPR1)); + prforhyb(abb); + memset(vib, 0, 80 * 25 * 2); + atxtline(vib, "sitten`meid{t", "then`we`were", 1); + atxtline(vib + 9 * 80, "erotettiin`", "separated``", 1); + break; -^@t{{ll{^@t{{ll{^@on`ihan^@on`ihan^@tyhm{{^@tyhm{{^@ + case (96): -*/ + memset(vib, 0, 80 * 25 * 2); + atxtline(vib, "sin{`olet", "you`are`good", 1); + atxtline(vib + 9 * 80, "hyv{```", "i`am`evil", 1); + atxtline(vib + 18 * 80, "min{`paha`", "", 1); + break; + + case (96 + 16): + memset(vib, 0, 80 * 25 * 2); + atxtline(vib, "sin{`valkea", "you`are`white", 1); + atxtline(vib + 9 * 80, "min{`musta`", "i`am`dark", 1); + break; -/***********************************************************/ - dt++; - } - - if (buffclass) effu(taimeri); -}} + case (128): + ansifrom = 2; + memset(abb, 0, 80 * 25 * 2); + uncrunch(P_SPR, abb + 11 * 160, sizeof(P_SPR1)); + uncrunch(MP_SPR1, abb + 60 * 2 + 10 * 160, sizeof(MP_SPR1)); + prforhyb(abb); + memset(vib, 0, 80 * 25 * 2); + atxtline(vib, "meid{n", "we`should", 1); + atxtline(vib + 9 * 80, "pit{isi`taas", "unite`again", 1); + atxtline(vib + 18 * 80, "yhdisty{``", "", 1); + break; + + case (128 + 32): + uncrunch(JINJANG, abb + 20 * 2 + 7 * 160, sizeof(JINJANG)); + prforhyb(abb); + break; + + case (128 + 64): + memset(txb, 0, 80 * 25 * 2); + ansifrom = 2; + uncrunch(P_SPR, txb + 11 * 160, sizeof(P_SPR)); + uncrunch(MP_SPR, txb + 60 * 2 + 10 * 160, sizeof(MP_SPR)); + memset(abb, 0, 80 * 25 * 2); + uncrunch(P_SPR1, abb + 11 * 160, sizeof(P_SPR1)); + uncrunch(MP_SPR, abb + 60 * 2 + 10 * 160, sizeof(MP_SPR)); + prforhyb(abb); + prforhyb(txb); + memset(vib, 0, 80 * 25 * 2); + atxtline(vib, "mutta", "but", 0); + atxtline(vib + 9 * 80, "mit{`siit{", "what`would`it", 0); + atxtline(vib + 18 * 80, "``seuraisi", "``lead`to", 0); + break; + + case (128 + 64 + 32): + uncrunch(MP_SPR2, abb + 60 * 2 + 10 * 160, sizeof(MP_SPR2)); + ansifrom = 1; + memset(vib, 0, 80 * 25 * 2); + atxtline(vib, "maailmanloppu", "the`end", 1); + atxtline(vib + 9 * 80, "", "of`the`world", 1); + break; + } + + d -= 4 * 256; + if (d >= 0) + if (!(d & 3)) + switch (d >> 2) + { + case (0): + preparebuff(SINGLE); + fx_main = SCROLLER; + scroller_init(HORIZON | NOSKRAMBLE); + + memset(txb, 0, 80 * 25 * 2); + txtcol = 0; + o0[OHGT].curr = o0[OHGT].targ = 256 * 25; + o0[OHGT].frac = 2048; + o0[OFLX].curr = -50 * 256; + o0[OFLY].curr = -30 * 256; + o0[OFLX].targ = 10 * 256; + o0[OFLY].targ = -20 * 256; + fx_3d = fx_flare = 1; + eggine_load(0); + o0[OZOOM].curr = 100; + o0[OZOOM].targ = 25000; + o0[OZOOM].frac = 4096; + o0[OROT].curr = 500; + o0[OX].curr = 40 * 32; + o0[OY].curr = 25 * 32; + + case (16): + o0[OROT].targ = 80; + break; + case (32): + o0[OY].targ = 70 * 32; + o0[OZOOM].targ = 15000; + o0[OFLX].targ = -20 * 256; + o0[OFLY].targ = -7 * 256; + o0[OHGT].targ = 10 * 256; + break; + case (40): + eggine_load(1); + o0[OZOOM].curr = 100; + o0[OZOOM].targ = 31000; + o0[OY].curr = o0[OY].targ = 25 * 32; + o0[OFLX].targ = 0 * 256; + break; + case (48): + o0[OZOOM].targ = 25000; + break; + case (56): + memset(txb, 0, 80 * 50); + txtline(txb + 9 * 80, "isi", "daddy"); + txtline(txb + 18 * 80, "on`nyt", "is`now"); + txtline(txb + 27 * 80, "saarrettu", "trapped"); + fader = 7; + fadetype = 1; + break; + case (64 + 16): + fader = 31; + fadetype = 2; + break; + case (64 + 32): + o0[OROT].targ = 400; + o0[OROT].frac = 4096; + memset(txb, 0xee, 80 * 50); + fader = 7; + fadetype = 1; + break; + case (64 + 36): + fader = 7; + fadetype = 1; + o0[OROT].targ = 10; + o0[OFLX].targ = 10 * 32; + o0[OFLY].targ = -20 * 32; + break; + case (64 + 40): + fader = 31; + fadetype = 2; + eggine_load(0); + o0[OY].curr = 10 * 32; + o0[OY].targ = 30 * 32; + o0[OROT].targ = 600; + fx_flare = 0; + o0[OHGT].curr = o0[OHGT].targ = 40 * 256; + o0[OZOOM].curr = o0[OZOOM].targ = 20000; + break; + case (64 + 48): + o0[OY].targ = 20 * 32; + break; + case (64 + 56): + o0[OZOOM].targ = 30000; + break; + case (64 + 64): + o0[OHGT].targ = 25 * 256; + o0[OY].targ = 30 * 32; + memset(txb, 0, 80 * 50); + txtline(txb + 4 * 80, "onneksi", "fortunately"); + txtline(txb + 14 * 80, "isill{`on", "daddy`has"); + txtline(txb + 24 * 80, "salainen", "a`secret"); + txtline(txb + 34 * 80, "ase", "weapon"); + fader = 7; + fadetype = 1; + break; + case (64 + 64 + 16): + o0[OROT].targ = 500; + fx_flare = 1; + o0[OFLX].curr = -40 * 256; + o0[OFLX].targ = 30 * 256; + break; + case (64 + 64 + 24): + fader = 31; + fadetype = 2; + break; + case (64 + 64 + 32): + preparebuff(HYBRID); + memset(txb, 0, 80 * 50); + memset(abb, 0, 80 * 50); + uncrunch(WINNUKE0, txb, sizeof(WINNUKE0)); + uncrunch(WINNUKE1, abb, sizeof(WINNUKE1)); + ansifrom = 1; + fx_flare = 0; + eggine_load(1); + o0[OY].targ = o0[OY].curr = 15 * 32; + o0[OROT].curr = 500; + o0[OROT].targ = 200; + o0[OZOOM].curr = o0[OZOOM].targ = 25000; + o0[OHGT].curr = o0[OHGT].targ = 40 * 256; + break; + case (64 + 64 + 32 + 16): + ansifrom = 0; + break; + case (64 + 64 + 32 + 24): + preparebuff(SINGLE); + o0[OZOOM].curr = o0[OZOOM].targ = 25000; + o0[OROT].curr = o0[OROT].targ = 500; + o0[OHGT].curr = o0[OHGT].targ = 15 * 256; + fx_flare = 1; + break; + case (64 + 64 + 32 + 32): + o0[OROT].targ = 200; + o0[OHGT].targ = 45 * 256; + o0[OFLY].targ = -25 * 256; + o0[OFLX].targ = -30 * 256; + + break; + case (64 + 64 + 32 + 36): + o0[OZOOM].targ = 100; + fx_flare = 1; + + o0[OFLY].curr = (15 - 25) * 256; + o0[OFLX].curr = 0; + + o0[OFLY].targ = (35 - 25) * 256; + o0[OFLX].targ = (10 - 40) * 256; + o0[OY].targ = 35 * 32; + o0[OX].targ = 10 * 32; + + o0[OX].frac = 8192; + o0[OY].frac = 8192; + o0[OFLX].frac = 8192; + o0[OFLY].frac = 8192; + break; + case (64 + 64 + 32 + 48): + memset(txb, 0xcc, 80 * 50); + fader = 31; + fadetype = 2; + fx_flare = 0; + break; + case (64 + 64 + 32 + 52): + fx_flare = 1; + break; + case (64 + 64 + 32 + 56): + fader = 31; + fadetype = 2; + fx_flare = 0; + break; + } + + d -= 4 * 256; + + if (d >= 0) + if (!(d & 3)) + switch (d >> 2) + { + case (0): + eggine_load(0); + o0[OHGT].targ = 5 * 256; + o0[OZOOM].targ = o0[OZOOM].curr = 28000; + o0[OROT].targ = 300; + o0[OX].curr = o0[OX].targ = 40 * 32; + o0[OY].curr = 60 * 32; + o0[OY].targ = 25 * 32; + + break; + case (16): + o0[OZOOM].targ = 100; + memset(txb, 0, 80 * 50); + txtline(txb + 4 * 80, "isi`jatkaa", "daddy"); + txtline(txb + 14 * 80, "matkaansa", "journeys`on"); + txtline(txb + 24 * 80, "mustan`pelun", "to`black`pelu"); + txtline(txb + 34 * 80, "linnakkeelle", "fortress"); + fader = 7; + fadetype = 1; + break; + case (48): + fader = 31; + fadetype = 2; + break; + case (64): + preparebuff(HYBRID); + fx_main = 0; + memset(txb, 0, 80 * 25 * 2); + ansifrom = 0; + uncrunch(P_SPR, txb + 11 * 160, sizeof(P_SPR)); + uncrunch(MP_SPR2, txb + 30 * 2 + 10 * 160, sizeof(MP_SPR2)); + break; + case (64 + 16): + memset(txb, 0, 80 * 25 * 2); + memset(vib, 0, 80 * 25 * 2); + uncrunch(P_SPR, txb + 11 * 160, sizeof(P_SPR)); + uncrunch(MP_SPR2, txb + 27 * 2 + 10 * 160, sizeof(MP_SPR2)); + atxtline(vib, "isiiii", "daddeeeee", 0); + atxtline(vib + 9 * 80, "pelasta`jo", "save`meeee", 0); + prforhyb(txb); + break; + case (64 + 32): + memset(txb, 0, 80 * 25 * 2); + uncrunch(P_SPR, txb + 11 * 160, sizeof(P_SPR)); + uncrunch(MP_SPR2, txb + 24 * 2 + 10 * 160, sizeof(MP_SPR2)); + prforhyb(txb); + break; + case (64 + 48): + memset(txb, 0, 80 * 25 * 2); + uncrunch(P_SPR, txb + 11 * 160, sizeof(P_SPR)); + uncrunch(MP_SPR2, txb + 2 * 21 + 10 * 160, sizeof(MP_SPR2)); + break; + case (64 + 56): + preparebuff(SINGLE); + fx_main = SCROLLER; + txtcol = 0; + memset(vib, 0, 80 * 25 * 2); + o0[OHGT].targ = 5 * 256; + o0[OZOOM].curr = 100; + o0[OZOOM].targ = 28000; + o0[OROT].curr = 200; + o0[OROT].targ = 700; + o0[OFLX].curr = 30 * 256; + o0[OFLY].curr = -15 * 256; + o0[OFLX].targ = -30 * 256; + o0[OFLY].targ = 15 * 256; + o0[OY].targ = 40 * 32; + break; + case (128 + 5): + o0[OY].targ = 60 * 32; + o0[OZOOM].targ = 20000; + break; + case (128 + 16): + preparebuff(HYBRID); + fx_main = 0; + ansifrom = 0; + fx_3d = 0; + memset(vib, 0, 80 * 50); + memset(txb, 0, 80 * 50); + uncrunch(SAVE0, txb, sizeof(SAVE0)); + break; + case (128 + 20): + memset(txb, 0, 80 * 50); + uncrunch(SAVE1, txb, sizeof(SAVE1)); + break; + case (128 + 24): + memset(txb, 0, 80 * 50); + uncrunch(SAVE2, txb, sizeof(SAVE2)); + break; + case (128 + 28): + memset(txb, 0, 80 * 50); + uncrunch(SAVE3, txb, sizeof(SAVE3)); + break; + case (128 + 32): + memset(txb, 0, 80 * 50); + uncrunch(SAVE4, txb, sizeof(SAVE4)); + break; + case (128 + 36): + memset(txb, 0, 80 * 50); + uncrunch(SAVE5, txb, sizeof(SAVE5)); + break; + case (128 + 48): + prforhyb(txb); + atxtline(vib, "oho", "uh`oh", 0); + break; + case (128 + 64): + memset(vib, 0, 80 * 50); + atxtline(vib, "isiiii", "daddeeee", 1); + break; + case (128 + 64 + 16): + uncrunch(XFOR, txb + 50 * 160, sizeof(XFOR)); + memset(vib, 0, 80 * 50); + atxtline(vib, "pelastit", "you`saved", 1); + break; + case (128 + 64 + 32): + + memset(vib, 0, 80 * 50); + atxtline(vib, "minut`ja", "me`and", 1); + break; + case (128 + 64 + 48): + + memset(vib, 0, 80 * 50); + atxtline(vib, "maailman", "the`world``", 1); + break; + break; + case (256): + preparebuff(SINGLE); + memset(txb, 0, 80 * 50); + memset(abb, 0, 80 * 50); + memset(vib, 0, 80 * 50); + txtline(txb + 8 * 80, "mites`nyt", "how`can"); + txtline(txb + 24 * 80, "noin`k{vi", "this`happen"); + fader = 31; + fadetype = 1; + break; + case (256 + 64): + memset(txb, 0, 80 * 50); + txtline(txb + 6 * 80, "no`eip{`ole", "well"); + txtline(txb + 16 * 80, "meid{n", "thats`not"); + txtline(txb + 26 * 80, "ongelma", "our`problem"); + break; + case (256 + 128): + memset(txb, 0, 80 * 50); + txtline(txb + 22 * 80, "the`end", "the`end"); + break; + case (256 + 128 + 64): + lastkey = 27; + break; + } + + if (fader) + { + int f = fader; + int joo[8] = { + 0x0000, + 0x0808, + 0x0707, + 0x7070, + 0x7777, + 0x7f7f, + 0xf7f7, + 0xffff + }; + if (fadetype == 2) + f = 7 - f / 4; + if (fadetype == 3) + f = f / 2; + if (fadetype == 4) + { + f &= 7; + fader += 2; + } + + if (f > 7) + f = 7; + if (f < 0) + f = 0; + txtcol = joo[7 - f]; + fader--; + } + + dt++; + } + + if (buffclass) + effu(t); + + pwplib.loopflush(); + } +}
--- a/final_isi/fisieffu.c Mon May 24 08:48:18 2010 +0300 +++ b/final_isi/fisieffu.c Mon May 24 11:48:48 2010 +0300 @@ -61,8 +61,6 @@ /***************.: STATiK dEMO mAiNLOOP eT sETUppES :.******************/ -extern int taimeri; - setmono() { #ifdef MSDOS ruutu=monoruutu; @@ -400,7 +398,6 @@ { static int lastt=0; char*ggg; - if (setup_rtc) retracecheck(); switch(buffclass){ case(SINGLE):
--- a/final_isi/fisifont.c Mon May 24 08:48:18 2010 +0300 +++ b/final_isi/fisifont.c Mon May 24 11:48:48 2010 +0300 @@ -253,7 +253,7 @@ 0x00,0xff,0xff,0xff,0x00,0x00 }; -addchar(char *buf,char *c) +void addchar(char *buf,char *c) { int x,y; for(y=7;y;y--){ @@ -261,21 +261,21 @@ buf+=80-6;} } -txtline(char *buf,char *txt,char *txten) +void txtline(char *buf,char *txt,char *txten) { if(setup_english)txt=txten; buf+=40-3*strlen(txt); while(*txt){addchar(buf,&phont[7*6*(*txt-'`')]);buf+=6;txt++;} } -atxtline(char *buf,char *txt,char *txten,int align) +void atxtline(char *buf,char *txt,char *txten,int align) { if(setup_english)txt=txten; if(align==1)buf+=79-6*strlen(txt); while(*txt){addchar(buf,&phont[7*6*(*txt-'`')]);buf+=6;txt++;} } -clrline(char*buf) +void clrline(char*buf) { memset(buf,0,8*80); }
--- a/final_isi/fisimain.c Mon May 24 08:48:18 2010 +0300 +++ b/final_isi/fisimain.c Mon May 24 11:48:48 2010 +0300 @@ -1,6 +1,6 @@ #include <stdio.h> #include <stdlib.h> -#include "../pwplib/pwplib.h" +#include "pwplib.h" char setup_english=0; @@ -8,7 +8,7 @@ int main(int argc,char**argv) { - if(!pwplib_init(&argc,argv))return 1; + if(!pwplib_init(argc,argv))return 1; pwpwrite("final isi (1st at abduction '98 pc introcompo)\n"); @@ -27,8 +27,6 @@ demoloop(); - timer_off(); - pwplib_end(); return 0;
--- a/final_isi/wrapper.c Mon May 24 08:48:18 2010 +0300 +++ b/final_isi/wrapper.c Mon May 24 11:48:48 2010 +0300 @@ -2,111 +2,19 @@ /** conio stuff **/ -int clrscr() -{ -// fprintf(stderr,"\033[2J\033[H"); -} -int getch() -{ - return '.'; -} -int kbhit() -{ - return 1; -} - -/*****/ - -void loopflush() -{ - pwplib.loopflush(); -} - -void sound(int freq) /* beepsound */ -{ -} - void gbsound(int ch,int freq) { - if(freq)pwplib.sound(ch,freq<<8,pwplib.setup[SETUP_VOLUME]); - else pwplib.sound(ch,0,0); -} - -/** video stuff **/ - -void retracecheck(){} -void setvideo() -{ - fprintf(stderr,"setvideo\n"); -} - -/** timing stuff **/ - -int get_timerval() -{ - return pwplib_timer(); -} -void timer_on(void(*player)()) -{ - pwplib_init(); /* test if <48 ==> 25ize */ - pwplib.videobuf.width=80; - pwplib.videobuf.height=50; - - pwplib.player=player; - /* etc */ -} -void timer_off() -{ - /* pwplib_exit(); */ + if(freq)pwplib_sound_nv(ch,freq<<8,pwplib.setup[SETUP_VOLUME]); + else pwplib_sound_off(ch); } /** fx stuff **/ -/*************************************************/ - -void fillbuf(char*d,int w16,int lgt) /* iku */ +void fillbuf(char*d,short w16,int lgt) /* iku */ { short*dd=(short*)d; for(;lgt;lgt--)*dd++=w16; } -void dump28025() /* iku */ -{ - fprintf(stderr,"dump28025\n"); -} -void dump2buf(char*s0,char*s1,char*d,int lgt) /* iku */ -{ - char tmp[80*50*2];d=tmp;lgt=80*50;lgt<<=1; - tmp[0]=tmp[1]=tmp[2]=tmp[3]=0; - {int j=lgt; - for(;j;j--){d[0]=176;d[1]=*s0++|*s1++;d+=2;}} - - pwplib.videobuf.d=tmp; - pwplib.dump_ibm(); -} -void dumpbuf(char*s,char*d,int lgt) /* iku */ -{ - {char*tmp=pwplib.videobuf.d; - pwplib.videobuf.d=s; - pwplib.dump_rast(); - pwplib.videobuf.d=tmp; - } -/* - char tmp[80*50*2];d=tmp;lgt<<=1; - tmp[0]=tmp[1]=tmp[2]=tmp[3]=0; - {int j=lgt; - for(;j;j--){d[0]=176;d[1]=*s++;d+=2;}} - - pwplib.videobuf.d=tmp;pwplib.dump_ibm();*/ -} -void dump_attr(char*s) -{ - pwplib.videobuf.d=s;pwplib.dump_ibm(); -} -void txtmode(int c) -{ - clrscr(); - pwplib.videobuf.height=c?50:25; -} #define USE_RUUTU @@ -114,15 +22,9 @@ /* thedraw uncrunch */ -#ifdef USE_RUUTU - extern char *ruutu; -#endif void uncrunch(unsigned char*src,char*dst,int lgt) { char attr=0x07,*nxtlin=dst+160; - #ifdef USE_RUUTU - int upd=((dst>=ruutu) && (dst<ruutu+80*25))?1:0; - #endif for(;lgt>0;lgt--){ int c=*src++; if(c>=32){dst[0]=c;dst[1]=attr;dst+=2;}else @@ -135,81 +37,8 @@ for(;i;i--){dst[0]=t;dst[1]=attr;dst+=2;}lgt-=2;} else if(c==27)attr^=0x80; } - #ifdef USE_RUUTU - if(upd)dump_attr(ruutu); - #endif } -/* - char hou[80*56];d=hou;lgt<<=1; - fprintf(stderr,"\033[1;1H"); - lgt-=(lgt>>3); - for(;lgt;lgt--)*d++=32+(*s++&63); - *d++=0; - fprintf(stderr,hou);*/ - -void fadebuf(char*b,char*tab,int lgt) /* iku */ -{ - for(lgt<<=1;lgt;lgt--){*b=tab[*b];b++;} -} -void drawsym(char*d,int*symt,char*bm,int off,int lgt) /* iku */ -{ - for(;lgt;lgt--)*d++=bm[(off+*symt++)&1023]; -} - -#define SENTINEL 32123 -void drawjulia(char*d,int*c2tab,int cmod) /* iku */ -{ -/* int i=80*50,*c2=c2tab; - for(;i;i--){ - int c=*c2++; - if(c==SENTINEL){d++;goto boh;} - c=c2tab[(c+cmod)&65535]; - if(c==SENTINEL){*d++|=0x01;goto boh;} - c=c2tab[(c+cmod)&8191]; - if(c==SENTINEL){*d++|=0x10;goto boh;} - c=c2tab[(c+cmod)&8191]; - if(c==SENTINEL){*d++|=0x11;goto boh;} - c=c2tab[(c+cmod)&8191]; - if(c==SENTINEL){*d++|=0x19;goto boh;} - *d++|=0x91; - boh: - }*/ -} -#undef SENTINEL - -void addzbmapL(char*d,char*s,int xcount,int xadd,int ycount, - int yadd,int fixcount) /* iku */ -{ - for(;ycount>0;ycount--){ - {int i=0,x=xcount;char*dd=d;char*ss=&s[32*(fixcount>>8)]; - for(;x;x--){*dd++|=ss[i>>8];i+=xadd;}} - d+=80; - fixcount+=yadd;} -} -void addzbmapR(char*d,char*s,int xcount,int xadd,int ycount, - int yadd,int fixcount) /* iku */ -{ - for(;ycount>0;ycount--){ - {int i=0,x=xcount;char*dd=d;char*ss=&s[32*(fixcount>>8)]; - for(;x;x--){*dd--|=ss[i>>8];i+=xadd;}} - d+=80; - fixcount+=yadd;} -} -void dump8025(){ - fprintf(stderr,"dump8025\n"); -} - -/* taimeri => gettimer(); */ - -/*int taimeri=0;*/ - -/***/ - -void textcolor(int c){} -void picmov(){} -void memfill(){} - int mul32(int a,int b) { return (a*b)>>16; @@ -217,15 +46,22 @@ int attr2dump(char*s0,char*s1,char*d,int lgt,int ander) /* fisi */ { + int j; char tmp[80*50];d=tmp;lgt=80*50; tmp[0]=tmp[1]=tmp[2]=tmp[3]=0; - {int j=lgt; - for(;j;j--)*d++=(*s0++&ander)|*s1++; - } + for(j = lgt;j;j--)*d++=(*s0++&ander)|*s1++; pwplib.videobuf.d=tmp; pwplib.dump_rast(); } +void dumpbuf(char*s,char*d,int lgt) /* iku */ +{ + char*tmp=pwplib.videobuf.d; + pwplib.videobuf.d=s; + pwplib.dump_rast(); + pwplib.videobuf.d=tmp; +} + int attrdump(char*s,char*d,int howmany) /* fisi */ { dumpbuf(s,d,howmany>>1); @@ -253,11 +89,10 @@ a+=2;d+=2;b++; }b+=80;} - pwplib.videobuf.d=tmp;pwplib.dump_ibm(); +// pwplib.videobuf.d=tmp; +// pwplib.dump_ibm(); } -int gotoxy() /* fisi */ -{} int polytxloop(sint h,char*di,uint x1,sint dx0,sint dx1,char*txr, sint dv,sint du) /* fisi */ { @@ -267,3 +102,15 @@ if(c>0)for(;c;c--){*d++=txr[(tp>>8)&0xff];tp+=du;}} x0+=dx0;x1+=dx1;di+=80;tpv+=dv;/*dv*/} } + +void memfill(void *buf, int c, size_t n) +{ +} + +void txtmode(int mode) +{ +} + +void picmov(char *a, char *b, int xsize, int xclip, int yclip, int method) +{ +}