home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD1.iso / GFX / Misc / CALIGARI24-2.DMS / in.adf / objects.lzh / Objects / pegasus / pegasus.script < prev    next >
Encoding:
Text File  |  1993-02-02  |  3.7 KB  |  132 lines
  1. WITH pegasus
  2.     WITHSUB Cube
  3.         CHANNEL chan0 FROM 0
  4.             ORIENTATION
  5.                 AT 0 0.000000 0.000000 0.000000 0.000000
  6.                 AT 10 58.861184 0.000000 -1.000000 -0.000000
  7.                 AT 20 3.004658 0.000001 -1.000000 0.000000
  8.         REPEAT
  9.         UNTIL END
  10.         WITHSUB Points
  11.             CHANNEL chan0 FROM 0
  12.                 ORIENTATION
  13.                     AT 0 61.066865 -0.000000 1.000000 -0.000000
  14.                     AT 4 21.089539 -0.000000 1.000000 0.000000
  15.                     AT 8 10.849322 0.000000 -1.000000 0.000000
  16.                     AT 12 35.603473 0.000000 -1.000000 -0.000000
  17.                     AT 16 0.344917 0.000020 -1.000000 -0.000002
  18.                     AT 20 61.581683 0.000000 1.000000 -0.000000
  19.             REPEAT
  20.             UNTIL END
  21.         ENDSUB
  22.     ENDSUB
  23.     WITHSUB Cylinder,5
  24.         WITHSUB Cylinder,2
  25.             CHANNEL chan0 FROM 0
  26.                 ORIENTATION
  27.                     AT 0 22.363772 -1.000000 0.000000 0.000000
  28.                     AT 5 27.468593 1.000000 0.000000 0.000000
  29.                     AT 10 0.000000 0.000000 0.000000 0.000000
  30.                     AT 15 30.628619 -1.000000 0.000000 0.000000
  31.             REPEAT
  32.             UNTIL END
  33.         ENDSUB
  34.         WITHSUB Cylinder,3
  35.             CHANNEL chan0 FROM 0
  36.                 ORIENTATION
  37.                     AT 0 0.000000 0.000000 0.000000 0.000000
  38.                     AT 5 20.662240 -1.000000 0.000000 0.000000
  39.                     AT 10 24.065337 1.000000 0.000000 0.000000
  40.                     AT 15 0.131221 1.000000 0.000046 -0.000020
  41.             REPEAT
  42.             UNTIL END
  43.         ENDSUB
  44.         WITHSUB Cylinder,4
  45.             WITHSUB Cylinder,2
  46.                 CHANNEL chan0 FROM 0
  47.                     ORIENTATION
  48.                         AT 0 21.391432 1.000000 0.000000 0.000000
  49.                         AT 5 21.877574 -1.000000 0.000000 0.000000
  50.                         AT 10 0.000000 0.000000 0.000000 0.000000
  51.                         AT 15 26.496365 1.000000 0.000000 0.000000
  52.                 REPEAT
  53.                 UNTIL END
  54.             ENDSUB
  55.             WITHSUB Cylinder,3
  56.                 CHANNEL chan0 FROM 0
  57.                     ORIENTATION
  58.                         AT 0 0.000000 0.000000 0.000000 0.000000
  59.                         AT 5 22.120673 -1.000000 0.000000 0.000000
  60.                         AT 10 26.496365 1.000000 0.000000 0.000000
  61.                         AT 15 0.240663 1.000000 0.000000 0.000000
  62.                 REPEAT
  63.                 UNTIL END
  64.             ENDSUB
  65.         ENDSUB
  66.     ENDSUB
  67.     WITHSUB Cylinder,6
  68.         CHANNEL chan0 FROM 0
  69.             ORIENTATION
  70.                 AT 0 0.000000 0.000000 0.000000 0.000000
  71.                 AT 10 23.721191 -1.000000 0.000000 0.000000
  72.                 AT 20 0.680698 -1.000000 0.000000 0.000000
  73.         REPEAT
  74.         UNTIL END
  75.     ENDSUB
  76.     WITHSUB Cylinder,7
  77.         WITHSUB Cube
  78.             CHANNEL chan0 FROM 0
  79.                 ORIENTATION
  80.                     AT 0 0.000000 0.000000 0.000000 0.000000
  81.                     AT 10 64.460511 0.000000 -1.000000 0.000000
  82.                     AT 20 0.000000 0.000661 1.000000 0.000561
  83.             REPEAT
  84.             UNTIL END
  85.             WITHSUB Points
  86.                 CHANNEL chan0 FROM 0
  87.                     ORIENTATION
  88.                         AT 0 53.882002 -0.000000 1.000000 -0.000000
  89.                         AT 4 30.199131 0.000000 1.000000 -0.000000
  90.                         AT 8 6.222114 -0.000007 1.000000 0.000013
  91.                         AT 12 12.183949 -0.000004 -1.000000 0.000006
  92.                         AT 16 1.536935 -0.000022 -1.000000 0.000020
  93.                         AT 20 57.305345 0.000008 1.000000 0.000005
  94.                 REPEAT
  95.                 UNTIL END
  96.             ENDSUB
  97.         ENDSUB
  98.     ENDSUB
  99. WITH CLONE pegasus
  100.     CHANNEL chan0 FROM 0
  101.         POSITION
  102.             AT 0 0.000000 0.000000 0.000000
  103.             AT 10 0.680930 2.373566 0.247861
  104.             AT 20 -2.676196 2.326426 0.663913
  105.             AT 30 -4.697324 -0.490777 2.018296
  106.             AT 40 -2.106919 -3.690573 2.018297
  107.             AT 50 1.983869 -1.791756 2.018297
  108.             AT 60 2.260855 0.154520 2.018297
  109.             AT 70 0.648122 3.342269 3.306292
  110.             AT 80 -0.152202 3.898164 5.078280
  111.             AT 90 -0.787219 4.861925 8.094331
  112.         ORIENTATION
  113.             AT 0 0.000000 0.000000 0.000000 0.000000
  114.             AT 10 31.615529 -0.334782 0.934460 0.121266
  115.             AT 20 113.633751 -0.223114 0.952008 -0.209525
  116.             AT 30 167.491793 0.179606 -0.977792 0.108001
  117.             AT 40 79.941191 0.046265 -0.953287 0.298502
  118.             AT 50 32.109146 -0.362480 0.769118 -0.526370
  119.             AT 60 55.120797 -0.196572 0.978969 -0.054589
  120.             AT 70 35.297446 -0.674113 0.736072 0.061403
  121.             AT 80 59.749450 -0.988397 0.089203 0.122937
  122.             AT 90 76.746811 -0.986465 -0.082949 0.141443
  123.     SPLINE
  124.     UNTIL END
  125. WITH EYE
  126.     CHANNEL chan0 FROM 0
  127.         POSITION
  128.             AT 0 0.733599 1.209328 -3.204582
  129.         ORIENTATION
  130.             AT 0 11.518511 0.872498 -0.488215 0.019831
  131.     UNTIL END
  132.