#W# Source and Scripts added. Added Scripts/Settings.cs to expose some basic tweak able settings.

This commit is contained in:
WarrentyExpired 2026-08-06 11:06:05 -04:00
parent b51c58f514
commit 3045c83799
3512 changed files with 627673 additions and 0 deletions

View file

@ -0,0 +1,707 @@
using System;
using System.Collections;
using Server;
using Server.Items;
using Server.Mobiles;
using Server.Network;
using Server.Regions;
using Server.Commands;
using System.Collections.Generic;
namespace Server.Engines.Doom
{
public enum GauntletSpawnerState
{
InSequence,
InProgress,
Completed
}
public class GauntletSpawner : Item
{
public const int PlayersPerSpawn = 5;
public const int InSequenceItemHue = 0x000;
public const int InProgressItemHue = 0x676;
public const int CompletedItemHue = 0x455;
private GauntletSpawnerState m_State;
private string m_TypeName;
private BaseDoor m_Door;
private BaseAddon m_Addon;
private GauntletSpawner m_Sequence;
private List<Mobile> m_Creatures;
private Rectangle2D m_RegionBounds;
private List<BaseTrap> m_Traps;
private Region m_Region;
[CommandProperty( AccessLevel.GameMaster )]
public string TypeName
{
get{ return m_TypeName; }
set{ m_TypeName = value; }
}
[CommandProperty( AccessLevel.GameMaster )]
public BaseDoor Door
{
get{ return m_Door; }
set{ m_Door = value; }
}
[CommandProperty( AccessLevel.GameMaster )]
public BaseAddon Addon
{
get{ return m_Addon; }
set{ m_Addon = value; }
}
[CommandProperty( AccessLevel.GameMaster )]
public GauntletSpawner Sequence
{
get{ return m_Sequence; }
set{ m_Sequence = value; }
}
[CommandProperty( AccessLevel.GameMaster )]
public bool HasCompleted
{
get
{
if ( m_Creatures.Count == 0 )
return false;
for ( int i = 0; i < m_Creatures.Count; ++i )
{
Mobile mob = m_Creatures[i];
if ( !mob.Deleted )
return false;
}
return true;
}
}
[CommandProperty( AccessLevel.GameMaster )]
public Rectangle2D RegionBounds
{
get{ return m_RegionBounds; }
set{ m_RegionBounds = value; }
}
[CommandProperty( AccessLevel.GameMaster )]
public GauntletSpawnerState State
{
get{ return m_State; }
set
{
if ( m_State == value )
return;
m_State = value;
int hue = 0;
bool lockDoors = ( m_State == GauntletSpawnerState.InProgress );
switch ( m_State )
{
case GauntletSpawnerState.InSequence: hue = InSequenceItemHue; break;
case GauntletSpawnerState.InProgress: hue = InProgressItemHue; break;
case GauntletSpawnerState.Completed: hue = CompletedItemHue; break;
}
if ( m_Door != null )
{
m_Door.Hue = hue;
m_Door.Locked = lockDoors;
if ( lockDoors )
{
m_Door.KeyValue = Key.RandomValue();
m_Door.Open = false;
}
if ( m_Door.Link != null )
{
m_Door.Link.Hue = hue;
m_Door.Link.Locked = lockDoors;
if ( lockDoors )
{
m_Door.Link.KeyValue = Key.RandomValue();
m_Door.Open = false;
}
}
}
if ( m_Addon != null )
m_Addon.Hue = hue;
if ( m_State == GauntletSpawnerState.InProgress )
{
CreateRegion();
FullSpawn();
m_Timer = Timer.DelayCall( TimeSpan.FromSeconds( 1.0 ), TimeSpan.FromSeconds( 1.0 ), new TimerCallback( Slice ) );
}
else
{
ClearCreatures();
ClearTraps();
DestroyRegion();
if ( m_Timer != null )
m_Timer.Stop();
m_Timer = null;
}
}
}
private Timer m_Timer;
public List<Mobile> Creatures
{
get{ return m_Creatures; }
set{ m_Creatures = value; }
}
public List<BaseTrap> Traps
{
get{ return m_Traps; }
set{ m_Traps = value; }
}
public Region Region
{
get{ return m_Region; }
set{ m_Region = value; }
}
public virtual void CreateRegion()
{
if ( m_Region != null )
return;
Map map = this.Map;
if ( map == null || map == Map.Internal )
return;
m_Region = new GauntletRegion( this, map );
}
public virtual void DestroyRegion()
{
if ( m_Region != null )
m_Region.Unregister();
m_Region = null;
}
public virtual int ComputeTrapCount()
{
int area = m_RegionBounds.Width * m_RegionBounds.Height;
return area / 100;
}
public virtual void ClearTraps()
{
for ( int i = 0; i < m_Traps.Count; ++i )
m_Traps[i].Delete();
m_Traps.Clear();
}
public virtual void SpawnTrap()
{
Map map = this.Map;
if ( map == null )
return;
BaseTrap trap = null;
int random = Utility.Random( 100 );
if ( 22 > random )
trap = new SawTrap( Utility.RandomBool() ? SawTrapType.WestFloor : SawTrapType.NorthFloor );
else if ( 44 > random )
trap = new SpikeTrap( Utility.RandomBool() ? SpikeTrapType.WestFloor : SpikeTrapType.NorthFloor );
else if ( 66 > random )
trap = new GasTrap( Utility.RandomBool() ? GasTrapType.NorthWall : GasTrapType.WestWall );
else if ( 88 > random )
trap = new FireColumnTrap();
else
trap = new MushroomTrap();
if ( trap == null )
return;
if ( trap is FireColumnTrap || trap is MushroomTrap )
trap.Hue = 0x451;
// try 10 times to find a valid location
for ( int i = 0; i < 10; ++i )
{
int x = Utility.Random( m_RegionBounds.X, m_RegionBounds.Width );
int y = Utility.Random( m_RegionBounds.Y, m_RegionBounds.Height );
int z = this.Z;
if ( !map.CanFit( x, y, z, 16, false, false ) )
z = map.GetAverageZ( x, y );
if ( !map.CanFit( x, y, z, 16, false, false ) )
continue;
trap.MoveToWorld( new Point3D( x, y, z ), map );
m_Traps.Add( trap );
return;
}
trap.Delete();
}
public virtual int ComputeSpawnCount()
{
int playerCount = 0;
Map map = this.Map;
if ( map != null )
{
Point3D loc = GetWorldLocation();
Region reg = Region.Find( loc, map ).GetRegion( "Doom Gauntlet" );
if ( reg != null )
playerCount = reg.GetPlayerCount();
}
if ( playerCount == 0 && m_Region != null )
playerCount = m_Region.GetPlayerCount();
int count = (playerCount + PlayersPerSpawn - 1) / PlayersPerSpawn;
if ( count < 1 )
count = 1;
return count;
}
public virtual void ClearCreatures()
{
for ( int i = 0; i < m_Creatures.Count; ++i )
m_Creatures[i].Delete();
m_Creatures.Clear();
}
public virtual void FullSpawn()
{
ClearCreatures();
int count = ComputeSpawnCount();
for ( int i = 0; i < count; ++i )
Spawn();
ClearTraps();
count = ComputeTrapCount();
for ( int i = 0; i < count; ++i )
SpawnTrap();
}
public virtual void Spawn()
{
try
{
if ( m_TypeName == null )
return;
Type type = ScriptCompiler.FindTypeByName( m_TypeName, true );
if ( type == null )
return;
object obj = Activator.CreateInstance( type );
if ( obj == null )
return;
if ( obj is Item )
{
((Item)obj).Delete();
}
else if ( obj is Mobile )
{
Mobile mob = (Mobile)obj;
mob.MoveToWorld( GetWorldLocation(), this.Map );
m_Creatures.Add( mob );
}
}
catch
{
}
}
public virtual void RecurseReset()
{
if ( m_State != GauntletSpawnerState.InSequence )
{
State = GauntletSpawnerState.InSequence;
if ( m_Sequence != null && !m_Sequence.Deleted )
m_Sequence.RecurseReset();
}
}
public virtual void Slice()
{
if ( m_State != GauntletSpawnerState.InProgress )
return;
int count = ComputeSpawnCount();
for ( int i = m_Creatures.Count; i < count; ++i )
Spawn();
if ( HasCompleted )
{
State = GauntletSpawnerState.Completed;
if ( m_Sequence != null && !m_Sequence.Deleted )
{
if ( m_Sequence.State == GauntletSpawnerState.Completed )
RecurseReset();
m_Sequence.State = GauntletSpawnerState.InProgress;
}
}
}
public override string DefaultName
{
get { return "doom spawner"; }
}
[Constructable]
public GauntletSpawner() : this( null )
{
}
[Constructable]
public GauntletSpawner( string typeName ) : base( 0x36FE )
{
Visible = false;
Movable = false;
m_TypeName = typeName;
m_Creatures = new List<Mobile>();
m_Traps = new List<BaseTrap>();
}
public GauntletSpawner( Serial serial ) : base( serial )
{
}
public override void Serialize( GenericWriter writer )
{
base.Serialize( writer );
writer.Write( (int) 1 ); // version
writer.Write( m_RegionBounds );
writer.WriteItemList<BaseTrap>( m_Traps, false );
writer.Write( m_Creatures, false );
writer.Write( m_TypeName );
writer.WriteItem<BaseDoor>( m_Door );
writer.WriteItem<BaseAddon>( m_Addon );
writer.WriteItem<GauntletSpawner>( m_Sequence );
writer.Write( (int) m_State );
}
public override void Deserialize( GenericReader reader )
{
base.Deserialize( reader );
int version = reader.ReadInt();
switch ( version )
{
case 1:
{
m_RegionBounds = reader.ReadRect2D();
m_Traps = reader.ReadStrongItemList<BaseTrap>();
goto case 0;
}
case 0:
{
if ( version < 1 )
{
m_Traps = new List<BaseTrap>();
m_RegionBounds = new Rectangle2D( X - 40, Y - 40, 80, 80 );
}
m_Creatures = reader.ReadStrongMobileList();
m_TypeName = reader.ReadString();
m_Door = reader.ReadItem<BaseDoor>(); ;
m_Addon = reader.ReadItem<BaseAddon>(); ;
m_Sequence = reader.ReadItem<GauntletSpawner>();
State = (GauntletSpawnerState)reader.ReadInt();
break;
}
}
}
public static void Initialize()
{
CommandSystem.Register( "GenGauntlet", AccessLevel.Administrator, new CommandEventHandler( GenGauntlet_OnCommand ) );
}
public static void CreateTeleporter( int xFrom, int yFrom, int xTo, int yTo )
{
Static telePad = new Static( 0x1822 );
Teleporter teleItem = new Teleporter( new Point3D( xTo, yTo, -1 ), Map.Malas, false );
telePad.Hue = 0x482;
telePad.MoveToWorld( new Point3D( xFrom, yFrom, -1 ), Map.Malas );
teleItem.MoveToWorld( new Point3D( xFrom, yFrom, -1 ), Map.Malas );
teleItem.SourceEffect = true;
teleItem.DestEffect = true;
teleItem.SoundID = 0x1FE;
}
public static BaseDoor CreateDoorSet( int xDoor, int yDoor, bool doorEastToWest, int hue )
{
BaseDoor hiDoor = new MetalDoor( doorEastToWest ? DoorFacing.NorthCCW : DoorFacing.WestCW );
BaseDoor loDoor = new MetalDoor( doorEastToWest ? DoorFacing.SouthCW : DoorFacing.EastCCW );
hiDoor.MoveToWorld( new Point3D( xDoor, yDoor, -1 ), Map.Malas );
loDoor.MoveToWorld( new Point3D( xDoor + (doorEastToWest ? 0 : 1), yDoor + (doorEastToWest ? 1 : 0), -1 ), Map.Malas );
hiDoor.Link = loDoor;
loDoor.Link = hiDoor;
hiDoor.Hue = hue;
loDoor.Hue = hue;
return hiDoor;
}
public static GauntletSpawner CreateSpawner( string typeName, int xSpawner, int ySpawner, int xDoor, int yDoor, int xPentagram, int yPentagram, bool doorEastToWest, int xStart, int yStart, int xWidth, int yHeight )
{
GauntletSpawner spawner = new GauntletSpawner( typeName );
spawner.MoveToWorld( new Point3D( xSpawner, ySpawner, -1 ), Map.Malas );
if ( xDoor > 0 && yDoor > 0 )
spawner.Door = CreateDoorSet( xDoor, yDoor, doorEastToWest, 0 );
spawner.RegionBounds = new Rectangle2D( xStart, yStart, xWidth, yHeight );
if ( xPentagram > 0 && yPentagram > 0 )
{
PentagramAddon pentagram = new PentagramAddon();
pentagram.MoveToWorld( new Point3D( xPentagram, yPentagram, -1 ), Map.Malas );
spawner.Addon = pentagram;
}
return spawner;
}
public static void CreatePricedHealer( int price, int x, int y )
{
PricedHealer healer = new PricedHealer( price );
healer.MoveToWorld( new Point3D( x, y, -1 ), Map.Malas );
healer.Home = healer.Location;
healer.RangeHome = 5;
}
public static void CreateMorphItem( int x, int y, int inactiveItemID, int activeItemID, int range, int hue )
{
MorphItem item = new MorphItem( inactiveItemID, activeItemID, range );
item.Hue = hue;
item.MoveToWorld( new Point3D( x, y, -1 ), Map.Malas );
}
public static void CreateVarietyDealer( int x, int y )
{
VarietyDealer dealer = new VarietyDealer();
/* Begin outfit */
dealer.Name = "Nix";
dealer.Title = "the Variety Dealer";
dealer.Body = 400;
dealer.Female = false;
dealer.Hue = 0x8835;
List<Item> items = new List<Item>( dealer.Items );
for ( int i = 0; i < items.Count; ++i )
{
Item item = items[i];
if ( item.Layer != Layer.ShopBuy && item.Layer != Layer.ShopResale && item.Layer != Layer.ShopSell )
item.Delete();
}
dealer.HairItemID = 0x2049; // Pig Tails
dealer.HairHue = 0x482;
dealer.FacialHairItemID = 0x203E;
dealer.FacialHairHue = 0x482;
dealer.AddItem( new FloppyHat( 1 ) );
dealer.AddItem( new Robe( 1 ) );
dealer.AddItem( new LanternOfSouls() );
dealer.AddItem( new Sandals( 0x482 ) );
/* End outfit */
dealer.MoveToWorld( new Point3D( x, y, -1 ), Map.Malas );
dealer.Home = dealer.Location;
dealer.RangeHome = 2;
}
public static void GenGauntlet_OnCommand( CommandEventArgs e )
{
/* Begin healer room */
CreatePricedHealer( 5000, 387, 400 );
CreateTeleporter( 390, 407, 394, 405 );
BaseDoor healerDoor = CreateDoorSet( 393, 404, true, 0x44E );
healerDoor.Locked = true;
healerDoor.KeyValue = Key.RandomValue();
if ( healerDoor.Link != null )
{
healerDoor.Link.Locked = true;
healerDoor.Link.KeyValue = Key.RandomValue();
}
/* End healer room */
/* Begin supply room */
CreateMorphItem( 433, 371, 0x29F, 0x116, 3, 0x44E );
CreateMorphItem( 433, 372, 0x29F, 0x115, 3, 0x44E );
CreateVarietyDealer( 492, 369 );
for ( int x = 434; x <= 478; ++x )
{
for ( int y = 371; y <= 372; ++y )
{
Static item = new Static( 0x524 );
item.Hue = 1;
item.MoveToWorld( new Point3D( x, y, -1 ), Map.Malas );
}
}
/* End supply room */
/* Begin gauntlet cycle */
CreateTeleporter( 471, 428, 474, 428 );
CreateTeleporter( 462, 494, 462, 498 );
CreateTeleporter( 403, 502, 399, 506 );
CreateTeleporter( 357, 476, 356, 480 );
CreateTeleporter( 361, 433, 357, 434 );
GauntletSpawner sp1 = CreateSpawner( "DarknightCreeper", 491, 456, 473, 432, 417, 426, true, 473, 412, 39, 60 );
GauntletSpawner sp2 = CreateSpawner( "FleshRenderer", 482, 520, 468, 496, 426, 422, false, 448, 496, 56, 48 );
GauntletSpawner sp3 = CreateSpawner( "Impaler", 406, 538, 408, 504, 432, 430, false, 376, 504, 64, 48 );
GauntletSpawner sp4 = CreateSpawner( "ShadowKnight", 335, 512, 360, 478, 424, 439, false, 300, 478, 72, 64 );
GauntletSpawner sp5 = CreateSpawner( "AbysmalHorror", 326, 433, 360, 429, 416, 435, true, 300, 408, 60, 56 );
GauntletSpawner sp6 = CreateSpawner( "DemonKnight", 423, 430, 0, 0, 423, 430, true, 392, 392, 72, 96 );
sp1.Sequence = sp2;
sp2.Sequence = sp3;
sp3.Sequence = sp4;
sp4.Sequence = sp5;
sp5.Sequence = sp6;
sp6.Sequence = sp1;
sp1.State = GauntletSpawnerState.InProgress;
/* End gauntlet cycle */
/* Begin exit gate */
ConfirmationMoongate gate = new ConfirmationMoongate();
gate.Dispellable = false;
gate.Target = new Point3D( 2350, 1270, -85 );
gate.TargetMap = Map.Malas;
gate.GumpWidth = 420;
gate.GumpHeight = 280;
gate.MessageColor = 0x7F00;
gate.MessageNumber = 1062109; // You are about to exit Dungeon Doom. Do you wish to continue?
gate.TitleColor = 0x7800;
gate.TitleNumber = 1062108; // Please verify...
gate.Hue = 0x44E;
gate.MoveToWorld( new Point3D( 433, 326, 4 ), Map.Malas );
/* End exit gate */
}
}
public class GauntletRegion : BaseRegion
{
private GauntletSpawner m_Spawner;
public GauntletRegion( GauntletSpawner spawner, Map map )
: base( null, map, Region.Find( spawner.Location, spawner.Map ), spawner.RegionBounds )
{
m_Spawner = spawner;
GoLocation = spawner.Location;
Register();
}
public override void AlterLightLevel( Mobile m, ref int global, ref int personal )
{
global = 12;
}
public override void OnEnter( Mobile m )
{
}
public override void OnExit( Mobile m )
{
}
}
}

