// 25.11.2001  Buba: Added new quest: The Second Encounter
// 22.11.2001  Buba: Updated my Newsman
// 27.10.2001, MoNK: 2300 color changed to color_o_obsidian
// 25.05.2001, MoNK: attr moved to @Create
// 24.05.2001, MoNK: return 1 in Accept item to prevent stealing items form NPC's backpack




//
//#############################################
//#    The Second Encounter - Bub'Ged         #
//#############################################

// Приплывает торговец Bub'Ged.  У него есть на продажу роба убитого на их острове вампира.
// Во время боев роба утратила свои волшебные свойства и теперь ее могут носить не вампиры.
// Он ее обменивает на The Book of Dungeons.

// Персонажи: Bub'Ged - ещё один зеленый торогвец, Aanry - библиотекарь в Брите, 
// Aandry - Маг в Веспере, Doriant - GM Warrior в Миноке, Domian - GM Warrior в Тринсике
// Куча драконов, которые сторожат хрустальный шар, который может открыть путь к книге.
// Aarnim - маг в Мунглоу у которого есть эта книга.

//
// Сценарий:
// Bub'Ged говорит, что обменяет Робу на The Book of Dungeons(i_book_of_dungeons), которая есть у Aanry в библиотеке.
// Aanry говорит, что книги у него нет, но он знает мага, у которого она и готов сказать имя
// всего лишь за Book of Truth из Аббатства Yew(i_yewbook).
// Aandry, маг, тоже говорит, что книги у него нет, зато он знает воина, который может подсказать
// местоположение книги и готов сказать его, при условии, что взамен он получит black staff(i_staff_black).
// Dorian просто отсылает всех к Domian. Domian дает координаты в обмен на мифрилловый closed helm(i_mytheril_closed_helm).
// По координатам будет вход в подземелье, где будет куча драконов и хрустальный шар.(i_quest_crystall_ball)
// dclick на хрустальный шар и он скажет, что книга у Aarnim-a в Мунглоу.
// Aarnim меняет книгу на турнирную робу или такого же цвета. color= 08fc
//
// Квест статичный, но одноразовый. Как только кто-то получил робу - квест заканчивается.
//


//################
//#Stage Counters#
//################

[ITEMDEF i_kv3stg1]
NAME=kv3stg1
ID=i_deed
weight=0

ON=@Create
	attr=08090
	Color=0487
CATEGORY=Quests and legends
SUBSECTION=The Second Encounter
DESCRIPTION=kvest3stage1 

[ITEMDEF i_kv3stg2]
NAME=kv3stg2
ID=i_deed
weight=0

ON=@Create
	attr=08090
	Color=0487
CATEGORY=Quests and legends
SUBSECTION=The Second Encounter
DESCRIPTION=kvest3stage2

[ITEMDEF i_kv3stg3]
NAME=kv3stg3
ID=i_deed
weight=0

ON=@Create
	attr=08090
	Color=0487
CATEGORY=Quests and legends
SUBSECTION=The Second Encounter
DESCRIPTION=kvest3stage3

[ITEMDEF i_kv3stg4]
NAME=kv3stg4
ID=i_deed
weight=0

ON=@Create
	attr=08090
	Color=0487
CATEGORY=Quests and legends
SUBSECTION=The Second Encounter
DESCRIPTION=kvest3stage4

[ITEMDEF i_kv3stg5]
NAME=kv3stg5
ID=i_deed
weight=0

ON=@Create
	attr=08090
	Color=0487
CATEGORY=Quests and legends
SUBSECTION=The Second Encounter
DESCRIPTION=kvest3stage5

[ITEMDEF i_kv3stg6]
NAME=kv3stg6
ID=i_deed
weight=0

ON=@Create
	attr=08090
	Color=0487
CATEGORY=Quests and legends
SUBSECTION=The Second Encounter
DESCRIPTION=kvest3stage6

[ITEMDEF i_kv3stg7]
NAME=kv3stg7
ID=i_deed
weight=0

ON=@Create
	attr=08090
	Color=0487
	timer=17000

ON=@timer
	remove

CATEGORY=Quests and legends
SUBSECTION=The Second Encounter
DESCRIPTION=kvest3stage7

//#######################
//#Character Definitions#
//#######################

// First Character. Bub'Ged

[CHARDEF C_H_BUBGEd]
// Bub'Ged Merchant
NAME=Bub'Ged
ID=C_MAN
DESIRES=i_gold,t_food,i_book_of_dungeons
AVERSIONS=t_TRAP,t_eerie_stuff

TSPEECH=spk_bubged

TEVENTS=e_Bubged_HearUnk
TEVENTS=e_Bubged_Needs
TEVENTS=e_Bubgel_Environ
TEVENTS=e_Bubgel_Refuse

ON=@Create
	COLOR=0487
	STR={370 510}
	DEX={281 495}
	INT={361 475}

	NPC=brain_human

	ITEMNEWBIE=RANDOM_LIGHT
	ITEMNEWBIE=0141c
	COLOR=0487
	ITEMNEWBIE=random_coin_purse
	ITEMNEWBIE=random_pants
	COLOR=colors_all

CATEGORY=Quests and legends
SUBSECTION=The Second Encounter
DESCRIPTION= Bub'Ged the Merchant
      
// Bub'Ged's speech and environment



[SPEECH spk_bubged]

ON=*obe*
ON=*OBE*
ON=*ampire*
	say Indeed, i have a Vampire Robe and i will trade for The Book of Dungeons.

ON=*he*ook*ungeons*
ON=*OOK*
ON=*ungeon*
	say I librarian named Aanry of Brittain has one.
	say Bring it to me and The Robe is yours.

ON=*vest*
ON=*VEST*
ON=*UEST*
ON=*uest*
	dorand 2	
	say Awh, quest is when one wonders far to find something.
	say Are you, <src.name> looking to travel abourd my ship?
	enddo


ON=*what*thou*sell*
ON=*what*thou*sale*
ON=*what*you*sell*
ON=*what*you*sale*
ON=*can*you*sell*
ON=*can*you*sale*
	SAY I don't sell items, i'm here to offer you an item of rare occurance.

ON=*sell*
ON=*thou*purchase*
ON=*you*purchase*
ON=*you*buy*
ON=*I*sale*
	SAY I don't purchase, but i'll exchage itmes.
ON=*buy*
ON=*supplies*
ON=*wares*
	SAY I sell no things, I will trade you Vampire Robe for The Book of Dungeons.

ON=*Bye*
ON=*ood*bye*
ON=*are*well*
	SAY=Fare thee well.
	BYE
	return 1

ON=*what*do*
ON=*ob*
	SAY=I am a merchant,<SRC.NAME>. I trade and exchange items.


