///////////////////////////////////////////////////////////////////////// // // www.ultima.smoce.net // Name: Alchemy // ///////////////////////////////////////////////////////////////////////// using System; using System.Collections.Generic; using System.Text; using Phoenix; using Phoenix.WorldData; using System.Linq; namespace Phoenix.Scripts {//by smoce public class smoce_dilna {//by smoce [Executable] public static void alchemy() { UO.PrintInformation("Univerzal Alchemy Script."); UO.Wait(300); UO.PrintInformation("Target Regy."); UOItem regy = new UOItem(UIManager.TargetObject()); UO.Wait(500); UO.PrintInformation("Target Kad."); UOItem kad = new UOItem(UIManager.TargetObject()); UO.Wait(500); UO.PrintInformation("Target hotovej potiont."); UOItem pot = new UOItem(UIManager.TargetObject()); UO.Wait(500); Graphic reggrap = regy.Graphic; UOColor regcol = regy.Color; Graphic potgrap = pot.Graphic; UOColor potcol = pot.Color; UO.Print("Dej si do baglu kad , minimalne 2 lahvicky a regy."); UO.Wait(1000); zacatek: if (UO.Count(0x0F0E) == 0) { UO.Print("Neni Lahev"); UO.Print("Neni Lahev .... vypinam MAKRO !!!"); UO.TerminateAll(); } while (UO.Count(potgrap, potcol) > 1) { UO.Print("Nalezen Potiont, prelivam do Kade"); kad.Use(); UO.WaitTargetType(potgrap, potcol); UO.Wait(1000); } UO.DeleteJournal(); UO.UseType(reggrap, regcol); string[] petrolej = { "You toss","You pour the completed potion into a bottle"}; Journal.WaitForText(petrolej); UO.Wait(500); goto zacatek; } [Executable] public static void alchemy_lava() { UO.PrintInformation("Univerzal Alchemy Script."); UO.Wait(300); UO.PrintInformation("Target Regy."); UOItem regy = new UOItem(UIManager.TargetObject()); UO.Wait(500); UO.PrintInformation("Target Kad."); UOItem kad = new UOItem(UIManager.TargetObject()); UO.Wait(500); UO.PrintInformation("Target hotovej potiont."); UOItem pot = new UOItem(UIManager.TargetObject()); UO.Wait(500); Graphic reggrap = regy.Graphic; UOColor regcol = regy.Color; Graphic potgrap = pot.Graphic; UOColor potcol = pot.Color; UO.Print("Dej si do baglu kad , minimalne 2 lahvicky a regy."); UO.Wait(1000); zacatek: if (UO.Count(potgrap, potcol) > 1) { while (UO.Count(potgrap, potcol) > 1) { UO.Print("Nalezen Potiont, prelivam do Kade"); kad.Use(); UO.WaitTargetType(potgrap, potcol); UO.Wait(100); } } UO.DeleteJournal(); UO.UseType(reggrap, regcol); string[] petrolej = { "You pour the completed potion into a bottle","You toss" }; Journal.WaitForText(petrolej); UO.Wait(5000); goto zacatek; } } }