ModernUO/Projects/UOContent/Items/Special/House Raffle/HouseRaffleStone.cs
2020-08-21 19:50:36 -07:00

681 lines
17 KiB
C#

using System;
using System.Collections.Generic;
using System.Net;
using System.Text;
using Server.Accounting;
using Server.ContextMenus;
using Server.Gumps;
using Server.Network;
using Server.Regions;
namespace Server.Items
{
public class RaffleEntry
{
public RaffleEntry(Mobile from)
{
From = from;
Address = From.NetState?.Address ?? IPAddress.None;
Date = DateTime.UtcNow;
}
public RaffleEntry(IGenericReader reader, int version)
{
switch (version)
{
case 3: // HouseRaffleStone version changes
case 2:
case 1:
case 0:
{
From = reader.ReadMobile();
Address = Utility.Intern(reader.ReadIPAddress());
Date = reader.ReadDateTime();
break;
}
}
}
public Mobile From { get; }
public IPAddress Address { get; }
public DateTime Date { get; }
public void Serialize(IGenericWriter writer)
{
writer.Write(From);
writer.Write(Address);
writer.Write(Date);
}
}
public enum HouseRaffleState
{
Inactive,
Active,
Completed
}
public enum HouseRaffleExpireAction
{
None,
HideStone,
DeleteStone
}
[Flippable(0xEDD, 0xEDE)]
public class HouseRaffleStone : Item
{
private const int EntryLimitPerIP = 4;
private const int DefaultTicketPrice = 5000;
private const int MessageHue = 1153;
public static readonly TimeSpan DefaultDuration = TimeSpan.FromDays(7.0);
public static readonly TimeSpan ExpirationTime = TimeSpan.FromDays(30.0);
private static readonly List<HouseRaffleStone> m_AllStones = new List<HouseRaffleStone>();
private Rectangle2D m_Bounds;
private TimeSpan m_Duration;
private Map m_Facet;
private HouseRaffleRegion m_Region;
private DateTime m_Started;
private HouseRaffleState m_State;
private int m_TicketPrice;
private Mobile m_Winner;
[Constructible]
public HouseRaffleStone()
: base(0xEDD)
{
m_Region = null;
m_Bounds = new Rectangle2D();
m_Facet = null;
m_Winner = null;
Deed = null;
m_State = HouseRaffleState.Inactive;
m_Started = DateTime.MinValue;
m_Duration = DefaultDuration;
ExpireAction = HouseRaffleExpireAction.None;
m_TicketPrice = DefaultTicketPrice;
Entries = new List<RaffleEntry>();
Movable = false;
m_AllStones.Add(this);
}
public HouseRaffleStone(Serial serial)
: base(serial)
{
}
[CommandProperty(AccessLevel.GameMaster, AccessLevel.Seer)]
public HouseRaffleState CurrentState
{
get => m_State;
set
{
if (m_State != value)
{
if (value == HouseRaffleState.Active)
{
Entries.Clear();
m_Winner = null;
Deed = null;
m_Started = DateTime.UtcNow;
}
m_State = value;
InvalidateProperties();
}
}
}
[CommandProperty(AccessLevel.GameMaster, AccessLevel.Seer)]
public Rectangle2D PlotBounds
{
get => m_Bounds;
set
{
m_Bounds = value;
InvalidateRegion();
InvalidateProperties();
}
}
[CommandProperty(AccessLevel.GameMaster, AccessLevel.Seer)]
public Map PlotFacet
{
get => m_Facet;
set
{
m_Facet = value;
InvalidateRegion();
InvalidateProperties();
}
}
[CommandProperty(AccessLevel.GameMaster, AccessLevel.Seer)]
public Mobile Winner
{
get => m_Winner;
set
{
m_Winner = value;
InvalidateProperties();
}
}
[CommandProperty(AccessLevel.GameMaster, AccessLevel.Seer)]
public HouseRaffleDeed Deed { get; set; }
[CommandProperty(AccessLevel.GameMaster, AccessLevel.Seer)]
public DateTime Started
{
get => m_Started;
set
{
m_Started = value;
InvalidateProperties();
}
}
[CommandProperty(AccessLevel.GameMaster, AccessLevel.Seer)]
public TimeSpan Duration
{
get => m_Duration;
set
{
m_Duration = value;
InvalidateProperties();
}
}
[CommandProperty(AccessLevel.GameMaster)]
public bool IsExpired
{
get
{
if (m_State != HouseRaffleState.Completed)
return false;
return m_Started + m_Duration + ExpirationTime <= DateTime.UtcNow;
}
}
[CommandProperty(AccessLevel.GameMaster, AccessLevel.Seer)]
public HouseRaffleExpireAction ExpireAction { get; set; }
[CommandProperty(AccessLevel.GameMaster, AccessLevel.Seer)]
public int TicketPrice
{
get => m_TicketPrice;
set
{
m_TicketPrice = Math.Max(0, value);
InvalidateProperties();
}
}
public List<RaffleEntry> Entries { get; private set; }
public override string DefaultName => "a house raffle stone";
public override bool DisplayWeight => false;
public static void CheckEnd_OnTick()
{
for (int i = 0; i < m_AllStones.Count; i++)
m_AllStones[i].CheckEnd();
}
public static void Initialize()
{
for (int i = m_AllStones.Count - 1; i >= 0; i--)
{
HouseRaffleStone stone = m_AllStones[i];
if (stone.IsExpired)
switch (stone.ExpireAction)
{
case HouseRaffleExpireAction.HideStone:
{
if (stone.Visible)
{
stone.Visible = false;
stone.ItemID = 0x1B7B; // Non-blocking ItemID
}
break;
}
case HouseRaffleExpireAction.DeleteStone:
{
stone.Delete();
break;
}
}
}
Timer.DelayCall(TimeSpan.FromMinutes(1.0), TimeSpan.FromMinutes(1.0), CheckEnd_OnTick);
}
public bool ValidLocation() =>
m_Bounds.Start != Point2D.Zero && m_Bounds.End != Point2D.Zero && m_Facet != null &&
m_Facet != Map.Internal;
private void InvalidateRegion()
{
if (m_Region != null)
{
m_Region.Unregister();
m_Region = null;
}
if (ValidLocation())
{
m_Region = new HouseRaffleRegion(this);
m_Region.Register();
}
}
private bool HasEntered(Mobile from)
{
if (!(from.Account is Account acc))
return false;
foreach (RaffleEntry entry in Entries)
if (entry.From != null)
{
Account entryAcc = entry.From.Account as Account;
if (entryAcc == acc)
return true;
}
return false;
}
private bool IsAtIPLimit(Mobile from)
{
if (from.NetState == null)
return false;
IPAddress address = from.NetState.Address;
int tickets = 0;
foreach (RaffleEntry entry in Entries)
if (Utility.IPMatchClassC(entry.Address, address))
if (++tickets >= EntryLimitPerIP)
return true;
return false;
}
public static string FormatLocation(Point3D loc, Map map, bool displayMap)
{
StringBuilder result = new StringBuilder();
int xLong = 0, yLat = 0;
int xMins = 0, yMins = 0;
bool xEast = false, ySouth = false;
if (Sextant.Format(loc, map, ref xLong, ref yLat, ref xMins, ref yMins, ref xEast, ref ySouth))
result.AppendFormat("{0}°{1}'{2},{3}°{4}'{5}", yLat, yMins, ySouth ? "S" : "N", xLong, xMins,
xEast ? "E" : "W");
else
result.AppendFormat("{0},{1}", loc.X, loc.Y);
if (displayMap)
result.AppendFormat(" ({0})", map);
return result.ToString();
}
public Point3D GetPlotCenter()
{
int x = m_Bounds.X + m_Bounds.Width / 2;
int y = m_Bounds.Y + m_Bounds.Height / 2;
int z = m_Facet?.GetAverageZ(x, y) ?? 0;
return new Point3D(x, y, z);
}
public string FormatLocation()
{
if (!ValidLocation())
return "no location set";
return FormatLocation(GetPlotCenter(), m_Facet, true);
}
public string FormatPrice() => m_TicketPrice == 0 ? "FREE" : $"{m_TicketPrice} gold";
public override void GetProperties(ObjectPropertyList list)
{
base.GetProperties(list);
if (ValidLocation())
list.Add(FormatLocation());
switch (m_State)
{
case HouseRaffleState.Active:
{
list.Add(1060658, "ticket price\t{0}", FormatPrice()); // ~1_val~: ~2_val~
list.Add(1060659, "ends\t{0}", m_Started + m_Duration); // ~1_val~: ~2_val~
break;
}
case HouseRaffleState.Completed:
{
list.Add(1060658, "winner\t{0}", m_Winner == null ? "unknown" : m_Winner.Name); // ~1_val~: ~2_val~
break;
}
}
}
public override void OnSingleClick(Mobile from)
{
base.OnSingleClick(from);
switch (m_State)
{
case HouseRaffleState.Active:
{
LabelTo(from, 1060658, $"Ends\t{m_Started + m_Duration}"); // ~1_val~: ~2_val~
break;
}
case HouseRaffleState.Completed:
{
LabelTo(from, 1060658, $"Winner\t{(m_Winner == null ? "Unknown" : m_Winner.Name)}"); // ~1_val~: ~2_val~
break;
}
}
}
public override void GetContextMenuEntries(Mobile from, List<ContextMenuEntry> list)
{
base.GetContextMenuEntries(from, list);
if (from.AccessLevel >= AccessLevel.Seer)
{
list.Add(new EditEntry(from, this));
if (m_State == HouseRaffleState.Inactive)
list.Add(new ActivateEntry(from, this));
else
list.Add(new ManagementEntry(from, this));
}
}
public override void OnDoubleClick(Mobile from)
{
if (m_State != HouseRaffleState.Active || !from.CheckAlive())
return;
if (!from.InRange(GetWorldLocation(), 2))
{
from.LocalOverheadMessage(MessageType.Regular, 0x3B2, 1019045); // I can't reach that.
return;
}
if (HasEntered(from))
from.SendMessage(MessageHue, "You have already entered this plot's raffle.");
else if (IsAtIPLimit(from))
from.SendMessage(MessageHue, "You may not enter this plot's raffle.");
else
from.SendGump(new WarningGump(1150470, 0x7F00,
$"You are about to purchase a raffle ticket for the house plot located at {FormatLocation()}. The ticket price is {FormatPrice()}. Tickets are non-refundable and you can only purchase one ticket per account. Do you wish to continue?",
0xFFFFFF, 420, 280, okay => Purchase_Callback(from, okay))); // CONFIRM TICKET PURCHASE
}
public void Purchase_Callback(Mobile from, bool okay)
{
if (Deleted || m_State != HouseRaffleState.Active || !from.CheckAlive() || HasEntered(from) || IsAtIPLimit(from))
return;
if (!(from.Account is Account))
return;
if (okay)
{
Container bank = from.FindBankNoCreate();
if (m_TicketPrice == 0 || from.Backpack?.ConsumeTotal(typeof(Gold), m_TicketPrice) == true ||
bank?.ConsumeTotal(typeof(Gold), m_TicketPrice) == true)
{
Entries.Add(new RaffleEntry(from));
from.SendMessage(MessageHue, "You have successfully entered the plot's raffle.");
}
else
{
from.SendMessage(MessageHue, "You do not have the {0} required to enter the raffle.", FormatPrice());
}
}
else
{
from.SendMessage(MessageHue, "You have chosen not to enter the raffle.");
}
}
public void CheckEnd()
{
if (m_State != HouseRaffleState.Active || m_Started + m_Duration > DateTime.UtcNow)
return;
m_State = HouseRaffleState.Completed;
if (m_Region != null && Entries.Count != 0)
{
m_Winner = Entries.RandomElement().From;
if (m_Winner != null)
{
Deed = new HouseRaffleDeed(this, m_Winner);
m_Winner.SendMessage(MessageHue,
"Congratulations, {0}! You have won the raffle for the plot located at {1}.", m_Winner.Name,
FormatLocation());
if (m_Winner.AddToBackpack(Deed))
{
m_Winner.SendMessage(MessageHue, "The writ of lease has been placed in your backpack.");
}
else
{
m_Winner.BankBox.DropItem(Deed);
m_Winner.SendMessage(MessageHue,
"As your backpack is full, the writ of lease has been placed in your bank box.");
}
}
}
InvalidateProperties();
}
public override void OnDelete()
{
if (m_Region != null)
{
m_Region.Unregister();
m_Region = null;
}
m_AllStones.Remove(this);
base.OnDelete();
}
public override void Serialize(IGenericWriter writer)
{
base.Serialize(writer);
writer.Write(3); // version
writer.WriteEncodedInt((int)m_State);
writer.WriteEncodedInt((int)ExpireAction);
writer.Write(Deed);
writer.Write(m_Bounds);
writer.Write(m_Facet);
writer.Write(m_Winner);
writer.Write(m_TicketPrice);
writer.Write(m_Started);
writer.Write(m_Duration);
writer.Write(Entries.Count);
foreach (RaffleEntry entry in Entries)
entry.Serialize(writer);
}
public override void Deserialize(IGenericReader reader)
{
base.Deserialize(reader);
int version = reader.ReadInt();
switch (version)
{
case 3:
{
m_State = (HouseRaffleState)reader.ReadEncodedInt();
goto case 2;
}
case 2:
{
ExpireAction = (HouseRaffleExpireAction)reader.ReadEncodedInt();
goto case 1;
}
case 1:
{
Deed = reader.ReadItem<HouseRaffleDeed>();
goto case 0;
}
case 0:
{
bool oldActive = version < 3 && reader.ReadBool();
m_Bounds = reader.ReadRect2D();
m_Facet = reader.ReadMap();
m_Winner = reader.ReadMobile();
m_TicketPrice = reader.ReadInt();
m_Started = reader.ReadDateTime();
m_Duration = reader.ReadTimeSpan();
int entryCount = reader.ReadInt();
Entries = new List<RaffleEntry>(entryCount);
for (int i = 0; i < entryCount; i++)
{
RaffleEntry entry = new RaffleEntry(reader, version);
if (entry.From == null)
continue; // Character was deleted
Entries.Add(entry);
}
InvalidateRegion();
m_AllStones.Add(this);
if (version < 3)
{
if (oldActive)
m_State = HouseRaffleState.Active;
else if (m_Winner != null)
m_State = HouseRaffleState.Completed;
else
m_State = HouseRaffleState.Inactive;
}
break;
}
}
}
private class RaffleContextMenuEntry : ContextMenuEntry
{
protected readonly Mobile m_From;
protected readonly HouseRaffleStone m_Stone;
public RaffleContextMenuEntry(Mobile from, HouseRaffleStone stone, int label)
: base(label)
{
m_From = from;
m_Stone = stone;
}
}
private class EditEntry : RaffleContextMenuEntry
{
public EditEntry(Mobile from, HouseRaffleStone stone)
: base(from, stone, 5101) // Edit
{
}
public override void OnClick()
{
if (m_Stone.Deleted || m_From.AccessLevel < AccessLevel.Seer)
return;
m_From.SendGump(new PropertiesGump(m_From, m_Stone));
}
}
private class ActivateEntry : RaffleContextMenuEntry
{
public ActivateEntry(Mobile from, HouseRaffleStone stone)
: base(from, stone, 5113) // Start
{
if (!stone.ValidLocation())
Flags |= CMEFlags.Disabled;
}
public override void OnClick()
{
if (m_Stone.Deleted || m_From.AccessLevel < AccessLevel.Seer || !m_Stone.ValidLocation())
return;
m_Stone.CurrentState = HouseRaffleState.Active;
}
}
private class ManagementEntry : RaffleContextMenuEntry
{
public ManagementEntry(Mobile from, HouseRaffleStone stone)
: base(from, stone, 5032) // Game Monitor
{
}
public override void OnClick()
{
if (m_Stone.Deleted || m_From.AccessLevel < AccessLevel.Seer)
return;
m_From.SendGump(new HouseRaffleManagementGump(m_Stone));
}
}
}
}