You've a shiny new kettle!\n<<set $kettle = "true">>\n[[So shiny!|DeadEnd]]\n
You descend.\n\nThe ladder stops before the hole does.\n\nThe rung you're holding onto breaks.\n\n[[Argh!|Argh]]
You brush past the dragon into the Treasure Room.\n\nSo much treasure here!\n\n<<if $sign eq "true">>\n\nYou read the sign.\n\n<<endif>>\n\n<<if $disliked eq "true">>\n\nYou didn't like it.\n\n<<endif>>\n\nYay!\n\nGAME OVER\n
You give the dragon your kettle.\n\n"Thanks," she says, moving aside.\n\n<<set $kettle eq "false">>\n\n[[Proceed|TreasureRoom]]
"You lie" she snarls.\n\nShe eats you.\n\nYou're dead.\n\nThe dragon has your kettle.\n\n<<if $sign eq "true">>\n\nYou read the sign.\n\n<<endif>>\n\n<<if $disliked eq "true">>\n\nYou didn't like it.\n\n<<endif>>\n\nHuh.\n\nGAME OVER
You fall and land awkwardly.\n\nNothing broken though.\n\n[[Ow!|Tunnel1]]
You are standing by a hole.\n\nA ladder leads down.\n\nA sign says 'Beware'.\n\n[[Examine the sign]]\n[[Climb down the ladder]]\n\n<<set $kettle = "false">>\n<<set $sign = "false">>\n<<set $disliked = "false">>
The tunnel is blocked by a large scaly form.\n\n<<if $kettle eq "false">>\n\nLooks like a dragon. She's sleeping.\n\n[[Go back|Tunnel2]]\n\n<<else>>\n\nIt's a dragon. She eyes your kettle.\n\n"A... kettle?" she says.\n\nDoesn't fool you. She wants your kettle.\n\n[[Give her the kettle|Win]]\n[[Deny that you have a kettle|Lose]]\n[[Say nothing. Back away slowly|Tunnel2]]\n\n<<endif>>
Tiny Dungeon
Wayne Myers
Me neither.\n\n[[Crying!|Tunnel1]]\n\n<<set $disliked = "true">>
You go down the tunnel.\n\n[[Keep going|Tunnel3]]\n[[Go back|Tunnel1]]
It's a dimly lit tunnel.\n\nJust about high enough to stand.\n\nOverhead there's a hole.\n\n[[Go that way|Tunnel2]]\n[[Go the other way|DeadEnd]]\n<<if $disliked eq "false">>\n[[I don't like it in here]]\n<<endif>>
A dead end.\n\n<<if $kettle eq "false">>\n\nThere's a kettle here.\n\n[[Get out of here|Tunnel1]]\n[[Take the kettle|GetKettle]]\n\n<<else>>\n\n[[Get out of here|Tunnel1]]\n\n<<endif>>\n
There's some tiny writing.\n\nYou eventually decipher it:\n\n'Nothing Special'.\n\n[[Climb down the ladder]]\n\n<<set $sign = "true">>