An example of how a monster in Doom can fear from radiation

actor  ToughBandit
{
obituary "%o cannot fight or stay back for longer from a tough bandit"
  hitobituary "%o was rocked like hell by e tough bandit."
  health 300
  radius 12
  height 50
  meleedamage 2
  meleesound "flyhit"
  mass 999
  SCALE 0.5
  speed 10
  DamageFactor Radiation ,1.0
  DamageFactor Fire, 1.3
  DamageFactor Poison, 1.5
  DamageFactor Electric, 5.0
  painchance 100
  PainChance "Radiation",60
  PainChance "Fire", 50
  PainChance "Electric", 70
  Painchance "Poison", 60
  seesound "crack/pain"
  painsound "crack/pain"
  deathsound "crack/death"
  activesound "crack/active"
  MONSTER
  +FLOORCLIP
  +friendly
  +QUICKTORETALIATE
  +noinfighting
  states
  {
  Spawn:
    CHHH A 0
    CHHH A 0 A_JumpIfInventory ("WeedAmmo", 1, 2)
    SCUM A 0
    SCUM A 0 A_JumpifInventory ("HeadToken", 1, 3)
    SCUM A 0 A_GiveInventory ("HeadToken", 1)
    SCUM A 0 A_Gravity
    CHHH A 0 A_Look
    CHHH A 4 A_Wander
    CHHH A 0 A_Look
    CHHH B 4 A_Wander
    CHHH A 0 A_Look
    CHHH C 4 A_Wander
    CHHH A 0 A_Look
    CHHH D 4 A_Wander
    CHHH A 0 A_Look
    goto Spawn +3
  See:
    SCUM A 0 A_CheckFLag("FRIGHTENED","SafeNow")
    SCUM A 0 A_JumpifInventory ("HeadToken", 1, 3)
    SCUM A 0 A_GiveInventory ("HeadToken", 1)
    CHHH A 0 A_Gravity
    CHHH AABBCCDD 3 A_Chase
    loop
  SafeNow:
  SCUM A 0 A_ChangeFlag("Frightened",0)
  goto See
  Melee:
    JJJJ A 0
    JJJJ A 0 A_Jump (240, 2)
    JJJJ A 0 A_TakeFromTarget ("BasicArmor", 300)
    goto Melee2
    JJJJ A 0
    JJJJ A 0 A_Jump (175, 2)
    JJJJ A 0 A_TakeFromTarget ("BasicArmor", 150)
    goto Melee2
    JJJJ A 0
    JJJJ A 0 A_Jump (175, 2)
    JJJJ A 0 A_TakeFromTarget ("RedTrench", 50)
    goto Melee2
    JJJJ A 0
    JJJJ A 0 A_Jump (175, 2)
    JJJJ A 0 A_TakeFromTarget ("BlueTrench", 50)
    goto Melee2
    JJJJ A 0
    JJJJ A 0 A_Jump (175, 2)
    JJJJ A 0 A_TakeFromTarget ("GreenTrench", 50)
    goto Melee2
    JJJJ A 0
    JJJJ A 0 A_Jump (75, 2)
    JJJJ A 0 A_TakeFromTarget ("RedTrench", 25)
    goto Melee2
    JJJJ A 0
    JJJJ A 0 A_Jump (75, 2)
    JJJJ A 0 A_TakeFromTarget ("GreenTrench", 25)
    goto Melee2
    JJJJ A 0
    JJJJ A 0 A_Jump (75, 2)
    JJJJ A 0 A_TakeFromTarget ("BlueTrench", 25)
    goto Melee2
    JJJJ A 0
    JJJJ A 0 A_Jump (35, 2)
    JJJJ A 0 A_TakeFromTarget ("RedTrench", 10)
    goto Melee2
    JJJJ A 0
    JJJJ A 0 A_Jump (35, 2)
    JJJJ A 0 A_TakeFromTarget ("GreenTrench", 10)
    goto Melee2
    JJJJ A 0
    JJJJ A 0 A_Jump (35, 2)
    JJJJ A 0 A_TakeFromTarget ("BlueTrench", 10)
  Melee2:
    JJJJ A 0
    JJJJ A 0 A_Jump (230, 3)
    JJJJ A 0 A_TakeFromTarget ("PowerKevlarHelmetJizz", 1)
    JJJJ A 0 A_TakeFromTarget ("HelmetToken", 1)
    CHAT AA 6 A_FaceTarget
    CHAT B 6 A_MeleeAttack
    CHAT CC 6
    goto See
  Pain:
    CHHH B 2
    CHHH B 2 A_Pain
    goto See
  Pain.Fire:
    CRCK A 0
    CHHH B 2 A_GiveInventory ("FireCounter", 9)
    CHHH B 2
    CHHH B 4 A_Pain
    goto See
  Pain.Radiation:
    CRCK A 0
	CHHH B 2 A_Pain
	CHHH B 2 A_Pain
	goto RunForYourLife
  RunForYourLife:
	 CHHH B 0 A_ChangeFlag("FRIGHTENED",1)
	 goto See
  Missile:
    CHAT AA 6 A_FaceTarget
    CHAT B 6
    CHAT C 12 A_CustomMissile (Rockball, 55, 0, 0, 4)
    goto See
  Death:
    LNUG A 0 A_TakeInventory ("HeadToken", 1)
    BTCH A 0 A_GiveToTarget ("Experions", 15)
    JJJJ A 0 A_Jump (128, "Death2")
    CHDI A 3 A_Scream
    CHDI BCDEFGHI 3
    CHDI J   5 A_NoBlocking
    CHDI K   4 A_TakeInventory ("FireCounter", 9999)
    CHDI L   -1
    stop
  Death2:
    CRDI A 3 A_Scream
    CRDI BCDEFGHI 3
    CRDI J   5 A_NoBlocking
    CRDI K   4 A_TakeInventory ("FireCounter", 9999)
    CRDI L   -1
    stop
  Death.Poison:
    LNUG A 0 A_TakeInventory ("HeadToken", 1)
    BTCH A 0 A_GiveToTarget ("Experions", 15)
    JJJJ A 0 A_Jump (128, "Death2")
    CHDI A 6 A_Scream
    CHDI BCDEFGHI 3
    CHDI J   5 A_NoBlocking
    CHDI K   4 A_TakeInventory ("FireCounter", 9999)
    CHDI L   -1
    stop
  Death.Fire2:
  Death.Fire:
    LNUG A 0 A_TakeInventory ("HeadToken", 1)
    BTCH A 0 A_GiveToTarget ("Experions", 15)
    JJJJ A 0 A_PlaySound ("FlameDie")
    FIDT A 7 bright A_TakeInventory ("FireCounter", 9999)
    FIDT B 7 bright A_Scream
    FIDT C 7 bright A_NoBlocking
    FIDT D 7 bright
    JJJJ A 0 A_SpawnItem ("SmallFireDeathActor")
    JJJJ A -1
    Stop
  XDeath:
    LNUG A 0 A_TakeInventory ("HeadToken", 1)
    BTCH A 0 A_GiveToTarget ("Experions", 15)
    JJJJ A 0 A_Jump (128, "XDeath2")
    CGIB A 4 A_SpawnItemEx ("GibShit")
    CGIB B 4 A_TakeInventory ("FireCounter", 9999)
    CGIB C 4
    CGIB D 4 A_NoBlocking
    CGIB EFG 4
    CGIB H -1
    stop
  XDeath2:
    CGBB A 4 A_SpawnItemEx ("GibShit")
    CGBB B 4 A_TakeInventory ("FireCounter", 9999)
    CGBB C 4
    CGBB D 4 A_NoBlocking
    CGBB EFG 4
    CGBB H -1
    stop
  }
}



actor BanditSpawner:RandomSpawner Replaces Zombieman
{
  DropItem "ToughBandit" ,100
  DropItem "FatBandit",100
  DropItem "pissingbandit",100
  DropItem "Psycho",100
  DropItem "StealthPsycho",100
}


actor Rockball
{
  radius 6
  height 16
  speed 20
  mass 5
  damage 3
  PROJECTILE
  +DOOMBOUNCE
  +THRUGHOST
  states
  {
  Spawn:
    ROKK A 10
   goto Death
  Death:
    ROKK A 175 A_Gravity
    ROBU ABC 2
    stop
    }
}