View file

@ -0,0 +1,735 @@
using System;
using Server.Spells;
using Server;
using Server.Network;
using Server.Mobiles;
using Server.Commands;
using System.Collections.Generic;
/*
this is From me to you, Under no terms, Conditions... K? to apply you
just simply Unpatch/delete, Stick these in, Same location.. Restart
*/
namespace Server.Engines.Doom
{
public class LeverPuzzleController : Item
{
private bool m_Enabled;
private static bool installed;
private UInt16 m_MyKey;
private UInt16 m_TheirKey;
private List<Item> m_Levers;
private List<Item> m_Teles;
private List<Item> m_Statues;
private List<LeverPuzzleRegion> m_Tiles;
private Mobile m_Successful;
private LampRoomBox m_Box;
private Region m_LampRoom;
private Timer m_Timer;
private Timer l_Timer;
public static void Initialize()
{
CommandSystem.Register( "GenLeverPuzzle", AccessLevel.Administrator, new CommandEventHandler( GenLampPuzzle_OnCommand ) );
}
[Usage( "GenLeverPuzzle" )]
[Description( "Generates lamp room and lever puzzle in doom." )]
public static void GenLampPuzzle_OnCommand( CommandEventArgs e )
{
foreach ( Item item in Map.Malas.GetItemsInRange( lp_Center, 0 ) )
{
if ( item is LeverPuzzleController )
{
e.Mobile.SendMessage( "Lamp room puzzle already exists: please delete the existing controller first ..." );
return;
}
}
e.Mobile.SendMessage( "Generating Lamp Room puzzle..." );
new LeverPuzzleController().MoveToWorld( lp_Center, Map.Malas );
if ( !installed )
e.Mobile.SendMessage( "There was a problem generating the puzzle." );
else
e.Mobile.SendMessage( "Lamp room puzzle successfully generated." );
}
[CommandProperty( AccessLevel.GameMaster )]
public UInt16 MyKey { get{ return m_MyKey; } set{ m_MyKey = value; } }
[CommandProperty( AccessLevel.GameMaster )]
public UInt16 TheirKey { get{ return m_TheirKey; } set{ m_TheirKey = value; } }
[CommandProperty( AccessLevel.GameMaster )]
public bool Enabled { get{ return m_Enabled; } set{ m_Enabled = value; } }
public Mobile Successful { get{ return m_Successful; } }
public bool CircleComplete
{
get /* OSI: all 5 must be occupied */
{
for (int i=0; i<5; i++)
{
if( GetOccupant( i ) == null)
{
return false;
}
}
return true;
}
}
public LeverPuzzleController() : base( 0x1822 )
{
Movable=false;
Hue=0x4c;
installed=true;
int i=0;
m_Levers = new List<Item>(); /* codes are 0x1 shifted left x # of bits, easily handled here */
for (; i<4; i++)
m_Levers.Add( AddLeverPuzzlePart( TA[i], new LeverPuzzleLever( (ushort)(1<<i), this )));
m_Tiles = new List<LeverPuzzleRegion>();
for (; i<9; i++)
m_Tiles.Add( new LeverPuzzleRegion( this, TA[i] ));
m_Teles = new List<Item>();
for (; i<15; i++)
m_Teles.Add( AddLeverPuzzlePart( TA[i], new LampRoomTeleporter( TA[++i] )));
m_Statues = new List<Item>();
for (; i<19; i++)
m_Statues.Add( AddLeverPuzzlePart( TA[i], new LeverPuzzleStatue( TA[++i], this )));
if(!installed)
Delete();
else
Enabled=true;
m_Box = (LampRoomBox)AddLeverPuzzlePart( TA[i], new LampRoomBox( this ));
m_LampRoom = new LampRoomRegion( this );
GenKey();
}
public static Item AddLeverPuzzlePart( int[] Loc, Item newitem )
{
if( newitem == null || newitem.Deleted )
{
installed=false;
}
else
{
newitem.MoveToWorld( new Point3D(Loc[0], Loc[1], Loc[2]), Map.Malas );
}
return newitem;
}
public override void OnDelete()
{
KillTimers();
base.OnDelete();
}
public override void OnAfterDelete()
{
NukeItemList( m_Teles );
NukeItemList( m_Statues );
NukeItemList( m_Levers );
if( m_LampRoom != null )
{
m_LampRoom.Unregister();
}
if ( m_Tiles != null )
{
foreach( Region region in m_Tiles )
{
region.Unregister();
}
}
if( m_Box != null && !m_Box.Deleted )
{
m_Box.Delete();
}
}
public static void NukeItemList( List<Item> list )
{
if ( list != null && list.Count != 0 )
{
foreach ( Item item in list )
{
if( item != null && !item.Deleted )
{
item.Delete();
}
}
}
}
public virtual PlayerMobile GetOccupant( int index )
{
LeverPuzzleRegion region = (LeverPuzzleRegion)m_Tiles[index];
if ( region != null )
{
if( region.Occupant != null && region.Occupant.Alive )
{
return (PlayerMobile)region.Occupant;
}
}
return null;
}
public virtual LeverPuzzleStatue GetStatue( int index )
{
LeverPuzzleStatue statue = (LeverPuzzleStatue)m_Statues[index];
if( statue != null && !statue.Deleted )
{
return statue;
}
return null;
}
public virtual LeverPuzzleLever GetLever( int index )
{
LeverPuzzleLever lever = (LeverPuzzleLever)m_Levers[index];
if( lever != null && !lever.Deleted )
{
return lever;
}
return null;
}
public virtual void PuzzleStatus( int message, string fstring )
{
for( int i=0; i<2; i++)
{
Item s;
if(( s = GetStatue( i )) != null )
{
s.PublicOverheadMessage( MessageType.Regular, 0x3B2, message, fstring );
}
}
}
public virtual void ResetPuzzle()
{
PuzzleStatus( 1062053, null );
ResetLevers();
}
public virtual void ResetLevers()
{
for(int i=0;i<4; i++)
{
Item l;
if(( l = GetLever( i )) != null )
{
l.ItemID=0x108E;
Effects.PlaySound( l.Location, Map, 0x3E8 );
}
}
TheirKey^=TheirKey;
}
public virtual void KillTimers ()
{
if ( l_Timer != null && l_Timer.Running )
{
l_Timer.Stop();
}
if ( m_Timer != null && m_Timer.Running )
{
m_Timer.Stop();
}
}
public virtual void RemoveSuccessful()
{
m_Successful=null;
}
public virtual void LeverPulled( UInt16 code )
{
int Correct=0;
Mobile m_Player;
KillTimers();
/* if one bit in each of the four nibbles is set, this is false */
if( (TheirKey=(ushort)(code|(TheirKey<<=4))) < 0x0FFF )
{
l_Timer = Timer.DelayCall( TimeSpan.FromSeconds( 30.0 ), new TimerCallback( ResetPuzzle ));
return;
}
if( !CircleComplete )
{
PuzzleStatus( 1050004, null ); // The circle is the key...
}
else
{
if( TheirKey == MyKey )
{
GenKey();
if (( m_Successful = ( m_Player=GetOccupant( 0 ))) != null )
{
SendLocationEffect( lp_Center, 0x1153, 0, 60, 1 );
PlaySounds( lp_Center, cs1 );
Effects.SendBoltEffect( m_Player, true );
m_Player.MoveToWorld( lr_Enter, Map.Malas );
m_Timer = new LampRoomTimer( this );
m_Timer.Start();
m_Enabled = false;
}
}
else
{
for(int i=0; i<16; i++) /* Count matching SET bits, ie correct codes */
{
if( (((MyKey>>i)&1)==1)&&(((TheirKey>>i)&1)==1) )
{
Correct++;
}
}
PuzzleStatus( Statue_Msg[Correct], (Correct>0) ? Correct.ToString() : null );
for (int i=0; i<5; i++)
{
if(( m_Player=GetOccupant( i )) != null )
{
Timer smash = new RockTimer( m_Player, this );
smash.Start();
}
}
}
}
ResetLevers();
}
public virtual void GenKey() /* Shuffle & build key */
{
UInt16 tmp; int n, i; ushort[] CA = { 1,2,4,8 };
for (i=0; i<4; i++)
{
n=(((n = Utility.Random(0,3))==i) ? n&~i : n ); /* if(i==n) { return pointless; } */
tmp = CA[i];
CA[i]=CA[n];
CA[n]=tmp;
}
for(i=0; i<4; MyKey=(ushort)(CA[(i++)]|(MyKey<<=4))) {}
}
public class RockTimer : Timer
{
private int Count;
private Mobile m_Player;
private LeverPuzzleController m_Controller;
public RockTimer( Mobile player, LeverPuzzleController Controller )
: base( TimeSpan.Zero, TimeSpan.FromSeconds( .25 ) )
{
Count = 0;
m_Player=player;
m_Controller = Controller;
}
private int Rock()
{
return 0x1363+Utility.Random( 0, 11 );
}
protected override void OnTick()
{
if( m_Player == null || !(m_Player.Map == Map.Malas) )
{
Stop();
}
else
{
Count++;
if ( Count == 1 ) /* TODO consolidate */
{
m_Player.Paralyze( TimeSpan.FromSeconds(2) );
Effects.SendTargetEffect( m_Player, 0x11B7, 20, 10 );
PlayerSendASCII( m_Player, 0 ); // You are pinned down ...
PlaySounds( m_Player.Location, ( !m_Player.Female ) ? fs : ms );
PlayEffect( ZAdjustedIEFromMobile( m_Player, 50 ), m_Player, 0x11B7, 20, false );
}
else if ( Count == 2 )
{
DoDamage( m_Player, 80, 90, false );
Effects.SendTargetEffect( m_Player, 0x36BD, 20, 10 );
PlaySounds( m_Player.Location, exp );
PlayerSendASCII( m_Player, 1 ); // A speeding rock ...
if( AniSafe( m_Player ))
{
m_Player.Animate( 21, 10, 1, true, true, 0 );
}
}
else if ( Count == 3 )
{
Stop();
Effects.SendTargetEffect( m_Player, 0x36B0, 20, 10 );
PlayerSendASCII( m_Player, 1 ); // A speeding rock ...
PlaySounds( m_Player.Location, ( !m_Player.Female ) ? fs2 : ms2 );
int j = Utility.Random(6,10);
for(int i=0; i<j; i++)
{
IEntity m_IEntity = new Entity( Serial.Zero, RandomPointIn( m_Player.Location, 10 ), m_Player.Map );
List<Mobile> mobiles = new List<Mobile>();
foreach( Mobile m in m_IEntity.Map.GetMobilesInRange( m_IEntity.Location, 2 ))
{
mobiles.Add( m );
}
for( int k=0; k<mobiles.Count; k++ )
{
if( IsValidDamagable( mobiles[k] ) && mobiles[k] != m_Player )
{
PlayEffect( m_Player, mobiles[k], Rock(), 8, true );
DoDamage( mobiles[k], 25, 30, false );
if( mobiles[k].Player )
{
POHMessage( mobiles[k], 2 ); // OUCH!
}
}
}
PlayEffect( m_Player, m_IEntity, Rock(), 8, false );
}
}
}
}
}
public class LampRoomKickTimer : Timer
{
private Mobile m;
public LampRoomKickTimer( Mobile player )
: base( TimeSpan.FromSeconds( .25 ) )
{
m = player;
}
protected override void OnTick()
{
MoveMobileOut( m );
}
}
public class LampRoomTimer : Timer
{
public LeverPuzzleController m_Controller;
public int ticks;
public int level;
public LampRoomTimer( LeverPuzzleController controller )
: base( TimeSpan.FromSeconds( 5.0 ), TimeSpan.FromSeconds( 5.0 ) )
{
level=0;
ticks=0;
m_Controller = controller;
}
protected override void OnTick()
{
ticks++;
List<Mobile> mobiles = m_Controller.m_LampRoom.GetMobiles();
if ( ticks >= 71 || m_Controller.m_LampRoom.GetPlayerCount() == 0 )
{
foreach ( Mobile mobile in mobiles )
{
if( mobile != null && !mobile.Deleted && !mobile.IsDeadBondedPet )
{
mobile.Kill();
}
}
m_Controller.Enabled=true;
Stop();
}
else
{
if ( ticks % 12 == 0 )
{
level++;
}
foreach ( Mobile mobile in mobiles )
{
if ( IsValidDamagable( mobile ) )
{
if ( ticks % 2 == 0 && level == 5 )
{
if ( mobile.Player )
{
mobile.Say( 1062092 );
if( AniSafe( mobile ))
{
mobile.Animate( 32, 5, 1, true, false, 0 );
}
}
DoDamage( mobile, 15, 20, true );
}
if ( Utility.Random( (int)(level & ~0xfffffffc), 3) == 3 )
{
mobile.ApplyPoison( mobile, PA2[level] );
}
if ( ticks % 12 == 0 && level > 0 && mobile.Player )
{
mobile.SendLocalizedMessage( PA[level][0], null, PA[level][1] );
}
}
}
for( int i=0; i<=level; i++ )
{
SendLocationEffect( RandomPointIn( lr_Rect, -1 ), 0x36B0, Utility.Random( 150, 200 ), 0, PA[level][2] );
}
}
}
}
private static bool IsValidDamagable( Mobile m )
{
if ( m != null && !m.Deleted )
{
if( m.Player && m.Alive )
{
return true;
}
if( m is BaseCreature )
{
BaseCreature bc=(BaseCreature)m;
if ( ( bc.Controlled || bc.Summoned ) && !bc.IsDeadBondedPet )
{
return true;
}
}
}
return false;
}
public static void MoveMobileOut( Mobile m )
{
if ( m != null )
{
if( m is PlayerMobile && !m.Alive )
{
if( m.Corpse != null && !m.Corpse.Deleted )
{
m.Corpse.MoveToWorld( lr_Exit, Map.Malas );
}
}
BaseCreature.TeleportPets( m, lr_Exit, Map.Malas );
m.Location = lr_Exit;
m.ProcessDelta();
}
}
public static bool AniSafe( Mobile m )
{
return ( m != null && !TransformationSpellHelper.UnderTransformation( m ) && m.BodyMod == 0 && m.Alive );
}
public static IEntity ZAdjustedIEFromMobile( Mobile m, int ZDelta )
{
return new Entity( Serial.Zero, new Point3D( m.X, m.Y, m.Z+ZDelta ), m.Map );
}
public static void DoDamage( Mobile m, int min, int max, bool poison )
{
if ( m != null && !m.Deleted && m.Alive )
{
int damage = Utility.Random(min,max);
AOS.Damage( m, damage,(poison) ? 0 : 100 , 0, 0,(poison) ? 100 : 0, 0 );
}
}
public static Point3D RandomPointIn( Point3D point, int range )
{
return RandomPointIn( point.X-range, point.Y-range, range*2, range*2, point.Z );
}
public static Point3D RandomPointIn( Rectangle2D rect, int z )
{
return RandomPointIn( rect.X, rect.Y, rect.Height, rect.Width, z );
}
public static Point3D RandomPointIn( int x, int y, int x2, int y2, int z )
{
return new Point3D( Utility.Random( x, x2 ), Utility.Random( y, y2 ), z );
}
public static void PlaySounds( Point3D location, int[] sounds )
{
foreach( int soundid in sounds )
Effects.PlaySound( location, Map.Malas, soundid );
}
public static void PlayEffect( IEntity from, IEntity to, int itemid, int speed, bool explodes )
{
Effects.SendMovingParticles( from, to, itemid, speed, 0, true, explodes, 2, 0, 0 );
}
public static void SendLocationEffect( IPoint3D p, int itemID, int speed, int duration, int hue )
{
Effects.SendPacket( p, Map.Malas, new LocationEffect( p, itemID, speed, duration, hue, 0 ) );
}
public static void PlayerSendASCII( Mobile player, int index )
{
player.Send( new AsciiMessage( Serial.MinusOne, 0xFFFF, MessageType.Label, MsgParams[index][0], MsgParams[index][1], null, Msgs[index] ));
}
/* I cant find any better way to send "speech" using fonts other than default */
public static void POHMessage( Mobile from, int index )
{
Packet p = new AsciiMessage( from.Serial, from.Body, MessageType.Regular, MsgParams[index][0], MsgParams[index][1], from.Name, Msgs[index] );
p.Acquire();
foreach( NetState state in from.Map.GetClientsInRange( from.Location ) )
state.Send( p );
Packet.Release( p );
}
public static string[] Msgs =
{
"You are pinned down by the weight of the boulder!!!", // 0
"A speeding rock hits you in the head!", // 1
"OUCH!" // 2
};
/* font&hue for above msgs. index matches */
public static int[][] MsgParams =
{
new int[]{ 0x66d, 3 },
new int[]{ 0x66d, 3 },
new int[]{ 0x34, 3 }
};
/* World data for items */
public static int[][] TA =
{
new int[]{316, 64, 5}, /* 3D Coords for levers */
new int[]{323, 58, 5},
new int[]{332, 63, 5},
new int[]{323, 71, 5},
new int[]{324, 64}, /* 2D Coords for standing regions */
new int[]{316, 65},
new int[]{324, 58},
new int[]{332, 64},
new int[]{323, 72},
new int[]{468, 92, -1}, new int[]{0x181D, 0x482}, /* 3D coord, itemid+hue for L.R. teles */
new int[]{469, 92, -1}, new int[]{0x1821, 0x3fd},
new int[]{470, 92, -1}, new int[]{0x1825, 0x66d},
new int[]{319, 70, 18}, new int[]{0x12d8}, /* 3D coord, itemid for statues */
new int[]{329, 60, 18}, new int[]{0x12d9},
new int[]{469, 96, 6} /* 3D Coords for Fake Box */
};
/* CLILOC data for statue "correct souls" messages */
public static int[] Statue_Msg = { 1050009, 1050007, 1050008, 1050008 };
/* Exit & Enter locations for the lamp room */
public static Point3D lr_Exit = new Point3D( 353, 172, -1 );
public static Point3D lr_Enter = new Point3D( 467, 96, -1 );
/* "Center" location in puzzle */
public static Point3D lp_Center = new Point3D( 324, 64, -1 );
/* Lamp Room Area */
public static Rectangle2D lr_Rect = new Rectangle2D( 465, 92, 10, 10 );
/* Lamp Room area Poison message data */
public static int[][] PA =
{
new int[]{ 0, 0, 0xA6 },
new int[]{ 1050001, 0x485, 0xAA },
new int[]{ 1050003, 0x485, 0xAC },
new int[]{ 1050056, 0x485, 0xA8 },
new int[]{ 1050057, 0x485, 0xA4 },
new int[]{ 1062091, 0x23F3, 0xAC }
};
public static Poison[] PA2 =
{
Poison.Lesser,
Poison.Regular,
Poison.Greater,
Poison.Deadly,
Poison.Lethal,
Poison.Lethal
};
/* SOUNDS */
private static int[] fs={0x144, 0x154};
private static int[] ms={0x144, 0x14B};
private static int[] fs2={0x13F, 0x154};
private static int[] ms2={0x13F, 0x14B};
private static int[] cs1={0x244};
private static int[] exp={0x307};
public LeverPuzzleController( Serial serial ) : base( serial )
{
}
public override void Serialize( GenericWriter writer )
{
base.Serialize( writer );
writer.Write( (int) 0 ); // version
writer.WriteItemList( m_Levers, true );
writer.WriteItemList( m_Statues, true );
writer.WriteItemList( m_Teles, true );
writer.Write( m_Box );
}
public override void Deserialize( GenericReader reader )
{
base.Deserialize( reader );
int version = reader.ReadInt();
m_Levers = reader.ReadStrongItemList();
m_Statues = reader.ReadStrongItemList();
m_Teles = reader.ReadStrongItemList();
m_Box = reader.ReadItem() as LampRoomBox;
m_Tiles = new List<LeverPuzzleRegion>();
for (int i = 4; i<9; i++)
m_Tiles.Add( new LeverPuzzleRegion( this, TA[i] ));
m_LampRoom = new LampRoomRegion( this );
m_Enabled = true;
m_TheirKey = 0;
m_MyKey = 0;
GenKey();
}
}
}

