[FUNCTION make_weather]
local.map=<dargv[0]> // map, 0
local.region_defname=<argv[1]> // your region name you wish that it rain
local.weather=<argv[2]> // weather like rain, snow or try
serv.newitem=i_gold
FOR 1 <serv.maplist.<dlocal.map>.sector.qty> //
IF (<dlocal.y_> == 64)
new.p=<eval 32+(64*<local.x_>)>,<eval 32+(64*<local.y_>)>
IF (STRMATCH("<local.region_defname>*","<new.region.defname>"))
SERV.MAP.<dlocal.map>.SECTOR.<dlocal._for> <local.weather>
ENDIF
local.y_=0
local.x_ +=1
ELSE
new.p=<eval 32+(64*<local.x_>)>,<eval 32+(64*<local.y_>)>
IF (STRMATCH("<local.region_defname>*","<new.region.defname>"))
SERV.MAP.<dlocal.map>.SECTOR.<dlocal._for> <local.weather>
ENDIF
local.y_ +=1
ENDIF
ENDFOR
new.remove