//****************************************************************************
//SPHERE by : Menasoft ©1997-2000
//www.sphereserver.com
// All SPHERE script files and formats are copyright Menasoft & Partners.
// This file may be freely edited for personal use, but may not be distributed
// in whole or in part, in any format without express written permission from
// Menasoft & Partners.  All donations and contributions
// become the property of Menasoft & Partners.
//****************************************************************************
// FILE LAST UPDATED: Friday, April 28, 2000

[SPEECH jobprovisioner]

// Purpose: Britannia Provisioner Script
// Notes:  This is used for general information pertaining to all Britannian Provisioners
// Current Keyword List: job,what*do*do,occupation,profession,supply,ration,equit,arrow,bolt,pouch,bag,pack,
// candle,torch,lantern,food,bread,meat,mutton,chicken,bird,ale,wine,liquor,cider,beer,drink,fruit,pear, apple
//
ON=*job*
ON=*work*
ON=*what*do*do*
ON=*profession*
ON=*occupation*
	IF ( <SRC.KARMA.WICKED> || <SRC.KARMA.BELLIGERANT> )
		IF ( <COMPLEXITY.HIGH> || <COMPLEXITY.MEDIUM> )
			DORAND 2
				SAY I provide provisions.
				SAY I run the general store.
			ENDDO
		ELSE
			DORAND 2
				SAY I provide provisions.
				SAY I run the general store.
			ENDDO
		ENDIF
	ELIF ( <SRC.KARMA.NEUTRAL> )
		IF ( <COMPLEXITY.HIGH> || <COMPLEXITY.MEDIUM> )
			DORAND 2
				SAY I sell general provisions.
				SAY I run the general store.
			ENDDO
		ELSE
			DORAND 2
				SAY I sell general provisions.
				SAY I run the general store.
			ENDDO
		ENDIF
	ELSE
		IF ( <COMPLEXITY.HIGH> || <COMPLEXITY.MEDIUM> )
			DORAND 2
				SAY I supply the necessities of the discriminating traveler.
				SAY I run the general store.
			ENDDO
		ELSE
			DORAND 2
				SAY I supply the necessities of the discriminating traveler.
				SAY I run the general store.
			ENDDO
		ENDIF
	ENDIF
ON=*supply*
ON=*ration*
ON=*equip*
	IF ( <SRC.KARMA.WICKED> || <SRC.KARMA.BELLIGERANT> )
		IF ( <COMPLEXITY.HIGH> || <COMPLEXITY.MEDIUM> )
			DORAND 2
				SAY I carry supplies and provisions for travellers.
				SAY I stock food and other supplies.
			ENDDO
		ELSE
			DORAND 2
				SAY I carry supplies and provisions for travellers.
				SAY I stock food and other supplies.
			ENDDO
		ENDIF
	ELIF ( <SRC.KARMA.NEUTRAL> )
		IF ( <COMPLEXITY.HIGH> || <COMPLEXITY.MEDIUM> )
			DORAND 2
				SAY I carry supplies and provisions for travellers.
				SAY I stock food and other supplies.
			ENDDO
		ELSE
			DORAND 2
				SAY I carry supplies and provisions for travellers.
				SAY I stock food and other supplies.
			ENDDO
		ENDIF
	ELSE
		IF ( <COMPLEXITY.HIGH> || <COMPLEXITY.MEDIUM> )
			DORAND 2
				SAY I stock the finest supplies and provisions.
				SAY I supply excellent food and other necessities for travelers.
			ENDDO
		ELSE
			DORAND 2
				SAY I stock the finest supplies and provisions.
				SAY I supply excellent food and other necessities for travelers.
			ENDDO
		ENDIF
	ENDIF
