|
I’ll venture that something like this old saw will do the trick:
(
Plane length:20.2507 width:19.9407 pos:[-49.8407,49.8412,0] isSelected:on
Plane length:19.5674 width:20.2711 pos:[-19.8422,49.9262,0] isSelected:on
Plane length:20.0285 width:20.0329 pos:[10.366,49.9,0] isSelected:on
Plane length:20.1717 width:20.1763 pos:[40.1642,49.6892,0] isSelected:on
Plane length:20.1668 width:19.9045 pos:[-50.0325,20.228,0] isSelected:on
Plane length:19.8364 width:19.8364 pos:[-19.7949,19.9503,0] isSelected:on
Plane length:19.4671 width:20.1719 pos:[10.3317,20.1045,0] isSelected:on
Plane length:19.8985 width:20.3039 pos:[40.0574,19.6065,0] isSelected:on
Plane length:19.5287 width:19.9724 pos:[-49.9567,-10.2203,0] isSelected:on
Plane length:19.6783 width:20.4686 pos:[-19.8954,-9.91057,0] isSelected:on
Plane length:20.1685 width:19.868 pos:[9.7024,-10.3158,0] isSelected:on
Plane length:19.3473 width:20.0562 pos:[40.3576,-9.91939,0] isSelected:on
Plane length:19.9134 width:20.2867 pos:[-49.9582,-40.1267,0] isSelected:on
Plane length:20.1527 width:20.6029 pos:[-20.0312,-40.1457,0] isSelected:on
Plane length:20.3061 width:19.7784 pos:[10.0299,-39.9672,0] isSelected:on
Plane length:19.6282 width:19.9381 pos:[40.1938,-40.1933,0] isSelected:on
max select
select #($Plane01, $Plane02, $Plane03, $Plane15, $Plane05, $Plane06, $Plane07, $Plane08, $Plane09, $Plane10, $Plane11, $Plane12, $Plane14, $Plane16, $Plane04, $Plane13)
max move
select #($Plane17, $Plane18, $Plane19, $Plane20, $Plane21, $Plane22, $Plane23, $Plane24, $Plane25, $Plane26, $Plane27, $Plane28, $Plane29, $Plane30, $Plane31, $Plane32)
select $Plane30
select $Plane17
select #($Plane33, $Plane34)
c = 34
f = openFile “c:\users\administrator\desktop\fau_files.txt”—list of 34 images found in that directory to be serialized as input for material editor slots (basic singles)
if f != undefined then
(
g = 1
while (not eof f) do
(
ss = readLine f as stringStream
n = readDelimitedString ss “ “
i = readValue ss
meditMaterials[g].DirectX_Manger.enabled = off
meditMaterials[g].diffuseMap = Bitmaptexture filename: ([edit] should be a square-bracketted i here [end edit])
execute “$meditMaterials[g][#Maps][#Diffuse_Color__Map__” + g as string + “__” + i as string + “].alphaSource = 2”
execute “$Plane” + g as string + “.material = meditMaterials[” + g as string + “]”
g = g + 1
)
close f
)
)
|