INIT
EXTERN INT:%Oven = 0
EXTERN INT:%SmithOven = 0
EXTERN INT:%WaterBarrel = 0
EXTERN INT:%OozeBarrel = 0
EXTERN INT:%OilBarrel = 0
EXTERN INT:%Well = 0
EXTERN INT:%Anvil = 0
STORY
SCRIPTFRAME CraftingActions
VARS
	ITEMTEMPLATE:_OvenTemp = "FUR_Poor_Oven_A_f44b2969-8d36-4e62-95cd-2849a11ae95a"
	ITEMTEMPLATE:_DungeonSmithTemp = "2m_DungeonPrison_A_Smith_Fireplace_A_Item_b7f00fad-8fd6-47c5-bbc7-2b71e15e795a"
	ITEMTEMPLATE:_SmithTemp = "LTS_Smith_Fireplace_A_1f66bf28-48ac-4be8-8714-93f22212a1c6"
	ITEMTEMPLATE:_WellTemp = "Hum_Well_A_e9cfca4c-5564-47e0-85c2-c5387bbdca35"
	ITEMTEMPLATE:_WellSnowTemp = "Hum_Well_A_Snow_9a9153f2-d0dd-45f1-a6fb-e9fed68aba4a"
	ITEMTEMPLATE:_AnvilTemp = "TOOL_Smith_Anvil_A_4fcd8129-ad8c-46ff-9373-329387e5b214"
	ITEMTEMPLATE:_AnvilBTemp = "TOOL_Smith_Anvil_B_4869c1fe-1529-40a1-95c2-569bbdac47f4"
	ITEMTEMPLATE:_OilBarrelTemp = "CONT_Barrel_Oil_A_1b34b32c-e96c-404e-90cc-054cb549c558"
	ITEMTEMPLATE:_WaterBarrelTemp = "CONT_Barrel_A_Water_59b25792-1cc2-4364-92eb-89aca8fb8425"
	ITEMTEMPLATE:_OozeBarrelTemp = "CONT_Barrel_Ooze_A_0ae0668f-418c-46c4-bcbb-1683aa3c68e3"
	ITEMTEMPLATE:_Seat1 = "FUR_Citz_Chair_A_3d1892b1-0b6b-4f25-9a70-6c107fdd3294"
	ITEMTEMPLATE:_Seat2 = "FUR_Poor_Chair_A_f5115ada-4145-42b7-94bf-80fee29674a8"
	ITEMTEMPLATE:_Seat3 = "FUR_Poor_Chair_B_0c784122-2da8-42ef-865f-a70c802b1a75"
	ITEMTEMPLATE:_Seat4 = "FUR_Poor_Chair_C_32b6925a-bf33-44c2-96d3-22b432785f80"
	ITEMTEMPLATE:_Seat5 = "FUR_Rich_Chair_A_f0a87e0e-f895-4463-8d38-7ebe5853d5c9"
	ITEMTEMPLATE:_Seat6 = "FUR_Poor_Bar_Stool_A_f5bcacd2-2d39-442b-b566-23b667ee961b"
	ITEMTEMPLATE:_Seat7 = "FUR_Poor_Bar_Stool_B_dcd2f731-17ea-46bb-896a-198a72754d9b"
	ITEM:_CraftingItem
	ITEM:_Seat
	INT:_WalkOrRun
	INT:_Ability
	INT:_Effect
	INT:_IntValue
	FLOAT:_Chance = 0.3 
	FLOAT:_Attribute
	FLOAT3:_position
	CHARACTER:_Player