ON=*arrow*
ON=*bolt*
	IF ( <SRC.KARMA.WICKED> || <SRC.KARMA.BELLIGERANT> )
		IF ( <COMPLEXITY.HIGH> || <COMPLEXITY.MEDIUM> )
			DORAND 1
				SAY I have arrows and crossbow bolts for sale.
			ENDDO
		ELSE
			DORAND 1
				SAY I have arrows and crossbow bolts for sale.
			ENDDO
		ENDIF
	ELIF ( <SRC.KARMA.NEUTRAL> )
		IF ( <COMPLEXITY.HIGH> || <COMPLEXITY.MEDIUM> )
			DORAND 1
				SAY I sell arrows and crossbow bolts.
			ENDDO
		ELSE
			DORAND 1
				SAY I sell arrows and crossbow bolts.
			ENDDO
		ENDIF
	ELSE
		IF ( <COMPLEXITY.HIGH> || <COMPLEXITY.MEDIUM> )
			DORAND 1
				SAY I can sell thee fine arrows and crossbow bolts.
			ENDDO
		ELSE
			DORAND 1
				SAY I can sell thee fine arrows and crossbow bolts.
			ENDDO
		ENDIF
	ENDIF
ON=*pouch*
ON=*bag*
ON=*pack*
	IF ( <SRC.KARMA.WICKED> || <SRC.KARMA.BELLIGERANT> )
		IF ( <COMPLEXITY.HIGH> || <COMPLEXITY.MEDIUM> )
			DORAND 1
				SAY I have pouches, bags and back packs for sale.
			ENDDO
		ELSE
			DORAND 1
				SAY I have pouches, bags and back packs for sale.
			ENDDO
		ENDIF
	ELIF ( <SRC.KARMA.NEUTRAL> )
		IF ( <COMPLEXITY.HIGH> || <COMPLEXITY.MEDIUM> )
			DORAND 1
				SAY I have sturdy pouches, bags and backpacks for sale.
			ENDDO
		ELSE
			DORAND 1
				SAY I have sturdy pouches, bags and backpacks for sale.
			ENDDO
		ENDIF
	ELSE
		IF ( <COMPLEXITY.HIGH> || <COMPLEXITY.MEDIUM> )
			DORAND 1
				SAY I have pouches, bags and back packs of the finest leather for sale.
			ENDDO
		ELSE
			DORAND 1
				SAY I have pouches, bags and back packs of the finest leather for sale.
			ENDDO
		ENDIF
	ENDIF

ON=*lantern*
ON=*candle*
ON=*torch*
	IF ( <SRC.KARMA.WICKED> || <SRC.KARMA.BELLIGERANT> )
		IF ( <COMPLEXITY.HIGH> || <COMPLEXITY.MEDIUM> )
			DORAND 1
				SAY I can sell thee candles, torches or a lantern.
			ENDDO
		ELSE
			DORAND 1
				SAY SAY I can sell thee candles, torches or a lantern.
			ENDDO
		ENDIF
	ELIF ( <SRC.KARMA.NEUTRAL> )
		IF ( <COMPLEXITY.HIGH> || <COMPLEXITY.MEDIUM> )
			DORAND 1
				SAY I can sell thee candles, torches or a lantern.
			ENDDO
		ELSE
			DORAND 1
				SAY I can sell thee candles, torches or a lantern.
			ENDDO
		ENDIF
	ELSE
		IF ( <COMPLEXITY.HIGH> || <COMPLEXITY.MEDIUM> )
			DORAND 1
				SAY I can sell thee candles, torches or a lantern to light thy way.
			ENDDO
		ELSE
			DORAND 1
				SAY I can sell thee candles, torches or a lantern to light thy way.
			ENDDO
		ENDIF
	ENDIF

ON=*food*
	IF ( <SRC.KARMA.WICKED> || <SRC.KARMA.BELLIGERANT> )
		IF ( <COMPLEXITY.HIGH> || <COMPLEXITY.MEDIUM> )
			DORAND 1
				SAY Thou canst buy bread, meat and fruit here.
			ENDDO
		ELSE
			DORAND 1
				SAY Thou canst buy bread, meat and fruit here.
			ENDDO
		ENDIF
	ELIF ( <SRC.KARMA.NEUTRAL> )
		IF ( <COMPLEXITY.HIGH> || <COMPLEXITY.MEDIUM> )
			DORAND 2
				SAY I have excellent trail rations.
				SAY Thou can buy bread, meat and fruit here.
			ENDDO
		ELSE
			DORAND 2
				SAY I have excellent trail rations.
				SAY Thou can buy bread, meat and fruit here.
			ENDDO
		ENDIF
	ELSE
		IF ( <COMPLEXITY.HIGH> || <COMPLEXITY.MEDIUM> )
			DORAND 1
				SAY I can supply thee with bread, meat and fruit.
			ENDDO
		ELSE
			DORAND 1
				SAY I can supply thee with bread, meat and fruit.
			ENDDO
		ENDIF
	ENDIF

