10/13/2026 [22:45:13] GMT Home .:. Logout
Forums
Hardmaps.com :: Forums :: Map Making Forum :: Joint Operations
 
<< Previous thread | Next thread >>
Some Weather WAC commands
Moderators: Hardmaps Administrator, *HmS*Wedge, *HmS*grunt, *HmS*Trevor, *HmS*LongBow
Author Post
*HmS*Wedge
Tue Jan 25 2005
Captain Slow

Registered Member #3
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.




// ------------------------------------------------------------------------
//Weather

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


// End Weather
Back to top
Website
matlin
Wed Jul 27 2005
Registered Member #601
Joined: Wed Apr 13 2005
Location: Stockholm, sweden
Posts: 66
(17)
What does "next" do?
And what are the arguments for wind (why do you use '327')
(78)

<span class='smallblacktext'>[ Edited Wed Jul 27 2005 ]</span>
Back to top
Website
*HmS*Trevor
Wed Jul 27 2005

Registered Member #35
Joined: Tue Dec 30 2003
Location: Lincolnshire England
Posts: 2080
At guess i would say 327 is the direction
Back to top
 

Jump:     Back to top

Syndicate this thread: rss 0.92 Syndicate this thread: rss 2.0 Syndicate this thread: RDF
Powered by e107 Forum System
All trademarks are copyright their respective owners.
This site is best viewed using 1280-1024 screen resolution.
{THEMEDISCLAIMER}
Render time: 0.0751 sec, 0.0256 of that for queries.