alphaman-src/MODJNK.BAS.txt

' Copyright (c) 1995 Jeffrey R. Olson
' 
' Permission is hereby granted, free of charge, to any person obtaining a copy
' of this software and associated documentation files (the "Software"), to deal
' in the Software without restriction, including without limitation the rights
' to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
' copies of the Software, and to permit persons to whom the Software is
' furnished to do so, subject to the following conditions:
' 
' The above copyright notice and this permission notice shall be included in all
' copies or substantial portions of the Software.
' 
' THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
' IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
' FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
' AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
' LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
' OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
' SOFTWARE.

DECLARE SUB modify ()
modify
END

SUB modify
DIM j(-2 TO 420) AS STRING * 68
j(-2) = "red orange yellow green blue purple berry   object devicelarge pit"
j(-1) = "mental resistanceintelligencehas no effect toughens your skin grew!"
'        1    6   11   16   21   26   31   36   41   46   51   56   61   66
'-------------------------------------------------------------------------
'       1    6   11   16   21   26   31   36   41   46   51   56   61   66
j(0) = "strengthdexterityconstitutionradiation resistanceI Dream of Jeannie"
j(1) = "You've found a can of Beef-a-RoniSpamMain MapGenerating terrainClub"
j(2) = "You return to normal speedYou feel sober againcan of cans of some a "
j(3) = "Strike any key ...You have been killed by alphaman.scr Shieldsmall "
j(4) = "Strength :Dexterity :Constitution :Radiation Resistance :DaggerMace"
'       1    6   11   16   21   26   31   36   41   46   51   56   61   66
j(5) = "Mental Resistance :Intelligence :hits out ofArmor Class :Pitchfork"
j(6) = "Hunger :Encumberance :Fatigue :Experience :Level :experienceextract"
j(7) = "Drop what (Esc to exit) ?You have to 'U'nuse your armor first nectar"
j(8) = "Eat what (Esc to exit) ?Yuck!  Not even my uncle could eat that! *"
j(9) = "Hey, isn't such bad stuff!Mmm.  Tasty stuff!Good eatin'You feel ill"
'-------------------------------------------------------------------------
'        1    6   11   16   21   26   31   36   41   46   51   56   61   66
j(10) = "Theexplodes in your face!eating an exploding berryradiation Your : "
j(11) = "blasts you with radiation!makes you feel sickmuch betterkilled by "
j(12) = "tastes greatrefreshes youeating a poison berrylethaltoxicBoom!Flail"
j(13) = "makes you more skillfullowersraiseslessdrunkclever returns to normal"
j(14) = "speeds you upslows down  You are now level another inch on your nose"
j(15) = "another buttocklobes on your pancreashornsYou grow turnedShort Sword"
j(16) = "a big eyebrow across your foreheada fairly cumbersome uddergiggle"
j(17) = "quenches your a weak heart blinds you!burphiccupcoughaaaChoooyawn"
j(18) = "Figure out what (Esc to exit) ?You wield or throw your Super!Dart"
j(19) = "Spam is a pink canned meat that tastes great glazedTitanium Dagger"
j(20) = "Beef-a-Roni is a macaroni meal in a canYou wear your for protection"
j(21) = "s come in handy for deflecting attacksYou can't quite figure it out"
j(22) = "Most berries are eaten for their interesting effectsI can't do that."
j(23) = "You've already identified your BloatedVery FullHungryFamishedArrow"
'        1    6   11   16   21   26   31   36   41   46   51   56   61   66
j(24) = "You've figured it out.  It's a You make some progress on itSorry "
j(25) = "Starvingof starvationNonVery LightModerateVery HeavyOverloadedhail"
j(26) = "Dead TiredWell RestedPoopedExhaustedG. Gordan LiddyJohn Mitchell+-=+"
j(27) = "Welcome to AlphaMan, the New BeginningCreated by Jeffrey OlsonFound "
j(28) = " Assisted by Peter Jessop Enter your character's name : Please wait"
j(29) = "Tricky DickSpiro AgnewJeb McGruderJohn EhrlichmanBob HaldermanBolt"
j(30) = "You've killed You deserve a pat on the back!Groovy!Bitchin' !Spear"
j(31) = "Hip hip hurray!Gee that's swell!Good for you!I say, smashing job!"
j(32) = "Like, totally gnarly!The Quayle appearsNow you're in for it!explode"
j(33) = "The Gas Spore explodes!an exploding Gas SporeOuch! Those darts hurt."
j(34) = "Your went up!You are now level went down!turning wimpy bathesEnd ?"
j(35) = "Strike space bar to continue ...Known small tech devices :Duh..."
j(36) = "Known berries :Known large tech devices :And even more! against+-=++"
j(37) = "Main mapRadiation ZoneCastlesLocal MapInside Castle in radiation"
j(38) = "nuked shriveled ate away fried destroyed zapped froze offHand Axe"
'        1    6   11   16   21   26   31   36   41   46   51   56   61   66
j(39) = "sucked away tickled off lopped off his nose!an ear!an eye!an arm!"
j(40) = "He looks like french fries now!Something bad happenedTitanium Sword"
j(41) = "BumCivDinEroFezGooHumJamKroLinMarNefPorQuaRawShuTinVorWamXerYumZiz"
j(42) = "alybumcasdumflegleganhamjumlasloomaynupnooporraysumtarvexwogyamzay"
j(43) = "Use arrow keys to indicate targetInvalid keystrokeBeyond rangeregion"
j(44) = "Hit Enter when ready or Esc to exit Beyond the edge of the world+-=+"
j(45) = "Thick ForestLight WoodsPlainsMarshSwampLakeCastleNoneInside Ruins"
j(46) = "That's terribly, terribly wrong.  Try again.Gads! It got all tangled"
j(47) = "You already see that regionYour vision isn't quite that good.Halberd"
j(48) = "You are in a valley in the post-holocaust ruins ofYou're outside now"
j(49) = "Central New York.  Mutants rule the world.This looks like the end..."
j(50) = "Bad creatureGood for you!You hitYou missedRead my lips :plummeting"
'        1    6   11   16   21   26   31   36   41   46   51   56   61   66
j(51) = "You couldn't hit the broad side of a barn!It went off!  Ouch!injured"
j(52) = "You could probably still hit Ctrl-Alt-Del entwined youOof! You fell!"
j(53) = " bit you   bit and clawed you  hit you with darts You're indoors!"
j(54) = " irradiated youPorta-Potty  poisoned you hit you with a jet of acid"
j(55) = " hit you with a laser  assaulted your brain shocked you burnt you"
j(56) = " froze you   constricted you leeched some of your hits stole missed"
j(57) = " tickled you mercilesslyYou can't carry anything else of damage+-=++"
'        1    6   11   16   21   26   31   36   41   46   51   56   61   66
j(58) = "You made it out of the water!Your beef jerky is a complete loss.+-=+"
j(59) = "Local TerrainYou'll go off the edge of the world!You are drowning!"
j(60) = "You shouldn't have gotten in over your head!Stairs upStairs downHole"
j(61) = "has killed to AC,Herman Munster is green tooYou diced your hand!+-=+"
j(62) = "S(hort) or L(ong) range (Esc to exit)?(long range can be risky)+-=++"
j(63) = "Local RegionOuch! You ended up inside a tree!teleporting into a tree"
j(64) = "You don't feel so good yourself.Throw what (Esc to exit) ?Lawn Dart"
j(65) = "UnUse what (Esc to exit) ?You're not currently using thatradiate+-=+"
j(66) = "No longer using your No longer wearing your That doesn't make sense"
j(67) = "You weren't using your force fieldYour force field is now offacidify"
j(68) = "You're already using thatOne usually eats thatNow using your Kaboom!"
j(69) = "You're already wearing armorNow wearing your You have to waitblasted"
j(70) = " more turnsYou are constantly using that mutationYour attack made"
j(71) = "Your sonic blast has injured Your laser missed grow!giving up.ALF"
j(72) = "You have to pick a living being to attackYour laser has injured you!"
j(73) = "Your mental blastThe explosionYour mental attack has no effect is "
j(74) = "It will take turns to totally heal.Your force field is already ona "
j(75) = "How many turns will you sit motionless ?Your force field is now on "
j(76) = "Your molecular disruption has killed Your life leech has injured "
j(77) = "You haven't figured that out yetNothing happensYour cryogenicsBravo!"
j(78) = "you feel betterextra-strength tylenolOne must throw grenadesMr. Ed"
j(79) = "Great shot!It seems uninjuredSmoking is bad for youa cheese grater"
j(80) = "You're now wearing your sunglassesYou need breadQuit now? point1. "
j(81) = "You scraped your knuckle!All you get is a rerun of   Continuing game"
'        1    6   11   16   21   26   31   36   41   46   51   56   61   66
j(82) = "You pass out you're so tiredThere's already something thereOutasite!"
j(83) = "Your forcefield blocked% of the damageYour shock injuredLong Sword"
j(84) = "Ruins level Castle level Grinch's PadYou can't get out of the water!"
j(85) = " gobbles the You'll need to take that off first splatters into jam"
j(86) = "Too bad you're fresh out of toastIt seems unaffectedYow! That smarts"
j(87) = "You broke it!Hall of the DeadHe bursts into flames! makes you scarey"
j(88) = "What a foul smell!You're wearing sunglasses!You're wearing a mask!"
j(89) = "What did the Skipper do with his hat?The Flying Nun pit!Titanium Axe"
j(90) = "You fell in a pit!falling in a pitAn arrow hit you!an arrowa dart2. "
'        1    6   11   16   21   26   31   36   41   46   51   56   61   66
j(91) = "A dart hit you!Acid fell on you!acidFire engulfed you!firea laser up"
j(92) = "A laser beam hit you!A shock zapped you!electricityYou got radiated!"
j(93) = "Done LoadingYour armor is destroyeddamagedshieldNot yet implemented"
j(94) = "Your tenticles injuredYour tenticles killeda Mets hatdorky-looking"
j(95) = "Now you're in deep doodoo!You were warned to abandon all hope!Sticky!"
j(96) = "m (ental) usep (hysical) useMcHale's NavyThe Beverly Hillbillies+-=+"
j(97) = "Lorena and Tonya's Weapon and Armor Emporiumcorrodedimmobilized+-=++"
j(98) = "Clinton Health Care FacilityWhere you won't get what you need, but"
j(99) = "you don't have to pay for it until April 15Would you like Stun Gun"
'        1    6   11   16   21   26   31   36   41   46   51   56   61   66
'-------------------------------------------------------------------------
'         1    6   11   16   21   26   31   36   41   46   51   56   61   66
j(100) = "Electrical GenerationThat dude was HOT!Awesomely played!The best!"
j(101) = "Heightened DexterityThe greatest!An outstanding job!You entwined "
j(102) = "Heightened StrengthYour quills injuredYou're coverage has expired!"
j(103) = "Heightened VisionWhich would you like:Vitamins (raise your HitMax)"
j(104) = "Tough ExoskeletonRNA Injections (temporarily heighten a mutation)"
j(105) = "Sonic AttackBionics (raise stats) Subdermal Implants (lower your AC)"
j(106) = "Blood Structure ChangeDialysis (restore poison damage)Family Affair-"
j(107) = "Reflective Skin     Laser Surgery (temporarily give enhanced vision)"
j(108) = "Laser GenerationHormones (temporarily bestow regeneration)assailed"
j(109) = "Heightened EnduranceTransduction Implants (create a forcefield)+-=+"
j(110) = "Foul MuskYou're now protected by a MindWebMindWeb Generatorhis hat!"
'         1    6   11   16   21   26   31   36   41   46   51   56   61   66
j(111) = "Acidic SalivaYour MindWeb dissipatesYou sped up You slowed down "
j(112) = "Poison ClawsA Treatise on Berry Colors hit you with homemade acid"
j(113) = "Heightened Speed zapped you with a homemade batteryYou healed +-=++"
j(114) = "Radiation GenerationYou were shielded from by your MindWebvery hurt"
j(115) = "Quills burnt you with homemade flashpowderYou toughened up How dull!"
j(116) = "TenticlesYou confused You blinded his hair tonic made you sneeze"
j(117) = "Light Generation broke your Keptibora SerumYou may fire up to shots"
j(118) = "Four Arms-------Press Esc to quit firingOoh, sugar high!Donald Trump"
j(119) = "Poison Gas------Box of Cap'n CrunchRoll of Duct TapeFusion Grenades"
j(120) = "Military GeniusRepulsion GeneratorHow the Grinch Stole Christmas"
j(121) = "Scientific GeniusYour repulsion field is now activepermanantly +-=+"
j(122) = "Heightened WillpowerSurrounded by a repulsion fieldEbony and Ivory"
j(123) = "Mental BlastYou fixed it with your duct tape!Tie a Yellow Ribbon"
j(124) = "TeleportationYour repulsion field prevents you from movingBlindness"
j(125) = "Mental HealingMacho ManSeasons in the Suna GiloolyMotion Sensor+-=+"
j(126) = "Force FieldDon't Worry Be HappyWould you like a club on the knee?"
j(127) = "Molecular DisruptionOuch ouch ouch!Song Sung BlueMacArthur Park+-=+"
j(128) = "Life LeechTech Device SpecificsPlease select an item to learn about:"
'         1    6   11   16   21   26   31   36   41   46   51   56   61   66
j(129) = "InvisibilityOne Tin SoldierDo The HustleThat's a pale That's a deep"
j(130) = "CryogenicsYour flashbulbNothing invisible detectedBurping/Sneezing"
j(131) = "HypnosisFragmentation GrenadeCan of Silly StringKnife Sharpener+-=+"
j(132) = "PsychokinesisYou're a bit sharp on the high notesBottle of Seltzer"
j(133) = "Heightened Luck-What a nice little tune!What a confusing song!+-=++"
j(134) = "Redirection-----A sublime and haunting melodySharpen what?Kablam!"
j(135) = "Mental Control--Duralloy is difficult to sharpenArmorAll what?+-=++"
'         1    6   11   16   21   26   31   36   41   46   51   56   61   66
j(136) = "Bottle of ArmorAllThe Puffball explodes!an exploding puffballhealthy"
j(137) = "You feel oddYou're sweatingYou feel lightheadedYour heart is racing"
j(138) = "Hit points : 1  You need & experience to reach levelWrist Watch+-=+"
j(139) = "The nerve toxin has already been releasedYou made Keptibora Essence"
j(140) = "The nerve toxin has already been destroyed1313 Mockingbird Lane+-=++"
j(141) = "until the nerve toxin will be releasedDisplacerJackhammerRange : ?"
j(142) = "Pencil SharpenerYour blood alcohol content is .%You feel good as new"
j(143) = "That is able to move square per turn squares per turn        Hurrah!"
'         1    6   11   16   21   26   31   36   41   46   51   56   61   66
j(144) = "It looks like some sort of  weaponvehiclekitchen appliancedetector"
j(145) = "farm implementcommunicatorgrenadeprotective deviceelectronic device"
j(146) = "Answering MachineRadar DetectorHologram GeneratorBreathalyzerblind +"
j(147) = "That's not a pointed weaponYou can moveYou feel like an idiot+-=+-=+"
j(148) = "Ahh, sharp enough to pick your teeth withYour Medkit revived you!"
j(149) = "That's not a blade weaponOh no, you ruined it!You destroyed your "
j(150) = "Ahh, sharp enough to shave withSay, that really improves it!+-=+-=++"
j(151) = "Large TitaniumLarge WoodenSmall Duralloy pounded youPepper Shaker"
j(152) = "Your acid missed you detoxifies you  Your poison missedhas injured"
j(153) = "Zoom!Your radiation beam missedIndicate trap to removeThat's silly"
j(154) = "You removed it!It went off!You fell in!You were unsuccessfulAhhhhh"
j(155) = "small shiny devicelarge tech deviceYour constitution went updownUgh"
j(156) = "Strike ? for help when game beginsYou've discovered mesons!refresh"
j(157) = "You lost 10 lbs from your thighs!Yipes!  Poison gas!poison gasGregre"
j(158) = " destroyed damaged your armor and shieldIt tastes even better hot!"
j(159) = "???????????????????You throw your Far out!Chia petLightning Grenade"
j(160) = "It should have lovely green fur in 3-7 daysstuck in a webMonolith"
j(161) = "The Phoenix rises from its ashes!You're caught in a web!Lightning!"
j(162) = "being struck by lightningYou're back outsideYou hear music : burped!"
j(163) = "Weapons, in increasing qualitybizarreYou stepped in superglue!+-=+-="
j(164) = "Armor and shields, in decreasing qualitystuck in glue whiffed+-=+-=+"
j(165) = "You have no messagesYou have a message from your motherBuzz Aldrin"
j(166) = "She asks why you never call herHe says you should wear the Mets Hat"
'         1    6   11   16   21   26   31   36   41   46   51   56   61   66
j(167) = "He reminds you to bring the Presidential ID Cardemit light is ruined"
j(168) = "He says to save the Gregre berry until you need itLeafblower+-=+-=++"
j(169) = "He says you have to go through him to get GilliganYour claws+-=+-=++"
j(170) = "He needs you to defeat the impersonatorsDo you want to play again? "
j(171) = "You got betterGuh, do we get to win dis time?Distill what?Javelin"
j(172) = "You've destroyed both items!teleporting into a wallsolid ground+-=++"
j(173) = "You feel light on your feetSomeone tampered with these!Light SabreNo"
j(174) = "You feel great!You shrink back down to sizeYou can see againShuriken"
j(175) = "Your extract is destroyed!Microwave what?Analyze what?ContainsWooden"
j(176) = "shoulder pork and hambeef and a roninorganicsan ultrahard alloy+-=++"
j(177) = " something to FoodContact weaponsRange weaponsArmorShieldBerries+-=+"
j(178) = "Small tech devicesLargeCreaturesLoreSelect type :Welcome to IBMSleep"
j(179) = "Spam usually makes you 2 catagories less hungry,damage,to hit,range"
j(180) = "while Beef-a-Roni generally makes you fullbase AC hits sustainable"
j(181) = "Throwing AxeTitanium DartDuralloy SpearDuralloy PitchforkSmall Metal"
j(182) = "Duralloy SwordLarge MetalInside Lair   Whooosh!!    Cured Hide Armor"
'         1    6   11   16   21   26   31   36   41   46   51   56   61   66
j(183) = "PlatemailChainmailFiberglass ArmorNo ArmorRingmailHeavy Fur Armor"
j(184) = "Plastic ArmorLava lamp BackpackGas MaskMedkitTape RecorderPowerpack"
j(185) = "Chemical AnalyzerVisiScopeExtra-Strength TylenolTip O'Neill Mask+-=+"
j(186) = "alpha.str Cannister GrenadeNeutrino GrenadeIncendiary GrenadePhaser"
j(187) = "Psychosis GrenadeGas GrenadeBlowtorch    Staple GunShock RodShotgun"
j(188) = "Laser PistolFusion RifleTickle Feather GunWeedeaterMissile Launcher"
j(189) = "Can of RaidBoise Souvenir AshtrayPair of SunglassesBroken Toaster"
j(190) = "Cheese GraterBionic Spleen ImplantSony WatchManSlinkyVeg-O-Matic+-=+"
j(191) = "Radiation SuitThermal SuitReflective SuitHovercraftMicrocomputerSafe"
j(192) = "Microwave OvenWetsuitTransmogrifierCigarette MachineCabinetCyclotron"
j(193) = "Liposuction DeviceStillLaserprinterYou are described the following :"
j(194) = "KineticRadiationPoisonAcidLaserMental BlastElectricalHeatColdSteal"
j(195) = "Lasers  Life LeechTickleattack,Resistances1/3 from KineticRegenerate"
j(196) = "ElectricityGrow from heat/laser/turnMental AttacksDamage ArmorSpore"
'         1    6   11   16   21   26   31   36   41   46   51   56   61   66
j(197) = "Quills/shock for 1-4ConstrictionElvis would get the words right+-=++"
j(198) = "The Grinch's castle is surrounded by poison gas.Gilligan's Island"
j(199) = "The Grinch has a soft spot for Roast BeastI Love LucyExiting Save"
j(200) = "Pair of Servoboots already exists.Enter new filename :Bad filename :"
j(201) = "AlphaMan Release 1.1     by Jeffrey R. Olson       Saving Game ..."
j(202) = "Electronic mail address: 76473.225@compuserve.com  Done Saving!. &"
j(203) = "See usenet newsgroup     rec.games.roguelike.misc  Loading Game ..."
j(204) = " doesn't exist.( .ALF will be added )Salt ShakerKalediscopecure gobs"
j(205) = "was uninjured by your shockGreen AcresForce Field GeneratorRambify"
j(206) = "Fountain PenWide Screen TVPhoton Grenadeprotected yousatisfy hunger"
j(207) = " has been destroyedpoisonWeaponsadd expertisemodify STRalter DEX+-=+"
'         1    6   11   16   21   26   31   36   41   46   51   56   61   66
j(208) = "change CONmodify RRaffect MRalter INTalter speedtoughen skinfrighten"
j(209) = "intoxicateadd tech abilityadd body partsinfluence mutationsdetoxify"
j(210) = "increase awarenesscause blindnessreduce tactcloud the mindZ (sleep)"
j(211) = "F1 display stats F2 display items F3 display known stuff s (earch) "
j(212) = "F5 display main map F6 display detailed map F7 show symbols The +-=+"
j(213) = "F9 creditsF10 SneakyKey?  helpEsc  clear text.  restu (se) something"
j(214) = "< go down stairs > go up stairs a (gain)d (rop) itemQ (uit) game a "
j(215) = "e (at) food or berryf (igure) outr (emove) trapt (hrow) something10"
j(216) = "S (ave) gameU (nuse) something<6E>ͻ    WallsC>Radar Gun   d## damage"
j(217) = "Experience :######You teleported +-=+-=+-=+-Range :##alphaman.dat"
j(218) = "Pocket InstamaticProsthetic LegDialysis MachineTK-5 Antitank Gun+-=+"
j(219) = "Gadzooks!  Radiation!Now you're pooped!Your finger was on the lens."
j(220) = "Heavens to Betsy, what pretty colors!The lens cap was on.good as new"
'         1    6   11   16   21   26   31   36   41   46   51   56   61   66
j(221) = "Egads, you got ink all over yourself!The foreground is out of focus."
j(222) = "The film jammed.You've still got your own legs.It's emptyExhausting"
j(223) = "None of your software is compatibleEnergize what?You've fried the "
j(224) = "That needs no powerYou've energized your Bionic Cranium Implant+-=++"
j(225) = "You can't energize while using an itemBionic Muscle ImplantTrample"
j(226) = "You feel like six million buckslousytrampled you hit you with spores"
j(227) = "Wow, groovy!for points of damageOh gross!  The last guy was sick."
j(228) = "You regain your sensesFission GrenadeFlamethrowerTitanium Platemail"
j(229) = "Select item to place in backpack :Your backpack is fullpoor driving"
j(230) = "Select item to remove from backpack :That's too large for your pack"
j(231) = "Ouch!  You drive like you're from Boston won't fit through the door"
j(232) = "Now you're sick too!Indicate direction :JetpackSousaphoneWater+-=++"
j(233) = "You play a few bars from ConvoyRhinestone CowboyBoogie Wonderland"
j(234) = "Shake Your Groove ThingYou look so cool!You have to Unuse that first"
j(235) = "Golf Carta Rick Astley songSkilletRoll of Toilet PaperOoh, Greasy!"
'         1    6   11   16   21   26   31   36   41   46   51   56   61   66
j(236) = "Duralloy ChainmailTitanium ChainmailBottle of Sunscreen smells nice"
j(237) = "Computer Workstationmade you fall asleep    make invisiblePogo Stick"
j(238) = "The scales fall from your eyesYou hit the berrybushYou've killed "
j(239) = "The berrybush zapped youYou feel drainedAttraction OdorEnergy Drain"
j(240) = "AnywhereYou are being constricted.You can't run away from this."
j(241) = "Cloaking DeviceYou teleported!ID CardFreeze GunIt's too dark to see"
'         1    6   11   16   21   26   31   36   41   46   51   56   61   66
j(242) = "drunk drivingYou removed your udder!more robustYour is destroyed"
j(243) = "KayakRubber RaftThose spikes hurt!F4 view character status Tickling"
j(244) = "ScrollLock  fast playYou no longer feel cleverYou are currently :"
j(245) = "stuck in a pitspeedyslowed downconcentratingsunscreenedstrongweak"
j(246) = "agileclumsyrobustinfirmmore resistant to radiationlessmoribundTrump "
j(247) = "strong-willedweaksmartdumbdrunkkeen-eyedblindan eggheadfrightening"
j(248) = "big 'n dumbinvisiblefeeling poorlyudderedbeing constrictedYou barf!"
j(249) = "weakened by poisonFast Play is onblinded youmade you sickbarfing"
j(250) = "BlindingSickeningVial of AcidCan of MaceHammockYou drift off ......"
'         1    6   11   16   21   26   31   36   41   46   51   56   61   66
j(251) = "You lie awake thinking aboutthe day's eventshow noisy it is outside"
j(252) = "how badly you need a showerZzzzzhow tired you areMornin' sunshine!"
j(253) = "Your back hurtsYou had a nightmareYou wake upYou fall asleep gadget"
j(254) = "You're feeling drowsyIt'll be getting dark soonYou need to eatrest"
j(255) = "You are rudely awakenedBox of FlaresMirrorMr MistyIck!  Nosehairs!"
j(256) = "The sky lights upThe entire room blazes momentarily stung yousuit of"
j(257) = "You reflected the laser back on.  It looks hurt.Examine what?ghost"
j(258) = "The Maggot became a Fly!Oooh, low salt Spam!Zoikes! Expired 11/78"
j(259) = "Press I to examine an item,S an object on the screen  has unlimited "
j(260) = "It looks very complicatedUse f to try to figure it outdeep waterbog"
j(261) = " has no uses leftIt's an ordinary That's stairwayyouan empty square"
j(262) = "X (amine) something use leftBottle of Mr. Clean          Civilian"
j(263) = "ScientificMilitaryPresidentialMy my, aren't we Mr. Bigshot?Sluggish"
j(264) = "He says you'd better deal with Ivana firstP (revious) message+-=+-=+"
j(265) = "Not even your Medkit could save you!corrodes your face!an Ivana wig+"
j(266) = "eating an acid berryWay to go!Now you're cookin'!AntiToxin Serum+-=+"
j(267) = "Another one bites the dust!Hit Points :&-&    Creature is : fleeing "
j(268) = "burping sneezing rubblelocked doorTitanium JavelinDuralloy Arrow+-=+"
j(269) = "Your grenadeThat item needs no energyThat item cannot be recharged++"
'         1    6   11   16   21   26   31   36   41   46   51   56   61   66
j(270) = "Hit Points :&   Movement Rate :&   Armor Class :&armor was damaged!"
j(271) = "Elvis is on the The Grinch is on the highest castle levelshorted out"
j(272) = "lowest castle levelW (impy) critter setupshield was damaged!+-=+-=++"
j(273) = "Enter saved filename: (or hit Enter for a new character)blast radius"
j(274) = "was drained of energy!was partially drained of energy!a Neutron Suit"
j(275) = "armor was degraded!shield was degraded! was destroyed!+-=+-=+-=+-=++"
j(276) = "A Treatise on Arms and Armor-=<3D> Release 1.1, June 1995 <20>=-UV Helmet+"
j(277) = "Copyright (c) 1995 Jeffrey OlsonA ShareWare GameYou feel groggy+-=="
j(278) = "Splendid display of derring-do!You must be rested to teleport-=+-=++"
'         1    6   11   16   21   26   31   36   41   46   51   56   61   66
j(279) = "F (ast fight) switchFast fight mode is Enter difficulty level:=+-=++"
j(280) = "0. Normal game difficulty1. Somewhat easy game2. Easy game=+-==+-=++"
j(281) = "Fast fighting mode is now onFast fighting mode is now off"
j(282) = "+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=++"
j(283) = "+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=++"
j(284) = "+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=++"
j(285) = "away harmlesslyOne normally eats or throws thatMassage UnitrelaxIck!"
j(286) = "Readings are somewhat unusual, CaptainAh, you can face the world now"
j(287) = "Oh, that feels nice on your aching neckTricorderThermos o' Coffee"
j(288) = "Ow! You got a headache from drinking it too fastovereatingrefreshed"
j(289) = "That coffee's keeping you awakeTo run from DOS type ALPHAMAN map+-=+"
j(290) = "It's not yet your bedtimeBox of AlkaseltzerUnusual  Great scott!Gore"
'         1    6   11   16   21   26   31   36   41   46   51   56   61   66
j(291) = "Select item to transmogrifyIt only works on organic matterwide awake"
j(292) = "You made a small dead rodentIt turned into a Here's your great uncle"
j(293) = "Here we are at the beachThis is us at StuckeysHome Movie Projector"
j(294) = "It can sustain more hitsthe Skipper's HatK-p-i-o- S-r-ma Space Suit"
j(295) = "You've defeated the Elvis ImpersonatorSee Spot dieturned you green!"
j(296) = "a pair of Blue Suede ShoesYou've injected yourself with the touching"
j(297) = "You're protected from the nerve toxin for 1 dayturn you green2 days"
j(298) = "The map shows you the location of the Grinch's stronghold gored you "
j(299) = "You feel like dancinYou look like a real dorkYou tried to hit em but"
j(300) = "coconuts fell on your headyou got stuck in gluehe stole your glasses"
j(301) = "You just can't bring yourself to attack herit went between his legs"
j(302) = "A sign at the door says GracelandNeil got luckyThe TajWar Boomerang"
j(303) = "This castle appears to be stories tallS.S. Minnow story tall+-=+-=++"
j(304) = "make you klutzyYou are no longer klutzymake you regenerateThis ruins"
j(305) = "You no longer smell niceYou no longer regenerateregenerating+-=+-=++"
j(306) = "tastyYour mirror is almost destroyedYou feel ridiculous fell asleep"
j(307) = "Launch what ? -& strength -& hitmaxYou're already wearing a suit+-=+"
'         1    6   11   16   21   26   31   36   41   46   51   56   61   66
j(308) = "You're already wearing footwear won't fit down the holetapewormed"
j(309) = "smells niceInside LairYou're in a dark tunnelCamouflage Suit+-=+-=++"
j(310) = "You caught it as it returnedPinstripe SuitChainsawBlasterVoodoo Doll"
j(311) = "Grenade LauncherSave file (y/n/Esc) ?crawled down your throatFlipper"
j(312) = "Duralloy Platemailslowed by poisondevitalized by poisonAlways asleep"
j(313) = "You're too sick to eatSusceptibilitiesFire how many shots (1-6)?+-=+"
j(314) = "Set to stun (s) or kill (k)?Stun Grenade<64><65><EFBFBD><EFBFBD>   WallsBulletproof Suit"
j(315) = "Your shield is damagedYou're already using a lava lamp Turbocharger"
j(316) = "You bit the head off the Turbocharge what?Awesome wheels, dude!+-=++"
j(317) = "Disintigration Grenadewarm all overconfusedtipsyBottle of Brandy+-=+"
j(318) = "This is GrandpaYou vanish like a dream in the cold morning light "
j(319) = "Lair entrancePrinting ...AlphaMan Command SummaryDevice Components"
j(320) = "Strike P to print out a detailed summary, or space bar to continue"
j(321) = "Would you like an overview? is resistant to your life leech+-=+-=+-="
j(322) = "You should eat food when you are very hungry.Zoikes!  Nerve toxin!!!"
j(323) = "You must eat berries to find out what they do.Find your own devices!"
j(324) = "Welcome to the Jim Jones Juice Jamboree!IBM PS497 DX2 Supercomputer"
'         1    6   11   16   21   26   31   36   41   46   51   56   61   66
j(325) = "Today we have the following purple nectars:dangerously bloated+-=+-="
j(326) = "You freeloader!  Go get your own nectar!stepping in a gopher hole"
j(327) = "Some tech items can be eaten, too.Which would you like to try?+-=+-="
j(328) = "You can throw any item, but not all do significantskin color+-=+-=++"
j(329) = "damage (weapons, grenades, heavy devices). Berries canAccess Denied!"
j(330) = "have interesting effects if they hit creatures. ate some of your "
j(331) = "Examining a screen square will identify creatures anddelicious meal:"
j(332) = "objects and will locate traps. Examining tech devices, ate your +-=+"
j(333) = "armor, or shields will reveal their condition.JanuaryFebruaryOctober"
j(334) = "You can Unuse any item or mutation you are currently MarchJuneAugust"
'         1    6   11   16   21   26   31   36   41   46   51   56   61   66
j(335) = "using (denoted by an asterisk in item list).  You mustSeptemberApril"
j(336) = "Unuse armor and suits before using different ones.falling in a chasm"
j(337) = "You must figure out a tech item before it can be used.OctoberMayJuly"
j(338) = "It will often take several or many tries to figure outNovemberfull"
j(339) = "complex objects. Note: it's possible to break devices.Decemberhalf"
j(340) = "Welcome to the Mark VI Transporter UnitA burst of explosive gas moon"
j(341) = "Strike a key to be transported to the location of your choicegibbous"
j(342) = "You triggered explosive gas!You barfed up your tapeworm!Game time: "
j(343) = "You're no longer protected by a force fieldThere's a quarter barfed!"
j(344) = "You may drop any item, but some must be Unused beforeTongue Sandwich"
'         1    6   11   16   21   26   31   36   41   46   51   56   61   66
j(345) = "they may be dropped (e.g. armor, suits).  The squareSausage Surprise"
j(346) = "you're standing on must be empty to drop something.Tech Devices R Us"
j(347) = "Special items like this have very specific uses.Press a key to begin"
j(348) = "We have the following tech devices:Welcome to Jeffrey Dahmer's Deli"
j(349) = "You stuff yourself until you can't eat another biteSelect catagory:"
j(350) = "Dismantle what?An arrowA dartA jet of acidA pillar of fireA laser"
j(351) = "Press C to construct a device, D to dismantle oneA bolt of lightning"
j(352) = "You have to construct something firstpile of tech partsYou're blind!"
j(353) = "Some falling sandA silvery rayA radiation beam narrowly missed you"
j(354) = "Berries, Coffee, Brandy and Mr Mistys also provide nourishment+-=+-="
j(355) = "Weapon ComparisonArmor and Shield ComparisonMessages     Mmmmm Tasty"
j(356) = "You feel invigoratedYou think you could build one of these devices :"
'         1    6   11   16   21   26   31   36   41   46   51   56   61   66
j(357) = "You have no parts to build withWhat do you want to build? drizzling"
j(358) = "How many energy units do you wish to use?It split in two!raining"
j(359) = "You can't figure out how to make anythingYour safe is fullRump Roast"
j(360) = "It only works for tech devicesSelect item to place in safe :hailing"
j(361) = "Select item to remove from safe :Of course, the King can't die..."
j(362) = "You detoxified No sign of the fuzz...Your Neutron Suit killed =+-=++"
j(363) = "Nearby radiation trap detectedNo nearby radiation traps detected-=++"
j(364) = "Nearby radiation area detectedNo nearby radiation areas detected+-=+"
j(365) = "Geiger Counter=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=++"
j(366) = "+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=++"
j(367) = "+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=++"
j(368) = "+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=++"
j(369) = " -& constitution -& dexterityA blob of glue an Elvis Impersonator"
'         1    6   11   16   21   26   31   36   41   46   51   56   61   66
j(370) = "hound dog, cryin all the timecell block was jumpin to the jailhouse"
j(371) = "Don't be cruel to a heart that's trueLove me tenderly, love me true"
j(372) = "She touched my hand, what a chill I gotlet me be your cuddly bear"
j(373) = "left me, I've found a new place to dwellI dated your little sister"
j(374) = "cell block was dancin to the jailhousehound dog, howlin all the time"
j(375) = "I dated your big sisterleft me, I've found heartbreak hotelpouring"
j(376) = "Love me tender, love me trueDon't be cruel to a heart that's blue"
j(377) = "let me be your teddy bearShe touched my hand, what a thrill I got"
j(378) = "Thanks, , for ridding me of those weenies.You're stuck in a tarpit!"
j(379) = "Use these to defeat the Grinch.Those big spikes really hurt!breezy"
j(380) = "A sign says Abandon all hope ye who enter herefalling coconutscalm"
j(381) = " hit you with his big gold belt buckleOuch!  It's hailing!windy+-=++"
j(382) = "What the heck is HE doing here?Grandpa turned you into a mouse!Tent"
j(383) = "You've returned to normal after scurrying about.stuck in a tarpit"
'         1    6   11   16   21   26   31   36   41   46   51   56   61   66
j(384) = "You've stepped in quicksand!caught in quicksandYou need to heal up."
j(385) = "They're too awkward to wieldPress spacebar for a disclaimer sneezed!"
j(386) = "The author of this game abhors violence. It should be a gopher hole"
j(387) = "understood that special characters such as this oneKevorkian Machine"
j(388) = "aren't killed, but are defeated and consequently flee.very windy+-=+"
j(389) = " bonked you with a coconutOne small step for a man...You got gassed!"
j(390) = "You stepped in a gopher hole!Very Tired&-&   A puff of poison gas"
j(391) = "You settle in for the night.It's too early to set up camp.Real Time:"
j(392) = "Critters got into your food!You almost stepped inVery Hungry+-=+-=++"
j(393) = "Just a hunka hunka burnin' loveJust a hunka hunka burnin' shoes+-=++"
j(394) = "You no longer feel sick.create forcefieldsOh, what a relief it is!"
'         1    6   11   16   21   26   31   36   41   46   51   56   61   66