// Hello
ON=*hi*
ON=*ello*
ON=*reet*
ON=*hey*
	DORAND 3
		SAY Greetings,<SRC.NAME>
		SAY I salute you,<SRC.NAME>
		SAY Howdy to thee, <SRC.NAME>
	ENDDO

//who are you?
ON=*who*you*
ON=*who*u*
ON=*what*ame*
ON=*your*ame*
ON=*name*
	DORAND 3
		SAY I am Bub'Ged
		SAY Thau may call me Bub'Ged, <SRC.NAME>
		SAY I am know as Bub'Ged the Merchant.
        ENDDO

[EVENTS e_Bubged_Needs]
// Notes:  This is called whenever an item is given to an NPC

ON=@NPCAcceptItem

if <Plot1>= 01fcc
	This quest hast already been completed.	
return 1
endif
if<src.restest 1 i_kv3stg7>
	say Aht, thy art hast gotten his robe!
else
	// I was given an item i want
	SAY Thank thee, <SRC.SEX milord/milady> <SRC.NAME> for giving me <argo.NAME>!

	IF <argo.baseid>==i_book_of_dungeons
		src.CONSUME=1 i_book_of_dungeons
		src.update
		src.newitem i_quest_vamp_robe
		src.act.name= <src.name>'s Shroud
		src.act.color={ 947 1 1109 1 color_o_obsidian 1 { 1301 1354 } 1 }	// gray, black or blue
		src.act.bounce
		src.consume=1 i_kv3stg1
		src.consume=1 i_kv3stg2
		src.consume=1 i_kv3stg3
		src.consume=1 i_kv3stg4
		src.consume=1 i_kv3stg5
		src.consume=1 i_kv3stg6

		src.newitem i_kv3stg7
		src.act.bounce

		say Here is thy long desired item.
		<link.timer>== -1
		<Plot1> == 01fcc
		remove
		return 1
endif

return 1
[EVENTS e_Bubged_HearUnk]
ON=@NPCHearUnknown
// Sorry I don't understand.

	DORAND 2
	  SAY I don't understand thee,<SRC.NAME> but were asking about the Robe?
	  SAY I didn't really get it,<SRC.NAME> did you ask of the Vampire Robe?
	ENDDO

//-----------------------------------
// end of Bub'Ged definition


//
//
//second character, Aanry the librarian
//
//
[CHARDEF C_H_AANRY]
NAME=Aanry
Title=The Librarian
ID=C_MAN

DESIRES=i_gold,i_yewbook
AVERSIONS=t_TRAP,t_eerie_stuff

TSPEECH=spk_human_prime
TSPEECH=spk_Aanry
TSPEECH=spk_rehello
TSPEECH=spk_human_default

TEVENTS=e_Human_Greet
TEVENTS=e_Aanry_Needs
TEVENTS=e_Human_Refuse
TEVENTS=e_Human_Environ

ON=@Create
	NPC=brain_human
	COLOR=colors_skin
	STR={90 100}
	DEX={36 50}
	INT={51 65}

	WRESTLING={85.0 98.0}
	MAGICRESISTANCE={85.0 98.0}
	TACTICS={85.0 98.0}
	POISONING={35.0 55.0}

	ITEMNEWBIE=RANDOM_LIGHT
	ITEMNEWBIE=random_male_hair
	COLOR=colors_hair
	ITEMNEWBIE=random_facial_hair
	COLOR=match_hair
	ITEMNEWBIE=i_shirt_plain
	COLOR=colors_all
	ITEMNEWBIE=random_pants
	COLOR=colors_all
//	ITEMNEWBIE=i_robe
//	COLOR=colors_red
	ITEMNEWBIE=random_shoes
	COLOR=colors_neutral
	ITEMNEWBIE=random_coin_purse


CATEGORY=Quests and legends
SUBSECTION=The Second Encounter
DESCRIPTION=Aanry the Librarian


[SPEECH spk_Aanry]

if <src.restest 1 i_kv3stg1>
	say We already discussed everything we had to.
else

ON=*ungeon*
ON=*UNGEON*
ON=*book*
ON=*OOk*
ON=*ook*
	say So, you are looking for The Book Of Dungeons?
	say I'll give you one if you will bring me the Scroll of Truth from Yew.


ON=*ew*ook*
ON=*EW*OOK*
	SAY Yes, a Scroll of Truth from Yew i need and i'll give you your Book of Dungeons.

endif
[EVENTS e_Aanry_Needs]

ON=@NPCAcceptItem
	
	SAY You gave me <argo.NAME>!

	IF <argo.baseid>==i_yewbook
		src.CONSUME=1 i_yewbook
		src.update
		src.newitem i_kv3stg1
		src.act.bounce
		say Well, i lied. I don't have that book.
		say But i know, that a mage from Vesper named Aandry has it.
		return 1
	ENDIF




//
//
//ершкв character, Aandry the mage
//
//
[CHARDEF C_H_AANDRY]
NAME=Aandry
Title= The Mage
ID=C_MAN

DESIRES=i_gold,i_staff_black
AVERSIONS=t_TRAP,t_eerie_stuff

TSPEECH=spk_human_prime
TSPEECH=spk_Aandry
TSPEECH=spk_rehello
TSPEECH=spk_human_default

TEVENTS=e_Human_Greet
TEVENTS=e_Aandry_Needs
TEVENTS=e_Human_Refuse
TEVENTS=e_Human_Environ

ON=@Create
	NPC=brain_human
	COLOR=colors_skin
	STR={90 100}
	DEX={36 50}
	INT={51 65}

	MAGERY={85.0 98.0}
	MAGICRESISTANCE={85.0 98.0}
	TACTICS={85.0 98.0}
	POISONING={35.0 55.0}

	ITEMNEWBIE=RANDOM_LIGHT
	ITEMNEWBIE=random_male_hair
	COLOR=colors_hair
	ITEMNEWBIE=random_facial_hair
	COLOR=match_hair
	ITEMNEWBIE=i_shirt_plain
	COLOR=colors_all
	ITEMNEWBIE=random_pants
	COLOR=colors_all
	ITEMNEWBIE=i_robe
	COLOR=colors_all
	ITEMNEWBIE=random_shoes
	COLOR=colors_neutral
	ITEMNEWBIE=random_coin_purse


CATEGORY=Quests and legends
SUBSECTION=The Second Encounter
DESCRIPTION=Aandry the Mage




[SPEECH spk_Aandry]

if<src.restest 1 i_kv3stg1>
ON=*ook*ungeon*
ON=*OOK*UNGEON*
ON=*book*
	say Awh, another one who seeks the Book of Dungeons.
	say I'll have you one for the black staff i wanted for so long.
	say Hand me one and off you go happy.
else
	say Awh, away with thee, i'm busy.
endif

[EVENTS e_Aandry_Needs]