ACTIONS
	IF "c1&c2"
		GetVar(_IntValue,__Me,"Well")
		IsEqual(_IntValue,1)
	THEN
		IF "c1|c2"
			ItemGet(_CraftingItem,__Me,15,Random,null,_WellTemp)
			ItemGet(_CraftingItem,__Me,15,Random,null,_WellSnowTemp)
		THEN	
			CharacterMoveTo(_CraftingItem,0,0,0,1,1.1)
			Sleep(1)
			IF "c1"
				IsRandom(0.15)
			THEN				
				CharacterPlayAnimation("use_inspect")
				Sleep(1)
			ENDIF
			CharacterPlayAnimation("use_craft")
			IF "c1"
				IsRandom(0.2)
			THEN
				CreateSurfaceAt(__Me,Water,1,4)
			ENDIF			
			CharacterEvent(__Me,"Well")
			SetVar(__Me,"Well",INT:0)
			Sleep(1.5)
		ELSE
			DisplayText(__Me,"WellNotFound",3) 
			SetVar(__Me,"Well",INT:0)			
			Sleep(3)
		ENDIF
	ENDIF
	IF "c1&c2"
		GetVar(_IntValue,__Me,"Oven")
		IsEqual(_IntValue,1)
	THEN
		IF "c1"
			ItemGet(_CraftingItem,__Me,15,Random,null,_OvenTemp)			
		THEN	
			CharacterMoveTo(_CraftingItem,0,0,0,0.7,0.8)
			Sleep(1)
			IF "c1"
				IsRandom(0.15)
			THEN				
				CharacterPlayAnimation("use_inspect")
				Sleep(1)
			ENDIF
			CharacterPlayAnimation("use_craft")
			Sleep(2)
			PlayLoopEffectAt(_Effect,_CraftingItem,"FX_Env_Smoke_Small_A")
			IF "c1&(c2|c3|c4|c5|c6|c7|c8)"
				IsRandom(0.1)
				ItemGet(_Seat,__Me,12,Random,null,_Seat1)
				ItemGet(_Seat,__Me,12,Random,null,_Seat2)
				ItemGet(_Seat,__Me,12,Random,null,_Seat3)
				ItemGet(_Seat,__Me,12,Random,null,_Seat4)
				ItemGet(_Seat,__Me,12,Random,null,_Seat5)
				ItemGet(_Seat,__Me,12,Random,null,_Seat6)
				ItemGet(_Seat,__Me,12,Random,null,_Seat7)
			THEN
				CharacterMoveTo(_Seat)
				Sleep(1)
				CharacterUseItem(_Seat)
				Sleep(8)
				GetRandom(_WalkOrRun,0,1)				
				CharacterMoveTo(_CraftingItem,_WalkOrRun)
				Sleep(1)
			ELSE
				Sleep(5)
			ENDIF
			IF "c1"
				IsRandom(0.3)
			THEN				
				CharacterPlayAnimation("use_inspect")
				Sleep(1)
			ENDIF
			CharacterPlayAnimation("use_craft")
			StopLoopEffect(_Effect)
			Sleep(1)
			CharacterPlayAnimation("use_loot")
			CharacterEvent(__Me,"Oven")
			SetVar(__Me,"Oven",INT:0)
			Sleep(1.5)
		ELSE
			DisplayText(__Me,"OvenNotFound",3)
			SetVar(__Me,"Oven",INT:0)
			Sleep(3)
		ENDIF
	ENDIF
	IF "c1&c2"
		GetVar(_IntValue,__Me,"SmithOven")
		IsEqual(_IntValue,1)
	THEN
		IF "c1|c2"
			ItemGet(_CraftingItem,__Me,15,Random,null,_DungeonSmithTemp)
			ItemGet(_CraftingItem,__Me,15,Random,null,_SmithTemp)
		THEN	
			CharacterMoveTo(_CraftingItem)
			Sleep(1)
			IF "c1"
				IsRandom(0.15)
			THEN				
				CharacterPlayAnimation("use_inspect")
				Sleep(1)
			ENDIF
			CharacterPlayAnimation("use_craft")
			GetPosition(_CraftingItem,_position)
			Add(_position,{0;1;0})
			PlayLoopEffectAt(_Effect,_position,"FX_GP_Bomber_Sparks")
			/*IF "c1&c2" 							
				CharacterGetStat(_Attribute,__Me,Dexterity)
				IsGreaterThen(_Attribute,8)
			THEN
				Subtract(_chance,0.15)
			ENDIF
			IF "c1&c2"
				CharacterGetAbility(_Ability,__Me,Repair)
				IsGreaterThen(_Ability,1)
			THEN
				Subtract(_chance,0.1)
			ENDIF
			IF "c1"
				IsRandom(_Chance)
			THEN
				CreateSurfaceAt(__Me,Fire,1,4)
			ENDIF
			Set(_Chance,0.3)*/
			Sleep(5)
			CharacterPlayAnimation("use_craft")
			StopLoopEffect(_Effect)
			Sleep(2)
			CharacterPlayAnimation("use_loot")
			CharacterEvent(__Me,"SmithOven")
			SetVar(__Me,"SmithOven",INT:0)
			Sleep(1)
		ELSE
			DisplayText(__Me,"SmithNotFound",3) 
			SetVar(__Me,"SmithOven",INT:0)
			Sleep(3)
		ENDIF
	ENDIF
	IF "c1&c2"
		GetVar(_IntValue,__Me,"Anvil")
		IsEqual(_IntValue,1)
	THEN
		IF "c1|c2"
			ItemGet(_CraftingItem,__Me,15,Random,null,_AnvilTemp)
			ItemGet(_CraftingItem,__Me,15,Random,null,_AnvilBTemp)
		THEN	
			CharacterMoveTo(_CraftingItem)
			Sleep(1)
			IF "c1"
				IsRandom(0.1)
			THEN				
				CharacterPlayAnimation("use_inspect")
				Sleep(1)
			ENDIF
			CharacterPlayAnimation("use_activate")
			Sleep(0.5)
			CharacterPlayAnimation("use_mine")
			Sleep(1.5)
			CharacterPlayAnimation("use_mine")
			Sleep(1)
			IF "c1"
				IsRandom(0.3)
			THEN				
				CharacterPlayAnimation("use_inspect")
				Sleep(1)
				CharacterPlayAnimation("use_mine")
				Sleep(1)
			ENDIF
			CharacterPlayAnimation("use_loot")
			CharacterEvent(__Me,"Anvil")
			SetVar(__Me,"Anvil",INT:0)
			Sleep(1.5)
		ELSE
			DisplayText(__Me,"AnvilNotFound",3)
			SetVar(__Me,"Anvil",INT:0)		
			Sleep(3)
		ENDIF
	ENDIF
	IF "c1&c2"
		GetVar(_IntValue,__Me,"WaterBarrel")
		IsEqual(_IntValue,1)
	THEN
		IF "c1"
			ItemGet(_CraftingItem,__Me,15,Random,null,_WaterBarrelTemp)
		THEN	
			CharacterMoveTo(_CraftingItem,0,0,0,1,1.1)
			Sleep(1)
			IF "c1"
				IsRandom(0.15)
			THEN				
				CharacterPlayAnimation("use_inspect")
				Sleep(1)
			ENDIF
			CharacterPlayAnimation("use_craft")
			IF "c1"
				IsRandom(0.2)
			THEN
				CreateSurfaceAt(__Me,Water,1,4)
			ENDIF			
			CharacterEvent(__Me,"WaterBarrel")
			SetVar(__Me,"WaterBarrel",INT:0)
			Sleep(1.5)
		ELSE
			DisplayText(__Me,"WaterNotFound",3)
			SetVar(__Me,"Well",INT:0)			
			Sleep(3)
		ENDIF
	ENDIF
	IF "c1&c2"
		GetVar(_IntValue,__Me,"OilBarrel")
		IsEqual(_IntValue,1)
	THEN
		IF "c1"
			ItemGet(_CraftingItem,__Me,15,Random,null,_OilBarrelTemp)
		THEN	
			CharacterMoveTo(_CraftingItem,0,0,0,1,1.1)
			Sleep(1)
			IF "c1"
				IsRandom(0.15)
			THEN				
				CharacterPlayAnimation("use_inspect")
				Sleep(1)
			ENDIF
			CharacterPlayAnimation("use_craft")
			IF "c1"
				IsRandom(0.2)
			THEN
				CreateSurfaceAt(__Me,Oil,1,4)
			ENDIF			
			CharacterEvent(__Me,"OilBarrel")
			SetVar(__Me,"OilBarrel",INT:0)
			Sleep(1.5)
		ELSE
			Sleep(1)
			DisplayText(__Me,"OilNotFound",3)
			Sleep(2)
			CharacterPlayAnimation("use_dig")
			SetVar(__Me,"OilBarrel",INT:0)			
			Sleep(3)
		ENDIF
	ENDIF
	IF "c1&c2"
		GetVar(_IntValue,__Me,"OozeBarrel")
		IsEqual(_IntValue,1)
	THEN
		IF "c1"
			ItemGet(_CraftingItem,__Me,15,Random,null,_OozeBarrelTemp)
		THEN	
			CharacterMoveTo(_CraftingItem,0,0,0,1,1.1)
			Sleep(1)
			IF "c1"
				IsRandom(0.15)
			THEN				
				CharacterPlayAnimation("use_inspect")
				Sleep(1)
			ENDIF
			CharacterPlayAnimation("use_craft")
			/*IF "c1"
				IsRandom(0.2)
			THEN
				CreateSurfaceAt(__Me,Ooze,1,4)
			ENDIF	*/		
			CharacterEvent(__Me,"OozeBarrel")
			SetVar(__Me,"OozeBarrel",INT:0)
			Sleep(1.5)
		ELSE
			DisplayText(__Me,"OozeNotFound",3) 
			SetVar(__Me,"OozeBarrel",INT:0)			
			Sleep(3)
		ENDIF
	ENDIF
	Sleep(1)
	CharacterEvent(__Me,"CraftingOrdersFinished")
	DisplayText(__Me,"OrdersCompleted",3)
	Sleep(2)