http://nickpisca.com/BLAST/index.php?title=SpaceFrameSurface-ctrl-i&feed=atom&action=history
SpaceFrameSurface-ctrl-i - Revision history
2024-03-29T01:22:56Z
Revision history for this page on the wiki
MediaWiki 1.28.1
http://nickpisca.com/BLAST/index.php?title=SpaceFrameSurface-ctrl-i&diff=324&oldid=prev
Nickpisca: Created page with "http://crtl-i.com/blog/?p=140 // // Script written by Howard Jiho Kim | kimjiho@gmail.com | crtl-i.com | 2007 // // ex. // spFrSurface(srfName1, srfName2, U, V) // sp..."
2017-04-24T20:02:45Z
<p>Created page with "http://crtl-i.com/blog/?p=140 // // Script written by Howard Jiho Kim | kimjiho@gmail.com | crtl-i.com | 2007 // // ex. // spFrSurface(srfName1, srfName2, U, V) // sp..."</p>
<p><b>New page</b></p><div>http://crtl-i.com/blog/?p=140<br />
<br />
<br />
<br />
//<br />
// Script written by Howard Jiho Kim | kimjiho@gmail.com | crtl-i.com | 2007<br />
//<br />
// ex.<br />
// spFrSurface(srfName1, srfName2, U, V)<br />
// spFrSurface(“nurbsPlane1”, “nurbsPlane2”, 10, 10)<br />
//<br />
<br />
// HORIZONTAL MEMBERS!!<br />
<br />
global proc spFrSurface(string $nurb, string $nurb2, int $u, int $v)<br />
{<br />
gridSurface($nurb, $u,$v);<br />
gridSurface($nurb2, $u,$v);<br />
<br />
float $u_inc = 1.0/$u;<br />
float $v_inc = 1.0/$v;<br />
float $cv[], $cv2[], $cv3[];<br />
<br />
float $i2, $k2;<br />
<br />
// get U information<br />
<br />
$u = $u + 1;<br />
$v = $v + 1;<br />
<br />
for($i=0;$i<$u;$i++)<br />
{<br />
for($k=0;$k<$v;$k++)<br />
{<br />
<br />
$i2 = $u_inc * $i;<br />
print (“u:” + $i2 + ” | “);<br />
$k2 = $v_inc * $k;<br />
print (“v:” + $k2 + ” | “);<br />
$cv = `pointOnSurface -u $i2 -v $k2 -position $nurb`;<br />
print( $cv[0] +” “+ $cv[1] +” “+ $cv[2] + ” | “);<br />
<br />
$cv2 = `pointOnSurface -u $i2 -v $k2 -position $nurb2`;<br />
print( $cv2[0] +” “+ $cv2[1] +” “+ $cv2[2] +”\n”);<br />
<br />
curve -d 1 -p $cv[0] $cv[1] $cv[2] -p $cv2[0] $cv2[1] $cv2[2] -k 0 -k 1;<br />
<br />
// print CV<br />
<br />
//$x[$k] = $cv[0];<br />
//$y[$k] = $cv[1];<br />
//$z[$k] = $cv[2];<br />
<br />
}<br />
<br />
//$curveName[$i] = `curve -p $x[0] $y[0] $z[0] -p $x[1] $y[1] $z[1] -p $x[2] $y[2] $z[2] -p $x[3] $y[3] $z[3] -p $x[4] $y[4] $z[4] -p $x[5] $y[5] $z[5] -p $x[6] $y[6] <br />
$z[6] -p $x[7] $y[7] $z[7]`;<br />
}<br />
}<br />
<br />
// LONGITUDINAL MEMBERS<br />
global proc gridSurface(string $nurb, int $u, int $v)<br />
{<br />
float $u_inc = 1.0/$u;<br />
float $v_inc = 1.0/$v;<br />
float $cv[], $cv2[], $cv3[];<br />
<br />
float $i2, $k2;<br />
<br />
// get U information<br />
<br />
$u = $u + 1;<br />
<br />
for($i=0;$i<$u;$i++)<br />
{<br />
for($k=0;$k<$v;$k++)<br />
{<br />
<br />
$i2 = $u_inc * $i;<br />
print (“u:” + $i2 + ” | “);<br />
$k2 = $v_inc * $k;<br />
print (“v:” + $k2 + ” | “);<br />
$cv = `pointOnSurface -u $i2 -v $k2 -position $nurb`;<br />
print( $cv[0] +” “+ $cv[1] +” “+ $cv[2] + ” | “);<br />
<br />
$k3 = $v_inc * ($k+1); <br />
<br />
$cv2 = `pointOnSurface -u $i2 -v $k3 -position $nurb`;<br />
print( $cv2[0] +” “+ $cv2[1] +” “+ $cv2[2] +”\n”);<br />
<br />
curve -d 1 -p $cv[0] $cv[1] $cv[2] -p $cv2[0] $cv2[1] $cv2[2] -k 0 -k 1;<br />
<br />
// print CV<br />
<br />
//$x[$k] = $cv[0];<br />
//$y[$k] = $cv[1];<br />
//$z[$k] = $cv[2];<br />
<br />
}<br />
<br />
//$curveName[$i] = `curve -p $x[0] $y[0] $z[0] -p $x[1] $y[1] $z[1] -p $x[2] $y[2] $z[2] -p $x[3] $y[3] $z[3] -p $x[4] $y[4] $z[4] -p $x[5] $y[5] $z[5] -p $x[6] $y[6] <br />
$z[6] -p $x[7] $y[7] $z[7]`;<br />
}<br />
<br />
// get U information<br />
<br />
$v = $v + 1;<br />
$u = $u – 1;<br />
<br />
for($i=0;$i<$v;$i++)<br />
{<br />
for($k=0;$k<$u;$k++)<br />
{<br />
<br />
$i2 = $u_inc * $k;<br />
print (“u:” + $i2 + ” | “);<br />
$k2 = $v_inc * $i;<br />
print (“v:” + $k2 + ” | “);<br />
$cv = `pointOnSurface -u $i2 -v $k2 -position $nurb`;<br />
print( $cv[0] +” “+ $cv[1] +” “+ $cv[2] + ” | “);<br />
<br />
$i3 = $u_inc * ($k+1);<br />
<br />
$cv2 = `pointOnSurface -u $i3 -v $k2 -position $nurb`;<br />
print( $cv2[0] +” “+ $cv2[1] +” “+ $cv2[2] +”\n”);<br />
<br />
curve -d 1 -p $cv[0] $cv[1] $cv[2] -p $cv2[0] $cv2[1] $cv2[2] -k 0 -k 1;<br />
<br />
// print CV<br />
<br />
//$x[$k] = $cv[0];<br />
//$y[$k] = $cv[1];<br />
//$z[$k] = $cv[2];<br />
<br />
}<br />
<br />
//$curveName[$i] = `curve -p $x[0] $y[0] $z[0] -p $x[1] $y[1] $z[1] -p $x[2] $y[2] $z[2] -p $x[3] $y[3] $z[3] -p $x[4] $y[4] $z[4] -p $x[5] $y[5] $z[5] -p $x[6] $y[6] <br />
$z[6] -p $x[7] $y[7] $z[7]`;<br />
}<br />
}<br />
<br />
<br />
<br />
''More information on isoparm manipulation, read pages 109-113 in [http://stores.lulu.com/nickpisca YSYT]. <br />
[[Category:MEL]]</div>
Nickpisca