home *** CD-ROM | disk | FTP | other *** search
/ Crawly Crypt Collection 1 / crawlyvol1.bin / graphics / polyfilm / data / demo.mcl < prev    next >
Text File  |  1993-06-03  |  2KB  |  89 lines
  1. %
  2. % Demo I once saw on the Amiga
  3. % (Just a quicky...)
  4. %
  5. % 9th May, 1993
  6. %
  7. % By Martin Brownlow
  8. %
  9.  
  10. type ground "\data\ground.3d";
  11. type bouncy "\data\ball.3d";
  12.  
  13. prefs "\data\sph_pref.prf";
  14. palette 5;
  15.  
  16. object thing type bouncy at [0,0,800] looking [180*16,0,0];
  17.  
  18. object g1_1 type ground at [-400,300,400];
  19. object g1_2 type ground at [0,300,400];
  20. object g1_3 type ground at [400,300,400];
  21.  
  22. object g2_1 type ground at [-400,300,800];
  23. object g2_2 type ground at [0,300,800];
  24. object g2_3 type ground at [400,300,800];
  25. object g2_4 type ground at [800,300,800];
  26.  
  27. object g3_1 type ground at [-800,300,1200];
  28. object g3_2 type ground at [-400,300,1200];
  29. object g3_3 type ground at [0,300,1200];
  30. object g3_4 type ground at [400,300,1200];
  31. object g3_5 type ground at [800,300,1200];
  32. object g3_6 type ground at [1200,300,1200];
  33.  
  34. object g4_1 type ground at [-1200,300,1600];
  35. object g4_2 type ground at [-800,300,1600];
  36. object g4_3 type ground at [-400,300,1600];
  37. object g4_4 type ground at [000,300,1600];
  38. object g4_5 type ground at [400,300,1600];
  39. object g4_6 type ground at [800,300,1600];
  40. object g4_7 type ground at [1200,300,1600];
  41.  
  42. camera cam1 at [0,-50,0] looking [0,0,0] active;
  43. lightsource lig1 at [0,-500,0] lit;
  44.  
  45. cam1.main[]{ x = thing.thru; frame; }
  46. lig1.main[]{ x = thing.thru; frame; }
  47.  
  48. thing.main[]{
  49.   thru = 0;
  50.   
  51.   while [ thru<200 ]{
  52.     rotate to [0,(thru*360*16)/400,0];
  53.     move to [0,0,800] forward [200];
  54.     x=thru; z=800;
  55.     if [y>0] { y = y * (-1); }
  56.     
  57.     rotate to [180*16,0,(thru*360*16)/400];
  58.     
  59.     thru = thru + 8;
  60.     frame;
  61.   }
  62.   endsim;
  63. }
  64.  
  65. g1_1.main[]{ wait; }
  66. g1_2.main[]{ wait; }
  67. g1_3.main[]{ wait; }
  68.  
  69. g2_1.main[]{ wait; }
  70. g2_2.main[]{ wait; }
  71. g2_3.main[]{ wait; }
  72. g2_4.main[]{ wait; }
  73.  
  74. g3_1.main[]{ wait; }
  75. g3_2.main[]{ wait; }
  76. g3_3.main[]{ wait; }
  77. g3_4.main[]{ wait; }
  78. g3_5.main[]{ wait; }
  79. g3_6.main[]{ wait; }
  80.  
  81. g4_1.main[]{ wait; }
  82. g4_2.main[]{ wait; }
  83. g4_3.main[]{ wait; }
  84. g4_4.main[]{ wait; }
  85. g4_5.main[]{ wait; }
  86. g4_6.main[]{ wait; }
  87. g4_7.main[]{ wait; }
  88.  
  89.