View file

@ -0,0 +1,201 @@
using System;
using System.Collections;
using Server;
using Server.Spells;
using Server.Mobiles;
using Server.Network;
namespace Server.Engines.Doom
{
public class LampRoomBox : Item
{
private LeverPuzzleController m_Controller;
private Mobile m_Wanderer;
public LampRoomBox( LeverPuzzleController controller ) : base( 0xe80 )
{
m_Controller = controller;
ItemID = 0xe80;
Movable = false;
}
public override void OnDoubleClick( Mobile m )
{
if ( !m.InRange( this.GetWorldLocation(), 3 ) )
return;
if ( m_Controller.Enabled )
return;
if ( (m_Wanderer == null || !m_Wanderer.Alive) )
{
m_Wanderer = new WandererOfTheVoid();
m_Wanderer.MoveToWorld( LeverPuzzleController.lr_Enter, Map.Malas );
m_Wanderer.PublicOverheadMessage( MessageType.Regular, 0x3B2, 1060002, "" ); // I am the guardian of...
Timer.DelayCall( TimeSpan.FromSeconds( 5.0 ), new TimerCallback( CallBackMessage ) );
}
}
public void CallBackMessage()
{
PublicOverheadMessage( MessageType.Regular, 0x3B2, 1060003, "" ); // You try to pry the box open...
}
public override void OnAfterDelete()
{
if( m_Controller!=null && !m_Controller.Deleted )
m_Controller.Delete();
}
public LampRoomBox( Serial serial ) : base( serial )
{
}
public override void Serialize( GenericWriter writer )
{
base.Serialize( writer );
writer.Write( (int) 0 ); // version
writer.Write( m_Controller );
}
public override void Deserialize( GenericReader reader )
{
base.Deserialize( reader );
int version = reader.ReadInt();
m_Controller = reader.ReadItem() as LeverPuzzleController;
}
}
public class LeverPuzzleStatue : Item
{
private LeverPuzzleController m_Controller;
public LeverPuzzleStatue( int[] dat, LeverPuzzleController controller ) : base( dat[0] )
{
m_Controller=controller;
Hue = 0x44E;
Movable = false;
}
public override void OnAfterDelete()
{
if( m_Controller!=null && !m_Controller.Deleted )
m_Controller.Delete();
}
public LeverPuzzleStatue( Serial serial ) : base( serial )
{
}
public override void Serialize( GenericWriter writer )
{
base.Serialize( writer );
writer.Write( (int) 0 ); // version
writer.Write( m_Controller );
}
public override void Deserialize( GenericReader reader )
{
base.Deserialize( reader );
int version = reader.ReadInt();
m_Controller = reader.ReadItem() as LeverPuzzleController;
}
}
public class LeverPuzzleLever : Item
{
private UInt16 m_Code;
private LeverPuzzleController m_Controller;
[CommandProperty( AccessLevel.GameMaster )]
public UInt16 Code
{
get{ return m_Code; }
}
public LeverPuzzleLever( UInt16 code, LeverPuzzleController controller ) : base( 0x108E )
{
m_Controller=controller;
m_Code = code;
Hue = 0x66D;
Movable = false;
}
public override void OnDoubleClick( Mobile m )
{
if ( m != null && m_Controller.Enabled )
{
ItemID^=2;
Effects.PlaySound( Location, Map, 0x3E8 );
m_Controller.LeverPulled( m_Code );
}
else
{
m.SendLocalizedMessage( 1060001 ); // You throw the switch, but the mechanism cannot be engaged again so soon.
}
}
public override void OnAfterDelete()
{
if( m_Controller != null && !m_Controller.Deleted )
m_Controller.Delete();
}
public LeverPuzzleLever( Serial serial ) : base( serial )
{
}
public override void Serialize( GenericWriter writer )
{
base.Serialize( writer );
writer.Write( (int) 0 ); // version
writer.Write( (ushort) m_Code );
writer.Write( m_Controller );
}
public override void Deserialize( GenericReader reader )
{
base.Deserialize( reader );
int version = reader.ReadInt();
m_Code = reader.ReadUShort();
m_Controller = reader.ReadItem() as LeverPuzzleController;
}
}
[TypeAlias( "Server.Engines.Doom.LampRoomTelePorter" )]
public class LampRoomTeleporter : Item
{
public LampRoomTeleporter( int[] dat )
{
Hue = dat[1];
ItemID = dat[0];
Movable = false;
}
public override bool HandlesOnMovement { get { return true; } }
public override bool OnMoveOver( Mobile m )
{
if( m != null && m is PlayerMobile )
{
if ( SpellHelper.CheckCombat( m ) )
{
m.SendLocalizedMessage( 1005564, "", 0x22 ); // Wouldst thou flee during the heat of battle??
}
else
{
Server.Mobiles.BaseCreature.TeleportPets( m, LeverPuzzleController.lr_Exit, Map.Malas );
m.MoveToWorld( LeverPuzzleController.lr_Exit, Map.Malas );
return false;
}
}
return true;
}
public LampRoomTeleporter( Serial serial ) : base( serial )
{
}
public override void Serialize( GenericWriter writer )
{
base.Serialize( writer );
writer.Write( (int) 0 ); // version
}
public override void Deserialize( GenericReader reader )
{
base.Deserialize( reader );
int version = reader.ReadInt();
}
}
}

