kaetemi
10 years ago
commit
7cb61f8796
@ -0,0 +1,68 @@
|
||||
-- This script sets proper centered zone positions and generates their names
|
||||
-- Use after cutting the zone into 160m by 160m pieces
|
||||
|
||||
cell_size = 160.0
|
||||
offset_x = 7680 / 2
|
||||
offset_y = -(20480 + (5120 / 2))
|
||||
|
||||
alphabet = "ABCDEFGHIJKLMNOPQRSTUVWXYZ"
|
||||
|
||||
-- http://proofofprogress.blogspot.be/2011/03/solution-align-pivot-to-world-without.html
|
||||
Function alignPivotToWorld &theObject = (
|
||||
--VLM = Visible Local Matrix.
|
||||
--The matrix/pivot you see when selecting object and "Local" axis is selected as viewable.
|
||||
VLM = theObject.Transform;
|
||||
IP_LocalRot = theObject.objectOffsetRot; --Rotation to be used later.
|
||||
IP_LOCAL = theObject.objectOffsetPos; --Invisible Pivot Local coordinates
|
||||
--In relation to VLM matrix.
|
||||
IP_WORLD = IP_LOCAL * VLM; --World Coordinates of Invisible Pivot. [Local To World Transform]
|
||||
VLM_0 = matrix3 1; --Reset Visible Local matrix coordinates.
|
||||
|
||||
NEW_IP_LOCAL = IP_WORLD * inverse(VLM_0); --[World To local Transform]
|
||||
|
||||
theObject.Transform = VLM_0;
|
||||
theObject.objectOffsetPos = NEW_IP_LOCAL;
|
||||
|
||||
--Now Handle Rotation:
|
||||
--Since rotation of visible local matrix has been zeroed out,
|
||||
--You must add that loss to the invisible pivot rotation.
|
||||
GeomWorldRot = VLM.RotationPart + IP_LocalRot;
|
||||
theObject.objectOffsetRot = GeomWorldRot;
|
||||
)
|
||||
|
||||
-- Convert a coordinate in a name
|
||||
-- name = coordToName #(x, y)
|
||||
fn coordToName coord =
|
||||
(
|
||||
up = floor(coord[1] / 26) + 1
|
||||
down = floor(coord[1] - ((up-1) * 26)) + 1
|
||||
return (((-coord[2] + 1) as integer) as string) + "_" + alphabet[up] + alphabet[down]
|
||||
)
|
||||
|
||||
fn realCoordToName coord =
|
||||
(
|
||||
return coordToName(#(((coord[1] + offset_x) / cell_size) + 0.5, ((coord[2] + offset_y) / cell_size) + 0.5))
|
||||
)
|
||||
|
||||
fn roundedCoord coord =
|
||||
(
|
||||
return #(ceil(coord[1] / cell_size) * cell_size - (cell_size / 2), ceil(coord[2] / cell_size) * cell_size - (cell_size / 2))
|
||||
)
|
||||
|
||||
max select none
|
||||
clearselection()
|
||||
|
||||
for node in geometry do
|
||||
(
|
||||
if (classof node) == RklPatch or (classof node) == Editable_Patch then
|
||||
(
|
||||
newcoords = roundedCoord(#(node.center.x, node.center.y))
|
||||
newname = realCoordToName(newcoords)
|
||||
node.name = newname
|
||||
alignPivotToWorld &node
|
||||
node.pivot.x = newcoords[1]
|
||||
node.pivot.y = newcoords[2]
|
||||
resetxform node
|
||||
maxOps.CollapseNode node off
|
||||
)
|
||||
)
|
||||
@ -0,0 +1,162 @@
|
||||
-- Use to take the snapshots of a large manually created zone
|
||||
|
||||
from_x = 160
|
||||
size_x = 7680-320
|
||||
from_y = -25600+160
|
||||
size_y = 5120-320
|
||||
|
||||
targetdir = "W:/database/landscape/ligo/asteroids/max"
|
||||
snapshotdir = "W:/database/landscape/ligo/asteroids/zonebitmaps"
|
||||
zonename = "anne"
|
||||
resumeonly = true
|
||||
|
||||
cell_size = 160.0
|
||||
|
||||
alphabet = "ABCDEFGHIJKLMNOPQRSTUVWXYZ"
|
||||
|
||||
fn lowercase instring = -- beginning of function definition
|
||||
(
|
||||
local upper, lower, outstring -- declare variables as local
|
||||
upper="ABCDEFGHIJKLMNOPQRSTUVWXYZ" -- set variables to literals
|
||||
lower="abcdefghijklmnopqrstuvwxyz"
|
||||
outstring=copy instring
|
||||
for i=1 to outstring.count do
|
||||
(
|
||||
j=findString upper outstring[i]
|
||||
if (j != undefined) do outstring[i]=lower[j]
|
||||
)
|
||||
return outstring -- value of outstring will be returned as function result
|
||||
)
|
||||
|
||||
fn existFile fname = (getfiles fname).count != 0
|
||||
|
||||
-- Convert a coordinate in a name
|
||||
-- name = coordToName #(x, y)
|
||||
fn coordToName coord =
|
||||
(
|
||||
up = floor(coord[1] / 26) + 1
|
||||
down = floor(coord[1] - ((up-1) * 26)) + 1
|
||||
return (((-coord[2] + 1) as integer) as string) + "_" + alphabet[up] + alphabet[down]
|
||||
)
|
||||
|
||||
fn roundedCoord coord =
|
||||
(
|
||||
return #(ceil(coord[1] / cell_size) * cell_size - (cell_size / 2), ceil(coord[2] / cell_size) * cell_size - (cell_size / 2))
|
||||
)
|
||||
|
||||
fn coordId coord =
|
||||
(
|
||||
coordr = (roundedCoord coord)
|
||||
return #(((coordr[1]) / cell_size) + 0.5, ((coordr[2]) / cell_size) + 0.5)
|
||||
)
|
||||
|
||||
from_coord = (coordId #(from_x, from_y))
|
||||
to_coord = (coordId #(from_x + size_x, from_y + size_y))
|
||||
|
||||
print from_coord
|
||||
print to_coord
|
||||
|
||||
print (coordToName from_coord)
|
||||
|
||||
undo off
|
||||
(
|
||||
for x=from_coord[1] to to_coord[1] do
|
||||
(
|
||||
for y=from_coord[2] to to_coord[2] do
|
||||
(
|
||||
ny=y+1
|
||||
sy=y-1
|
||||
ex=x+1
|
||||
wx=x-1
|
||||
zc = coordToName #(x, y)
|
||||
zn = coordToName #(x, ny)
|
||||
zne = coordToName #(ex, ny)
|
||||
ze = coordToName #(ex, y)
|
||||
zse = coordToName #(ex, sy)
|
||||
zs = coordToName #(x, sy)
|
||||
zsw = coordToName #(wx, sy)
|
||||
zw = coordToName #(wx, y)
|
||||
znw = coordToName #(wx, ny)
|
||||
maxc = targetdir + "/zonematerial-" + zonename + "-" + (lowercase zc) + ".max"
|
||||
csnapfile = snapshotdir + "/" + zonename + "-" + (lowercase zc) + ".tga"
|
||||
if existFile maxc and (not resumeonly or not (existFile csnapfile)) then
|
||||
(
|
||||
print zc
|
||||
resetMAXFile #noprompt
|
||||
gc()
|
||||
mergeMAXFile maxc #(zc)
|
||||
ccenter = getnodebyname zc
|
||||
maxn = targetdir + "/zonematerial-" + zonename + "-" + (lowercase zn) + ".max"
|
||||
if existFile maxn then
|
||||
(
|
||||
mergeMAXFile maxn #(zn)
|
||||
cnode = getnodebyname zn
|
||||
cnode.position.y = cnode.position.y + 160
|
||||
NeLAttachPatchMesh cnode ccenter
|
||||
)
|
||||
maxne = targetdir + "/zonematerial-" + zonename + "-" + (lowercase zne) + ".max"
|
||||
if existFile maxne then
|
||||
(
|
||||
mergeMAXFile maxne #(zne)
|
||||
cnode = getnodebyname zne
|
||||
cnode.position.x = cnode.position.x + 160
|
||||
cnode.position.y = cnode.position.y + 160
|
||||
NeLAttachPatchMesh cnode ccenter
|
||||
)
|
||||
maxe = targetdir + "/zonematerial-" + zonename + "-" + (lowercase ze) + ".max"
|
||||
if existFile maxe then
|
||||
(
|
||||
mergeMAXFile maxe #(ze)
|
||||
cnode = getnodebyname ze
|
||||
cnode.position.x = cnode.position.x + 160
|
||||
NeLAttachPatchMesh cnode ccenter
|
||||
)
|
||||
maxse = targetdir + "/zonematerial-" + zonename + "-" + (lowercase zse) + ".max"
|
||||
if existFile maxse then
|
||||
(
|
||||
mergeMAXFile maxse #(zse)
|
||||
cnode = getnodebyname zse
|
||||
cnode.position.x = cnode.position.x + 160
|
||||
cnode.position.y = cnode.position.y - 160
|
||||
NeLAttachPatchMesh cnode ccenter
|
||||
)
|
||||
maxs = targetdir + "/zonematerial-" + zonename + "-" + (lowercase zs) + ".max"
|
||||
if existFile maxs then
|
||||
(
|
||||
mergeMAXFile maxs #(zs)
|
||||
cnode = getnodebyname zs
|
||||
cnode.position.y = cnode.position.y - 160
|
||||
NeLAttachPatchMesh cnode ccenter
|
||||
)
|
||||
maxsw = targetdir + "/zonematerial-" + zonename + "-" + (lowercase zsw) + ".max"
|
||||
if existFile maxsw then
|
||||
(
|
||||
mergeMAXFile maxsw #(zsw)
|
||||
cnode = getnodebyname zsw
|
||||
cnode.position.x = cnode.position.x - 160
|
||||
cnode.position.y = cnode.position.y - 160
|
||||
--NeLAttachPatchMesh cnode ccenter
|
||||
)
|
||||
maxw = targetdir + "/zonematerial-" + zonename + "-" + (lowercase zw) + ".max"
|
||||
if existFile maxw then
|
||||
(
|
||||
mergeMAXFile maxw #(zw)
|
||||
cnode = getnodebyname zw
|
||||
cnode.position.x = cnode.position.x - 160
|
||||
NeLAttachPatchMesh cnode ccenter
|
||||
)
|
||||
maxnw = targetdir + "/zonematerial-" + zonename + "-" + (lowercase znw) + ".max"
|
||||
if existFile maxnw then
|
||||
(
|
||||
mergeMAXFile maxnw #(znw)
|
||||
cnode = getnodebyname znw
|
||||
cnode.position.x = cnode.position.x - 160
|
||||
cnode.position.y = cnode.position.y + 160
|
||||
NeLAttachPatchMesh cnode ccenter
|
||||
)
|
||||
NeLWeldPatchMesh ccenter 1.0
|
||||
NeLLigoMakeSnapShot ccenter csnapfile 0 1 0 1 false
|
||||
)
|
||||
)
|
||||
)
|
||||
)
|
||||
Loading…
Reference in New Issue