ON=@NPCAcceptItem
	
	SAY You gave me <argo.NAME>!

	IF <argo.baseid>==i_staff_black
		src.CONSUME=1 i_staff_black
		src.update
		src.newitem i_kv3stg2
		src.act.bounce
		say Well, my friend, i don't posess that book.
		say But go to the warrior named Dorian, who guards those, who work under the surface
		say and surely you'll get your answer there.
		return 1
	ENDIF

[CHARDEF C_H_DORIAN]
NAME=Dorian the Warrior
ID=C_WOMAN
DESIRES=i_gold,i_cloth_bolt,t_weapon
AVERSIONS=t_TRAP,t_eerie_stuff

TSPEECH=spk_human_prime
TSPEECH=spk_Dorian
TSPEECH=spk_human_default

TEVENTS=e_Human_HearUnk
TEVENTS=e_Human_Needs
TEVENTS=e_Human_Greet
TEVENTS=e_Human_Environ

ON=@Create
	COLOR=colors_skin
	STR={286 310}
	DEX={281 295}
	INT={61 75}

	FENCING={90.0 105.0}
	PARRYING={90.0 105.0}
	SWORDSMANSHIP={90.0 105.0}
	WRESTLING={90.0 105.0}
	MACEFIGHTING={90.0 105.0}
	TACTICS={90.0 105.0}

	NPC=brain_human

	ITEMNEWBIE=RANDOM_LIGHT
	ITEMNEWBIE=random_female_hair
	COLOR=colors_hair
//	ITEMNEWBIE=random_facial_hair
//	COLOR=match_hair
	ITEMNEWBIE=i_golden_platemail_arms
	ITEMNEWBIE=i_golden_platemail_leggings
	ITEMNEWBIE=i_golden_FEMALE_platemail
	ITEMNEWBIE=i_golden_platemail_gauntlets
	ITEMNEWBIE=i_golden_closed_helm
	ITEMNEWBIE=i_golden_platemail_gorget
	ITEMNEWBIE=i_golden_heater_shield
	ITEMNEWBIE=i_sword_broad
	ITEMNEWBIE=i_boots_calf
	ITEMNEWBIE=random_coin_purse

CATEGORY=Quests and legends
SUBSECTION=The Second Encounter
DESCRIPTION=Warrior (female)

[SPEECH spk_Dorian]

if<src.restest 1 i_kv3stg2>
ON=*ook*ungeon*
ON=*OOK*UNGEON*
ON=*book*
ON=*ook*ruth*
ON=*OOK*RUTH*
	say Awh, another one...
	say I know what thy seeks, go off to Domian of Trinsic, she'll tell what thy hold to be important.
	src.newitem i_kv3stg3
	src.act.bounce
else
	say Awh, away with thee, i'm busy.
endif




[CHARDEF C_H_DOMIAN]
NAME=Domian
ID=C_WOMAN
DESIRES=i_gold,i_mytheril_closed_helm, i_robe
AVERSIONS=t_TRAP,t_eerie_stuff

TSPEECH=spk_human_prime
TSPEECH=spk_Domian
TSPEECH=spk_human_default

TEVENTS=e_Human_HearUnk
TEVENTS=e_Domian_Needs
TEVENTS=e_Human_Greet
TEVENTS=e_Human_Environ

ON=@Create
	COLOR=colors_skin
	STR={286 310}
	DEX={281 295}
	INT={61 75}

	FENCING={90.0 105.0}
	PARRYING={90.0 105.0}
	SWORDSMANSHIP={90.0 105.0}
	WRESTLING={90.0 105.0}
	MACEFIGHTING={90.0 105.0}
	TACTICS={90.0 105.0}

	NPC=brain_human

	ITEMNEWBIE=RANDOM_LIGHT
	ITEMNEWBIE=random_female_hair
	COLOR=colors_hair
//	ITEMNEWBIE=random_facial_hair
//	COLOR=match_hair
	ITEMNEWBIE=i_golden_platemail_arms
	ITEMNEWBIE=i_golden_platemail_leggings
	ITEMNEWBIE=i_golden_FEMALE_platemail
	ITEMNEWBIE=i_golden_platemail_gauntlets
	ITEMNEWBIE=i_golden_closed_helm
	ITEMNEWBIE=i_golden_platemail_gorget
	ITEMNEWBIE=i_golden_heater_shield
	ITEMNEWBIE=i_sword_broad
	ITEMNEWBIE=i_boots_calf
	ITEMNEWBIE=random_coin_purse

CATEGORY=Quests and legends
SUBSECTION=The Second Encounter
DESCRIPTION=Warrior (female)

[SPEECH spk_Domian]

if<src.restest 1 i_kv3stg3>
ON=*ook*ungeon*
ON=*OOK*UNGEON*
ON=*book*
ON=*ook*ruth*
ON=*OOK*RUTH*
	say Awh, another one...
	say I'll give you what you want, but only in exchange for mytheril closed helm!
else
	say Relieve me of they being. I'm on my own task.
endif


[EVENTS e_Domian_Needs]

ON=@NPCAcceptItem
	
	SAY You gave me <argo.NAME>!

	IF <argo.baseid>==i_mytheril_closed_helm
		src.CONSUME=1 i_mytheril_closed_helm
		src.update
		src.newitem i_kv3stg4
		src.act.bounce
		say Now, get your sextant out and go off to 89о1`S 10o20`W.
		say There is a dungeon entrance at those coordinates.
		say Go in and find a Crystal Ball of Fortune.
		say It will guide you farther.
		return 1
	ENDIF




[CHARDEF C_H_AARNIM]
NAME=Aarnim
Title=The Mage
ID=C_MAN

DESIRES=i_gold,i_robe
AVERSIONS=t_TRAP,t_eerie_stuff

TSPEECH=spk_human_prime
TSPEECH=spk_Aarnim
TSPEECH=spk_rehello
TSPEECH=spk_human_default

TEVENTS=e_Human_Greet
TEVENTS=e_Aarnim_Needs
TEVENTS=e_Human_Refuse
TEVENTS=e_Human_Environ

ON=@Create
	NPC=brain_human
	COLOR=colors_skin
	STR={90 100}
	DEX={36 50}
	INT={51 65}

	MAGERY={85.0 98.0}
	MAGICRESISTANCE={85.0 98.0}
	TACTICS={85.0 98.0}
	POISONING={35.0 55.0}

	ITEMNEWBIE=RANDOM_LIGHT
	ITEMNEWBIE=random_male_hair
	COLOR=colors_hair
	ITEMNEWBIE=random_facial_hair
	COLOR=match_hair
	ITEMNEWBIE=i_shirt_plain
	COLOR=colors_all
	ITEMNEWBIE=random_pants
	COLOR=colors_all
	ITEMNEWBIE=i_robe
	COLOR=colors_all
	ITEMNEWBIE=random_shoes
	COLOR=colors_neutral
	ITEMNEWBIE=random_coin_purse


CATEGORY=Quests and legends
SUBSECTION=The Second Encounter
DESCRIPTION=Aarnim the Mage




[SPEECH spk_Aarnim]

if <src.restest 1 i_kv3stg5>

ON=*ook*ungeon*
ON=*OOK*UNGEON*
ON=*book*
	say Awh, another one who seeks the Book of Dungeons.
	say Yes, i have it. And i will give it to you. Under one condition!
	say As you see, my profession does not give much opportunity to fight,
	say but i always wanted to win a tournament.
	say Give me a tournament robe and i will give you The Book of Dungeons.


else
	say Awh, i'm sorry, but i'm truly into research right now.
	say Come back later, dear <src.name>.
endif

[EVENTS e_Aarnim_Needs]

ON=@NPCAcceptItem
	
if <src.restest 1 i_kv3stg6>
	say You already have The Book of Dungeons.
	say What else do you require?
else
	SAY You gave me <argo.NAME>!

	IF <argo.baseid>==i_robe
		if <argo.color>==08fc
			say Awh! The one i always wanted!!
			src.newitem i_book_of_dungeons
			src.act.bounce
			src.newitem i_kv3stg6
			say Here you go, <src.name>. Enjoy your new aquisition.
		
		else
			say That's not it... Not the color I desire.
		endif


		src.CONSUME=1 i_robe
		src.update
		say Not it, alas, not it...
		return 1
	ENDIF

endif

return 1
//###################################
//#  End of character definitions   #
//###################################

//###################################
//#        Item definitions         #
//###################################

[ITEMDEF i_book_of_dungeons]
NAME=The Book of Dungeons
ID=01c13

ON=@Create
	timer=-1
CATEGORY=Quests and legends
SUBSECTION=The Second Encounter
DESCRIPTION=The Book of Dungeons


[ITEMDEF i_yewbook]
NAME=The Scroll of Truth
ID=014ed

ON=@Create
	timer=-1

CATEGORY=Quests and legends
SUBSECTION=The Second Encounter
DESCRIPTION=The Scroll of Truth

[ITEMDEF i_quest_crystall_ball]
NAME=Crystal Ball of Fortune.
ID=0e2e

ON=@Create
	timer=-1
	attr=08010

ON=@DCLICK
	if <src.restest 1 i_kv3stg4>
		src.message  Alas, great adventurer, you came to the apex point of your quest.
		src.message  The book you seek is posessed by Aarnim, the mage in Moonglow!
		src.message  Go off and find it!
	else
		dorand 2
		src.message  Thy art hast found me, but what's thy purpose?
		src.message  Thy did caused my return to life, but what good it does for any?
		enddo
	endif


return 1

CATEGORY=Quests and legends
SUBSECTION=The Second Encounter
DESCRIPTION=Crystall Ball of Fortune




[ITEMDEF i_quest_vamp_robe]
// Quest Vampire Shroud
NAME=Shroud
ID=0204e
TYPE=t_clothing
ARMOR=20
DYE=0

On=@Create
	HITPOINTS={110 190}
	attr = attr_newbie | attr_magic


On=@Spell
	if (<argn>==27) && <cont>
		src.sysmessage Curse fizzles!
		return 1
	endif


CATEGORY=Quests and legends
SUBSECTION=The Second Encounter
DESCRIPTION= Shroud










//------- Cursed Valley Quest-----------------//
//
//
//###########################################
//#       BEGINNING OF CURSED VALLEY        #
//###########################################

// 
// !!! Make sure you seporate players by adding TIMERED GATES.
// !!! They will be required to bring a Book of Moreman to Orc
// !!! Set sextant Coordinates
// !!! A folded MAP to the Ruins by sextant coordinates
// !!! Timed gate and 6 Balrons
// !!! Liche Lord and the end with another story
// !!! Separate players by DO RAND 2 different items for 2 different NPCs
//

//
//


//###########################################
//#          newsman, initial personage     #
//###########################################

[CHARDEF C_H_Announcer]
NAME=#NAMES_HUMANMALE the Announcer
ID=C_MAN

TSPEECH=spk_news
TSPEECH=spk_human_prime
TSPEECH=spk_rehello
TSPEECH=spk_human_default

TEVENTS=e_Human_HearUnk
TEVENTS=e_Human_Needs
TEVENTS=e_Human_ConvInit
TEVENTS=e_Human_Greet
TEVENTS=e_Human_Space
TEVENTS=e_Human_Refuse
TEVENTS=e_Human_Environ

ON=@Create
	COLOR=colors_skin
	STR={121 135}
	DEX={126 140}
	INT={126 140}


	SWORDSMANSHIP={85.0 98.0}
	TACTICS={85.0 98.0}

	NPC=BRAIN_HUMAN
	NEED=i_gold

	ITEM=i_pants_short
	attr=08010
	ITEM=i_tunic
	attr=08010
	ITEM=loot_cityman

CATEGORY=Civilized
DESCRIPTION=Quest Newsman




[SPEECH spk_news]

ON=*kvest*
ON=*quest*
ON=*Kvest*
ON=*Quest*
ON=*r*mor*
ON=*new*
ON=*New*


	if <src.restest 1 i_kv2stg1>  
		say You already asked me about this quest.
	else
		say There is a quest going on. Find an Islander in Trinsic and give him Valley Forge ticket and he'll tell you the rest.
		src.newitem i_kv2stg1
		src.act.attr=08090
		src.act.bounce
		src.newitem i_valley_forge
		src.act.bounce
	endif

//
// end of news man
//


//############################################
//#     stage definition items               #
//############################################


[ITEMDEF i_kv2stg1]
NAME=kv2stg1
ID=i_deed
weight=0

ON=@Create
	attr=08090
	Color=0487
CATEGORY=Quests and legends
SUBSECTION=Valley
DESCRIPTION=kvest2stage1

[itemdef i_valley_forge]
Name=Valley Forge Ticket
id=i_deed
weight=0

On=@Create
	Color=08fc


[ITEMDEF i_kv2stg2]
NAME=kv2stg2
ID=i_deed
weight=0

ON=@Create
	attr=08090
	Color=0487


CATEGORY=Quests and legends
SUBSECTION=Valley
DESCRIPTION=kvest2stage2

[ITEMDEF i_kv2stg3]
NAME=kv2stg3
ID=i_deed
weight=0

ON=@Create
	attr=08090
	Color=0487


CATEGORY=Quests and legends
SUBSECTION=Valley
DESCRIPTION=kvest2stage3

[ITEMDEF i_kv2stg4]
NAME=kv2stg4
ID=i_deed
weight=0

ON=@Create
	attr=08090
	Color=0487


CATEGORY=Quests and legends
SUBSECTION=Valley
DESCRIPTION=kvest2stage4
[ITEMDEF i_kv2stg5]
NAME=kv2stg5
ID=i_deed
weight=0

ON=@Create
	attr=08090
	Color=0487


CATEGORY=Quests and legends
SUBSECTION=Valley
DESCRIPTION=kvest2stage5

[ITEMDEF i_kv2stg6]
NAME=kv2stg6
ID=i_deed
weight=0

ON=@Create
	attr=08090
	Color=0487


CATEGORY=Quests and legends
SUBSECTION=Valley
DESCRIPTION=kvest2stage6

//###########################################
//#     Islander, second stage personage    #
//###########################################

[CHARDEF C_H_Islander]
NAME=#NAMES_HUMANMALE the Islander
ID=C_MAN
DESIRES=i_gold,i_valley_forge
AVERSIONS=t_TRAP,t_eerie_stuff

TSPEECH=spk_islander
TSPEECH=spk_human_prime
TSPEECH=spk_rehello

TEVENTS=e_Islander_HearUnk
TEVENTS=e_Islander_Needs
TEVENTS=e_Human_Greet
TEVENTS=e_Human_Space
TEVENTS=e_Human_Refuse
TEVENTS=e_Human_Environ

ON=@Create
	COLOR=colors_skin
	STR={161 175}
	DEX={126 140}
	INT={126 140}


	SWORDSMANSHIP={85.0 98.0}
	TACTICS={85.0 98.0}

	NPC=BRAIN_HUMAN


	ITEMNEWBIE=random_male_hair
	COLOR=colors_hair
	ITEMNEWBIE=random_facial_hair
	COLOR=match_hair
	ITEM=i_pants_short
	attr=08010
	ITEM=i_tunic
	attr=08010
	color=08fc
	ITEM=loot_cityman

CATEGORY=Civilized
DESCRIPTION=Quest Islander




[SPEECH spk_islander]


ON=*Quest*
ON=*icket*
ON=*ICKET*


	if <src.restest 1 i_kv2stg2>  
		say You already asked me about this quest.		
	else
		Say <name> got that ticket for me? Hand it over!
	endif


[EVENTS e_Islander_Needs]

ON=@NPCAcceptItem
	
	SAY You gave me <argo.NAME>!

	IF <argo.baseid>==i_valley_forge
		src.CONSUME=1 i_valley_forge
		src.update
		say Awh, a long awaited ticket!
		say I heared, that on the Fire Island there is an Orc, who knows his way to the Valley and will trade you.
		src.newitem i_kv2stg2
		src.act.attr=08090
		src.act.bounce
		say He'll know you came from me.
		return 1
	ENDIF

//--------------------------------
[EVENTS e_Islander_HearUnk]
ON=@NPCHearUnknown
// Sorry I don't understand.

	DORAND 2
	  SAY I don't understand thee,<SRC.NAME> was it something from Newsman?
	  SAY I didn't really get it,<SRC.NAME> did you say you have a ticket for me?
	ENDDO
//-----------------------------------


//
//###########################################
//#     Fire Island Orc                     #
//###########################################
//


[CHARDEF C_H_IslandOrc]
// Bub'Gen
NAME=Bub'Gen
ID=C_MAN
DESIRES=i_gold,t_food,i_lordsbook,i_oldbook
AVERSIONS=t_TRAP,t_eerie_stuff

TSPEECH=spk_IslandOrc

TEVENTS=e_Human_HearUnk
TEVENTS=e_IslandOrc_Needs
TEVENTS=e_Human_Environ
TEVENTS=e_Human_Refuse

ON=@Create
	COLOR=0487
	STR={86 110}
	DEX={81 95}
	INT={61 75}

	NPC=brain_human

	ITEMNEWBIE=RANDOM_LIGHT
	ITEMNEWBIE=0141c
	COLOR=0487
	ITEMNEWBIE=random_coin_purse
	ITEMNEWBIE=random_pants
	COLOR=colors_all

CATEGORY=Quests and legends
SUBSECTION=Bub'Gen
DESCRIPTION= Fire Island Orc




[SPEECH spk_IslandOrc]

ON=*sland*
ON=*alley*
ON=*SLAND*
ON=*ALLEY*
	if <src.restest 1 i_kv2stg2>
		say Awh, you came from the Islander? I know him...
		say I also know they way to the Valley and will give it to you
		say if you give me the Book, that was once given to Lord British as a gift.
	endif
	
	if <src.restest 1 i_kv2stg3>
		say Well, you know what i need? If you have it - hand it to me.
	else
		say What is it thy desire?
	endif

[EVENTS e_IslandOrc_Needs]

ON=@NPCAcceptItem
	
	SAY You gave me <argo.NAME>!

	IF <argo.baseid>==i_lordsbook
		src.CONSUME=1 i_lordsbook
		src.update
		src.consume 1 i_kv2stg2
		src.newitem i_kv2stg3
		src.act.bounce
		say Awh, a book of Lord British... interesting!
		say But i must say, that i need another thing from you
		say I also need an Old Book from the Abbat. Bring it to me and i will reveal what interests you. 
		src.update
		return 1
	ENDIF

	IF <argo.baseid>==i_oldbook
		src.CONSUME=1 i_oldbook
		src.update
		src.consume 1 i_kv2stg3
		src.newitem i_kv2stg4
		src.act.bounce
		say Awh, finally!
		say Your long awaited direction:
		say Go to the wilderness of Vesper and seek Armant, he'll give you your coordinates to follow.
		src.update
		return 1
	ENDIF

//
//##########################################
//#  Armant, guy in the forest of Vesper   #
//##########################################
//

[CHARDEF C_H_Armant]
NAME=Armant the map collector
ID=C_MAN

DESIRES=i_gold,i_questmap
AVERSIONS=t_TRAP,t_eerie_stuff

TSPEECH=spk_human_prime
TSPEECH=spk_Armant
TSPEECH=spk_rehello
TSPEECH=spk_human_default

TEVENTS=e_Human_Greet
TEVENTS=e_Armant_Needs
TEVENTS=e_Human_Refuse
TEVENTS=e_Human_Environ

ON=@Create
	NPC=brain_human
	COLOR=colors_skin
	STR={90 100}
	DEX={36 50}
	INT={51 65}

	ALCHEMY={55.0 78.0}
	TasteID={55.0 78.0}
	WRESTLING={15.0 38.0}
	MAGICRESISTANCE={25.0 48.0}
	TACTICS={15.0 38.0}
	POISONING={35.0 55.0}

	ITEMNEWBIE=RANDOM_LIGHT
	ITEMNEWBIE=random_male_hair
	COLOR=colors_hair
	ITEMNEWBIE=random_facial_hair
	COLOR=match_hair
	ITEMNEWBIE=i_shirt_plain
	COLOR=colors_all
	ITEMNEWBIE=random_pants
	COLOR=colors_all
	ITEMNEWBIE=i_robe
	COLOR=colors_red
	ITEMNEWBIE=random_shoes
	COLOR=colors_neutral
	ITEMNEWBIE=random_coin_purse


CATEGORY=Quests and legends
DESCRIPTION=Map collector (male)

[EVENTS e_Armant_Needs]

ON=@NPCAcceptItem
	
	SAY You gave me <argo.NAME>!

	IF <argo.baseid>==i_questmap
		src.CONSUME=1 i_questmap
		src.consume=1 i_kv2stg4	
		src.update
		src.newitem i_secondmap
		src.act.bounce
		say Here is that map you've been looking for.
		say Now just go to 
		return 1
	ENDIF

[SPEECH spk_Armant]

ON=*hi*
ON=*Hi*
ON=*ello*
ON=*ELLO*
ON=*est*
ON=*vest*
	
	if <src.restest 1 i_kv2stg4>
		SAY Awh, you came from Island Orc? 
		say I know what you need, but i need a Map of The Aethemark from Britania.
	else
		say I wish not to speak right now. I'm busy.
	endif







[ITEMDEF i_quest_impermium]
// Quest Impermium
NAME=ImpermiumX
ID=i_tunic
TYPE=t_clothing
ARMOR=77
DYE=0

On=@Create
	HITPOINTS={210 390}
	attr = attr_newbie | attr_magic


On=@Spell
	if (<argn>==27) && <cont>
		src.sysmessage Curse fizzles!
		return 1
	endif


CATEGORY=Quests and legends
SUBSECTION=Cursed Valley
DESCRIPTION=ImpermiumX







//
//
//###########################################
//#      END OF CURSED VALLEY               #
//###########################################
//
//







//-------Bubgel and quest chars-------------//

[CHARDEF C_H_BUBGEL]
// Bub'Gel Merchant
NAME=Bub'Gel
ID=C_MAN
DESIRES=i_gold,t_food,i_maxillary,i_wmr,i_zurick,i_redwing,i_nepa
AVERSIONS=t_TRAP,t_eerie_stuff

TSPEECH=spk_bubgel

TEVENTS=e_Bubgel_HearUnk
TEVENTS=e_Bubgel_Needs
TEVENTS=e_Bubgel_Environ
TEVENTS=e_Bubgel_Refuse

ON=@Create
	COLOR=0487
	STR={86 110}
	DEX={81 95}
	INT={61 75}

	NPC=brain_human

	ITEMNEWBIE=RANDOM_LIGHT
	ITEMNEWBIE=0141c
	COLOR=0487
	ITEMNEWBIE=random_coin_purse
	ITEMNEWBIE=random_pants
	COLOR=colors_all

CATEGORY=Quests and legends
SUBSECTION=Bub'Gel
DESCRIPTION=Merchant

//---Bubgel Alchemy
[CHARDEF C_H_BUB_ALCHY]
NAME=#NAMES_HUMANMALE the Alchemist
ID=C_MAN

DESIRES=i_gold,i_bottle
AVERSIONS=t_TRAP,t_eerie_stuff

TSPEECH=spk_human_prime
TSPEECH=spk_Bub_Alchy
TSPEECH=spk_rehello
TSPEECH=spk_human_default

TEVENTS=e_Human_Greet
TEVENTS=e_Bub_Alchy_Needs
TEVENTS=e_Human_Refuse
TEVENTS=e_Human_Environ

ON=@Create
	NPC=brain_human
	COLOR=colors_skin
	STR={90 100}
	DEX={36 50}
	INT={51 65}

	ALCHEMY={55.0 78.0}
	TasteID={55.0 78.0}
	WRESTLING={15.0 38.0}
	MAGICRESISTANCE={25.0 48.0}
	TACTICS={15.0 38.0}
	POISONING={35.0 55.0}

	ITEMNEWBIE=RANDOM_LIGHT
	ITEMNEWBIE=random_male_hair
	COLOR=colors_hair
	ITEMNEWBIE=random_facial_hair
	COLOR=match_hair
	ITEMNEWBIE=i_shirt_plain
	COLOR=colors_all
	ITEMNEWBIE=random_pants
	COLOR=colors_all
	ITEMNEWBIE=i_robe
	COLOR=colors_red
	ITEMNEWBIE=random_shoes
	COLOR=colors_neutral
	ITEMNEWBIE=random_coin_purse


CATEGORY=Quests and legends
SUBSECTION=Bub'Gel
DESCRIPTION=Alchemist (male)

[CHARDEF C_H_BUB_SMITH]
NAME=#NAMES_HUMANMALE the BlackSmith
ID=C_MAN
DESIRES=i_gold,i_reag_pig_iron
AVERSIONS=t_TRAP,t_eerie_stuff

TSPEECH=spk_human_prime
TSPEECH=spk_Bub_Smith
TSPEECH=spk_rehello
TSPEECH=spk_human_default

TEVENTS=e_Bub_Smith_Needs

TEVENTS=e_Human_Environ

ON=@Create
	NPC=brain_human
	COLOR=colors_skin
	STR={86 100}
	DEX={76 90}
	INT={61 75}

	MINING={35.0 55.0}
	ARMSLORE={65.0 88.0}
	BLACKSMITHING={55.0 78.0}

	ITEMNEWBIE=RANDOM_LIGHT
	ITEMNEWBIE=random_male_hair
	COLOR=colors_hair
	ITEMNEWBIE=random_facial_hair
	COLOR=match_hair
	ITEMNEWBIE=i_shirt_plain
	COLOR=colors_all
	ITEMNEWBIE=random_pants
	COLOR=colors_all
	ITEMNEWBIE=i_apron_half
	COLOR=color_metal
	ITEMNEWBIE=i_boots_calf
	COLOR=colors_neutral
	ITEMNEWBIE=random_coin_purse

CATEGORY=Quests and legends
SUBSECTION=Bub'Gel
DESCRIPTION=Armorer (male)

[CHARDEF C_H_Bub_Captn]
NAME=#NAMES_HUMANMALE La Capitane
ID=C_MAN
DESIRES=i_gold,i_cloth_bolt
AVERSIONS=t_TRAP,t_eerie_stuff

TSPEECH=spk_human_prime
TSPEECH=spk_Bub_Captn
TSPEECH=spk_human_default

TEVENTS=e_Human_HearUnk
TEVENTS=e_Bub_Captn_Needs
TEVENTS=e_Human_Greet
TEVENTS=e_Human_Environ