View file

@ -0,0 +1,127 @@
using System;
using Server;
using Server.Mobiles;
using Server.Regions;
namespace Server.Engines.Doom
{
public class LampRoomRegion : BaseRegion
{
private LeverPuzzleController Controller;
public LampRoomRegion ( LeverPuzzleController controller )
: base( null, Map.Malas, Region.Find( LeverPuzzleController.lr_Enter, Map.Malas ), LeverPuzzleController.lr_Rect )
{
Controller = controller;
Register();
}
public static void Initialize()
{
EventSink.Login += new LoginEventHandler( OnLogin );
}
public static void OnLogin( LoginEventArgs e )
{
Mobile m = e.Mobile;
Rectangle2D rect = LeverPuzzleController.lr_Rect;
if ( m.X >= rect.X && m.X <= (rect.X+10) && m.Y >= rect.Y && m.Y <= (rect.Y+10) && m.Map == Map.Internal )
{
Timer kick = new LeverPuzzleController.LampRoomKickTimer( m );
kick.Start();
}
}
public override void OnEnter( Mobile m )
{
if ( m == null || m is WandererOfTheVoid )
return;
if ( m.AccessLevel > AccessLevel.Player )
return;
if ( Controller.Successful != null )
{
if ( m is PlayerMobile )
{
if ( m == Controller.Successful )
{
return;
}
}
else if ( m is BaseCreature )
{
BaseCreature bc = (BaseCreature)m;
if(( bc.Controlled && bc.ControlMaster == Controller.Successful ) || bc.Summoned )
{
return;
}
}
}
Timer kick = new LeverPuzzleController.LampRoomKickTimer( m );
kick.Start();
}
public override void OnExit( Mobile m )
{
if( m != null && m == Controller.Successful )
Controller.RemoveSuccessful();
}
public override void OnDeath( Mobile m )
{
if( m != null && !m.Deleted && !(m is WandererOfTheVoid) )
{
Timer kick = new LeverPuzzleController.LampRoomKickTimer( m );
kick.Start();;
}
}
public override bool OnSkillUse( Mobile m, int Skill ) /* just in case */
{
if (( Controller.Successful == null ) || ( m.AccessLevel == AccessLevel.Player && m != Controller.Successful ))
{
return false;
}
return true;
}
}
public class LeverPuzzleRegion : BaseRegion
{
private LeverPuzzleController Controller;
public Mobile m_Occupant;
[CommandProperty( AccessLevel.GameMaster )]
public Mobile Occupant
{
get
{
if ( m_Occupant != null && m_Occupant.Alive )
return m_Occupant;
return null;
}
}
public LeverPuzzleRegion ( LeverPuzzleController controller, int[] loc )
: base( null, Map.Malas, Region.Find( LeverPuzzleController.lr_Enter, Map.Malas ), new Rectangle2D(loc[0],loc[1],1,1) )
{
Controller = controller;
Register();
}
public override void OnEnter( Mobile m )
{
if( m != null && m_Occupant == null && m is PlayerMobile && m.Alive )
m_Occupant = m;
}
public override void OnExit( Mobile m )
{
if( m != null && m == m_Occupant )
m_Occupant = null;
}
}
}