Sunday, April 20, 2014

final progress 75%





Here is the first knowledge pattern script, used to call the variables from the UDF as well as instantiate the first set of surfaces in the running bond pattern.



let p1(roofudfsurf)
let i (integer)
let j (integer)
let cn (integer)
let sn (Integer) 

let da (length)
let db (length)
let dc (length)
let la (length)
let lb (length)
let pa (length)
let pb (length)
let pc (length)
let angle (angle)
let cut (angle)

i = 1

da = D1
db = D2
dc = D3
la = L1
lb = L2
pa = P1
pb = P2
pc = P3
angle = L1A
cut = CUT1

cn = curvenumber 
sn = surfnumber 

for i while i <= cn/2
{
j=1
for j while j<=sn/2
{
p1=CreateOrModifyTemplate("roofdesign|roofudfsurf", SURF2   ,`Relations\Knowledge Pattern.4\roofudfsurf5` , (i-1)*sn+j) /*generates the panels*/
p1.CRV9= `Relations\Knowledge Pattern.3\roofudfcurve`    ->GetItem(i)
p1.CRV10= `Relations\Knowledge Pattern.1\roofudfcurve`    ->GetItem(i)

p1.surfposition = (j*2)-2
p1.surfnumber  = sn

p1.CONSTRUCTION\D1 = da
p1.CONSTRUCTION\D2 = db
p1.CONSTRUCTION\D3 =dc

p1.CONSTRUCTION\P1 = pa
p1.CONSTRUCTION\P2 = pb
p1.CONSTRUCTION\P3 = pc

p1.CONSTRUCTION\L1 = la
p1.CONSTRUCTION\L2 = lb

p1.Point.4 =Attractors\Point.11
p1.Point3 =Attractors\Point.10 
p1.Point2 = Attractors\Point.9 
p1.Point1 = Attractors\Point.8 

EndModifyTemplate(p1)
p1.Name= "panel." + ToString((i-1)*sn+j)

}
}





Below is the script for the second set of surfaces.




let p1(roofudfsurf)
let i (integer)
let j (integer)
let cn (integer) /*number of curves*/
let sn (Integer) /* number of surfaces*/

i = 1
cn = curvenumber 
sn = surfnumber 

for i while i <= cn/2
{
j=1
for j while j<=sn/2
{
p1=CreateOrModifyTemplate("roofdesign|roofudfsurf", SURF   ,`Relations\Knowledge Pattern.2\roofudfsurf` , (i-1)*sn+j) /*generates the panels*/
p1.CRV9= `Relations\Knowledge Pattern.1\roofudfcurve`    ->GetItem(i)
p1.CRV10= `Relations\Knowledge Pattern.3\roofudfcurve`    ->GetItem(i+1)

p1.surfposition = (j*2)-1
p1.surfnumber  = sn

p1.Point.4 =Attractors\Point.11
p1.Point3 =Attractors\Point.10 
p1.Point2 = Attractors\Point.9 
p1.Point1 = Attractors\Point.8 

EndModifyTemplate(p1)
p1.Name= "panel." + ToString((i-1)*sn+j)

}
}




______________________________________

No comments:

Post a Comment