Joined: Fri Dec 19 2003 Location: Scotland Posts: 4651
This WAC will choose from 4 different types of rain, from clear to light rain to heavy rain and a full blown thunder storm. Also adjusts the cloud cover, wind and sky speed so it looks the part.
if past(60) and eq(v5, 0) and never then wind(12,327) rain(2, 30) overcast(5,30) skyspeed(30) endif
If elapse(90) and random(5) then dornd rain(30, 30) // Light Rain wind(22,327) overcast(50,30) skyspeed(36) set(v1, 1) next rain(100, 30) // Thunder Storm wind(33,327) overcast(100,30) skyspeed(50) set(v1, 2) next rain(60, 30) // Rain Storm wind(26,327) overcast(70,30) skyspeed(38) set(v1, 3) next rain(0, 30) // Clear wind(7,327) overcast(0,30) skyspeed(33) set(v1, 4) enddo endif
if eq(v1, 1) and elapse(30) then // Light Rain if random(5) then farflash() wave("thdrdst3.wav", 100) endif endif if chain(9) then if random(6) then farflash() wave("thdrdst4.wav", 100) endif farflash() endif
if eq(v1, 2) and elapse(30) then // Thunder Storm if random(2) then flash() wave("thdrcrk1.wav", 100) flash() if random(3) then wave("gustb_6.wav", 100) endif flash() endif flash() farflash() endif if chain(6) then if random(3) then flash() flash() flash() wave("thdrdst4.wav", 100) if random(2) then wave("gustb_6.wav", 60) endif endif farflash() flash() endif
if eq(v1, 3) and elapse(30) then // Rain Storm if random(4) then farflash() flash() wave("thdrcrk4.wav", 200) endif flash() endif if chain (6) then if random(6) then flash() farflash() wave("thdrcrk4.wav", 50) endif farflash() endif
if eq(v1, 4) and elapse(50) then // Clear if random(10) then farflash() endif endif if chain (10) then if random(20) then farflash() wave("ngale4.wav", 50) endif endif