ZDoom

Code: Select all

ACTOR SupportBeacon : Inventory replaces Berserk
  {
    Health 5
    Radius 16
    Height 16
    Inventory.MaxAmount 3
    +INVENTORY.INVBAR
    +INVENTORY.BIGPOWERUP
    Inventory.Icon "STINV01"
    Inventory.usesound "weapons/grenthrow"
    Tag "Support Beacon"
    Inventory.PickupMessage "You picked up the Support Beacon."

    States
    {
    Spawn:
      PTRB A -1
    Use:
      PTRB A 1 A_CustomMissile("Ext-Spawner",1,1,1)
      PTRB A 160
    Death:
      PTRB A 1
      Stop
  }
}

 ACTOR Ext-Spawner
{
  Radius 23
  Height 12
  Mass 60
   +NOTARGET
   +ISMONSTER
   +FRIENDLY
   +DROPOFF
   +MISSILE
   +WINDTHRUST
   +PUSHABLE
   +CANBOUNCEWATER
  States
  {
    Spawn:
      PTRB A 1
      Loop
    Death:
      TELX A 0 BRIGHT A_PlaySound("WLIceShot/icechargeup")
      TELX A 2 BRIGHT A_SetTranslucent(0.4)
      TELX B 2 BRIGHT A_SetTranslucent(0.5)
      TELX C 2 BRIGHT A_SetTranslucent(0.6)
      TELX D 2 BRIGHT 
      TELX E 2 BRIGHT 
      TELX F 2 BRIGHT 
      TELX G 6 
      TELX H 1 A_SpawnItem("ExtBuddy",0,1)
     Stop
   }
}

Code: Select all

ACTOR Cocktail
{
     Obituary "%o burned to death from %k's molotov cocktail."
     height 8
     radius 10
     damage 8
     speed 25
     ExplosionRadius 80
     ExplosionDamage 50
     deathsound "weapons/molotovexplode"
     PROJECTILE
     +GRENADETRAIL
     +FIREDAMAGE
     +RANDOMIZE
     -NOGRAVITY
   states
{
   Spawn:
      MCCK A 0 BRIGHT ThrustThingZ(0,5,0,1)
      MCCK ABCDE 2 BRIGHT
      loop
   Death:
      EXPL A 0 BRIGHT A_AlertMonsters
     EXPL A 0 BRIGHT A_Explode
     FIRD A 0 A_SpawnItemEx("MolotovFire", 0, 0, 0, 3, 3, 0, random (0, 360), 0)
     FIRD A 0 A_SpawnItemEx("MolotovFire", 0, 0, 0, 3, 3, 0, random (0, 360), 0)
     FIRD A 0 A_SpawnItemEx("MolotovFire", 0, 0, 0, 3, 3, 0, random (0, 360), 0)
     FIRD A 0 A_CustomMissile("MolotovFire",0,random (-60, 60),0)
     FIRD A 0 A_CustomMissile("MolotovFire",0,random (-40, 40),0)
     FIRD A 0 A_CustomMissile("MolotovFire",0,random (-20, 20),0)
     FIRD A 0 A_CustomMissile("MolotovFire",0,random (-40, 40),0)
     FIRD A 0 A_CustomMissile("MolotovFire",0,random (-20, 20),0)
     FIRD A 0 A_CustomMissile("MolotovFire",0,random (-40, 40),0)
     FIRD A 0 A_CustomMissile("MolotovFire",0,random (-60, 60),0)
     FIRD A 0 A_CustomMissile("MolotovFire",0,random (-80, 80),0)
     FIRD A 0 A_SpawnItemEx("MolotovFire", 0, 0, 0, 3, 3, 0, random (0, 360), 0)
     FIRD A 0 A_SpawnItemEx("MolotovFire", 0, 0, 0, 3, 3, 0, random (0, 360), 0)
     FIRD A 0 A_SpawnItemEx("MolotovFire", 0, 0, 0, 3, 3, 0, random (0, 360), 0)
      EXPL ABCDEF 1 BRIGHT A_EXPLODE
      EXPL GHIJKL 1 BRIGHT A_EXPLODE
      EXPL MNOP 1 BRIGHT
      EXPL QRSTUVW 1
      stop
    }
}

ACTOR MolotovFire
{
    Obituary "%o got too close to %k's flames."
    height 10
    radius 20
    damage 10
    scale 0.7
    seesound "weapons/fire"
    ExplosionDamage 8
    ExplosionRadius 35
    +MISSILE
    +FIREDAMAGE
    -FloorHugger
    +RANDOMIZE
    -NOGRAVITY
   states
{
   Spawn:
    FIRD A 0 BRIGHT A_Wander
    FIRD ABC 2 BRIGHT A_Explode
    FIRD ABC 2 BRIGHT A_Explode
    FIRD ABC 2 BRIGHT A_Explode
    FIRD ABC 2 BRIGHT A_Explode
    FIRD ABC 2 BRIGHT A_Explode
    FIRD A 0 BRIGHT A_Stop
    FIRD ABC 2 BRIGHT A_Explode
    FIRD ABC 2 BRIGHT A_Explode
    FIRD ABC 2 BRIGHT A_Explode
    FIRD ABC 2 BRIGHT A_Explode
    FIRD ABC 2 BRIGHT A_Explode
    FIRD ABC 2 BRIGHT A_Explode
    FIRD DEF 2 BRIGHT A_Explode
    FIRD GHIJKL 2 BRIGHT A_Explode
    FIRD MNO 2 BRIGHT
    stop
   }
}