import 'retrolib.i'.
import 'backstage.alan'.
import 'the-street.alan'.
import 'the-house.alan'.
import 'the-basement.alan'.

the hero isa actor
	name me
	definite article ""
	verb examine does only
		"You are an outsider.
		$pYou are the one who gave up.
		$pYou are the one who abandoned him."
	end verb.
end the hero.

syntax about = about.
	help = help.
verb about does
        "City of Dead Leaves is a story told to me by a place that I
        saw in a dream. As such it's a very personal thing; hopefully
        you'll find it worth your time. It's not a puzzle game, though
        it has puzzles; it's not a story game either, though it has a
        story. It's about cities, and futures, and feelings. About us.
        $pIf you're new to interactive fiction, type HELP for a primer.
        $pBeta testers: Adri Mills and Jonathan Blask. Thank you!
        $pMade with Alan 3."
end verb.

verb help does
	"Hello, and welcome to City of Dead Leaves. This is a work of
	interactive fiction. That means you get to explore the story
	yourself, rather than just reading what I wrote. It works like
	this: I'll tell you where you are and what you can see, then you
	say what you want to do, and I'll let you know what happens next.
	$pThis being a computer program, you can only use fairly simple
	commands:
	$p- to move around, just type a compass direction (north, south),
	or up/down/in/out; you can also climb stairs and enter buildings;
	$n- to view things in more detail, you can look at, in, behind and
	under them; just 'look' shows the current location again;
	$n- for that matter, 'examine' and 'search' are synonyms for
	'look at' and 'look in', respectively;
	$n- some things can be picked up and carried, then dropped elsewhere
	with 'take' and 'drop', respectively. To see what you're carrying
	right now, type 'inventory'.
	$n- you can even put things in other things, for what it's worth;
	$n- you can, of course, also do things like save, restore and quit
	the program;
	$n- last but not least, try any other actions that seem logical;
	for example, doors can be opened and closed, locked and unlocked
	(with keys); I'll tell you if a certain action isn't available.
	$pBut how do you refer to objects? That's quite easy, too. Say
	the game tells you at some point:"
	
	style quote.
	"$p$tYou wake up in a field, among pretty red flowers, under a tree
	that rustles in the wind."
	style normal.
	
	"$pYou can type things like 'smell red flowers' or 'climb tree'. (No
	need to bother with articles or punctuation, though you can do that
	too.) Generally, any noun mentioned in the description is fair game.
	Some of them may not be implemented; those are probably unimportant.
	Others may be there, but unmentioned, and you have to uncover them
	by poking around. This is all part of the fun.
	$pOh, by the way, your avatar in the story is referred to as 'me'.
	So you can type 'examine me' to learn more about who you play as.
	$pShortcuts for the most commonly used commands:
	$p- l for 'look';
	$n- x for 'examine';
	$n- i for 'inventory';
	$n- n, s, e, w and so on for compass directions;
	$n- q for 'quit'.
	$pHope this helps. Enjoy!"
end verb.

start at square.
--start at basement_apartment.
"There's nothing left in your life. There's nothing left in anyone's
life. Will he even remember you after all this time? Will he want you
back?$p"

style emphasized. "City of Dead Leaves" style normal.
"$nAn interactive meditation by Felix Plesoianu
$nVersion 2016-05-19 / Artistic License 2.0
$p(Type ABOUT for details.)"

locate player_inventory here.
visits 1.