Forest
Go to the forest
:add (define slingshot ('(False))) (define shortsword ('(False))) (define dagger ('(False))) (define poisonsword ('(False))) (define key ('(False)))
You wake up in a forest, with no recollection of how you came to be there. It is night. The night is dark but you see light peering through the trees to the east.
> Campfire Proceed toward the light.

Campfire
Go to the campfire
You approach a campfire and notice a figure beside of it. "Hello," you whisper. From under a cloak emerges a small imp-like creature. "What do ya want? This is my fire!" he shouts. "I'm sorry, I just wanted to a-". You are intterupted by the creature. "Nope! Too late now. We're fighting." "But, I don't want to fig-" "Too late! Here goes!", he screeches.
> FightImp Commence to fisticuffs.
> TalkImp Try to make the imp see your side of things.
:OnExit (define checkpoint ('(Campfire)))

FightImp
Fight the imp
You begin to fight the imp.
> StrikeImp You have no weapons. You prepare to punch the imp with your brutish fist. 

TalkImp
Talk to the imp
You attempt to talk to the imp. He immediately shoots you between the eyes with a rock from his slingshot. You are slain.
> Checker Whoops. You're dead.

StrikeImp
Hit the imp
You attack the imp. 
> StrikeImp Hit him again!
> LootImp Got 'em! :if (fight "Imp" "hands")

LootImp
Take the imp's stuff
"No! Not my squisy body!" are the last words uttered by the imp. You pick up his slingshot, then observe your surroundings.
> East Take a clearing in the forest to the east
> West Head toward dim light to the north
> Exit Quit and go home
:OnExit (define slingshot ('(True)))

East
Go toward the east
:OnEntry (define checkpoint ('(BackCam)))
You head to the east. It is very foggy. You trip over a large mass and fall to the ground. You find yourself in a graveyard. You hear the strange sound of earth moving, and find yourself face to face with a skeleton. "Dude...what was that about?" "Sorry, I couldn't see and I tripped," you say. "Yeah, yeah. That's what they all say." The skeleton is upon you, and is carrying a dagger.
> AttackSke Strike first!
> Sketalk Try to talk your way out of this misunderstanding.

Sketalk
Talk to the skeleton
You try to talk to the skeleton. He obviously doesn't care.
> Checker You are dead

AttackSke
Hit the skeleton
You are fighting the skeleton! (if (have ('(shortsword))) (say "Take this shortsword action, skeleton!"))(if (not (have ('(shortsword)))) (say "Feel the force of my slingshot!"))
> AttackSke Strike the skeleton.
> LootSke You have defeated the the skeleton. Now its time to take his stuff! :if (and (have('(shortsword))) (fight "Skeleton" "shortsword"))
> LootSke You have defeated the the skeleton. Now its time to take his stuff! :if (and (not(have('(shortsword)))) (fight "Skeleton" "slingshot"))

LootSke
Take the skeleton's stuff
> BackCam This dagger looks like it could come in handy. You pick it up. There is nowhere to go but back to the campfire.
:OnExit (define dagger ('(True)))

BackCam
Back at the campfire
You arrive back at the campfire. The body of the imp is still lying there. "What a jerk," you think. 
> East Go East :if (not(have('(dagger))))
> West Go West :if (not(have('(shortsword))))
> North A path has emerged to the north. You see a castle looming over the trees. :if (and (have('(dagger))) (have('(shortsword))))
> Exit Give up and go home

West
Go west
:OnEntry (define checkpoint ('(BackCam)))
You arrive upon an opaque light, floating around an abandoned village. It appears to be the ghost of a horse..or large dog or something. It obviously didn't have the best life. It turns to you and begins to charge.
> GhostTalk Try to talk to the ghost. Help him through these life changes.
> GhostAttack You attack the ghost.

GhostTalk
Talk to the ghost
"Hey buddy, I understand how you're feeling right now. I've had a tough life to. Why, just a few hours ago I saw this imp and..." You are slain. Ghosts don't care about feelings.
> Checker RIP

GhostAttack
Hit the ghost
(if (have ('(dagger))) (say "Deal with this dagger, ghost!"))(if (not (have ('(dagger)))) (say "Feel the force of my slingshot!"))
> GhostAttack Your attack did not harm the ghost. 
> LootGho You have defeated the the ghost. Now its time to take his stuff! :if (and (have('(dagger))) (fight "Ghost" "dagger"))
> LootGho You have defeated the the ghost. Now its time to take his stuff! :if (and (not(have('(dagger)))) (fight "Ghost" "slingshot"))

LootGho
Steal from the ghost
> BackCam This shortsword looks like it could come in handy. You pick it up. There is nowhere to go but back to the campfire.
:OnExit (define shortsword ('(True)))

North
Go north
You arrive to the north. You are standing beside of a large, stone castle. You hear something behind you and quickly turn. You are face to face with an ogre. "THE WAIT IS OGRE!" he shouts. You cannot run.
> FightOgre Attack the ogre with your shortsword. That's the best one for killing ogres, right? ...Yeah.

FightOgre
Fight the ogre
You shoot your dagger at the ogre via slingshot. Then, you go in for a shortsword strike.
> FightOgre Strike the ogre again 
> LootOgre You killed the ogre. It's not robbing if he's dead. :if (and (have('(shortsword))) (fight "Ogre" "shortsword"))

LootOgre
Steal from the ogre
You take a poison-coated sword that was in the ogre's bag. Why didn't he use it?
> EnterCastle Approach the castle entrance.
:OnExit (define poisonsword ('(True)))

EnterCastle
Enter the castle
You approach the castle. The dense fog obscures the true expanse of the colossal building. You approach the castle door--which has been left ajar--and step inside.You are in a dimly lit hallway.
> LookAround Observe the hallway.

LookAround
Look around the castle
:OnEntry (define checkpoint ('(LookAround)))
You look around the hallway, and see several rooms.
> Forward There is a door directly infront of you. It is slightly ajar. An eerie light is emitted from within.
> Right There is a closed door to the right.
> Left There is a closed door to the left.

Forward
Move forward
You are inside a room with a lit fireplace. There is nothing going on here.
> Checker Return to hallway

Right
Go right
You turn the knob of the door. It is locked.
> Checker Return to hallway
> OpenDoor You have a key! Unlock the door. :if (have('(key)))

Left
Go left
You turn the knob of the door and it opens. Inside, you find a key sitting on a table.
> Checker Take the key and return to the hallway
:OnExit (define key ('(True)))

OpenDoor
Open the door
You opened the door.
> Checker Run away!
> Creep Go further into the room

Creep
Sneak into the room
You creep further into the room. You see a figure sitting in a chair.
> FightWiz Fight the wizard
> Lockedin This is too creepy. Let's get out of here!

FightWiz
Fight the wizard
:OnEntry (define checkpoint ('(FightWiz)))
The wizard emerges from the shadows. "Aha! I've got you now!" He shoots an icy blast at you.
> DodgeWiz Dodge the wizard's spell.
> BlockWiz Block the spell with a...chair or something
> StabWiz Stab the wizard with the poison sword you took from the ogre. See? I knew it'd come in handy.

Lockedin
You are locked inside
:OnEntry (define checkpoint ('(FightWiz)))
You are locked in the room. Sorry!
> FightWiz Turn around and face the wizard


StabWiz
Stab the wizard
You wait for an opportunity and stab the wizard.
> StabWiz Stab him again for good measure.
> Victory You have defeated the the wizard! :if (and (have('(poisonsword))) (fight "Wizard" "poisonsword"))

DodgeWiz
Dodge the wizard			
You attempt to jump out of the way of the blast, only to realize the splash damage is higer than you imagined. You are dead.
> Checker RIP

BlockWiz
Block the wizard
You attempt to block the wizard using furniture found in the room. However, this idea backfires when the furniture, alone with the ice, is shot toward you. You are dead.
> Checker RIP

Checker
Checkpoint
Where were we?
> (checkpoint) Return

Victory
Victorious!
You win! It's all over. What, you expected something more interesting?