mirror of
https://port.numenaute.org/aleajactaest/khanat-opennel-code.git
synced 2024-12-21 00:18:43 +00:00
Add zone snapshot script example
This commit is contained in:
kaetemi
parent
2e5a5c574f
commit
522d81ec4c
1 changed files with 162 additions and 0 deletions
162
code/nel/tools/3d/plugin_max/scripts/nel_zone_snapshot.ms
Normal file
162
code/nel/tools/3d/plugin_max/scripts/nel_zone_snapshot.ms
Normal file
|
|
@ -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 a new issue