ModernUO/Scripts/Items/Special/House Raffle/HouseRaffleStone.cs
2018-09-14 13:07:43 -07:00

705 lines
16 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
{
private Mobile m_From;
private IPAddress m_Address;
private DateTime m_Date;
public Mobile From => m_From;
public IPAddress Address => m_Address;
public DateTime Date => m_Date;
public RaffleEntry( Mobile from )
{
m_From = from;
if ( m_From.NetState != null )
m_Address = m_From.NetState.Address;
else
m_Address = IPAddress.None;
m_Date = DateTime.UtcNow;
}
public void Serialize( GenericWriter writer )
{
writer.Write( m_From );
writer.Write( m_Address );
writer.Write( m_Date );
}
public RaffleEntry( GenericReader reader, int version )
{
switch ( version )
{
case 3: // HouseRaffleStone version changes
case 2:
case 1:
case 0:
{
m_From = reader.ReadMobile();
m_Address = Utility.Intern( reader.ReadIPAddress() );
m_Date = reader.ReadDateTime();
break;
}
}
}
}
public enum HouseRaffleState
{
Inactive,
Active,
Completed
}
public enum HouseRaffleExpireAction
{
None,
HideStone,
DeleteStone
}
[FlippableAttribute( 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 HouseRaffleRegion m_Region;
private Rectangle2D m_Bounds;
private Map m_Facet;
private Mobile m_Winner;
private HouseRaffleDeed m_Deed;
private HouseRaffleState m_State;
private DateTime m_Started;
private TimeSpan m_Duration;
private HouseRaffleExpireAction m_ExpireAction;
private int m_TicketPrice;
private List<RaffleEntry> m_Entries;
[CommandProperty( AccessLevel.GameMaster, AccessLevel.Seer )]
public HouseRaffleState CurrentState
{
get => m_State;
set
{
if ( m_State != value )
{
if ( value == HouseRaffleState.Active )
{
m_Entries.Clear();
m_Winner = null;
m_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 => m_Deed;
set => m_Deed = value;
}
[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 => m_ExpireAction;
set => m_ExpireAction = value;
}
[CommandProperty( AccessLevel.GameMaster, AccessLevel.Seer )]
public int TicketPrice
{
get => m_TicketPrice;
set
{
m_TicketPrice = Math.Max( 0, value );
InvalidateProperties();
}
}
public List<RaffleEntry> Entries => m_Entries;
public override string DefaultName => "a house raffle stone";
public override bool DisplayWeight => false;
private static List<HouseRaffleStone> m_AllStones = new List<HouseRaffleStone>();
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 ), new TimerCallback( CheckEnd_OnTick ) );
}
[Constructible]
public HouseRaffleStone()
: base( 0xEDD )
{
m_Region = null;
m_Bounds = new Rectangle2D();
m_Facet = null;
m_Winner = null;
m_Deed = null;
m_State = HouseRaffleState.Inactive;
m_Started = DateTime.MinValue;
m_Duration = DefaultDuration;
m_ExpireAction = HouseRaffleExpireAction.None;
m_TicketPrice = DefaultTicketPrice;
m_Entries = new List<RaffleEntry>();
Movable = false;
m_AllStones.Add( this );
}
public HouseRaffleStone( Serial serial )
: base( serial )
{
}
public bool ValidLocation()
{
return ( 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 m_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 m_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 == null ) ? 0 : m_Facet.GetAverageZ( x, y );
return new Point3D( x, y, z );
}
public string FormatLocation()
{
if ( !ValidLocation() )
return "no location set";
return FormatLocation( GetPlotCenter(), m_Facet, true );
}
public string FormatPrice()
{
if ( m_TicketPrice == 0 )
return "FREE";
else
return $"{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, new WarningGumpCallback( Purchase_Callback ), null ) ); // CONFIRM TICKET PURCHASE
}
}
public void Purchase_Callback( Mobile from, bool okay, object state )
{
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 != null && from.Backpack.ConsumeTotal( typeof( Gold ), m_TicketPrice ) ) || ( bank != null && bank.ConsumeTotal( typeof( Gold ), m_TicketPrice ) ) )
{
m_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 && m_Entries.Count != 0 )
{
int winner = Utility.Random( m_Entries.Count );
m_Winner = m_Entries[winner].From;
if ( m_Winner != null )
{
m_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( m_Deed ) )
{
m_Winner.SendMessage( MessageHue, "The writ of lease has been placed in your backpack." );
}
else
{
m_Winner.BankBox.DropItem( m_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( GenericWriter writer )
{
base.Serialize( writer );
writer.Write( (int) 3 ); // version
writer.WriteEncodedInt( (int) m_State );
writer.WriteEncodedInt( (int) m_ExpireAction );
writer.Write( m_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( m_Entries.Count );
foreach ( RaffleEntry entry in m_Entries )
entry.Serialize( writer );
}
public override void Deserialize( GenericReader reader )
{
base.Deserialize( reader );
int version = reader.ReadInt();
switch ( version )
{
case 3:
{
m_State = (HouseRaffleState) reader.ReadEncodedInt();
goto case 2;
}
case 2:
{
m_ExpireAction = (HouseRaffleExpireAction) reader.ReadEncodedInt();
goto case 1;
}
case 1:
{
m_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();
m_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
m_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 Mobile m_From;
protected 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 ) );
}
}
}
}