cyberpresidentvanellope/vgstation13
1
0
Fork 0
mirror of https://github.com/vgstation-coders/vgstation13.git synced 2025-12-10 10:21:11 +00:00
Code Issues Packages Projects Releases Wiki Activity

ports the latest commit

Browse Source
This commit is contained in:
PJB3005
2015-05-04 01:11:40 +02:00
parent 54bac59aa0
commit 3cec0942fc
1 changed files with 10 additions and 13 deletions
Download Patch File Download Diff File Expand all files Collapse all files

23
code/modules/procedural mapping/mapGenerator.dm
View File

@@ -49,30 +49,28 @@
if(!checkRegion(Start, End))
return 0
var/centerX = abs(max(End.x-Start.x,1))
var/centerY = abs(max(End.y-Start.y,1))
var/centerX = max(abs((End.x+Start.x)/2),1)
var/centerY = max(abs((End.y+Start.y)/2),1)
var/lilZ = min(Start.z,End.z)
var/bigZ = max(Start.z,End.z)
var/centerZ = max(abs(bigZ-(lilZ/2)),1) //Spherical maps! woo!
var/sphereMagic = max(abs(bigZ-(lilZ/2)),1) //Spherical maps! woo!
var/radius = abs(max(centerX,centerY)) //take the biggest displacement as the radius
if(replace)
undefineRegion()
//Sphere mode engage
var/evenCheckZ = 0
if(max(bigZ,lilZ) % 2 == 0)
evenCheckZ = centerZ+1
//Even sphere correction engage
var/offByOneOffset = 1
if(bigZ % 2 == 0)
offByOneOffset = 0
for(var/i = lilZ, i <= bigZ, i++)
for(var/i = lilZ, i <= bigZ+offByOneOffset, i++)
var/theRadius = radius
if(i != centerZ)
if(i != evenCheckZ)
theRadius = max(radius/max((2*abs(centerZ-i)),1),1)
if(i != sphereMagic)
theRadius = max(radius/max((2*abs(sphereMagic-i)),1),1)
map |= circlerange(locate(centerX,centerY,i),theRadius)
@@ -201,4 +199,3 @@
src << "Generating Region"
N.generate()
src << "Generated Region"