Skip to content

Instantly share code, notes, and snippets.

Created April 27, 2015 11:49
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 1 You must be signed in to fork a gist
  • Save anonymous/3c15f84949b34849c3c4 to your computer and use it in GitHub Desktop.
Save anonymous/3c15f84949b34849c3c4 to your computer and use it in GitHub Desktop.
JavaScript CurseMonger from June 1997, original URL http://www.geocities.com/SiliconValley/Vista/6633/curse.html
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 3.2//EN">
<HTML>
<HEAD>
<TITLE>JavaScript Non-Form CurseMonger</TITLE>
<META NAME="GENERATOR" CONTENT="Mozilla/3.01Gold (Win95; I) [Netscape]">
<SCRIPT LANGUAGE="JavaScript">
<!--Hide JavaScript from Java-Impaired Browsers
isn1="*00Your mouth spews*01You are*02Your mother wears*03Your"
+" Father is*04Your Eleventh Child will be*05Your Mate"
+"rnal Ancestors are*06Your Personal Trainer is*07Your spouse "
+"thinks you are*08Your mind resembles*09Your chances for the "
+"future are*10Your mother-in-law loves*11Your closest friend "
+"is*12Your breath resembles*13Your right nostril is dripping*"
+"14Your politics are*15Your cherished desires are*16Your next"
+" meal should be*17Your bedroom resembles*18Your refrigerator"
+" smells like*19Your manners are no better than*20I saw you e"
+"ating and enjoying*21Next Friday you will consume*22May you "
+"wallow in*23May you swim in*24May you drown in*25May you tak"
+"e simple pleasure in*26May you find your hot tub filled with"
+"*27May you find your kitchen sink overflowing with*28May you"
+" be immersed in*29You secretly aspire to drink*30May you din"
+"e often on*31May you be caught dining on*32May you become an"
+" obsessive collector of*33May you find your car filled with*"
+"34May you blurt out that your boss is the*35Your garden shou"
+"ld be flooded with*36May your basement overflow with*37May y"
+"our underwear be filled with*38May your drawers be filled wi"
+"th*39May you float forever in*40May your feet be encased in*"
+"41May you be forever entombed in*42I hate to tell you, but t"
+"here, caught in your teeth is*43May you step in*44May your c"
+"aptors feed you on*45The talk around the office is that you "
+"eat*46May your body be encrusted with*47May the sta"
+"ins on your clothing be only*48May your food be infused "
+"with*49Your sock drawer is now filled with*50Your supervisor"
+" secretly saves*51Caution: Someone knows about your fetish f"
+"or*52May ballads be composed about your liking for*53Curse t"
+"hat day you first tasted*54May your wastebasket overflow wit"
+"h*55May your roof drip*56May you be without garlic to spice "
+"your meal of *57May your trough be filled with*58May your hi"
+"p pockets overflow with*59May your doctor prescribe*60May yo"
+"u trip and fall into*61Yeah? Well, your underwear is"
+"like*62So what if I like anchovies and*63You re"
+"lish*64I'm going to tell your lover you play with*65Your body reeks o"
+"f*66May your in-basket overflow with*67May your inlaws learn"
+" of your fondness for*68May you smear yourself with*69Your w"
+"ish is granted: drink*70Everyone knows you bathe in*71";
isn2="*00aniline*01virescent*02aquamarine*03ashy*04atramentous"
+"*05aureate*06bloody*07bluish*08brinded*09bronze*10cadaverous"
+"*11cadmium*12carmine*13carnadine*14carroty*15cerulean*16citr"
+"ine*17cloudy*18cochineal*19crimson*20crude*21cyanic*22cymoph"
+"anous*23dappled*24diaphanous*25decomposing*26drab*27dun*28emerald*"
+"29erubescent*30fallow*31flashy*32flavous*33florid*34florid*3"
+"5foggy*36fulvid*37fulvous*38fuscous*39garish*40gaudy*41gauzy"
+"*42ghastly*43glaucous*44gray*45greenish*46harlequin*47hueles"
+"s*48impervious*49infuscated*50iridescent*51jaundiced*52khaki"
+"*53lack-luster*54lavender*55leaden*56limpid*57liver-colored*"
+"58lurid*59luteous*60mantled*61maroon*62matted*63milky*64mist"
+"y*65misty*66motley*67mottled*68ocherous*69opacous*70opaline*"
+"71orangish*72pallid*73pallorous*74pellucid*75piebald*76polyc"
+"hromatic*77porraceous*78puce*79purplish*80red*81roseate*82ro"
+"uged*83rubicund*84ruddy*85russet*86rusty*87rusty*88sallow*89"
+"sacharine*90scarlet*91shady*92skewbald*93smalty*94smoky*95ye"
+"llowish*96somber*97striated*98tallowy*99";
isn3="*00abomination*01soilure*02abscess*03averruncation*04bel"
+"ch*05carbuncle*06caries*07carrion*08catamenia*09cesspool*10c"
+"heese-parings*11coarseness*12compost*13contaminate*14contami"
+"nation*15coprolite*16corruption*17dandruff*18decay*19defedat"
+"ion*20defilement*21discharge*22disgorgement*23draff*24draggl"
+"etail*25drainage*26dregs*27drool*28dry-rot*29dung*30dunghill"
+"*31dunghill*32earth-closet*33effusion*34eliminant*35emanatio"
+"n*36emission*37eructate*38evacuation*39excrement*40excreta*4"
+"1excretion*42expectorate*43extravasation*44exudation*45fecul"
+"ence*46fetor*47filth*48foulings*49foulness*50garbage*51grime"
+"*52guano*53hog-wash*54immundity*55impurity*56infection*57kec"
+"k*58leucorrhea*59maggots*60manure*61matter*62mildew*63mire*6"
+"4mold*65mucidness*66muck*67mucor*68mud*69nastiness*70off-scu"
+"m*71offal*72ordure*73paracentesis*74perspiration*75pollution"
+"*76purulence*77pus*78putrescence*79quagmire*80refuse*81rheum"
+"*82rot*83rubigo*84scurf*85secretion*86silt*87slabber*88slave"
+"r*89slime*90slobber*91slop*92slosh*93slubber*94sludge*95slus"
+"h*96smudge*97smutch*98soiliness*99";
isn4="*00accreting*01accruing*02aggrandizing*03aggravating*04a"
+"scending*05augmenting*06billowing*07biting*08breathing*09bro"
+"wsing*10budding*11cacating*12caressing*13cherishing*14chewin"
+"g*15chomping*16clasping*17coddling*18coveting*19craving*20cr"
+"eating*21cuddling*22dandling*23dilating*24distending*25dottl"
+"ing*26draining*27dripping*28ejecting*29eliminating*30evacuat"
+"ing*31exhaling*32expanding*33expelling*34extending*35extrava"
+"sating*36exuding*37fingering*38fondling*39foraging*40gnawing"
+"*41growing*42heaving*43imbedding*44infusing*45ingesting*46in"
+"tumescing*47kissing*48licking*49littering*50masticating*51mu"
+"ltiplying*52needing*53nestling*54nuzzling*55obtruding*56obtu"
+"ding*57ogling*58oozing*59osculating*60patulating*61plucking*"
+"62plundering*63protruding*64puffing*65pugging*66puking*67pur"
+"sing*68ravening*69regurgitating*70rejecting*71relishing*72re"
+"quiring*73ruining*74savoring*75savoring*76secreting*77sippin"
+"g*78smelling*79smothering*80sneezing*81spoiling*82stealing*8"
+"3subjoining*84subsisting*85succoring*86sucking*87supping*88s"
+"wigging*89swilling*90sheep-eyeing*91tasting*92tasting*93thie"
+"ving*94tippling*95touching*96turgescing*97wanting*98waxing*99";
isn5="*00anterior cavity*01anterior gland*02anterior hole*03an"
+"terior muscle*04anterior orifice*05anterior pores*06dirt cav"
+"ity*07dirt hole*08dirt orifice*09dirt pores*10excreting cavi"
+"ty*11excreting gullet*12excreting holes*13excreting hollow*1"
+"4excreting nooks*15excreting orifices*16excreting slot*17exc"
+"reting void*18eye orifices*19eye pores*20eye voids*21navel o"
+"rifice*22ooze cavity*23ooze gullet*24ooze hole*25ooze nooks*"
+"26ooze orifices*27ooze slot*28ooze void*29refuse cavity*30re"
+"fuse gullet*31refuse hole*32refuse hollow*33refuse nooks*34r"
+"efuse orifice*35refuse slot*36refuse spaces*37refuse void*38"
+"secret cavity*39secret gland*40secret hole*41secret muscle*4"
+"2secret orifice*43secret pore*44secret slot*45secret void*46"
+"slime cavity*47slime gullet*48slime hole*49slime hollow*50sl"
+"ime muscle*51slime nooks*52slime openings*53slime orifices*5"
+"4slime pores*55slime slot*56slime spaces*57slime void*58swea"
+"t cavities*59sweat cavity*60sweat gullet*61sweat hole*62swea"
+"t hollow*63sweat nooks*64sweat openings*65sweat orifices*66s"
+"weat pores*67sweat slot*68sweat spaces*69sweat void*70undera"
+"rm cavity*71underarm gullet*72underarm hole*73underarm hollo"
+"w*74underarm muscle*75underarm nooks*76underarm openings*77u"
+"nderarm orifices*78underarm pores*79underarm slot*80underarm"
+" spaces*81underarm void*82unmentionable cavity*83unmentionab"
+"le gullet*84unmentionable hole*85unmentionable hollow*86unme"
+"ntionable muscle*87unmentionable nook*88unmentionable openin"
+"gs*89unmentionable orifices*90unmentionable pores*91unmentio"
+"nable slot*92unmentionable spaces*93unmentionable void*94war"
+"t cavity*95wart gullet*96wart holes*97wart hollows*98wart no"
+"oks*99";
isn6="*00Bluthian*01Neranian*02Warterian*03Xanterian*04Bexian*"
+"05Cledugian*06Chugnetian*07Chyderian*08Dygian*09Danthian*10D"
+"eechnetian*11Eegrudgian*12Eichhornian*13Foognidian*14Fuhbagi"
+"an*15Fidwoortian*16Fahdgian*17Feeshian*18Gharzan*19Gaazhogia"
+"n*20Geeshworgian*21Gitchshidian*22Goopragian*23Gughokian*24H"
+"aagpokian*25Herwadian*26Hijkakian*27Hoolpodian*28Huquadian*2"
+"9Jadtypian*30Jezchupian*31Jymptordian*32Kurkian*33Koodgian*3"
+"4Lyxian*35Madrigian*36Nastian*37Abysmian*38Ickian*39Vomitian"
+"*40Putridgian*41Quensbian*42Tawgrian*43Perdian*44Tiliwidian*"
+"45Czerian*46Sizludian*47Kherbugian*48Quisnaglian*49Xertydigi"
+"an*50Mudgrubbian*51Boogfudian*52Lilgoogian*53Luthdrungian*54"
+"Jugrudian*55Derrydinian*56Vudgnagian*57Vooptedgian*58Quooxmu"
+"dgian*59Babbletogian*60Bugturgoorian*61Hogsodian*62Trufpatia"
+"n*63Sowslinkian*64Crabkrudian*65Chartreudian*66Schnigerian*6"
+"7Zitsneakian*68Cystrigian*69Crongian*70Kterigadian*71";
isn7="*00Slizidge*01Burtidge*02Tisd*03Turt*04Bunt*05Burd*06Sac"
+"und*07Trund*08Crezd*09Hnot*10Jeck*11Kontluger*12Chitter*13Ch"
+"unt*14Chooytop*15Chingdap*16Dyagenob*17Dugwart*18Pooper*19Ug"
+"ly*20Abomination*21Fudwhomper*22Turtleg*23Waggletop*24Yaghor"
+"d*25Marmwarb*26Yemzid*27Phutgrab*28Fetsmell*29Schaber*30Nerd"
+"nort*31Papperflabian*32Nudnuge*33Whiperbirt*34Sibbergrunt*35"
+"Saberdunt*36Thigwhip*37Whippinthig*38Zyzygdung*39Papchung*40"
+"Stinkbug*41Fardschid*42Yellowsnot*43Mucousdripper*44Purplebu"
+"tt*45Hemorhonk*46Bladderpuff*47Hohogridge*48Klitbunkit*49Wax"
+"slimer*50Footfungus*51Floppydwart*52Danglidwid*53Slimepole*5"
+"4Sillywalker*55Flat Toed Whump*56Clingbeetle*57Leecheater*58"
+"Maggotdangler*59Windpasser*60Fondlepiddle*61Crotchbug*62Toes"
+"meller*63Slimemaggot*64Navelworm*65Earspider*66Noseleech*67N"
+"ostrilworm*68Wedgiewart*69Cankerlicker*70Pimple Popper*71";
var picker = "";
var picker1 = "";
var pos = 0;
var pose = 0;
var curse = "";
var hinum = 0;
var ndx1 = "";
var ndx2 = "";
/* Random not yet implemented, Win3.x bombs on eval calls and
returns nothing on geometric calls. Atlas returning even
less than Netscape 2.01 to Mac-impaired systems. So hack...*/
function srand() {
today=new Date();
rand=today.getTime();
picker="a"+rand;
picker=picker.charAt((picker.length-4))
+picker.charAt((picker.length-5));
pos=picker;
}
function getCurse(form) {
srand();
hinum=70;
correct_it();
pos=isn1.indexOf(ndx1);
pose=isn1.indexOf(ndx2);
curse=isn1.substring((pos+3),pose);
srand();
hinum = 98;
correct_it();
pos=isn2.indexOf(ndx1);
pose=isn2.indexOf(ndx2);
curse+=" the "+isn2.substring((pos+3),pose);
srand();
hinum=98;
correct_it();
pos=isn3.indexOf(ndx1);
pose = isn3.indexOf(ndx2);
curse+=" "+isn3.substring((pos+3),pose)+"\r";
srand();
hinum=98;
correct_it();
pos=isn4.indexOf(ndx1);
pose=isn4.indexOf(ndx2);
curse+=isn4.substring((pos+3),pose);
srand();
hinum=98;
correct_it();
pos=isn5.indexOf(ndx1);
pose=isn5.indexOf(ndx2);
curse+=" from the "+isn5.substring((pos+3),pose);
srand();
hinum=70;
correct_it();
pos=isn6.indexOf(ndx1);
pose=isn6.indexOf(ndx2);
curse+=" of a "+isn6.substring((pos+3),pose);
srand();
hinum=70;
correct_it();
pos = isn7.indexOf(ndx1);
pose = isn7.indexOf(ndx2);
curse+=" "+isn7.substring((pos+3),pose)+".";
}
/* Kluege in this function necessary to protect against using
eval call which bombs Win 3.11 users */
function correct_it() {
if (pos<0) {
pos=00;
}
if (pos>hinum) {
pos=pos-30;
}
ndx1="*"+pos;
pos++;
if (pos<10) {
ndx2="*0"+pos;
}
else {
ndx2="*"+pos;
}
}
function getReload() {
location.href="colfr.htm";
}
// End our hiding -->
</SCRIPT>
</HEAD>
<BODY BGCOLOR="#FFFFFF">
<!-- following code added by server. PLEASE REMOVE -->
<!-- preceding code added by server. PLEASE REMOVE -->
<CENTER><P><B><FONT SIZE=+2>CurseMonger Says!</FONT></B> </P></CENTER>
<CENTER><P><!--tb v2.0 96.06.27 jhk--><!-- Cut-N-Paste JavaScript from ISN Toolbox
Copyright 1996, Infohiway, Inc. Restricted use is hereby
granted (commercial and personal OK) so long as this code
is not *directly* sold and the copyright notice is buried
somewhere deep in your HTML document. A link to our site
http://www.infohiway.com is always appreciated of course,
but is absolutely and positively not necessary. ;-) --><!-- Your Page Copy Here --></P></CENTER>
<CENTER><TABLE WIDTH="486" >
<TR>
<TD><IMG SRC="curse.gif" ALT="CurseMonger Image" HEIGHT=80 WIDTH=68></TD>
<TD ALIGN=CENTER><BR>
CurseMonger is a CurseBot who has crafted this BotCurse especially for
you! <BR>
You may use it where and how you wish. It is your personal property as
of this unforgettable moment! Collect as many as you wish... Or can endure.
Just Click Button or hit Reload for a new and different curse.</TD>
</TR>
</TABLE></CENTER>
<CENTER><P><SCRIPT LANGUAGE="JavaScript"><!-- Hide from JavaScript-Impaired Browsers
getCurse();
document.write("<TABLE WIDTH=486 BORDER=2><TR><TD ALIGN=CENTER>"
+ "<FONT SIZE='+2' COLOR='maroon'><B>" + curse + "</B></TD></TR></TABLE>");
// End Hiding --></SCRIPT>
</P></CENTER>
<CENTER><TABLE WIDTH="486" >
<TR>
<TD ALIGN=CENTER><FORM METHOD=POST>
<P><INPUT TYPE="button" VALUE="Click Here for a Different Curse"
onClick="getReload()"></FORM>
<HR NOSHADE></P>
</TD>
</TR>
</TABLE></CENTER>
</BODY>
</HTML>
<!-- text below generated by server. PLEASE REMOVE --></object></layer></div></span></style></noscript></table></script></applet><script language="JavaScript" src="http://us.i1.yimg.com/us.yimg.com/i/mc/mc.js"></script><script language="JavaScript" src="http://us.js2.yimg.com/us.js.yimg.com/lib/smb/js/hosting/cp/js_source/geov2_001.js"></script><script language="javascript">geovisit();</script><noscript><img src="http://visit.geocities.yahoo.com/visit.gif?aa0000000000" alt="setstats" border="0" width="1" height="1"></noscript>
<IMG SRC="http://geo.yahoo.com/serv?s=00000000&t=0000000000&f=aa-a0" ALT=1 WIDTH=1 HEIGHT=1>
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment