class 1 pet_manager_rood : merchant
{
property:
	BuySellList SellList0 = {{"iron_canine";20};{"shining_canine";20};{"ghost_canine";20};{"mithril_canine";20};{"sylvan_canine";20};{"orikarukon_canine";20};{"fang_of_saltydog";20};{"wolve_s_leather_mail";20};{"wolves_hide_armor";20};{"wolves_hard_leather_mail";20};{"wolves_wooden_armor";20};{"wolves_ring_mail";20};{"wolves_bone_armor";20};{"wolves_scale_mail";20};{"food_for_wolves";20};{"viperbite";20};{"shadow_fang";20};{"alya_fang";20};{"torturer";20};{"serpentine_grinder";20};{"fang_of_dahak";20};{"crimson_bloodfang";20};{"draconic_chopper";20};{"diabolic_grinder";20};{"hatchlings_scale_mail";20};{"hatchlings_brigandine";20};{"hatchlings_bronze_coat";20};{"hatchlings_steel_coat";20};{"hatchlings_gorgon_coat";20};{"hatchlings_ophidian_plate";20};{"hatchlings_crimson_plate";20};{"hatchlings_draconic_plate";20};{"hatchlings_inferno_plate";20};{"food_for_hatchling";20};{"serpentine_spike";20};{"drake_horn";20};{"assault_alicorn";20};{"draconic_slicer";20};{"ophidian_lancer";20};{"diamond_drill";20};{"mithril_panzer_coat";20};{"brigandine_panzer_coat";20};{"draconic_panzer_coat";20};{"blood_panzer_coat";20};{"ophidian_panzer_coat";20};{"inferno_panzer_coat";20};{"food_for_strider";20};{"beast_soul_shot";20};{"beast_spirit_shot";20};{"blessed_beast_spirit_shot";20};{"pet_food_baby_spice";20};{"little_harness";20};{"enchanted_wolf_fang";20};{"enchanted_coyote_fang";20};{"enchanted_saltydog_fang";20};{"enchanted_cerberus_fang";20};{"orichalcum_fang";20};{"enchanted_fenril_fang";20};{"great_wolf_scale_armor";20};{"great_wolf_bronze_armor";20};{"great_wolf_plate_armor";20};{"great_wolf_mithril_armor";20};{"great_wolf_oriharukon_armor";20};{"great_wolf_orichalcum_armor";20};{"great_wolf_food";20};{"beast_soulshot_compressed_pack";20};{"beast_spiritshot_compressed_pack";20};{"blessed_beast_spiritshot_compressed_pack";20};{"improved_baby_pet_food";20}};

handler:
	EventHandler TALK_SELECTED(fhtml0,talker)
	{
		if( _from_choice == 0 )
		{
			if( myself::HaveMemo(talker,352) == 0 )
			{
				_choiceN = ( _choiceN + 1 );
				_code = 0;
				myself::AddChoice(0,"Help Rood Raise a New Pet!");
			}
			if( myself::HaveMemo(talker,352) == 1 && myself::OwnItemCount(talker,5860) < 1 && myself::OwnItemCount(talker,5861) < 1 )
			{
				_choiceN = ( _choiceN + 1 );
				_code = 1;
				myself::AddChoice(1,"Help Rood Raise a New Pet! (Continue)");
			}
			if( myself::HaveMemo(talker,352) == 1 && myself::OwnItemCount(talker,5860) >= 1 && myself::OwnItemCount(talker,5861) < 1 )
			{
				_choiceN = ( _choiceN + 1 );
				_code = 2;
				myself::AddChoice(2,"Help Rood Raise a New Pet! (Continue)");
			}
			if( myself::HaveMemo(talker,352) == 1 && myself::OwnItemCount(talker,5861) >= 1 )
			{
				_choiceN = ( _choiceN + 1 );
				_code = 3;
				myself::AddChoice(3,"Help Rood Raise a New Pet! (Continue)");
			}
			if( _choiceN > 1 )
			{
				myself::ShowChoicePage(talker,1);
				return;
			}
		}
		if( _from_choice || _choiceN == 1 )
		{
			switch(_code)
			{
				case 0:
				{
					if( _from_choice == 0 || myself::HaveMemo(talker,352) == 0 )
					{
						myself::SetCurrentQuestID(352);
						if( myself::GetInventoryInfo(talker,0) >= ( myself::GetInventoryInfo(talker,1) * 0.800000 ) || myself::GetInventoryInfo(talker,2) >= ( myself::GetInventoryInfo(talker,3) * 0.800000 ) )
						{
							myself::ShowSystemMessage(talker,1118);
							return;
						}
						if( talker.level < 39 )
						{
							myself::ShowPage(talker,"pet_manager_rood_q0352_01.htm");
						}
						else
						{
							myself::ShowPage(talker,"pet_manager_rood_q0352_02.htm");
						}
					}
					break;
				}
				case 1:
				{
					if( _from_choice == 0 || ( myself::HaveMemo(talker,352) == 1 && myself::OwnItemCount(talker,5860) < 1 && myself::OwnItemCount(talker,5861) < 1 ) )
					{
						myself::SetCurrentQuestID(352);
						if( myself::GetInventoryInfo(talker,0) >= ( myself::GetInventoryInfo(talker,1) * 0.800000 ) || myself::GetInventoryInfo(talker,2) >= ( myself::GetInventoryInfo(talker,3) * 0.800000 ) )
						{
							myself::ShowSystemMessage(talker,1118);
							return;
						}
						myself::ShowPage(talker,"pet_manager_rood_q0352_06.htm");
					}
					break;
				}
				case 2:
				{
					if( _from_choice == 0 || ( myself::HaveMemo(talker,352) == 1 && myself::OwnItemCount(talker,5860) >= 1 && myself::OwnItemCount(talker,5861) < 1 ) )
					{
						myself::SetCurrentQuestID(352);
						if( myself::GetInventoryInfo(talker,0) >= ( myself::GetInventoryInfo(talker,1) * 0.800000 ) || myself::GetInventoryInfo(talker,2) >= ( myself::GetInventoryInfo(talker,3) * 0.800000 ) )
						{
							myself::ShowSystemMessage(talker,1118);
							return;
						}
						if( ( myself::GetCurrentTick() - talker.quest_last_reward_time ) > 1 )
						{
							talker.quest_last_reward_time = myself::GetCurrentTick();
							if( myself::OwnItemCount(talker,5860) >= 10 )
							{
								myself::GiveItem1(talker,57,( ( myself::OwnItemCount(talker,5860) * 34 ) + 4000 ));
							}
							else
							{
								myself::GiveItem1(talker,57,( ( myself::OwnItemCount(talker,5860) * 34 ) + 2000 ));
							}
							myself::DeleteItem1(talker,5860,myself::OwnItemCount(talker,5860));
							myself::ShowPage(talker,"pet_manager_rood_q0352_07.htm");
						}
					}
					break;
				}
				case 3:
				{
					if( _from_choice == 0 || ( myself::HaveMemo(talker,352) == 1 && myself::OwnItemCount(talker,5861) >= 1 ) )
					{
						myself::SetCurrentQuestID(352);
						if( myself::GetInventoryInfo(talker,0) >= ( myself::GetInventoryInfo(talker,1) * 0.800000 ) || myself::GetInventoryInfo(talker,2) >= ( myself::GetInventoryInfo(talker,3) * 0.800000 ) )
						{
							myself::ShowSystemMessage(talker,1118);
							return;
						}
						if( ( myself::GetCurrentTick() - talker.quest_last_reward_time ) > 1 )
						{
							talker.quest_last_reward_time = myself::GetCurrentTick();
							myself::GiveItem1(talker,57,( 4000 + ( ( myself::OwnItemCount(talker,5860) * 34 ) + ( myself::OwnItemCount(talker,5861) * 1025 ) ) ));
							myself::DeleteItem1(talker,5861,myself::OwnItemCount(talker,5861));
							myself::DeleteItem1(talker,5860,myself::OwnItemCount(talker,5860));
							myself::ShowPage(talker,"pet_manager_rood_q0352_08.htm");
						}
					}
					break;
				}
			}
			return;
		}
		super;
	}