ON=*bread*
	IF ( <SRC.KARMA.WICKED> || <SRC.KARMA.BELLIGERANT> )
		IF ( <COMPLEXITY.HIGH> || <COMPLEXITY.MEDIUM> )
			DORAND 1
				SAY I have bread.
			ENDDO
		ELSE
			DORAND 1
				SAY I have bread.
			ENDDO
		ENDIF
	ELIF ( <SRC.KARMA.NEUTRAL> )
		IF ( <COMPLEXITY.HIGH> || <COMPLEXITY.MEDIUM> )
			DORAND 1
				SAY I have good dark bread, fresh baked and guaranteed to last.
			ENDDO
		ELSE
			DORAND 1
				SAY I have good dark bread, fresh baked and guaranteed to last.
			ENDDO
		ENDIF
	ELSE
		IF ( <COMPLEXITY.HIGH> || <COMPLEXITY.MEDIUM> )
			DORAND 1
				SAY I have delicious bread, fresh baked just this morning.
			ENDDO
		ELSE
			DORAND 1
				SAY I have delicious bread, fresh baked just this morning.
			ENDDO
		ENDIF
	ENDIF

ON=*meat*
ON=*mutton*
ON=*bird*
ON=*chicken*
	IF ( <SRC.KARMA.WICKED> || <SRC.KARMA.BELLIGERANT> )
		IF ( <COMPLEXITY.HIGH> || <COMPLEXITY.MEDIUM> )
			DORAND 2
				SAY We have roasted and smoked meats.
				SAY I can sell thee roast mutton, smoked chicken or smoked game birds.
			ENDDO
		ELSE
			DORAND 2
				SAY We have roasted and smoked meats.
				SAY I can sell thee roast mutton, smoked chicken or smoked game birds.
			ENDDO
		ENDIF
	ELIF ( <SRC.KARMA.NEUTRAL> )
		IF ( <COMPLEXITY.HIGH> || <COMPLEXITY.MEDIUM> )
			DORAND 2
				SAY We have fine roasted and smoked meats.
				SAY Our roast mutton, smoked chicken or smoked game birds are fine supplies for a journey.
			ENDDO
		ELSE
			DORAND 2
				SAY We have fine roasted and smoked meats.
				SAY Our roast mutton, smoked chicken or smoked game birds are fine supplies for a journey.
			ENDDO
		ENDIF
	ELSE
		IF ( <COMPLEXITY.HIGH> || <COMPLEXITY.MEDIUM> )
			DORAND 2
				SAY We have fine roasted and smoked meats.
				SAY Our roast mutton, smoked chicken or smoked game birds are fit for the table of Lord British himself!
			ENDDO
		ELSE
			DORAND 2
				SAY We have fine roasted and smoked meats.
				SAY Our roast mutton, smoked chicken or smoked game birds are fit for the table of Lord British himself!
			ENDDO
		ENDIF
	ENDIF

