home *** CD-ROM | disk | FTP | other *** search
/ PC Home 48 / Fun Clicp Art 5000.iso / scala / wipes / pushes.wip < prev    next >
Encoding:
Text File  |  1996-05-08  |  7.5 KB  |  212 lines
  1. !ScalaScript
  2. /*
  3. ** $Id: pushes.wip,v 1.3 1996/05/06 13:50:47 LARS Exp $
  4. **
  5. ** Push wipes
  6. **
  7. */
  8.  
  9. //------------------------------------------------------------------------------------
  10. //
  11. // ScrollDivide
  12. //
  13. // The new picture is split in two and moved in over the old from opposite directions.
  14.  
  15. WIPEDEF("ScrollDivide", Grid(2,2), TimeScale(1), CopyBackground(FALSE),
  16.     Steps(1, "Width/Speed"), Direction(East, 90))
  17.   SPLINE(Position(0,2250,4096,4096));
  18.   MOVE(From(-2,0,0,1), To(0,0,2,1), Time(0,1));
  19.   MOVE(From(2,1,4,2), To(0,1,2,2), Time(0,1));
  20. END
  21.  
  22.  
  23. //------------------------------------------------------------------------------------
  24. //
  25. // Newscrollin
  26. // The new picture is moved in on top of the old.
  27.  
  28. WIPEDEF("ScrollIn", Grid(1,1), TimeScale(1),    CopyBackground(FALSE),
  29.     Steps(1, "Height/Speed"), Direction(South, 90), ForegroundWipe(FALSE))
  30.   SPLINE(Position(0,2250,4096,4096));
  31.   MOVE(From(0,-1,1,0), To(0,0,1,1), Time(0,1));
  32. END
  33.  
  34.  
  35. //------------------------------------------------------------------------------------
  36. //
  37. // Newscrollout
  38. // The old picture moves off screen, revealing the new underneath
  39.  
  40. WIPEDEF("ScrollOut", Grid(1,1), TimeScale(1), CopyBackground(TRUE),
  41.     Steps(1, "Height/Speed"), Direction(South, 90), ForegroundWipe(FALSE))
  42.   MOVE(From(0,0,1,2), To(0,1,1,2), PanFrom(0,0,1,1), PanTo(0,0,1,1), Time(0,1), OldPicture(TRUE));
  43. END
  44.  
  45. //------------------------------------------------------------------------------------
  46. //
  47. // Derreck
  48. // Shuffles the two pictures, putting the old picture behind the new
  49.  
  50. WIPEDEF("Derrick", Grid(2,2), TimeScale(2), Steps(1, "Height/Speed"), Direction(South, 90), ForegroundWipe(FALSE))
  51.   SPLINE(Position(0,2250,4096,4096));
  52.   MOVE(From(0,0,2,2), To(0,1,2,2), PanFrom(0,0,2,2), PanTo(0,0,2,1), Time(0,1), OldPicture(TRUE), Shrink(FALSE));
  53.   MOVE(From(0,0,2,0), To(0,0,2,1), PanFrom(0,0,2,0), PanTo(0,1,2,2), Time(0,1), Shrink(FALSE));
  54.   SPLINE(Position(0,0,1750,4096));
  55.   MOVE(From(0,0,2,1), To(0,0,2,2), PanFrom(0,1,2,2), PanTo(0,0,2,2), Time(1,2), Shrink(FALSE));
  56.   MOVE(From(0,1,2,2), To(0,2,2,2), PanFrom(0,0,2,1), PanTo(0,2,2,2), Time(1,2), OldPicture(TRUE), Shrink(FALSE));
  57. END
  58.  
  59. //------------------------------------------------------------------------------------
  60. //
  61. // Push
  62. // The old picture moves off screen, the new one moves in.
  63.  
  64. WIPEDEF("Push", Grid(1,1), TimeScale(1), CopyBackground(TRUE),
  65.     Steps(1, "Width/Speed"), Direction(East, 90), ForegroundWipe(FALSE))
  66.   MOVE(From(0,0,1,1), To(1,0,2,1), PanFrom(0,0,1,1), PanTo(0,0,1,1), Time(0,1), OldPicture(TRUE), Shrink(FALSE));
  67.   MOVE(From(-1,0,0,1), To(0,0,1,1), Time(0,1), Shrink(FALSE));
  68. END
  69.  
  70. //------------------------------------------------------------------------------------
  71. //
  72. // FlipOver
  73. // A simple pageturn wipe.
  74.  
  75. WIPEDEF("FlipOver", Grid(2,1), TimeScale(2), CopyBackground(TRUE),
  76.     Direction(West, 90), ForegroundWipe(FALSE))
  77.  
  78.   SPLINE(Position(0,0,1750,4096));
  79.   SCALE(From(1,0,1,1), To(1,0,2,1), Time(0,1), Backwards(TRUE));
  80.  
  81.   SPLINE(Position(0,2250,4096,4096));
  82.   SCALE(From(1,0,1,1), To(0,0,1,1), Time(1,2));
  83. END
  84.  
  85. //------------------------------------------------------------------------------------
  86. //
  87. // ScaleIn
  88. // Scales in the new picture from one of the sides
  89.  
  90. WIPEDEF("ScaleIn", Grid(1,1), TimeScale(1), CopyBackground(FALSE),
  91.         Direction(West, 90))
  92.   SCALE(From(1,0,2,1), To(0,0,1,1), Time(0, 1));
  93. END
  94.  
  95. //------------------------------------------------------------------------------------
  96. //
  97. // ScaleOut
  98. // The old picture shrinks down along a side, revealing the new
  99.  
  100. WIPEDEF("ScaleOut", Grid(1,1), TimeScale(1), ForegroundWipe(FALSE), CopyBackground(TRUE),
  101.         Direction(North, 90))
  102.     SCALE(From(0,0,1,0), To(0,0,1,1), Time(0,1), Backwards(TRUE));
  103. END
  104.  
  105. //------------------------------------------------------------------------------------
  106. //
  107. // SplineMove
  108. // Moves in the whole picture on a spline path
  109.  
  110. WIPEDEF("Sweep", Grid(1,1), TimeScale(1), CopyBackground(TRUE), Direction(West,90))
  111.   MOVE(From(1,1,2,2), Thru1(1,0,2,1), Thru2(0,-1,1,0), To(0,0,1,1), Time(0,1));
  112. END
  113.  
  114.  
  115. //------------------------------------------------------------------------------------
  116. //
  117. // SplitSplineMove
  118. // Like SplineMove, but with a horizontal split
  119.  
  120. WIPEDEF("SplitSweep", Grid(2,2), TimeScale(1), CopyBackground(TRUE), Direction(West,90))
  121.   MOVE(From(-1,-2,0,0), Thru1(-1,0,0,2), Thru2(0, 2,1,4), To(0,0,1,2), Time(0,1));
  122.   MOVE(From( 2, 2,3,4), Thru1( 2,0,3,2), Thru2(1,-2,2,0), To(1,0,2,2), Time(0,1));
  123. END
  124.  
  125.  
  126. //------------------------------------------------------------------------------------
  127. //
  128. // Squeeze
  129. // The new picture is moved in, squeezing down the old picture
  130.  
  131. WIPEDEF("Squeeze", Grid(1,1), TimeScale(1), ForegroundWipe(FALSE),
  132.         CopyBackground(TRUE), Direction(West,90))
  133.   MOVE(From(1,0,2,1), To(0,0,1,1), Time(0,1));
  134.   SCALE(From(0,0,0,1), To(0,0,1,1), Time(0,1), Backwards(TRUE), OldPicture(TRUE),
  135.         Shrink(FALSE));
  136. END
  137.  
  138. //------------------------------------------------------------------------------------
  139. //
  140. // MoveIn
  141. // ???
  142.  
  143. WIPEDEF("PushStrips", Grid(4,8), TimeScale(9), CopyBackground(FALSE),
  144.     Direction(West,90), OutWipe(FALSE))
  145.   SPLINE(Position(0,2250,4096,4096));
  146.   MOVE(From(4,0,8,1), To(0,0,4,1), Time(0,2));
  147.   MOVE(From(4,1,8,2), To(0,1,4,2), Time(1,3));
  148.   MOVE(From(4,2,8,3), To(0,2,4,3), Time(2,4));
  149.   MOVE(From(4,3,8,4), To(0,3,4,4), Time(3,5));
  150.   MOVE(From(4,4,8,5), To(0,4,4,5), Time(4,6));
  151.   MOVE(From(4,5,8,6), To(0,5,4,6), Time(5,7));
  152.   MOVE(From(4,6,8,7), To(0,6,4,7), Time(6,8));
  153.   MOVE(From(4,7,8,8), To(0,7,4,8), Time(7,9));
  154. END
  155.  
  156. //------------------------------------------------------------------------------------
  157. //
  158. // Implode
  159. // ???
  160.  
  161. WIPEDEF("QuadrantIn", Grid(2,2), TimeScale(1), CopyBackground(FALSE))
  162.   MOVE(From(-1,-1,0,0), To(0,0,1,1), Time(0, 1));
  163.   MOVE(From( 2,-1,3,0), To(1,0,2,1), Time(0, 1));
  164.   MOVE(From(-1, 2,0,3), To(0,1,1,2), Time(0, 1));
  165.   MOVE(From( 2, 2,3,3), To(1,1,2,2), Time(0, 1));
  166. END
  167.  
  168. /***** Entries *****/
  169.  
  170. GROUPID($07109800);
  171. ICONFILE(":scala/wipes/wipes.bmp", Size(26,18), Spacing(32,20));
  172.  
  173. ENTRY("ScrollDivide", Direction(East), Icon(12,0));
  174.  
  175. ENTRY("ScrollIn", Direction(North), Icon(13,0));
  176. ENTRY("ScrollIn", Direction(South), Icon(14,0));
  177.  
  178. ENTRY("ScrollOut", Direction(North), Icon(15,0));
  179. ENTRY("ScrollOut", Direction(South), Icon(16,0));
  180.  
  181. ENTRY("Derrick", Direction(North), Icon(5,1));
  182. ENTRY("Derrick", Direction(South), Icon(6,1));
  183. ENTRY("Derrick", Direction(West),  Icon(8,1));
  184. ENTRY("Derrick", Direction(East),  Icon(7,1));
  185.  
  186. ENTRY("Push", Direction(North), Icon(8,2));
  187. ENTRY("Push", Direction(South), Icon(9,2));
  188. ENTRY("Push", Direction(East),  Icon(10,2));
  189. ENTRY("Push", Direction(West),  Icon(11,2));
  190.  
  191. ENTRY("FlipOver", Direction(North), Icon(12,2));
  192. ENTRY("FlipOver", Direction(South), Icon(13,2));
  193. ENTRY("FlipOver", Direction(East),  Icon(14,2));
  194. ENTRY("FlipOver", Direction(West),  Icon(15,2));
  195.  
  196. ENTRY("ScaleOut", Direction(North),  Icon(9,3));
  197. ENTRY("ScaleOut", Direction(South), Icon(10,3));
  198. ENTRY("ScaleOut", Direction(West),  Icon(11,3));
  199. ENTRY("ScaleOut", Direction(East),  Icon(12,3));
  200.  
  201. ENTRY("ScaleIn", Direction(North), Icon(13,3));
  202. ENTRY("ScaleIn", Direction(South), Icon(14,3));
  203. ENTRY("ScaleIn", Direction(West),  Icon(15,3));
  204. ENTRY("ScaleIn", Direction(East),  Icon(16,3));
  205.  
  206. ENTRY("Sweep",   Direction(West),  Icon(4,5));
  207. ENTRY("SplitSweep", Direction(West), Icon(5,5));
  208. ENTRY("Squeeze",      Direction(West),  Icon(6,5));
  209.  
  210. ENTRY("PushStrips",       Direction(West),  Icon(10,6));
  211. ENTRY("QuadrantIn",                        Icon(5,6));
  212.