	EventHandler QUEST_ACCEPTED(quest_id,talker)
	{
		if( quest_id == 352 )
		{
			myself::SetCurrentQuestID(352);
			if( myself::GetInventoryInfo(talker,0) >= ( myself::GetInventoryInfo(talker,1) * 0.800000 ) || myself::GetInventoryInfo(talker,2) >= ( myself::GetInventoryInfo(talker,3) * 0.800000 ) )
			{
				myself::ShowSystemMessage(talker,1118);
				return;
			}
			if( myself::GetMemoCount(talker) < 26 )
			{
				if( ( myself::GetCurrentTick() - talker.quest_last_reward_time ) > 1 )
				{
					talker.quest_last_reward_time = myself::GetCurrentTick();
					myself::SetMemo(talker,quest_id);
					myself::SetJournal(talker,352,1);
					myself::SoundEffect(talker,"ItemSound.quest_accept");
					myself::ShowPage(talker,"pet_manager_rood_q0352_05.htm");
					myself::AddLog(1,talker,quest_id);
				}
			}
			else
			{
				myself::ShowPage(talker,"fullquest.htm");
			}
			return;
		}
		super;
	}

	EventHandler MENU_SELECTED(ask,fhtml0,quest_id,reply,talker)
	{
		if( ask == 352 )
		{
			myself::SetCurrentQuestID(352);
			if( myself::GetInventoryInfo(talker,0) >= ( myself::GetInventoryInfo(talker,1) * 0.800000 ) || myself::GetInventoryInfo(talker,2) >= ( myself::GetInventoryInfo(talker,3) * 0.800000 ) )
			{
				myself::ShowSystemMessage(talker,1118);
				return;
			}
		}
		if( ask == 352 )
		{
			if( reply == 1 )
			{
				myself::ShowPage(talker,"pet_manager_rood_q0352_09.htm");
			}
			if( reply == 2 )
			{
				myself::ShowPage(talker,"pet_manager_rood_q0352_10.htm");
			}
			if( reply == 3 )
			{
				myself::RemoveMemo(talker,352);
				myself::AddLog(2,talker,quest_id);
				myself::SoundEffect(talker,"ItemSound.quest_finish");
				myself::ShowPage(talker,"pet_manager_rood_q0352_11.htm");
			}
			if( reply == 4 )
			{
				myself::FHTML_SetFileName(fhtml0,"pet_manager_rood_q0352_04.htm");
				myself::FHTML_SetInt(fhtml0,"quest_id",352);
				myself::ShowFHTML(talker,fhtml0);
			}
		}
		super;
	}

}
