home *** CD-ROM | disk | FTP | other *** search
/ com!online 2002 July / com!online0702.iso / software / livemotion / DATA1.CAB / Scripting_Resources / Samples / Automation_Scripts / kochSnowflake.js < prev    next >
Encoding:
Text File  |  2002-05-13  |  4.3 KB  |  118 lines
  1. /***************************************************************
  2. ADOBE SYSTEMS INCORPORATED 
  3. Copyright 2001 Adobe Systems Incorporated 
  4. All Rights Reserved 
  5.  
  6. NOTICE:  Adobe permits you to use, modify, and distribute this 
  7. file in accordance with the terms of the Adobe license agreement 
  8. accompanying it.  If you have received this file from a source 
  9. other than Adobe, then your use, modification, or distribution
  10. of it requires the prior written permission of Adobe. 
  11. ***************************************************************/
  12. /***************************************************************
  13. Author: Mary Obelnicki
  14. ***************************************************************/
  15.  
  16. /***************************************************************
  17.  
  18. Description goes here
  19.  
  20. ***************************************************************/
  21.  
  22. #include "../../Include/Vector.js" 
  23. #include "../../Include/fractal.js"
  24.  
  25. /***************************************************************
  26. To change the behavior of this script, 
  27. make your changes below
  28. ***************************************************************/
  29.  
  30. //will draw a kochSnowflake with radius 200, depth 2; 
  31. var comp = application.currentComposition; 
  32. var diameter = Math.min(comp.size.x, comp.size.y); 
  33. kochSnowflake(diameter/2, 3, comp.size.x/2, comp.size.y/2); 
  34.  
  35. /***************************************************************
  36. DO NOT EDIT BELOW THIS LINE
  37. ***************************************************************/
  38.  
  39.  
  40. function kochSnowflake(radius, depth, x, y)
  41. // draws a koch snowflake of depth <depth> with a radius of <radius>.
  42. {
  43.     // create the base triangle
  44.     var basePath = kochSetup(radius, x, y);
  45.     //call the fractal function on the base triangle
  46.     fractal(basePath, kochReplaceLine, depth); 
  47. } 
  48.  
  49. function kochSetup(rad, inX, inY)
  50. //draws an equalateral triangle path object on a circle of radius <rad>.
  51.  
  52. //returns: the path that is the triangle (not the object).  
  53. {
  54.     //draw the initial triangle
  55.     var triangle = application.currentComposition.createObject(LMGeometricType.path, inX, inY); 
  56.     
  57.     var anglePerPoint = 2*Math.PI/3; 
  58.     var angleOffset  = Math.PI/2;  // so a point is straight up
  59.     var startAngle = 0 + angleOffset; 
  60.  
  61.     //point 0 
  62.     var path = triangle.addPath(rad*Math.cos(startAngle), -rad*Math.sin(startAngle), 0); 
  63.     triangle.deletePath(1); 
  64.  
  65.     //point 1
  66.     path.addKnot(rad*Math.cos(startAngle-anglePerPoint), -rad*Math.sin(startAngle-anglePerPoint), 1); 
  67.  
  68.     //point 2
  69.     path.addKnot(rad*Math.cos(startAngle-2*anglePerPoint), -rad*Math.sin(startAngle-2*anglePerPoint), 2); 
  70.     path.closed = true; 
  71.     return path; 
  72.  
  73. }
  74.  
  75. function kochReplaceLine(path, knotOneIndex, knotTwoIndex, knotsArray)
  76. //path: the path to edit
  77. //knotOne: the index of the first knot in the line segment
  78. //knotTwo: the index of the second knot in the line segment
  79. //knotsArray: an array containing the knots, the index of <knotOne>
  80. //<knotTwo> must be the same in <knotsArray> and <path>.knots.
  81. // an optional arguement for speed
  82. {
  83.     //vectors representing the defining points of the line segment. 
  84.     var p1;
  85.     var p2; 
  86.     if (arguments.length == 4)
  87.     {
  88.     p1 = new Vector(knotsArray[knotOneIndex].position.x, -knotsArray[knotOneIndex].position.y); 
  89.     p2 = new Vector(knotsArray[knotTwoIndex].position.x, -knotsArray[knotTwoIndex].position.y);  
  90.     }
  91.     else
  92.     {
  93.     p1 = new Vector(path.knots[knotOneIndex].position.x, -path.knots[knotOneIndex].position.y); 
  94.     p2 = new Vector(path.knots[knotTwoIndex].position.x, -path.knots[knotTwoIndex].position.y); 
  95.     }
  96.  
  97.     //the line segment
  98.     var p2minusp1 = Vector.subtract(p2, p1); 
  99.     //one thrid of the line segment
  100.     var segment = Vector.scalerMult(p2minusp1, 1/3); 
  101.  
  102.     //add the three knots to the path to chage the line segment to the next depth
  103.     // of the koch snowflake. 
  104.  
  105.     //the first knot
  106.     var pointA = Vector.add(p1, segment); 
  107.     path.addKnot(pointA.x, -pointA.y, knotOneIndex+1); 
  108.  
  109.     //the second knot
  110.     var pointC = Vector.add(pointA, Vector.zAxisRotate(segment, Math.PI/3));
  111.     path.addKnot(pointC.x, -pointC.y, knotOneIndex+2); 
  112.  
  113.     //the thrid knot
  114.     var pointB = Vector.add(pointA, segment); 
  115.     path.addKnot( pointB.x , -pointB.y, knotOneIndex+3); 
  116.  
  117. }
  118.