;---------
SCENE 41 scarytrees, SCENE, "Deep in a dark, scary forest"
	THEME	0
	MUSIC	#silence
	
END

END

;---------
SCENE 51 forge, SCENE, "Inside Alf's Armoury"
THEME	6
	MUSIC "#silence"
	ACTOR	1,	"Alf", Alf, 1, 25, 90
	
	SEL		1
	MOVE	1,	30, 90

IF T21, @hasT21

	' You're not wearing any shoes!
	' The terrain around here really is very tough on your feet. 
	' I'd strongly advise you go and visit "Threads, Trinkets and Fishtails" and get a pair of shoes.
	' It's just across the road.
	' If you don't, I really do worry what could happen once you go out into the open country.
	' <It is impossible to leave the town until you have visited "Threads, Trinkets and Fishtails">
	GIVE T20
END

@hasT21

IF T101, @T101
	OFFER2	4,20, 12

' Feel free to browse my fine selection of weapons for the discerning #<g.man> looking for a little extra "personal security".
END

@T101
1: Hello again %1!
IF I720-T158, @howaboutseamon
@fromseamon
IF T146, @T146
IF T147, @T147
IF T148, @T148
IF T149, @T149
IF T150, @T150
IF T140, @beenbefore
1: I've switched from selling swords to building cannons.
1: Selling swords only made me a few gold coins per customer.
1: There's a lucrative market in cannons for the Hislen navy, and I'm earning foar more than I ever have before.
1: If you wanted to go and fight ships - for whatever reason - you might wish to purchase some cannons off me, too.
1: Be warned though - they don't come cheap! 
HOST_GIVE T140
@beenbefore
1: Remember, you can only use cannons for ship to ship combat.
1: And I feel I must always remind potential customers that it doesn't matter how many cannons one has if the Captain of the ship does not have great skills of seamanhip.
1: Seamanship is vital if a Captain is to tactically and effectively deploy #<g.his> ship or #<g.his> fleet in ship-to-ship combat.
IF T141, @T141
IF T142, @T142
IF T143, @T143
IF T144, @T144
IF T145, @T145
1: You currently don't have any cannons at all on your ship.
1: How about you start off with 25?
1: I can sell you that many for 500 gold coins.
WAIT 2
MENU "Yes=@yesnocannons", "No=@no"
@no
1: As you wish, %1.
1: Please come back again if you decide you wish to engage in ship to ship combat.
END

@howaboutseamon
1: You know, perhaps it's just a rumour...
1: But I was recently talking to a Captain of a Hislen battleship who had been on a voyage to visit the Isle of the Ituri.
1: A fine job you did in conquering that land for our great nation, Governor %1.
1: Anyway, his ship was blown off course in a great storm, to the North West.
1: He claims they were attacked by a huge sea monster, and that he and his crew barely escaped alive.
1: Maybe he was just sent crazy by the storm...
1: But there might be some truth in it - maybe this mythical sea creature really does exist?
HOST_GIVE T158
GOTO @fromseamon
END

@yesnocannons
IF -G500, @lackmoney2
HOST_TAKE G500
HOST_GIVE T141
HOST_GIVE T102
1: %1, 25 cannons will be loaded on to your ship before you have left the port.
H: <thinks> If I camp maybe Jolly Johnson will give me some advice on how to make best use of my cannons.
H: <To talk to Jolly Johnson, you must right click on him>
END

@T141
1: Your ship is currently armed with 25 cannons.
1: Do you wish to buy 25 more, at a cost of 500 gold coins?
WAIT 2
MENU "Yes=@yesT141", "No=@no"
@no
1: As you wish, %1.
1: Please come back again if you wish to make your ship more destructive than ever.
END

@yesT141
IF -G500, @lackmoney
HOST_TAKE G500
HOST_TAKE T141
HOST_GIVE T142
1: %1, your new cannons will be loaded on to your ship before you have left the port.
1: Happy sailing!
END

@T142
1: Your ship is currently armed with 50 cannons.
1: Do you wish to buy 25 more, at a cost of 500 gold coins?
WAIT 2
MENU "Yes=@yesT142", "No=@no"
@no
1: As you wish, %1.
1: Please come back again if you wish to make your ship more destructive than ever.
END


@yesT142
IF -G500, @lackmoney
HOST_TAKE G500
HOST_TAKE T142
HOST_GIVE T143
1: %1, your new cannons will be loaded on to your ship before you have left the port.
1: Happy sailing!
END

@T143
1: Your ship is currently armed with 75 cannons.
1: Do you wish to buy 25 more, at a cost of 500 gold coins?
WAIT 2
MENU "Yes=@yesT143", "No=@no"
@no
1: As you wish, %1.
1: Please come back again if you wish to make your ship more destructive than ever.
END

@yesT143
IF -G500, @lackmoney
HOST_TAKE G500
HOST_TAKE T143
HOST_GIVE T144
1: %1, your new cannons will be loaded on to your ship before you have left the port.
1: Happy sailing!
END

@T144
IF -I719, @need 719
1: Your ship is currently armed with 100 cannons.
1: Do you wish to buy 25 more, at a cost of 500 gold coins?
WAIT 2
MENU "Yes=@yesT144", "No=@no"
@no
1: As you wish, %1.
1: Please come back again if you wish to make your ship more destructive than ever.
END

