!*! Updated on 20-Dec-90 at 12:43 PM by Paul Ciosek; edit time: 0:02:29
!
! BIRD by Sydney R. Baxter IV, UltraSoft Corporation.
!
MAP1 A,B,2
MAP1 ANSWER,S,1
INTRO: PRINT TAB(-1,0)
PRINT TAB(1,15);"A Birder's Guide to American Fowl"
PRINT TAB(3,5);"Members of our modern society do not realize the intricate "
PRINT TAB(4,1);"ways of our fast diminishing wildlife. Before we even realize"
PRINT TAB(5,1);"it, the fruits of Mother Nature will disappear before our very eyes."
PRINT TAB(6,1);"With this in mind, we begin our scenario. Picture that you are walking"
PRINT TAB(7,1);"through a mist-shadowed glen, with only the distant chirps of unseen"
PRINT TAB(8,1);"birds to guide your path. Fully stocked with all the latest in birder"
PRINT TAB(9,1);"equipment, you set out to chart the unknown."
PRINT TAB(11,1);"This adventure is guided by the use of numbered prompts. Simply hit"
PRINT TAB(12,1);"the number of the desired course of action. Good luck."
PRINT TAB(14,1);"(1) To continue with the story."
INPUT A
ON A GOTO DESCR ELSE INTRO
DESCR: PRINT TAB(-1,0)
PRINT TAB(3,5);"Walking through the woods, the sun filters through the early morn."
PRINT TAB(4,1);"The dew leaves stains on your shoes. Rustling is heard in the distance."
PRINT TAB(5,1);"Closer by, a burst of color catches your attention. What shall you do?"
PRINT TAB(6,1);"Which sense is more important to you: sight or hearing?"
PRINT TAB(8,1);"(1) You take off down a leaf-covered path in search of the elusive sound."
PRINT TAB(9,1);"(2) You were easily transfixed by colors as a child, and as such head south."
INPUT A
ON A GOTO PATH,MARSH
PATH: PRINT TAB(-1,0)
PRINT TAB(3,5);"Walking along the path, your motions make deep swooshing sounds"
PRINT TAB(4,1);"amongst the vegetation. The place gets darker, with the path becoming narrower."
PRINT TAB(5,1);"The sounds that were heard before are becoming more intense, with a frenzy"
PRINT TAB(6,1);"of activity being denoted. You have second thoughts about going this way."
PRINT TAB(8,1);"(1) He who trembles and runs away lives to birdwatch another day."
PRINT TAB(9,5);"You decide to double back the way you came."
PRINT TAB(11,1);"(2) You've come all this way and won't be daunted; you really don't"
PRINT TAB(12,5);"care if this place is haunted. You continue your journey."
INPUT A
ON A GOTO PIT,BEAR
PIT: PRINT TAB(-1,0)
PRINT TAB(3,5);"Feet don't fail me now! You run heedlessly through the brush, not"
PRINT TAB(4,1);"caring about retracing your footsteps. You stumble into a pit that was obscured."
PRINT TAB(5,1);"by the dense covering of leaves. Just before you break your neck, you "
PRINT TAB(6,1);"notice the magnificent covering of ivy along the pit walls. As you are"
PRINT TAB(7,1);"going way too fast to grasp any of them, this was just a nice diversion from"
PRINT TAB(8,1);"death. Too bad."
GOTO DEAD
BEAR: PRINT TAB(-1,0)
PRINT TAB(3,5);"Small growls are heard in the woods. This isn't what the Audobon Society"
PRINT TAB(4,1);"promised would be on this trail. Several yards away, three bear cubs are learning"
PRINT TAB(5,1);"the art of survival by playfully swatting paws at one another. This"
PRINT TAB(6,1);"practice will serve them well later on in their lives. For the time"
PRINT TAB(7,1);"being, your attention is focused on something else...a mother bear. Regarding you"
PRINT TAB(8,1);"as a threat to her young, she begins to charge. The nerves in your body"
PRINT TAB(9,1);"begin to race."
PRINT TAB(11,1);"(1) Run for the hills!"
PRINT TAB(12,1);"(2) Lie down and play dead!"
PRINT TAB(13,1);"(3) Climb a nearby tree!"
INPUT A
ON A GOTO HILLS,FAINT,CLIMB ELSE BEAR
MARSH: PRINT TAB(-1,0)
PRINT TAB(3,5);"You have the scent now (so to speak). The ground begins to get a little"
PRINT TAB(4,1);"spongy, but is still holding up well. You begin to recognize the form of "
PRINT TAB(5,1);"the creature you have been pursuing. It is a red-winged blackbird, as is "
PRINT TAB(6,1);"shown in your Roger Rory Peterson's ";TAB(-1,30)"Birds of North America ";
PRINT TAB(-1,31);"field guide."
PRINT TAB(8,1);"A beautiful panorama of the countryside surrounds you. Wildlife of all"
PRINT TAB(9,1);"types thrive in this environment. This is a birder's paradise. The blackbird"
PRINT TAB(10,1);"continues flying out over the marsh. A snowy egret sets its head up as"
PRINT TAB(11,1);"as a lance, waiting to feed upon small creatures in the mud."
PRINT TAB(12,1);"Far in the distance, an osprey soars over its nesting site, a solitary tree."
PRINT TAB(14,1);"(1) Continue following the red-winged blackbird on its course."
PRINT TAB(15,1);"(2) Determine exactly what the snowy egret is eating."
PRINT TAB(16,1);"(3) Check out the osprey nest site."
INPUT A
ON A GOTO RED,EGRET,OSPREY
HILLS: PRINT TAB(-1,0)
PRINT TAB(3,5);"You gallop over the meadow, back down the way you came. But,"
PRINT TAB(4,1);"this is to no avail. You should have known better than to outrun a bear,"
PRINT TAB(5,1);"since they can travel speeds in excess of forty miles per hour."
PRINT TAB(6,1);"As you look at the bear's progress, the last thing you see is a huge"
PRINT TAB(7,1);"paw bearing down on you. One quick swipe is all that is needed to remove"
PRINT TAB(8,1);"your scalp. This was one hair-raising experience."
GOTO DEAD
FAINT: PRINT TAB(-1,0)
PRINT TAB(3,5);"You drop on your stomach as the mother bear approaches. Closing"
PRINT TAB(4,1);"your eyes, the buffeting of the bear's paws strike your body. There"
PRINT TAB(5,1);"is a strong desire to run, but something tells you to keep cool."
PRINT TAB(6,1);"Eventually the bear and her cubs move away, leaving you for dead. Today"
PRINT TAB(7,1);"must be your lucky day."
PRINT TAB(9,1);"(1) To continue with the story."
INPUT A
ON A GOTO SURVIVE
CLIMB: PRINT TAB(-1,0)
PRINT TAB(3,5);"The nearest tree that can be climbed is a young pine sapling, with narrow,"
PRINT TAB(4,1);"branches that can barely support your weight. The mother bear wraps her huge"
PRINT TAB(5,1);"paws around the tree, shaking it vigorously. You start to fall as soon as you"
PRINT TAB(6,1);"begin your ascent. Your back breaks as you hit the earth. The cubs"
PRINT TAB(7,1);"have food to eat for today."
GOTO DEAD
RED: PRINT TAB(-1,0)
PRINT TAB(3,5);"The red-winged blackbird flits casually across the marsh, cavorting"
PRINT TAB(4,1);"with the dragonflies that abound. The sun glistens off their wings, creating"
PRINT TAB(5,1);"miniature rainbows in the air. Bounding gleefully along, the spirit of nature"
PRINT TAB(6,1);"abounds in you. With a spring in your step, you follow your quarry."
PRINT TAB(8,1);"(1) The flight of the blackbird is incredibly mesmerizing, and you continue along."
PRINT TAB(9,1);"(2) You ignore the flying creature, and instead head for the seashore."
INPUT A
ON A GOTO SWAMP,BEACH
SURVIVE:
PRINT TAB(-1,0)
PRINT TAB(3,5);"You wake up in a daze several hours later, but the sun is still shining."
PRINT TAB(4,1);"There is within you a desire to clean yourself up. Two possible options"
PRINT TAB(5,1);"exist:"
PRINT TAB(6,1);"(1) Head for a nearby stream, so that you can wash away your grime and"
PRINT TAB(7,5);"perhaps catch something to eat."
PRINT TAB(8,1);"(2) You hear a distant roaring, which is perhaps the sound of the"
PRINT TAB(9,5);"ocean. The sound of gulls is overheard."
INPUT A
ON A GOTO STREAM,BEACH
EGRET: PRINT TAB(-1,0)
PRINT TAB(3,5);"The graceful feathers of the snowy egret are known throughout the world"
PRINT TAB(4,1);"for their beauty. In the late 19th and early 20th centuries, it was"
PRINT TAB(5,1);"fashionable to wear a hat composed of egret feathers on one's head. Fortunately,"
PRINT TAB(6,1);"such practices became out of style and were eventually stopped by the"
PRINT TAB(7,1);"U. S. government. As you peer more closely at the animal, you hear a sound, the"
PRINT TAB(8,1);"last that you will ever hear. A shotgun blasts, sending pellets into your"
PRINT TAB(9,1);"body. As your eyes shut a final time, a park ranger stands over you."
GOTO DEAD
OSPREY: PRINT TAB(-1,0)
PRINT TAB(3,5);"You climb the tree, stepping on first one branch and then the other."
PRINT TAB(4,1);"A large nest, made of twigs, is situated in the crook of tree. Looking"
PRINT TAB(5,1);"at first like a fragile structure of a child, strength of home seems"
PRINT TAB(6,1);"to issue from here. As you peer over the brink of the nest, a cluster of four"
PRINT TAB(7,1);"eggs lies in the bottom. Reaching out to grab one, you realize the mistake"
PRINT TAB(8,1);"that has been made. The osprey turns out to be two birds, not one."
PRINT TAB(9,1);"The mother bird tears at your eyes, and the father plucks out your heart."
GOTO DEAD
SWAMP: PRINT TAB(-1,0)
PRINT TAB(3,5);"The ground feels softer and softer. Your shoes are getting mud caked"
PRINT TAB(4,1);"all over them. Tiny gnats and hungry mosquitoes invade your nose, eyes, ears, and mouth."
PRINT TAB(5,1);"You begin to lose sight of the blackbird, as well of the surrounding area."
PRINT TAB(6,1);"Not looking at where you are going, you step into a puddle of quicksand. Descending"
PRINT TAB(7,1);"into the muck, you lose consciousness as you start to smother."
GOTO DEAD
STREAM: PRINT TAB(-1,0)
PRINT TAB(3,5);"You settle down to relax beside the stream. Taking handfuls of water, you use"
PRINT TAB(4,1);"this elixir to both quench your thirst and wash your face. In the eddies"
PRINT TAB(5,1);"along the shore. Your stomach begins to grumble; it has been several hours since"
PRINT TAB(6,1);"your last meal. Ideas of fishcakes begin to look appealing. In an instant,"
PRINT TAB(7,1);"your hand darts out to snatch one of the fleeting minnows. Unfortunately,"
PRINT TAB(8,1);"some of the earthen bank begins to crumble into the stream, sending you headfirst"
PRINT TAB(9,1);"into the swiftly flowing water. As you sink to the bottom, you've always wondered"
PRINT TAB(10,1);"what it was like to drown. Now you know."
GOTO DEAD
BEACH: PRINT TAB(-1,0)
PRINT TAB(3,5);"Waves pound along the length of this ancient shore. Overhead,"
PRINT TAB(4,1);"black-headed gulls emit their cries. Shells of clams and scallops litter the beach,"
PRINT TAB(5,1);"forming the stuff of necklaces such as that manufactured by the Indians. It is quite"
PRINT TAB(6,1);"easy to think that there is no one else in the world. Far out in the distance"
PRINT TAB(7,1);"a reef forms a buffer that prevents the waves from crashing full force along"
PRINT TAB(8,1);"the beach. Off the reef, gulls leap and dive into a disturbed patch of water,"
PRINT TAB(9,1);"which is obviously full of fish. By and by, you spot another human in the water."
PRINT TAB(10,1);"Behind him/her, a fin breaks the surface of the water. Could this be a shark?"
PRINT TAB(11,1);"You wonder if you can do anything to prevent a tragedy from occurring."
PRINT TAB(13,1);"(1) Throwing cowardice to the wind, you jump into the water to be a hero."
PRINT TAB(14,1);"(2) You begin to yell frantically, waving your arms over your head, hoping to scare"
PRINT TAB(15,5);"away the shark."
INPUT A
ON A GOTO SHARK,SAVED
SHARK: PRINT TAB(-1,0)
PRINT TAB(3,5);"Very valorous, but not very smart. Did you really think that you"
PRINT TAB(4,1);"could really hold off the attack of a shark? As you swim out to 'save' the poor"
PRINT TAB(5,1);"soul, it turns out that you were very, very wrong. It is merely a discarded mannequin"
PRINT TAB(6,1);"flung overboard from a passing ship. This realization does not ease the pain which"
PRINT TAB(7,1);"occurs as the great beast bites you in half. C'est la vie."
GOTO DEAD
SAVED: PRINT TAB(-1,0)
PRINT TAB(3,5);"You look utterly ridiculous flapping your arms in the wind, resembling a"
PRINT TAB(4,1);"scarecrow on the plains of Kansas. The shark rears its head above the water, swiftly"
PRINT TAB(5,1);"chomping off the head of the unfortunate individual. Instead of blood spraying"
PRINT TAB(6,1);"out, foam pieces are on the surface of the water. This was not a human being;"
PRINT TAB(7,1);"it was a discarded dummy from a Sears outlet. Somebody should be arrested for"
PRINT TAB(8,1);"littering. Common sense is the rule this day. Going further down the beach, a foot"
PRINT TAB(9,1);"bridge crosses over a canal."
PRINT TAB(11,1);"(1) Walk over the bridge to see what is on the other side of the canal."
PRINT TAB(12,1);"(2) Look under the bridge to see what is underneath."
INPUT A
ON A GOTO BRIDGE,HOLE
BRIDGE: PRINT TAB(-1,0)
PRINT TAB(3,5);"Crossing over the bridge, you see gaps in the old wood. The creakings"
PRINT TAB(4,1);"of the footbridge grow louder. Once in the middle of the bridge, it begins"
PRINT TAB(5,1);"to give out. The whole mass plunges into the water, along with you. As your head"
PRINT TAB(6,1);"sinks below the waves, you breathe your last."
GOTO DEAD
HOLE: PRINT TAB(-1,0)
PRINT TAB(3,5);"Upon closer inspection, the bridge seems to be of a failing quality."
PRINT TAB(4,1);"Time and the waves have worn away at the wood and foundations of the bridge. If you had"
PRINT TAB(5,1);"stepped on the footbridge, it most likely would have given way, pitching you into the"
PRINT TAB(6,1);"drink. The only apparent way to cross the canal is to enter a drain tunnel on this side"
PRINT TAB(7,1);"of the bank that exits on the other side, going underneath the canal."
PRINT TAB(9,1);"(1) Enter the tunnel, even though it is slimy and yucky."
PRINT TAB(10,1);"(2) Remain on this side and try to cross the bridge anyway."
INPUT A
ON A GOTO WIN,BRIDGE
WIN: PRINT TAB(-1,0)
PRINT TAB(3,5);"Congratulations! You have successfully completed the tour of the Baxter"
PRINT TAB(4,1);"nature preserve. Having finished this walk, I'm sure that you have a greater"
PRINT TAB(5,1);"understanding of the natural world. Even though this adventure has ended, this doesn't"
PRINT TAB(6,1);"mean that the exploration has to end. Try playing the game again, exploring places and"
PRINT TAB(7,1);"doing different actions. Thanks for being along for the ride."
PRINT TAB(10,1);"Would you like to play again?"
PRINT TAB(12,1);"(Y)es, thank you very much."
PRINT TAB(13,1);"(N)o, not right now. I'm too cool to play this game."
INPUT ANSWER
IF ANSWER = "Y" OR ANSWER = "y" THEN GOTO INTRO
IF ANSWER = "N" OR ANSWER = "n" THEN GOTO END
DEAD: PRINT TAB(20,15);"You have"
PRINT TAB(-1,21)
PRINT TAB(20,24);"DIED"
PRINT TAB(-1,22)
PRINT TAB(20,29);"at this game. Would you like to continue?"
PRINT TAB(22,15);"(Y)es I would. I found this game most enjoyable."
PRINT TAB(23,15);"(N)o I would not. I have better things to do with my time."
INPUT ANSWER
IF ANSWER = "Y" OR ANSWER = "y" THEN GOTO INTRO
IF ANSWER = "N" OR ANSWER = "n" THEN GOTO END