j(395) = "You receive 40,000 bonus experience points plus castlesFlash Grenade"
j(396) = "points for finishing in hoursBlue denotes squares you've been in.+++"
j(397) = "+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=++"
j(398) = "+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=++"
j(399) = "+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=++"
j(400) = "+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=++"
j(401) = "+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=++"
j(402) = "+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=++"
j(403) = "+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=+-=++"

'         1    6   11   16   21   26   31   36   41   46   51   56   61   66
j(404) = "You're now protected by a forcefieldYou made a totally gross blob!"
j(405) = " hit you with a scud missile whiffed, but accidentallyM. Monolith"
j(406) = "hit you on the backswingGround levelPress 'u' to useretirement+-=+-="
j(407) = "protected from nerve toxinWould you like to retire this character?"
j(408) = "The Grinch is so touched by the Roast Beast that hisIt fell apart!"
j(409) = "heart grows 3 sizes, and he destroys the nerve toxin!Bamboo Raft+-=+"
j(410) = "You've managed to defeat the Grinch.Hall of FameYour raft is leaking"
j(411) = "+## to hit, +## damage with contact weaponsrange weapons&-& damage"
'         1    6   11   16   21   26   31   36   41   46   51   56   61   66
j(412) = " hit you with his hat hit you with his money beltYou salvaged+-=+-=+"
j(413) = " poked you with her hat pinIt looks like you're too late.0 damage"
j(414) = "With his dying gasp he releases the nerve toxin! weight units+-=+-=+"
j(415) = "The Grinch just released the nerve toxin.Small WoodenSmall Titanium"
j(416) = "You're given a lovely gold watch10 units will fully charge device"
j(417) = "You must use at leastThe MunstersBewitchedheightens your +-=+-=+-=++"
j(418) = "The Brady Bunch   physically supermutatedmentally supermutatedOops!"
j(419) = "and Gregory KrolLiver PlatterYou put to sleepLarge Duralloy? damage"
j(420) = "Your psychokinetic explosionThe electrolock ate your ID!Glue Grenade"
'         1    6   11   16   21   26   31   36   41   46   51   56   61   66

OPEN "alphaman.1" FOR BINARY AS #1: CLS
FOR i = -2 TO 420
FOR k = 1 TO 68
  MID$(j(i), k, 1) = CHR$(ASC(MID$(j(i), k, 1)) XOR (ABS(i * 17 + k * 31) MOD 256))
NEXT k
PUT #1, , j(i): LOCATE 1, 1: PRINT i;
NEXT
CLOSE #1
END SUB