Mercurial > hg > forks > pwpunix
view flier/pwpflier.c @ 5:20ff062b55cd
Silence some bullshit GCC warnings.
author | Matti Hamalainen <ccr@tnsp.org> |
---|---|
date | Tue, 18 May 2010 05:23:17 +0300 |
parents | acb5694e93d9 |
children |
line wrap: on
line source
#include <stdio.h> #include <stdlib.h> #include <time.h> char protomap[256][256]; int rasterizer[8]={0,32,16,48,8,40,24,56}; #define LIM(a) ((a) < 0 ? 0 : ((a) > 255 ? 255 : (a))) void recursive_plasma(int x0,int y0,int x1,int y1,int lev) { if(x1>x0 && y1>y0) { int a=protomap[x0&255][y0&255], b=protomap[x1&255][y0&255], c=protomap[x0&255][y1&255], d=protomap[x1&255][y1&255], xm=(x0+x1)>>1, ym=(y0+y1)>>1; protomap[xm][y0]=(a+b)>>1; protomap[xm][y1]=(c+d)>>1; protomap[x0][ym]=(a+c)>>1; protomap[x1][ym]=(b+d)>>1; // 4:single detail, 8:g00d, 32:mess with great contrast { int k=rand()%((abs(x0-x1)<<lev)+1); if(k&1)k=0-k; protomap[xm][ym]=LIM((a+b+c+d+k)>>2); } if(x1>x0+1) { recursive_plasma(x0,y0,xm,ym,lev); recursive_plasma(xm,y0,x1,ym,lev); recursive_plasma(x0,ym,xm,y1,lev); recursive_plasma(xm,ym,x1,y1,lev); } } } void drawflier(char*pic0,char*bg0,int xzoom,int yzoom) { int iy=0,ix; char*pic=pic0, *bg=bg0; while(*pic!='\0') { char*line=pic; int y=yzoom; for(;y;y--) { pic=line; while(*pic!='\n') { int x=xzoom; for(;x;x--) { if(*pic!=' ') { putchar(*bg); bg++; if(*bg=='\0')bg=bg0; } else { int k=protomap[iy&255][ix&255]+rasterizer[(iy^(ix<<1))&7]; putchar(" ..:;"[(k>>6)%5]); } ix++; } pic++; if(pic=='\0')pic=pic0; } iy++; ix=0; putchar('\n'); } pic++; } } /********************************************************************/ char pwpflier0[] = " \n" " \n" " \n" " ** ******** \n" " ******** ** \n" " *** \n" " *** \n" " ************* \n" " ******************* \n" " ********** \n" " xxxxxx \n" " ***** \n" " ***** x \n" " ******** \n" " ************ \n" " ************** \n" " **************** \n" " ***** \n" " ******* \n" " *********** xx \n" " *************** \n" " ************ \n" " ********** \n" " ****** \n" " ****** \n" " ****** \n" " \n" " ******** ** ** ********\n" " ******** ** ** ********\n" " ** ** ** ** ** **\n" " ** ** ** ** ** **\n" " ******** ** ** ** ********\n" " ******** ** ** ** ********\n" " ** ** ** ** ** \n" " ** ** ** ** ** \n" " ** ********** ** \n" " ** ********** ** \n" " \n"; /* * From Jeesuksen Opetuslapset ry - freely distributable text * * http://personal.inet.fi/yhdistys/jeesuksenopetuslapsetry./ * */ char jolry_bg[] = "Ottaisin päälleni vaikka minkälaisia ruttoja, jos saisin Jumalalta " "VOIMALLISTEN TEKOJEN ARMOLAHJAN! HENKIEN ULOSAJAMISEN ARMOLAHJAN! " "VAIKKA PUOLEKSI VUODEKSI! ILMAN NIITÄ EN VOI KUN ITKEÄ JA VALVOA " "ÖITÄNI! KYLLÄ NE MIELESSÄ ON NUO VUODET JA NE YÖT KUN TUOLLA KÄVELIN " "JA NÄIN KERTOMAANI! JA NYT SAAN KUULLA, ETTÄ TÄMÄ TOUHU KASVAA!!! JA " "JUURI TÄHÄN AIKAAN!!!! SAATANA on vuositolkulla tietänyt " "Hengellisistä asoista enemmän kuin uskovat! " "1990 luvun alussa JUMALALTA tuli profetia: \"Nyt, MINÄ JUMALA, ALAN " "KURITTAMAAN SUOMEN KANSAA TOSI MIELESSÄ, SIITÄ SYYSTÄ, ETTÄ SUOMEN " "KANSASTA EI LÖYDY HÄNELLE KELPAAVASSA USKOSSA OLEVIA IHMISIÄ, " "HÄNELLE RIITTÄVÄÄ MÄÄRÄÄ! " "Kuinka paljon sinun perheessäsi on tuhottu äänitteitä, joilla on ns. " "Hevy metalli rokkia? ns. Gospel musiikkia? Joita varhaisnuoret " "kuuntelevat, kuin ei mitään pahaa olisi! " "SIINÄ TÄLLÄ MENETELMÄLLÄ MENEVÄT SITTEN 30 luvun Raamattu ja " "Herramme JEESUS MUKANA! VALITAN! NÄIN VAKAVISTA ASIOISTA ON KYSE! " "MINKÄS MINÄ HEILLE VOIN?! ITKEÄ JA KOITTAA KUINKA KOVIA LYÖNTEJÄ " "TÄMÄ NÄPPÄIMISTÖ KESTÄÄ! JA SYÖDÄ PSYKOSOMAATTISIIN SAIRAUKSIINI " "PURKKI KAUPALLA PILLEREITÄ! JOITA LÄÄKÄRINI KIELSI SYÖMÄSTÄ! Kun ei " "ole varaa niihin lääkkeisiin, joita tarvitsen! " "HÄVETKÄÄ! JOS OSAATTE! RAAMATTU KERTOO, ETTÄ ISRAELIN KANSA " "EVANKELIOIDAAN AIVAN MERKILLISELLÄ TAVALLA! MITEN SAMASTA ASIASTA " "VOI OLLA KAKSI ERI VERSIOTA! PAINUKAA LUOLIIN JA TUKKIKAA SUUNNE! " "SANON MINÄ! JOS EI TEILLÄ MUUTA PUHUTTAVAA OLE! ON RAAMATUN " "LUKUNNEKIN OLLUT AIVAN TURHAA! KUN ETTE YMMÄRRÄ LUKEMAANNE! VOI " "PYHÄ YKSINKERTAISUUS! Pystyisin kaatamaan joka ainoan väitteenne! " "TE TULETTE RAAMATULLA! JA AIVAN SAMALLA KIRJALLA MINÄ KAADAN " "JOKAISEN VALHEELLISEN VÄITTEENNE! MUTTA EN JAKSA! MUTTA VAROITAN " "KYLLÄ NÄISTÄ KIRJANOPPINEISTA! ÄLKÄÄ KUUNNELKO HEITÄ! KUUNNELKEE " "JEESUSTA! HÄN OPETTAA TEILLE RAAMATUN PERUSTOTUUDET HYVINKIN " "NOPEASTI! EIKÄ NYT KYLLÄ PITKIIN KURSSEIHIN AIKAA OLEKKAAN! VAINON " "AJAT OVAT LÄHELLÄ! JA TÄMÄ KANSA EI TIEDÄ MITÄÄN! ILMIANTAJIA ON " "TUHATMÄÄRIN ENEMMÄN;KUIN NIITÄ AITOJA JEESUKSEN SEURAAJIA JOITA " "TÄSSÄKIN MAASSA ALETAAN VAINOTA! NÄIN IKÄVÄSTI ON NYT ASIAT! JA " "VIELÄ YRITÄTTE SAATANAN JOUKKOJEN KEHOITUKSESTA TULEMAAN ESIIN! SE " "ON MIINA JOHON ME EMME NYT TULE! ANTEEKSI VAAN! TAIDAMME JOUTUA " "POISTUMAAN AIKAISEMMIN, KUIN OLETINKAAN! VALMIINA KYLLÄ OLLAAN! EI " "SIINÄ MITÄÄN! HUKASSA ON JO PALJON SUOMEN AITOJA USKOVAISIA! " "POISTUMME HETI KUN SILTÄ NÄYTTÄÄ! JEESUS ANTAA MERKIN! EMME TARVITSE " "KUIN TIEDON YÖLLÄ! SEURAAVANA PÄIVÄNÄ OLEMME JO KATEISSA! NIIN " "YKSINKERTAISTA! " "YLEINEN VÄITTÄMÄ; JOKA TAANNOIN VIIMEKSI MINULLEKKIN TAAS POSTIN " "KAUTTA HEITETTIIN:\" AITO PROFEETTA EI PUHU MILLOINKAAN " "VALHEPROFETIOITA!\" AIVAN VARMASTI JOUTUU PUHUMAAN! ILMESTYKSIÄ " "NÄKEVÄ; JOUTUU AIVAN VARMASTI KATSELEMAAN SAATANAN LUOMIA " "ILMESTYKSIÄ!!!! SAARNAAJAT JA OPETTAJAT JOUTUVAT AIVAN VARMASTI " "NÄIHIN MIINOIHIN! JOUDUMME YLIHENGELLISYYTEEN! JOUDUMME LAN ALLE! " "IHAN VARMASTI JA AIVAN KÄYTÄNNÖSSÄ! TÄMÄ TAPAHTUU KOULUTTUKSEN " "AIKANA. KAIKKI NÄMÄ! JA SENKIN JÄLKEEN SAATTAA LIPSUA! " "Nyt VELI TEMPAISIKIN SUOMEKSI KOMENNON: JEESUKSEN KRISTUKSEN " "NASARETTILAISEN NIMESSÄ! ANNETTIIN PIMEYDEN HENKILLE LÄHTÖKÄSKY! " "Mitäs nyt tapahtui? " "AMERIKASTAKIN KUULEMMA AINAKIN YKSI BÄNDI TULEE! Sinne sitten vaan " "kuuntelemaan tuota SAATANAN LUOMAA MUSIIKKIA! Englannin sanakirjan " "mukaan gospel tarkoittaa suomeksi: evankeliumi! ETTÄ SIIHEN MALLIIN " "MEILLÄ PÄIN! Täytyy teille kertoa ihan tosiasia! JA JÄLLEEN " "VALITETTAVASTI HYVIN MONIEN PETTYMYKSEKSI! SANAT OSIN RAAMATUSTA! " "SÄVELLYS SAATANAN! TÄHÄN EI OLE ALUSTA ALKAENKAAN YHTYNYT JUMALA! EI " "PYHÄ HENKI! EIKÄ TULE MILLOINKAAN YHTYMÄÄN MIHINKÄÄN! MISSÄ SAATANA " "TAI HÄNEN JOUKKONSA OVAT MUKANA! NIIISSÄ LIIKKUU PIMEYDEN HENGET JA " "TUNTEET! PALJONHAN NIILLÄKIN AIKAAN SAADAAN! Pelottavin aikaan " "saannos tuollakin on JUMALAN VIHA!!! Maatamme kohtaan! SINNE NYT " "VANHEMMAT: KAKAROITANNE PÄÄSTÄTTE! SUORASTAAN TYRKYTÄTTE! JA " "KANNATTE USKOVAISEN NIMEÄ! Jättäkää tuo nimi pois! Ihan totta! " "Katsokaas, kun JUMALALLA JA SAATANALLA EI OLE MITÄÄN TEKEMISTÄ " "TOISTENSA KANSSA! EI HIUSKARVAN VERTAA! EI OLE MILLOINKAAN OLLUT! " "SEN JÄLKEEN KUN SAATANA JA LANGENNEET ENKELIT TAIVAASTA VISKATTIIN! " "EIKÄ TULE OLEMAAN! SAATANA ON KAIKEN MUSIIKIN JA KAIKKIEN SOITTIMIEN " "ASIANTUNTIJA! SITÄ HÄN OLI JO TAIVAASSA! ENNEN KUIN RYHTYI KAPINAAN " "JUMALAN KANSSA! Näin Raamattu meille kertoo! Valtavalle määrälle " "teistä, tuo asia on tuttu! Mutta se nyt ikäänkuin ei kuuluisi " "teille! ARVATKAAPA: KUULUUKO??? " "Erotkaa, rakkaat ystävät, noista VOUHOTTAJISTA, JOTKA EIVÄT MITÄÄN " "TIEDÄ!!! Kasetilla on sanoittus suurista ihmeistä ja Raamatusta! " "SÄVELLYS ON SAATANAN! LAULU ESITYS TÄYSIN TEKNINEN SUORITUS! JA " "KAIKEN LISÄKSI SURKEA SELLAINEN! SAMAT ARVOSANAT KIRJASTA! SAATANAN " "JOUKKOJEN KÄTYRI! Kuuluisuudestaan huolimatta; RIKU RINNE! AINAKIN " "NYT! Jos muutosta tapahtuu? VIE SE TUOLTA PAIKALTA, MISSÄ HÄN NYT " "ON: MELKO PITKÄN AIKAA! EN TUOMITSE! MUTTA PALJASTAN! JA VAROITAN! " "ELLEMME PÄÄSE ALKUSEURAKUNNAN KALTAISEEN JUMALAN VOIMAN VAIKUTUKSEN " "ALLE? ON TULOSSA ILMESTYSKIRJAN MUKAAN SELLAISTA TAVARAA MYÖS " "SUOMEEN! ETTÄ ILMAN TÄTÄ VOIMAA VOIMMEKIN SITTEN SANOA AIVAN " "VARMASTI TOISILLEMME HYVÄSTI JA HYVÄÄ YÖTÄ! OHJEET ANTAA JEESUS " "ALKUVALMISTELUT VOITTE TEHDÄ ALKUSEURAKUNNAN TAPAAN! KERRAN MEIDÄT " "JOKAINEN RIISUTAAN! ELLET NÄIHIN USKO? Älä vaan sitten käytä " "itsestäsi nimitystä uskovainen tai kristitty! VAAN JOS VÄITÄT ettei " "nämä kuulu sinulle! Eikä meille tänä aikana?! SINÄ OLET TÄYSI " "PELLE! " "JA NÄMÄKÄÄN EIVÄT VIELÄ OLE TAKUULIPPU TAIVAASEEN! MUTTA, KUN " "KUULIAISESTI HERRAA TÄMÄN JÄLKEEN SEURAILEE. Voi joku saada " "kerrottua asian lapsilleen sukulaisilleen jne, NIMITTÄIN JOS NÄMÄ " "RUKOUKSET TEET AIVAN VILPITTÖMÄSTI ! Tarkoitan tuollaista tietoista " "vilppiä. KAIKKI ME NYT MUUTOIN OLLAAN KAIKKEA PAHUUTTA TÄYNNÄ " "TIEDÄTKÖ? SIELTÄ....TAIVAASTA KAJAHTAA MAHTAVA VOIMA ! " "Ja raha on tuossa osavaltiossa ollut pois käytössä tuon kokeen ajan. " "TÄMÄ ON ILMESTYSKIRJASSA KERROTTU PEDON MERKKI! JOLLA TUOTA MERKKIÄ " "EI OLE; HÄNELTÄ EI OSTETA MITÄÄN! EIKÄ MYYDÄ MITÄÄN! SEHÄN ON " "SELVIÖ! KUN RAHA POISTETAAN KÄYTÖSTÄ. ON MAHDOTON ostaa tai myydä " "ilman tuota pedon merkkiä! Pyrin selittämään tämän hyvin " "kansanomaisesti. Ja kun tuo aika tulee. Ei paljon kertomastani voi " "tuo menetelmä poiketa! Ja tämä on sitten sellainen MERKKI, jota " "YKSIKÄÄN USKOVAINEN EI SAA MISSÄÄN OLOISSA OTTAA! NIMITTÄIN, kun " "Antikristus nousee ja vaaditaan tuo pedon merkki on se kovimpia " "koettelemuksia uskovaisille! Kansat kumartavat tuota " "petoa. Tottelevat häntä. Siis SAATANAN JUTTU! " "Ellet tietoisesti palvele ja seuraa JEESUSTA, silloin tietämättäsi " "palvelet ja seuraat SAATANAA! Hän pystyy tämän asian sinulta niin " "hämäämään, ettet tiedä mitään! Jeesuksen omana olo ei ole salainen " "asia! " "Kun yksikin taloudelliseti hyvin voiva henkilö tekee Jumalan mielen " "mukaisen parannuksen. Napsahtaa omaisuudet automaattiseti Jumalan " "Valtakunnan työhön! EIKÄ VAIN SINNE PÄIN! NIINKUIN NYT ON " "KAIKENAIKAA NÄHTÄVISSÄ! NÄMÄ SAATANAN VALTAAMAT VÄLINEET EIVÄT KOVIN " "KAUAA OLE USKOVAISTEN KÄDEN ULOTTUVILLA! JA SUOMESSA AIDOT JEESUKSEN " "SEURAAJAT, JUMALAN PALVELIJAT VOIVAT TEHDÄ NÄIDEN LAITTEIDEN AVULLA " "VALTAVIA JUTTUJA, JOITA JUMALA SIUNAA KYLLÄ SUOMESSA ON OLTAVA " "KETJUT KUNNOSSA: MITEN JAKO ETEENPÄIN TAPAHTUU! Vaikka Jumala " "Henkensä kautta on tehnyt yhtä sun toista Suomessa ilman ihmisiä! " "Raamatun mukaan IHMISIÄ KÄYTETÄÄN JUMALAN VALTAKUNNAN TYÖSSÄ HAMAAN " "JEESUKSEN TULEMUKSEEN ASTI!!! " "JOS TOIMITTE: LISÄTIETOA TULEE JEESUKSELTA NOPEAAN TAHTIIN! KAIKKI " "MUU ON TÄYSIN TURHAA! Puhukoon Istala ja kumppanit mitä tykkää! " "Saatanan palveluksessa koko remmi ja TIUKASTI! Ja lisää tulee! " "ISTALA KAATUU UUSIEN TUULIEN TULLESSA! Amerikassa jo valmiina! " "Levinnyt jo EUROOPPAAN! ENNUSTAN NÄILLE NYKYISILLE SAATANAN " "KÄTYREILLE nopeaa uran päättymistä! " "OLISIKOHAN SYYTÄ VIIPYMATTÄ MENNÄ RUKOILLEN NÖYRASTI JEESUKSEN " "OPETUKSEN ALLE! PARANNUKSEN TEON JÄLKEEN! JA SAMAN TIEN ANTAA " "ITSENSÄ JUMALALLE OTOLLISEKSI UHRIKSI! Ehtii oppia PYHÄN HENGEN ja " "saatanallisten henkien ERON! Ainakin näin räikeissä muodoissa! " "Varoitan edelleen! Älkää tutkiko pimeyden henkiä\?\?\?\?! "; /********************************************************************/ int main(int argc,char**argv) { srand(time(NULL)); if(argc<3) { fprintf(stderr,"usage: %s <xzoom> <yzoom> [plasma]\n",argv[0]); } else { if(argc==3) { int i,j; for(i=0;i<256;i++) for(j=0;j<256;j++) protomap[i][j]=0; } else { protomap[0][0]=rand()&255; protomap[0][255]=rand()&255; protomap[255][0]=rand()&255; protomap[255][255]=rand()&255; recursive_plasma(0,0,255,255,3); } drawflier(pwpflier0,jolry_bg,atoi(argv[1]),atoi(argv[2])); } return 0; }