Constant Story "A Beginning"; Constant Headline "^A five-noun SpeedIF entry by Anonymous.^"; Include "Parser"; Object LibraryMessages with before[; Attack: "You do not yet know how to attack."; Burn: "You do not yet know how to burn things."; Buy: "You do not yet know how to buy."; Fill: "You do not yet know how to do that."; FullScore: "You do not yet know how to score."; Jump: "You jump up and down in happiness."; JumpOver: "Your belly prevents you from such acrobatic things."; Pray: "You tell Him how delighted you are with every thing."; Sing: "You carol joyously."; Strong: "You have not learned of such things yet."; Swim: "You do not yet know how to swim."; Think: "You ponder things, and why they are."; VagueGo: "Where?"; Wait: "Nothing happens while you wait."; Wake: "You are not sleeping."; Yes: "You affirm each and every thing."; ]; Include "VerbLib"; ! Game classes Class Room with description "Needs a description.", has light; ! The game objects Room start "Rocky Earth" with description "The earth here is grey and hard, and aligned somehow with itself, as if it were once a doughy thing, and had been kneaded before it hardened. You don't know how to name the thing which is west of you, but it moves and crashes against itself frightfully. East of you, He is changing the earth again.", w_to "You clamber down and westward, your belly hampering your movements a little, taunting the ancient thing, and retreat laughing in delight when it attempts to splash you.", n_to "You clamber slowly northward, your belly only hampering your movements a little, enjoying the roughened earth and keeping out of reach of the violent thing to your left.", s_to "You clamber slowly southward, your belly only hampering your movements a little, enjoying the roughened earth and keeping out of reach of the violent thing to your right.", e_to eden, before [; Listen: "The crashing of the violent thing to the north is wonderful to listen to, and you feel that you could stand here forever, listening."; Swim: "You clamber down and northward, your belly hampering your movements a little, taunting the ancient thing, and retreat laughing in delight when it attempts to splash you."; ]; Object -> earth "rocky thing" with description "For all you know, He may have kneaded it when He made it. It seems folded and stretched, though it is rough and hard now, so rough that walking and climbing upon it is almost painful - but you enjoy feeling the rough new thing beneath you.", name 'rocky' 'earth' 'grey' 'hard' 'rough' 'doughy' 'thing' 'rocks', before [; Climb: "You climb happily around on the new-made rocky earth, your belly only hampering your movements a little."; Touch: "You feel the cool roughness of this earth and smile in pleasure."; ], has scenery; Object -> seas "moving crashing thing" with description "You think to yourself ~I really must ask Him to tell me how to speak of that.~.^ It is dark and greenish and very, very active, smashing itself continually against the rocky earth. You suspect that it is very ancient, certainly predating the earth, perhaps even older than Him Himself.", name 'sea' 'ocean' 'moving' 'crashing' 'greenish' 'thing', has scenery; Object -> belly "belly" with description "Your belly has been gradually growing for as long as you can remember.", before [; Touch: "You rub your belly, certain that things will only become better."; ], name 'belly', has scenery concealed; Room eden "Green and Growing Earth" with description "You can remember when the earth here was bare, fresh, and vividly-colored. Now He has caused it to go green, and sprout soft hair-like things, so thickly that all the earth is covered. The flowing wet thing still curves through the lowest point of the ground, though, and beside it a wonderful branched thing rises from the earth.", n_to "You wander northward, marveling.", s_to "You wander southward, marveling.", w_to start, before [; Pray: if (player.each_turn ~= Labor) rfalse; print "You ask Him to come to you and to help you. ^^He arrives suddenly, and looking at you at once realizes what it is you are feeling.^^He says ~Not to worry, you're only a little premature~, though He seems as close to worried as you have ever seen Him Himself.^^~I hadn't intended for yours to be like this, but..~ He trails off.^^As your belly contracts again, more fiercely than ever before, He reaches inside you and and brings out something wonderful: a new person!^^~What will you call her?~^^. . . ~Eve~"; deadflag = 2; rtrue; ]; Object -> tree "branchy thing" with description "It grows from the earth beside the old flowing thing, where the earth used to be soft and moist. As it sprouts further from the earth it splits, and splits again, until above you it transforms into many soft green rustling things.", name 'branched' 'branchy' 'tree' 'thing', has scenery; Object -> river "flowing wet thing" with description "Much as it used to be, this flows mildly eastward, though beside it the earth is green and growing, instead of being soft and bright red as you last saw it.", name 'flowing' 'wet' 'thing', has scenery; Object -> apple "small round thing" with initial "Hanging from the branchy thing is a small, round thing, even brighter green than the hair-like soft things which you are walking on.", description "It is small, round, bright green, and smells delicious.^^Something inside your belly kicks.", after [; Eat: player.each_turn = Labor; "You bite into the round thing. It is very tart, almost painfully astringent, but still tasty.^^As you finish it something within you twists and you nauseate briefly."; ], name 'small' 'round' 'bright' 'green' 'thing', has edible; Object -> belly2 "belly" with description "Your belly has been gradually growing for as long as you can remember.", before [; Touch: "You rub your belly, certain that things will only become better."; ], name 'belly', has scenery concealed; Global laborturns = 0; [ Labor; print "^Your belly cramps intensely, and pain streaks through you.^"; switch(laborturns++) { 6: "You consider calling upon Him for help."; } ]; ! Entry point routines [ Initialise; location=start; print "^Created not long ago, you rejoice in nearly every thing you see, and every thing is novel. You find your growing belly particularly wonderful.^^"; ]; ! Standard and extended grammar Include "Grammar"; ! Replaced library routines.