marrub
/
Lithia
Archived
1
0
Fork 0
This repository has been archived on 2023-06-17. You can view files and clone it, but cannot push or open issues/pull-requests.
Lithia/pksrc/lscripts/Rain.dec

100 lines
2.1 KiB
Plaintext

// Effects taken from Realm667.
// I think Tormenter made these originally, sorry if that's incorrect.
actor Lith_RainDrop
{
Height 2
Radius 2
XScale 0.5
YScale 2.0
RenderStyle "Add"
Alpha 0.25
+NOTRIGGER
+NOBLOCKMAP
+DROPOFF
+NOTELEPORT
+NOTIMEFREEZE
+NOGRAVITY
+DONTSPLASH
states
{
Spawn:
RNDR A 0 nodelay A_ChangeVelocity(frandom(-2, 2), frandom(-2, 2), frandom(-12, -16), CVF_REPLACE)
Looping:
RNDR A 1 A_JumpIf(waterlevel > 0 || velz == 0, "Death")
loop
Death:
RNDR A 0 A_SetScale(1, 1)
RNDR A 0 A_ChangeVelocity(0, 0, 0, CVF_REPLACE)
RNDR BCDEFGH 3 A_FadeOut(0.0375)
stop
}
}
actor Lith_BloodRainDrop : Lith_RainDrop
{
RenderStyle "Subtract"
Alpha 0.5
Translation "80:111=[0,64,64]:[0,128,128]"
}
actor Lith_RainDropSpawner
{
+NOTIMEFREEZE
states
{
Spawn:
TNT1 A 0
TNT1 A 0 A_JumpIf(!CallACS("Lith_RainDropSpawn"), "Nope")
TNT1 A 0 A_Jump(256, "DoThing")
DoThing:
TNT1 A 0 A_SpawnItemEx("Lith_RainDrop")
stop
Nope:
TNT1 A 0
stop
}
}
actor Lith_BloodRainDropSpawner : Lith_RainDropSpawner
{
states
{
DoThing:
TNT1 A 0 A_SpawnItemEx("Lith_BloodRainDrop")
stop
}
}
actor Lith_SpawnRain : Lith_CustomFunction
{
states
{
Pickup:
TNT1 AAAAAAAAAAAAAAAAAAAAAAAAAAA 0 A_SpawnItemEx("Lith_RainDropSpawner",
frandom(16, 1024), 0, frandom(256,512), 0, 0, 0, frandom(0, 360), 128)
TNT1 AAAAAAA 0 A_SpawnItemEx("Lith_RainDropSpawner",
frandom(512, 1536), 0, frandom(256,512), 0, 0, 0, frandom(-90, 90), 128)
stop
}
}
actor Lith_SpawnBloodRain : Lith_CustomFunction
{
states
{
Pickup:
TNT1 AAAAAAAAAAAAAAAAAAAAAAAAAAA 0 A_SpawnItemEx("Lith_BloodRainDropSpawner",
frandom(16, 1024), 0, frandom(256,512), 0, 0, 0, frandom(0, 360), 128)
TNT1 AAAAAAA 0 A_SpawnItemEx("Lith_BloodRainDropSpawner",
frandom(512, 1536), 0, frandom(256,512), 0, 0, 0, frandom(-90, 90), 128)
stop
}
}
// EOF