ON=@Create
	COLOR=colors_skin
	STR={86 110}
	DEX={81 95}
	INT={61 75}

	FENCING={50.0 95.0}
	PARRYING={50.0 95.0}
	SWORDSMANSHIP={70.0 95.0}
	WRESTLING={70.0 95.0}
	MACEFIGHTING={70.0 95.0}
	TACTICS={50.0 95.0}

	NPC=brain_human

	ITEMNEWBIE=RANDOM_LIGHT
	ITEMNEWBIE=random_male_hair
	COLOR=colors_hair
	ITEMNEWBIE=random_facial_hair
	COLOR=match_hair
	ITEMNEWBIE=i_ringmail_tunic
	ITEMNEWBIE=i_ringmail_leggings
	ITEMNEWBIE=i_ringmail_sleeves
	ITEMNEWBIE=i_ringmail_gloves
	ITEMNEWBIE=i_chainmail_coif
	ITEMNEWBIE=i_leather_gorget
	ITEMNEWBIE=i_shield_wood
	ITEMNEWBIE=i_sword_broad
	ITEMNEWBIE=i_boots_calf
	ITEMNEWBIE=random_coin_purse

CATEGORY=Quests and legends
SUBSECTION=Bub'Gel
DESCRIPTION=Fighter (male)

[CHARDEF C_H_BUB_TANNER]
NAME=#NAMES_HUMANMALE the Tanner
ID=C_MAN
DESIRES=i_gold,i_knife
AVERSIONS=t_TRAP,t_eerie_stuff

TSPEECH=spk_human_prime
TSPEECH=spk_Bub_Tanner
TSPEECH=spk_human_default

TEVENTS=e_Human_HearUnk
TEVENTS=e_Bub_Tanner_Needs
TEVENTS=e_Human_Greet
TEVENTS=e_Human_Environ

ON=@Create
	NPC=brain_human
	COLOR=colors_skin
	STR={51 65}
	DEX={61 75}
	INT={41 55}

	TAILORING={35.0 55.0}
	SWORDSMANSHIP={15.0 38.0}
	WRESTLING={15.0 38.0}
	TACTICS={35.0 58.0}

	ITEMNEWBIE=RANDOM_LIGHT
	ITEMNEWBIE=random_male_hair
	COLOR=colors_hair
	ITEMNEWBIE=random_facial_hair
	COLOR=match_hair
	ITEMNEWBIE=i_shirt_plain
	COLOR=colors_brown
	ITEMNEWBIE=random_pants
	COLOR=colors_brown
	ITEMNEWBIE=random_boots
	ITEMNEWBIE=i_apron_half
	COLOR=colors_brown
	ITEMNEWBIE=random_coin_purse

CATEGORY=Quests and legends
SUBSECTION=Bub'Gel
DESCRIPTION=Tanner (male)

[CHARDEF C_H_BUB_OUTL]
NAME=#NAMES_HUMANMALE the Outlander
ID=C_MAN
DESIRES=i_gold,i_redcommcrystal
AVERSIONS=t_TRAP,t_eerie_stuff

TSPEECH=spk_human_prime
TSPEECH=spk_Bub_Outl
TSPEECH=spk_human_default

TEVENTS=e_Human_HearUnk
TEVENTS=e_Bub_Outl_Needs
TEVENTS=e_Human_Greet
TEVENTS=e_Human_Environ

ON=@Create
	COLOR=colors_skin
	STR={21 35}
	DEX={36 50}
	INT={41 55}

	EVALUATINGINTEL={55.0 78.0}
	WRESTLING={15.0 38.0}
	MAGICRESISTANCE={15.0 38.0}
	TACTICS={15.0 38.0}

	NPC=brain_human

	ITEMNEWBIE=RANDOM_LIGHT
	ITEMNEWBIE=random_male_hair
	COLOR=colors_hair
	ITEMNEWBIE=random_facial_hair
	COLOR=match_hair
	ITEMNEWBIE=i_robe
	COLOR=colors_neutral
	ITEMNEWBIE=i_sandals

CATEGORY=Quests and legends
SUBSECTION=Bub'Gel
DESCRIPTION=Monk (male)

[SPEECH spk_bubgel]

ON=*andrake*
ON=*oot*
        SAY If you will bring me White Mandrake Root form the Alchemist who lives GraveYard i will give you paint
ON=*Zurick*
ON=*zurick*
	SAY If thau will bring me Zurick from Blacksmith at Covetous i will give you Black or Blue paint.

ON=*red*bat*wing*
ON=*Red*Bat's*Wing*
ON=*red*bat*
ON=*Bat*
ON=*bat*
	SAY If you fetch me Red Bat's Wing from Ranger Capitan from Camp North of Minoc i will give you rare paint

ON=*nepa*
ON=*Nepa*
	SAY If you to get me Nepa from a Tanner at Scara Brae i'll give you Golden paint or some similar
ON=*Maxillary*
ON=*maxillary*
ON=*Maxilary*
ON=*maxilary*
	SAY If that to obtain Maxillary for me from an Outlander, who lives South East of Yew - i'll hand you Starlight paint

// Hello
ON=*hi*
ON=*Hello*
ON=*Greet*
ON=*hey*
	DORAND 3
		SAY Greetings,<SRC.NAME>
		SAY I salute you,<SRC.NAME>
		SAY Howdy to thee, <SRC.NAME>
	ENDDO

//who are you?
ON=*who*you*
ON=*who*u*
ON=*what*name*
ON=*your*name*
ON=*name*
	DORAND 3
		SAY I am Bub'Gel
		SAY Thau may call me Bub'Gel, <SRC.NAME>
		SAY I am know as Bub'Gel the Merchant.
        ENDDO

ON=*quest*
ON=*Quest*
ON=*QUEST*
ON=*kvest*
ON=*paint*
ON=*rare*
ON=*color*
ON=*dye*
	SAY I am here to trade rare colors you see infront of me for items i seek. Bring me White Mandrake Root, or Zurick, or Red Bat'S Wing, or Nepa, or Maxillary and i will give you paints.

ON=*what*thou*sell*
ON=*what*thou*sale*
ON=*what*you*sell*
ON=*what*you*sale*
ON=*can*you*sell*
ON=*can*you*sale*
	SAY I don't sell items, i'm here to offer you different colors in rturn for items i need.

ON=*sell*
ON=*thou*purchase*
ON=*you*purchase*
ON=*you*buy*
ON=*I*sale*
	SAY I don't purchase, but i'll exchage itmes for rare colors.
ON=*buy*
ON=*supplies*
ON=*wares*
	SAY I sell no things, I will trade you rare colors for items i desire.

ON=Bye
ON=Goodbye
ON=Farewell
	SAY=Fare thee well.
	BYE
	return 1

ON=*what*do*
ON=Job
	SAY=I am a merchant,<SRC.NAME>. I trade and exchange items.

//Bubgel Events and definitions
//-----------------------------

[EVENTS e_Bubgel_Environ]

ON=@EnvironChange
	if <flags>&statf_war 
		return 0
	endif
	if !<sector.isdark> || (<flags>&statf_nightsight)
		if <findlayer(layer_hand2)>
			if <findlayer(layer_hand2).type> == t_light_lit
				findlayer(layer_hand2).bounce
			endif
		endif
		return 0
	endif
	// try to use a torch or light source if i have one. (and it's dark)
	if <findtype.t_light_out>
		findtype.t_light_out.equip
		findtype.t_light_out.use
	endif
	return 0