ON=*ale*
ON=*drink*
ON=*beer*
ON=*liquor*
ON=*wine*
ON=*cider*

	//SAY=Ale may not be the most practical travel beverage, but it is a good way to while away a lonely night.

	IF ( <SRC.KARMA.WICKED> || <SRC.KARMA.BELLIGERANT> )
		IF ( <COMPLEXITY.HIGH> || <COMPLEXITY.MEDIUM> )
			DORAND 2
				SAY I sell drink by the bottle or flask.
				SAY I have ale, wine, liquor or cider.
			ENDDO
		ELSE
			DORAND 2
				SAY I sell drink by the bottle or flask.
				SAY I have ale, wine, liquor or cider.
			ENDDO
		ENDIF
	ELIF ( <SRC.KARMA.NEUTRAL> )
		IF ( <COMPLEXITY.HIGH> || <COMPLEXITY.MEDIUM> )
			DORAND 2
				SAY I sell strong drink of all types.
				SAY My ale, wine, liquor and cider are all of the highest quality.
			ENDDO
		ELSE
			DORAND 2
				SAY I sell strong drink of all types.
				SAY My ale, wine, liquor and cider are all of the highest quality.
			ENDDO
		ENDIF
	ELSE
		IF ( <COMPLEXITY.HIGH> || <COMPLEXITY.MEDIUM> )
			DORAND 2
				SAY I sell strong drink of all types.
				SAY My ale, wine, liquor and cider are all fit for a lord.
			ENDDO
		ELSE
			DORAND 2
				2
				SAY I sell strong drink of all types.
				SAY My ale, wine, liquor and cider are all fit for a lord.
			ENDDO
		ENDIF
	ENDIF

ON=*fruit*
ON=*pear*
ON=*apple*
	//SAY=Horses and adventurers both love apples, plus they're easier to carry than hay.
	IF ( <SRC.KARMA.WICKED> || <SRC.KARMA.BELLIGERANT> )
		IF ( <COMPLEXITY.HIGH> || <COMPLEXITY.MEDIUM> )
			DORAND 2
				SAY I can sell thee fruit.
				SAY I have pears and apples.
			ENDDO
		ELSE
			DORAND 2
				SAY I can sell thee fruit.
				SAY I have pears and apples.
			ENDDO
		ENDIF
	ELIF ( <SRC.KARMA.NEUTRAL> )
		IF ( <COMPLEXITY.HIGH> || <COMPLEXITY.MEDIUM> )
			DORAND 2
				SAY I can sell thee fresh fruit.
				SAY I have large, sweet pears and apples.
			ENDDO
		ELSE
			DORAND 2
				SAY I can sell thee fresh fruit.
				SAY I have large, sweet pears and apples.
			ENDDO
		ENDIF
	ELSE
		IF ( <COMPLEXITY.HIGH> || <COMPLEXITY.MEDIUM> )
			DORAND 2
				SAY I sell only the freshest fruit.
				SAY I have pears and apples the like of which thou hast never seen.
			ENDDO
		ELSE
			DORAND 2
				SAY I sell only the freshest fruit.
				SAY I have pears and apples the like of which thou hast never seen.
			ENDDO
		ENDIF
	ENDIF

ON=ARROW
ON=BOLT
	SAY=One should always pack extra, just in case!

ON=POUCH
ON=BAG
	SAY=A bag for your pack will help keep money organized.  I'd use two for a better chance at catching snoopers.

ON=BEER
	SAY=Nothing's more thirst quenching on a hot day than beer.

ON=MUTTON
ON=MEAT
ON=BIRD
ON=CHICKEN
	SAY=Meat eating pets and hungry adventurers alike find meat or fowl a satisfying meal.

ON=FOOD
ON=BREAD
	SAY=Bread travels well and satisfies daily hunger.
ON=CANDLE
	SAY=A candle may come in handy when lost in a dark wood.
ON=CIDER
	SAY=Cider will refresh you after a long day's travels, without the unsteady side effects.
ON=DRINK
	SAY=Drink refreshes a traveler.
ON=RATION
ON=PROVISION
ON=EQUIP
ON=SUPPLY
	SAY=A variety of equipment will help prepare for any eventuality while wandering the woods.
ON=FRUIT
ON=PEAR
	SAY=Many animals enjoy fruit so be sure to pack enough for you, and extra for your pet.
ON=LANTERN
ON=TORCH
	SAY=Light your way at night to avoid traps and pitfalls.
ON=WINE
	SAY=Wine travels well, and may brighten a dark and lonely evening.
	//RANDOM=One can never be too prepared for travel.

[EOF]
