if never() then

            fogtype(4) 
  //////////////////////////////////////////////
 ///////////////////COMMENTED OUT//////////////
//////////////////////////////////////////////
//;           skyspeed(111)
//:           skyheight(200)
//;           fogdist(700)
//;           tod(05:49)
//;           if random(111) then
//;                       movefog(333,111)
//;           endif     
//////////////////////////////////////////////
endif

if past(60) and never then
	rain(20, 40)
endif

// Choose between 1 of 3 types of rain to move towards over the next 30 seconds
// Do this every 60seconds and then for each second after that, 1/10 chance of
// moving towards a new type of rain....
If elapse(30) and random(5) then
	dornd
		rain(20, 30)
		set(v1, 1)
	next
		rain(50, 30)
		set(v1, 2)
	next
		rain(35, 30)
		set(v1, 3)
	enddo	
endif

// If the type of rain is type 1 (v1=1) then we have light rain and want far flashes
// and we dont want them too often because it is a long ways away.
// So, once every 30 seconds + 1/10 chance per second after ten seconds do a far flash
if eq(v1, 1) and elapse(70) and random(10) then
	farflash()
endif
// Then after the far flash, wait 4 seconds then a 1/4 chance of another farflash.
if chain(15) and random(4) then
	farflash()
endif

// If the type of rain is type 2 (v1 = 2) then we have a lighting storm on top of us
// this means lots of lighting.
if  eq(v1, 2) and elapse(30) and random(10) then
	flash()
endif
if chain 7 and random(4) then
	flash()
endif

// Else if the type of rain is type 3 (v1=3) then we have a medium storm with medium lighting
// both far and near flash
if eq(v1, 1) and elapse(50) and random(10) then
	farflash()
endif
if chain 11 and random(4) then
	flash()
endif


  ////////////////////////////////////////////////
 ///COMMENTED OUT THE FOLLOWING WAC COMMANDS:////
////////////////////////////////////////////////
// Rain Stuff
//If past(30) and never() then
//	set(V1,1)
//endif
//
//If eq(v1,1) and not eq(v2, 1) and not eq(v3,1) then
//	rain(50,90)
//	set(v2, 1)
//endif
//
//if chain(90) and eq(v2, 1) then
//           rain(25,90)           
//endif
//
//If chain(180) and eq(v2, 1) then
//	set(V1,0)
//	set(v2,0)
//	set(v3,1)
//endif
//
//if eq(v1,0) and eq(v2,0) and eq(v3,1) then
//	rain(70,120)
//	set(v3,0)
//endif
//
//If chain(180) and eq(v1,0) and eq(v2,0) and eq(v3,0) then
//	rain(10,60)
//endif
//
//If past(60) and elapse(60) and random(69) then
//            set(V1,1)
//endif
//
//if chain(1) and never() then
//            farflash
//            if random(7) then
//                        farflash
//            endif
//endif