//-------------------------------



//--------------------------------
[EVENTS e_Bubgel_HearUnk]
ON=@NPCHearUnknown
// Sorry I don't understand.

	DORAND 2
	  SAY I don't understand thee,<SRC.NAME> but were asking about QUEST?
	  SAY I didn't really get it,<SRC.NAME> did you ask of paints?
	ENDDO
//-----------------------------------



//---------Item Acception-------------//

[EVENTS e_Bubgel_Needs]
// Notes:  This is called whenever an item is given to an NPC

ON=@NPCAcceptItem
	// I was given an item i want
	SAY Thank thee, <SRC.SEX milord/milady> <SRC.NAME> for giving me <argo.NAME>!

	IF <argo.baseid>==i_zurick
		src.CONSUME=1 i_zurick
		src.update
		src.newitem i_dye_tub
		src.act.color={ 947 1 1109 1 color_o_obsidian 1 { 1301 1354 } 1 }	// gray, black or blue
		src.act.bounce
		say I'm giving you Zurick color in return.
		return 1

	ELSEIF <argo.baseid>==i_redwing
		src.CONSUME=1 i_redwing
		src.update
		src.newitem i_dye_tub
		src.act.color={ 1601 1654 }	// red
		src.act.bounce
		say I'm giving you Redwing color in return.
		return 1

	ELSEIF <argo.baseid>==i_wmr
		src.CONSUME=1 i_wmr
		src.update
		src.newitem i_dye_tub
		src.act.color={ 2301 1 1153 1 1156 1 }
		src.act.bounce
		say I'm giving you White Mandrake Root color in return.
		return 1

	ELSEIF <argo.baseid>==i_nepa
		src.CONSUME=1 i_nepa
		src.update
		src.newitem i_dye_tub
		src.act.color={ golden_armor_color 1 { 2301 2318 } 1 }
		src.act.bounce
		say I'm giving you Nepa color in return.
		return 1

	ELSEIF <argo.baseid>==i_maxillary
		src.CONSUME=1 i_maxillary
		src.update
		src.newitem i_dye_tub
		src.act.color={ 2101 2130 }
		src.act.bounce
		say I'm giving you Maxillary color in return.
		return 1

	ELSE
		SAY I need not that item.
	ENDIF

[EVENTS e_Bubgel_Refuse]

ON=@NPCRefuseItem
	// I got something I don't want.
	SAY Thou art giving me <argo.name>? I don't need it.

//-------Quest Subcharacters speechesd and need events-------//

[SPEECH spk_Bub_Alchy]

ON=*andrake*
ON=*oot*
	SAY I have White Mandrake Root in my posession and will give it to you if you give me a bottle.

[EVENTS e_Bub_Alchy_Needs]

ON=@NPCAcceptItem
	
	SAY You gave me <argo.NAME>!

	IF <argo.baseid>==i_bottle
		src.CONSUME=1 i_bottle
		src.update
		src.newitem i_wmr
		src.act.bounce
		say I'm giving you White Mandrake Root in return.
		return 1
	ENDIF

[SPEECH spk_Bub_Smith]

ON=*urick*
	SAY I have Zurick in my posession and will give it to you if you give me Pig Iron.

[EVENTS e_Bub_Smith_Needs]

ON=@NPCAcceptItem
	
	SAY You gave me <argo.NAME>!

	IF <argo.baseid>==i_reag_pig_iron
		src.CONSUME=1 i_reag_pig_iron
		src.update
		src.newitem i_zurick
		src.act.bounce
		say I'm giving you Zurick in return.
		return 1
	ENDIF

[SPEECH spk_Bub_Captn]

ON=*red*bat*wing*
ON=*Red*Bat's*Wing*
ON=*red*bat*
ON=*Bat*
ON=*bat*
	SAY I have Red Bat's Wing in my posession and will give it to you if you give me a bolt of cloth.

[EVENTS e_Bub_Captn_Needs]

ON=@NPCAcceptItem
	
	SAY You gave me <argo.NAME>!

	IF <argo.baseid>==i_cloth_bolt
		src.CONSUME=1 i_cloth_bolt
		src.update
		src.newitem i_redwing
		src.act.bounce
		say I'm giving you Red Bat's Wing in return.
		return 1
	ENDIF

[SPEECH spk_Bub_Tanner]

ON=*Nepa*
ON=*nepa*
	SAY I have Nepa in my posession and will give it to you if you give me a knife.

[EVENTS e_Bub_Tanner_Needs]

ON=@NPCAcceptItem
	
	SAY You gave me <argo.NAME>!

	IF <argo.baseid>==i_knife
		src.CONSUME=1 i_knife
		src.update
		src.newitem i_nepa
		src.act.bounce
		say I'm giving you Nepa in return.
		return 1
	ENDIF

[SPEECH spk_Bub_Outl]

ON=*axillary*
	SAY I have Maxillary in my posession and will give it to you if you give me a Red Communacations Crystal.

[EVENTS e_Bub_Outl_Needs]

ON=@NPCAcceptItem
	
	SAY You gave me <argo.NAME>!

	IF <argo.baseid>==i_redcommcrystal
		src.CONSUME=1 i_redcommcrystal
		src.update
		src.newitem i_maxillary
		src.act.bounce
		say I'm giving you Maxillary in return.
		return 1
	ENDIF

[ITEMDEF i_redwing]
NAME=Red Bat's Wing
ID=0f78

ON=@Create
	Color=0ed

CATEGORY=Quests and legends
SUBSECTION=Bub'Gel
DESCRIPTION=Red Bat's Wing

[ITEMDEF i_wmr]
NAME=White Mandrake Root
ID=0f86

ON=@Create
	Color=03bc

CATEGORY=Quests and legends
SUBSECTION=Bub'Gel
DESCRIPTION=White Mandrake Root

[ITEMDEF i_zurick]
NAME=Zurick
ID=0f7c

ON=@Create
	Color=0960

CATEGORY=Quests and legends
SUBSECTION=Bub'Gel
DESCRIPTION=Zurick

[ITEMDEF i_nepa]
NAME=Nepa
ID=0f8a

ON=@Create
	Color=03fb

CATEGORY=Quests and legends
SUBSECTION=Bub'Gel
DESCRIPTION=Nepa

[ITEMDEF i_maxillary]
NAME=Maxillary
ID=0fca

ON=@Create
	Color=08ac

CATEGORY=Quests and legends
SUBSECTION=Bub'Gel
DESCRIPTION=Maxillary

[ITEMDEF i_redcommcrystal]
NAME=Red Communications Crystal
ID=01ed0

CATEGORY=Quests and legends
SUBSECTION=Bub'Gel
DESCRIPTION=Red Communications Crystal

[EOF]