@yesT144
IF -G500, @lackmoney
HOST_TAKE G500
HOST_TAKE T144
HOST_GIVE T145
1: %1, your new cannons will be loaded on to your ship before you have left the port.
1: Happy sailing!
END

@T145
1: Your ship is currently armed with 125 cannons.
1: Do you wish to buy 25 more, at a cost of 500 gold coins?
WAIT 2
MENU "Yes=@yesT145", "No=@no"
@no
1: As you wish, %1.
1: Please come back again if you wish to make your ship more destructive than ever.
END

@yesT145
IF -G500, @lackmoney
HOST_TAKE G500
HOST_TAKE T145
HOST_GIVE T146
1: %1, your new cannons will be loaded on to your ship before you have left the port.
1: Happy sailing!
END

@T146
1: Your ship is currently armed with 150 cannons.
1: Do you wish to buy 25 more, at a cost of 500 gold coins?
WAIT 2
MENU "Yes=@yesT146", "No=@no"
@no
1: As you wish, %1.
1: Please come back again if you wish to make your ship more destructive than ever.
END

@yesT146
IF -G500, @lackmoney
HOST_TAKE G500
HOST_TAKE T146
HOST_GIVE T147
1: %1, your new cannons will be loaded on to your ship before you have left the port.
1: Happy sailing!
END

@T147
1: Your ship is currently armed with 175 cannons.
1: Do you wish to buy 25 more, at a cost of 500 gold coins?
WAIT 2
MENU "Yes=@yesT147", "No=@no"
@no
1: As you wish, %1.
1: Please come back again if you wish to make your ship more destructive than ever.
END

@yesT147
IF -G500, @lackmoney
HOST_TAKE G500
HOST_TAKE T147
HOST_GIVE T148
1: %1, your new cannons will be loaded on to your ship before you have left the port.
1: Happy sailing!
END

@T148
IF -I720, @need720
1: Your fleet is currently armed with 200 cannons.
1: Do you wish to buy 100 more, at a cost of 2000 gold coins?
WAIT 2
MENU "Yes=@yesT148", "No=@no"
@no
1: As you wish, %1.
1: Please come back again if you wish to make your fleet more destructive than ever.
END

@yesT148
IF -G2000, @lackmoney
HOST_TAKE G2000
HOST_TAKE T148
HOST_GIVE T149
1: %1, your new cannons will be loaded on to your ships before you have left the port.
1: Happy sailing!
END

@T149
1: Your fleet is currently armed with 300 cannons.
1: Do you wish to buy 100 more, at a cost of 2000 gold coins?
WAIT 2
MENU "Yes=@yesT149", "No=@no"
@no
1: As you wish, %1.
1: Please come back again if you wish to make your fleet more destructive than ever.
END

@yesT149
IF -G2000, @lackmoney
HOST_TAKE G2000
HOST_TAKE T149
HOST_GIVE T150
1: %1, your new cannons will be loaded on to your ships before you have left the port.
1: Happy sailing!
END

@T150
1: Your fleet is currently armed with 400 cannons.
1: You cannot fit any more cannons on to your ships.
END



@lackmoney
1: I am afraid you don't have enough money to buy any more cannons at the moment, %1
1: Come back again when you are richer.
END

@lackmoney2
1: I am afraid you don't have enough money to buy any cannons for your ship yet, %1
1: Come back again when you are richer.
END

@need719
1: Your ship is currently armed with 100 cannons.
1: Only battleships can mount any more cannons than you already have.
1: Come back when you have a battleship.
END

@need720
1: Your ship is currently armed with 200 cannons.
1: Only an entire fleet can mount any more cannons than you already have!
1: Come back when you have a fleet.
END


;--------------
SCENE 52 shopcounter, SCENE, "Threads, Trinkets and Fishtails"
THEME	0
	MUSIC	"#silence"
	ACTOR	1,	"Marcus", joshTownsfolk, 21, 25, 90

	SEL		1
	MOVE	1,	30, 90
	OFFER 42, 43, 706, 707, 708, 709, 710, 711, 900, 901, 902, 903, 904, 250, 251, 300, 913, 914, 954, 955 IF T31, @later
IF T41, @later
IF T21, @beenbefore
GIVE T21
' You're not wearing any shoes!
IF T20, @T20
' The terrain around here really is very tough on your feet. 
' I'd strongly advise you buy a pair.
GOTO @skipT20
@T20
' Oh, I see, you've been advised by my fellow townfolk to come and get a pair. Damn good advice, yes.
@skipt20
' Anyhow, as you're new here, I'd better introduce myself.
' I'm Marcus.
' As well as selling all manner of clothes and trinkets, I am also this town's fishmonger.
' Seafood is a key part of the local economy.
@beenbefore
' If, when you are out adventuring, you defeat any sea creatures which are edible, you will be able to pick up their remains.
' You can of course eat the seafood you find yourself, if you get hungry and want to restore your energy.
' However, you can also make a tidy profit - and help my business - if you sell them on to me.
END


@later
' Do you wish to buy any of these wonderful trinkets that I can offer you?
END

