Chapter 1 - Extensions and Prologue

[Extensions are identified by name and author.]
[This extension is built into every copy of Inform 7.]
Include Rideable Vehicles by Graham Nelson. 

When play begins:
say "Riding a Harley is great fun, but can you ever get off the bike?"

Chapter 2 - New Kinds, Properties, Verbs, etc

A motorbike is a kind of rideable vehicle. A motorbike can be polished or unpolished.

Understand "polish [something]" as polishing. Polishing is an action applying to one thing.

Before polishing:
	if noun is not a motorbike
	begin;
            say "You cannot polish that.";
	stop the action;
	end if;

Before polishing:
	if noun is polished
	begin;
            say "No point in polishing twice.";
	stop the action;
	end if;

Carry out polishing:
say "Feels good, giving the old motorbike a new polish";
now the noun is polished.

Chapter 3 - The World

The Driveway is a room. "There is a street to the south."

The Street is south of the Driveway. "The driveway is off to the north."

[A player can use 'ride' or 'mount' to ride a rideable vehicle, and dismount to get off a rideable vehicle.]
The Harley is a motorbike in the Driveway. It is unpolished. The description is "Hmm, nice Harley." 

[Create a synonym for the Harley.]
Understand "bike" as Harley.

Carry out going somewhere by Harley:
	say "You rev the engine and ride the bike to . . .".

After mounting the Harley:
	say "You settle comfortably on the seat and fire it up."
	
Instead of dismounting:
	say "Instead of shutting the motor down, you decide you'd like to keep riding."

Chapter 4 - At Every Turn

Every turn:
	if the Harley is unpolished
	begin;
	  say "You keep saying to yourself, I really need to give the bike a polish";
	end if;