home *** CD-ROM | disk | FTP | other *** search
/ PC World 2000 August / PCWorld_2000-08_cd.bin / ipb / Wipes / reveals.wip < prev    next >
Text File  |  1998-07-02  |  61KB  |  1,490 lines
  1. !ScalaScript
  2.  
  3. /*
  4. ** $Id: reveals.wip,v 0.1 1997/06/06 13:43:39 marius Exp $
  5. **
  6. ** Reveal wipes
  7. **
  8. */
  9.  
  10.  
  11. //------------------------------------------------------------------------------------
  12. //
  13. // Wipe
  14. // Reveals the new picture
  15.  
  16. WIPEDEF("Wipe", Grid(1,1), TimeScale(1), CopyBackground(FALSE),
  17.     Steps(1, "Width/Speed"), Direction(South, 90))
  18.   COPY(From(0,0,1,0), To(0,0,1,1), Time(0,1));
  19. END
  20.  
  21.  
  22. //------------------------------------------------------------------------------------
  23. //
  24. // Line
  25. // Like Wipe, but puts a black line between the pictures
  26.  
  27. WIPEDEF("Line", Grid(1,32), TimeScale(64), CopyBackground(FALSE),
  28.     Steps(1, "Height/Speed"), Direction(South, 90), ForegroundWipe(FALSE))
  29.   SOURCE("Color", "Color");
  30.   COPY(From(0,0,1,0), To(0,0,1,32), Time(0,63));
  31.   SOURCE("New", "New");
  32.   COPY(From(0,0,1,0), To(0,0,1,32), Time(1,64));
  33. END
  34.  
  35. //------------------------------------------------------------------------------------
  36. //
  37. // Center
  38. // Reveals the new picture from the center of the screen.
  39.  
  40. WIPEDEF("Center", Grid(2,2), TimeScale(1), CopyBackground(FALSE), Steps(1, "Width/Speed"))
  41.   COPY(From(1,1,1,1), To(0,0,2,2), Time(0,1));
  42. END
  43.  
  44.  
  45. //------------------------------------------------------------------------------------
  46. //
  47. // Split
  48. // Two curtains side by side reveals the new picture
  49.  
  50. WIPEDEF("Split", Grid(4,1), TimeScale(1), CopyBackground(FALSE), Steps(1, "Width/Speed"),
  51.         Direction(East, 90))
  52.   COPY(From(1,0,1,1), To(0,0,2,1), Time(0, 1));
  53.   COPY(From(3,0,3,1), To(2,0,4,1), Time(0, 1));
  54. END
  55.  
  56.  
  57. //------------------------------------------------------------------------------------
  58. //
  59. // Spot
  60. // The screen is split in four, each part reveals from the middle
  61.  
  62. WIPEDEF("Quadrant", Grid(4,4), TimeScale(2), CopyBackground(FALSE), Steps(1, "Width/Speed"))
  63.   COPY(From(1,1,1,1), To(0,0,2,2), Time(0, 1));
  64.   COPY(From(3,1,3,1), To(2,0,4,2), Time(1, 2));
  65.   COPY(From(1,3,1,3), To(0,2,2,4), Time(1, 2));
  66.   COPY(From(3,3,3,3), To(2,2,4,4), Time(0, 1));
  67. END
  68.  
  69.  
  70. //------------------------------------------------------------------------------------
  71. //
  72. // Corner
  73. // Reveals the new picture from a corner
  74.  
  75. WIPEDEF("Corner", Grid(1,1), TimeScale(1), CopyBackground(FALSE),
  76.     Steps(1, "Width/Speed"), Direction(NorthWest,90))
  77.   COPY(From(0,0,0,0), To(0,0,1,1), Time(0, 1));
  78. END
  79.  
  80.  
  81. //------------------------------------------------------------------------------------
  82. //
  83. // Upsdowns
  84. // Eight vertical strips alternates between wiping up and down.
  85.  
  86. WIPEDEF("Stripper", Grid(8,1), TimeScale(4), CopyBackground(FALSE),
  87.     Steps(1, "Height/Speed"), Direction(East, 90))
  88.   COPY(From(0,1,1,1), To(0,0,1,1), Time(0, 1));
  89.   COPY(From(1,0,2,0), To(1,0,2,1), Time(0, 1));
  90.   COPY(From(2,1,3,1), To(2,0,3,1), Time(1, 2));
  91.   COPY(From(3,0,4,0), To(3,0,4,1), Time(1, 2));
  92.   COPY(From(4,1,5,1), To(4,0,5,1), Time(2, 3));
  93.   COPY(From(5,0,6,0), To(5,0,6,1), Time(2, 3));
  94.   COPY(From(6,1,7,1), To(6,0,7,1), Time(3, 4));
  95.   COPY(From(7,0,8,0), To(7,0,8,1), Time(3, 4));
  96. END
  97.  
  98.  
  99. //------------------------------------------------------------------------------------
  100. //
  101. // SmallBlinds
  102. // Blinds opening up.
  103.  
  104. WIPEDEF("SmallBlinds", Grid(1,32), TimeScale(1), CopyBackground(FALSE),
  105.     Steps(1, "Height/Speed"), Direction(South,90))
  106.   COPY(From(0, 1,1, 1), To(0, 0,1, 2), Time(0, 1));
  107.   COPY(From(0, 3,1, 3), To(0, 2,1, 4), Time(0, 1));
  108.   COPY(From(0, 5,1, 5), To(0, 4,1, 6), Time(0, 1));
  109.   COPY(From(0, 7,1, 7), To(0, 6,1, 8), Time(0, 1));
  110.   COPY(From(0, 9,1, 9), To(0, 8,1,10), Time(0, 1));
  111.   COPY(From(0,11,1,11), To(0,10,1,12), Time(0, 1));
  112.   COPY(From(0,13,1,13), To(0,12,1,14), Time(0, 1));
  113.   COPY(From(0,15,1,15), To(0,14,1,16), Time(0, 1));
  114.   COPY(From(0,17,1,17), To(0,16,1,18), Time(0, 1));
  115.   COPY(From(0,19,1,19), To(0,18,1,20), Time(0, 1));
  116.   COPY(From(0,21,1,21), To(0,20,1,22), Time(0, 1));
  117.   COPY(From(0,23,1,23), To(0,22,1,24), Time(0, 1));
  118.   COPY(From(0,25,1,25), To(0,24,1,26), Time(0, 1));
  119.   COPY(From(0,27,1,27), To(0,26,1,28), Time(0, 1));
  120.   COPY(From(0,29,1,29), To(0,28,1,30), Time(0, 1));
  121.   COPY(From(0,31,1,31), To(0,30,1,32), Time(0, 1));
  122. END
  123.  
  124.  
  125. //------------------------------------------------------------------------------------
  126. //
  127. // Excrawl
  128. // Rectangles grow from left and right edge at the same time
  129.  
  130. WIPEDEF("ScaleStripper", Grid(1,32), TimeScale(8), CopyBackground(FALSE),
  131.     Steps(1, "Height/Speed"), Direction(South,90), ForegroundWipe(FALSE))
  132.   COPY(From(0, 1,0, 1), To(0, 0,1, 2), Time(0, 1));
  133.   COPY(From(0, 3,0, 3), To(0, 2,1, 4), Time(1, 2));
  134.  
  135.   COPY(From(1, 5,1, 5), To(0, 4,1, 6), Time(0, 1));
  136.   COPY(From(1, 7,1, 7), To(0, 6,1, 8), Time(1, 2));
  137.  
  138.   COPY(From(0, 9,0, 9), To(0, 8,1,10), Time(2, 3));
  139.   COPY(From(0,11,0,11), To(0,10,1,12), Time(3, 4));
  140.  
  141.   COPY(From(1,13,1,13), To(0,12,1,14), Time(2, 3));
  142.   COPY(From(1,15,1,15), To(0,14,1,16), Time(3, 4));
  143.  
  144.   COPY(From(0,17,0,17), To(0,16,1,18), Time(4, 5));
  145.   COPY(From(0,19,0,19), To(0,18,1,20), Time(5, 6));
  146.  
  147.   COPY(From(1,21,1,21), To(0,20,1,22), Time(4, 5));
  148.   COPY(From(1,23,1,23), To(0,22,1,24), Time(5, 6));
  149.  
  150.   COPY(From(0,25,0,25), To(0,24,1,26), Time(6, 7));
  151.   COPY(From(0,27,0,27), To(0,26,1,28), Time(7, 8));
  152.  
  153.   COPY(From(1,29,1,29), To(0,28,1,30), Time(6, 7));
  154.   COPY(From(1,31,1,31), To(0,30,1,32), Time(7, 8));
  155. END
  156.  
  157.  
  158. //------------------------------------------------------------------------------------
  159. //
  160. // Curtain
  161. // A curtain is drawn aside, revealing the new picture
  162.  
  163. WIPEDEF("Curtain", Grid(2,1), TimeScale(1), CopyBackground(FALSE),
  164.     Steps(1, "Width/Speed"), Direction(East,90))
  165.   COPY(From(1,0,1,1), To(0,0,2,1), Time(0, 1));
  166. END
  167.  
  168.  
  169. //------------------------------------------------------------------------------------
  170. //
  171. // Turn
  172. // Four rectangles reveals. Each is turned 90 degrees.
  173.  
  174. WIPEDEF("SquareDance", Grid(2,2), TimeScale(1), CopyBackground(FALSE), Steps(1, "Width/Speed"))
  175.   COPY(From(0,1,1,1), To(0,0,1,1), Time(0, 1));
  176.   COPY(From(1,0,1,1), To(1,0,2,1), Time(0, 1));
  177.   COPY(From(1,1,2,1), To(1,1,2,2), Time(0, 1));
  178.   COPY(From(1,1,1,2), To(0,1,1,2), Time(0, 1));
  179. END
  180.  
  181.  
  182. //------------------------------------------------------------------------------------
  183. //
  184. // Spiral
  185. // The new picture is revealed in a spiral towards the middle
  186.  
  187. WIPEDEF("SpiralIn", Grid(8,8), TimeScale(64), CopyBackground(FALSE), Steps(1, "Width/Speed"))
  188.   COPY(From(0,0,0,1), To(0,0,7,1), Time( 0, 7));
  189.   COPY(From(7,0,8,0), To(7,0,8,7), Time( 7,14));
  190.   COPY(From(8,7,8,8), To(1,7,8,8), Time(14,21));
  191.   COPY(From(0,8,1,8), To(0,2,1,8), Time(21,27));
  192.   COPY(From(0,1,0,2), To(0,1,6,2), Time(27,33));
  193.   COPY(From(6,1,7,1), To(6,1,7,6), Time(33,38));
  194.   COPY(From(7,6,7,7), To(2,6,7,7), Time(38,43));
  195.   COPY(From(1,7,2,7), To(1,3,2,7), Time(43,47));
  196.   COPY(From(1,2,1,3), To(1,2,5,3), Time(47,51));
  197.   COPY(From(5,2,6,2), To(5,2,6,5), Time(51,54));
  198.   COPY(From(6,5,6,6), To(3,5,6,6), Time(54,57));
  199.   COPY(From(2,6,3,6), To(2,4,3,6), Time(57,59));
  200.   COPY(From(2,3,2,4), To(2,3,4,4), Time(59,61));
  201.   COPY(From(4,3,5,3), To(4,3,5,5), Time(61,63));
  202.   COPY(From(4,4,4,5), To(3,4,4,5), Time(63,64));
  203. END
  204.  
  205.  
  206. //------------------------------------------------------------------------------------
  207. //
  208. // Swiss
  209. // The new picture is revaled from each corner
  210.  
  211. WIPEDEF("Swiss", Grid(2,2), TimeScale(1), CopyBackground(FALSE), Steps(1, "Width/Speed"))
  212.   COPY(From(0,0,0,0), To(0,0,1,1), Time(0,1));
  213.   COPY(From(2,0,2,0), To(1,0,2,1), Time(0,1));
  214.   COPY(From(2,2,2,2), To(1,1,2,2), Time(0,1));
  215.   COPY(From(0,2,0,2), To(0,1,1,2), Time(0,1));
  216. END
  217.  
  218.  
  219. //------------------------------------------------------------------------------------
  220. //
  221. // Stripes
  222. // 12 rectangle reveal
  223.  
  224. WIPEDEF("Stripes", Grid(1,12), TimeScale(2), CopyBackground(FALSE),
  225.         CopyBackground(FALSE), Direction(East,90))
  226.   COPY(From(0, 0,0, 1), To(0, 0,1, 1), Time(0,1));
  227.   COPY(From(0, 1,0, 2), To(0, 1,1, 2), Time(1,2));
  228.   COPY(From(0, 2,0, 3), To(0, 2,1, 3), Time(0,1));
  229.   COPY(From(0, 3,0, 4), To(0, 3,1, 4), Time(1,2));
  230.   COPY(From(0, 4,0, 5), To(0, 4,1, 5), Time(0,1));
  231.   COPY(From(0, 5,0, 6), To(0, 5,1, 6), Time(1,2));
  232.   COPY(From(0, 6,0, 7), To(0, 6,1, 7), Time(0,1));
  233.   COPY(From(0, 7,0, 8), To(0, 7,1, 8), Time(1,2));
  234.   COPY(From(0, 8,0, 9), To(0, 8,1, 9), Time(0,1));
  235.   COPY(From(0, 9,0,10), To(0, 9,1,10), Time(1,2));
  236.   COPY(From(0,10,0,11), To(0,10,1,11), Time(0,1));
  237.   COPY(From(0,11,0,12), To(0,11,1,12), Time(1,2));
  238. END
  239.  
  240. //------------------------------------------------------------------------------------
  241. //
  242. // Fashion
  243. // Eight spline path rectangles with overshoot. Splits the screen horizontally.
  244.  
  245. WIPEDEF("Peel", Grid(4,8), TimeScale(8), CopyBackground(TRUE),
  246.         Direction(South,90))
  247.   COPY(From(-4,0,0,1), Thru1( 4,0,8,1), Thru2( 1,0,5,1), To(0,0,4,1), Time(0, 8));
  248.   COPY(From( 4,1,8,2), Thru1(-4,1,0,2), Thru2(-1,1,3,2), To(0,1,4,2), Time(1, 8));
  249.   COPY(From(-4,2,0,3), Thru1( 4,2,8,3), Thru2( 1,2,5,3), To(0,2,4,3), Time(2, 8));
  250.   COPY(From( 4,3,8,4), Thru1(-4,3,0,4), Thru2(-1,3,3,4), To(0,3,4,4), Time(3, 8));
  251.   COPY(From(-4,4,0,5), Thru1( 4,4,8,5), Thru2( 1,4,5,5), To(0,4,4,5), Time(4, 8));
  252.   COPY(From( 4,5,8,6), Thru1(-4,5,0,6), Thru2(-1,5,3,6), To(0,5,4,6), Time(5, 8));
  253.   COPY(From(-4,6,0,7), Thru1( 4,6,8,7), Thru2( 1,6,5,7), To(0,6,4,7), Time(6, 8));
  254.   COPY(From( 4,7,8,8), Thru1(-4,7,0,8), Thru2(-1,7,3,8), To(0,7,4,8), Time(7, 8));
  255. END
  256.  
  257.  
  258. //------------------------------------------------------------------------------------
  259. //
  260. // FallingDown
  261. // Eight horizontal rectangles falls from top of screen.
  262.  
  263. WIPEDEF("Stacker", Grid(8,8), TimeScale(36), CopyBackground(TRUE),
  264.         Direction(South,90))
  265.   SPLINE(Position(0,800,900,4096));
  266.   COPY(From(0,-1,8,0),  To(0,7,8,8),  Time( 0, 8));
  267.   COPY(From(0,-1,8,0),  To(0,6,8,7),  Time( 8,15));
  268.   COPY(From(0,-1,8,0),  To(0,5,8,6),  Time(15,21));
  269.   COPY(From(0,-1,8,0),  To(0,4,8,5),  Time(21,26));
  270.   COPY(From(0,-1,8,0),  To(0,3,8,4),  Time(26,30));
  271.   COPY(From(0,-1,8,0),  To(0,2,8,3),  Time(30,33));
  272.   COPY(From(0,-1,8,0),  To(0,1,8,2),  Time(33,35));
  273.   COPY(From(0,-1,8,0),  To(0,0,8,1),  Time(35,36));
  274. END
  275.  
  276.  
  277. //------------------------------------------------------------------------------------
  278. //
  279. // BounceRect
  280. // A rectangle comes in, bounces a few times and wipes to full screen.
  281.  
  282. WIPEDEF("SpiralBlock", Grid(4,4), TimeScale(4), CopyBackground(TRUE),
  283.         Direction(NorthEast,90))
  284.   COPY(From(-1,0,0,1), To(3,0,4,1), Time(0, 1));
  285.   COPY(From( 3,0,4,1), To(3,3,4,4), Time(1, 2));
  286.   COPY(From( 3,3,4,4), To(0,3,1,4), Time(2, 3));
  287.   COPY(From( 0,3,1,4), To(0,0,4,4), Time(3, 4));
  288. END
  289.  
  290.  
  291. //------------------------------------------------------------------------------------
  292. //
  293. // Wobble
  294. // 16 vertical growing rectangles use spline position.
  295.  
  296. WIPEDEF("PremiereReveal", Grid(16,2), TimeScale(14), CopyBackground(TRUE),
  297.         Direction(East,90))
  298.   SPLINE(Position(0,4000,-3000,4096));
  299.   COPY(From( 2,1, 2,1), To( 0,0, 2,2), Time(0, 7));
  300.   COPY(From( 4,1, 4,1), To( 2,0, 4,2), Time(1, 8));
  301.   COPY(From( 6,1, 6,1), To( 4,0, 6,2), Time(2, 9));
  302.   COPY(From( 8,1, 8,1), To( 6,0, 8,2), Time(3,10));
  303.   COPY(From(10,1,10,1), To( 8,0,10,2), Time(4,11));
  304.   COPY(From(12,1,12,1), To(10,0,12,2), Time(5,12));
  305.   COPY(From(14,1,14,1), To(12,0,14,2), Time(6,13));
  306.   COPY(From(16,1,16,1), To(14,0,16,2), Time(7,14));
  307. END
  308.  
  309.  
  310. //------------------------------------------------------------------------------------
  311. //
  312. // Blinds
  313. // Eight vertical side wipes offset in time.
  314.  
  315. WIPEDEF("Timeslice", Grid(8,1), TimeScale(14), CopyBackground(FALSE), Direction(East,90))
  316.   COPY(From(0,0,0,1), To(0,0,1,1), Time(0,7));
  317.   COPY(From(1,0,1,1), To(1,0,2,1), Time(1,8));
  318.   COPY(From(2,0,2,1), To(2,0,3,1), Time(2,9));
  319.   COPY(From(3,0,3,1), To(3,0,4,1), Time(3,10));
  320.   COPY(From(4,0,4,1), To(4,0,5,1), Time(4,11));
  321.   COPY(From(5,0,5,1), To(5,0,6,1), Time(5,12));
  322.   COPY(From(6,0,6,1), To(6,0,7,1), Time(6,13));
  323.   COPY(From(7,0,7,1), To(7,0,8,1), Time(7,14));
  324. END
  325.  
  326.  
  327. //------------------------------------------------------------------------------------
  328. //
  329. // CornerSlice
  330. // Blinds going both left-right and top-down.
  331.  
  332. WIPEDEF("CornerSlice", Grid(8,8), TimeScale(14), CopyBackground(FALSE),
  333.         Direction(SouthEast,90))
  334.   COPY(From(0,0,0,8), To(0,0,1,8), Time(0,7));
  335.   COPY(From(1,0,1,8), To(1,0,2,8), Time(1,8));
  336.   COPY(From(2,0,2,8), To(2,0,3,8), Time(2,9));
  337.   COPY(From(3,0,3,8), To(3,0,4,8), Time(3,10));
  338.   COPY(From(4,0,4,8), To(4,0,5,8), Time(4,11));
  339.   COPY(From(5,0,5,8), To(5,0,6,8), Time(5,12));
  340.   COPY(From(6,0,6,8), To(6,0,7,8), Time(6,13));
  341.   COPY(From(7,0,7,8), To(7,0,8,8), Time(7,14));
  342.  
  343.   COPY(From(0,0,8,0), To(0,0,8,1), Time(0,7));
  344.   COPY(From(0,1,8,1), To(0,1,8,2), Time(1,8));
  345.   COPY(From(0,2,8,2), To(0,2,8,3), Time(2,9));
  346.   COPY(From(0,3,8,3), To(0,3,8,4), Time(3,10));
  347.   COPY(From(0,4,8,4), To(0,4,8,5), Time(4,11));
  348.   COPY(From(0,5,8,5), To(0,5,8,6), Time(5,12));
  349.   COPY(From(0,6,8,6), To(0,6,8,7), Time(6,13));
  350.   COPY(From(0,7,8,7), To(0,7,8,8), Time(7,14));
  351. END
  352.  
  353.  
  354. //------------------------------------------------------------------------------------
  355. //
  356. // PaintDrip
  357. // 32 paint segments drips (with spline) towards the bottom of screen.
  358.  
  359. WIPEDEF("PaintDrip", Grid(32,1), TimeScale(18), CopyBackground(TRUE),
  360.         Direction(South,90))
  361.   SPLINE(Position(0,4500,-2500,4096));
  362.   COPY(From(0,0,1,0), To(0,0,1,1), Time(0,8));
  363.   COPY(From(1,0,2,0), To(1,0,2,1), Time(0,14));
  364.   COPY(From(2,0,3,0), To(2,0,3,1), Time(0,6));
  365.   COPY(From(3,0,4,0), To(3,0,4,1), Time(0,18));
  366.   COPY(From(4,0,5,0), To(4,0,5,1), Time(0,14));
  367.   COPY(From(5,0,6,0), To(5,0,6,1), Time(0,10));
  368.   COPY(From(6,0,7,0), To(6,0,7,1), Time(0,16));
  369.   COPY(From(7,0,8,0), To(7,0,8,1), Time(0,12));
  370.  
  371.   COPY(From(8,0,9,0),   To(8,0,9,1), Time(0,9));
  372.   COPY(From(9,0,10,0),  To(9,0,10,1), Time(0,17));
  373.   COPY(From(10,0,11,0), To(10,0,11,1), Time(0,13));
  374.   COPY(From(11,0,12,0), To(11,0,12,1), Time(0,5));
  375.   COPY(From(12,0,13,0), To(12,0,13,1), Time(0,11));
  376.   COPY(From(13,0,14,0), To(13,0,14,1), Time(0,7));
  377.   COPY(From(14,0,15,0), To(14,0,15,1), Time(0,15));
  378.   COPY(From(15,0,16,0), To(15,0,16,1), Time(0,9));
  379.  
  380.   COPY(From(16,0,17,0),   To(16,0,17,1), Time(0,9));
  381.   COPY(From(17,0,18,0),  To(17,0,18,1), Time(0,17));
  382.   COPY(From(18,0,19,0), To(18,0,19,1), Time(0,13));
  383.   COPY(From(19,0,20,0), To(19,0,20,1), Time(0,5));
  384.   COPY(From(20,0,21,0), To(20,0,21,1), Time(0,11));
  385.   COPY(From(21,0,22,0), To(21,0,22,1), Time(0,7));
  386.   COPY(From(22,0,23,0), To(22,0,23,1), Time(0,15));
  387.   COPY(From(23,0,24,0), To(23,0,24,1), Time(0,9));
  388.  
  389.   COPY(From(24,0,25,0),   To(24,0,25,1), Time(0,9));
  390.   COPY(From(25,0,26,0),  To(25,0,26,1), Time(0,17));
  391.   COPY(From(26,0,27,0), To(26,0,27,1), Time(0,13));
  392.   COPY(From(27,0,28,0), To(27,0,28,1), Time(0,5));
  393.   COPY(From(28,0,29,0), To(28,0,29,1), Time(0,11));
  394.   COPY(From(29,0,30,0), To(29,0,30,1), Time(0,7));
  395.   COPY(From(30,0,31,0), To(30,0,31,1), Time(0,15));
  396.   COPY(From(31,0,32,0), To(31,0,32,1), Time(0,9));
  397. END
  398.  
  399.  
  400. //------------------------------------------------------------------------------------
  401. //
  402. // Squares
  403. // Simple 4 by 3 chess grid wipe
  404.  
  405. WIPEDEF("MiniQuadrant", Grid(8,6), TimeScale(6), CopyBackground(FALSE),
  406.         Direction(South,90))
  407.   COPY(From(1,1,1,1), To(0,0, 2,2), Time( 0, 1));
  408.   COPY(From(3,1,3,1), To(2,0, 4,2), Time( 3, 4));
  409.   COPY(From(5,1,5,1), To(4,0, 6,2), Time( 0, 1));
  410.   COPY(From(7,1,7,1), To(6,0, 8,2), Time( 3, 4));
  411.  
  412.   COPY(From(1,3,1,3), To(0,2, 2,4), Time( 4, 5));
  413.   COPY(From(3,3,3,3), To(2,2, 4,4), Time( 1, 2));
  414.   COPY(From(5,3,5,3), To(4,2, 6,4), Time( 4, 5));
  415.   COPY(From(7,3,7,3), To(6,2, 8,4), Time( 1, 2));
  416.  
  417.   COPY(From(1,5,1,5), To(0,4, 2,6), Time( 2, 3));
  418.   COPY(From(3,5,3,5), To(2,4, 4,6), Time( 5, 6));
  419.   COPY(From(5,5,5,5), To(4,4, 6,6), Time( 2, 3));
  420.   COPY(From(7,5,7,5), To(6,4, 8,6), Time( 5, 6));
  421. END
  422.  
  423.  
  424.  
  425. //------------------------------------------------------------------------------------
  426. //
  427. // Strips
  428. // Sideways strips start from different positions.
  429.  
  430. WIPEDEF("DiagonalStrips", Grid(16,16), TimeScale(1), CopyBackground(FALSE),
  431.         Direction(East,90))
  432.   COPY(From( 0, 0, 0, 1), To(0, 0,16, 1), Time(0, 1));
  433.   COPY(From( 1, 1, 1, 2), To(0, 1,16, 2), Time(0, 1));
  434.   COPY(From( 2, 2, 2, 3), To(0, 2,16, 3), Time(0, 1));
  435.   COPY(From( 3, 3, 3, 4), To(0, 3,16, 4), Time(0, 1));
  436.   COPY(From( 4, 4, 4, 5), To(0, 4,16, 5), Time(0, 1));
  437.   COPY(From( 5, 5, 5, 6), To(0, 5,16, 6), Time(0, 1));
  438.   COPY(From( 6, 6, 6, 7), To(0, 6,16, 7), Time(0, 1));
  439.   COPY(From( 7, 7, 7, 8), To(0, 7,16, 8), Time(0, 1));
  440.   COPY(From( 8, 8, 8, 9), To(0, 8,16, 9), Time(0, 1));
  441.   COPY(From( 9, 9, 9,10), To(0, 9,16,10), Time(0, 1));
  442.   COPY(From(10,10,10,11), To(0,10,16,11), Time(0, 1));
  443.   COPY(From(11,11,11,12), To(0,11,16,12), Time(0, 1));
  444.   COPY(From(12,12,12,13), To(0,12,16,13), Time(0, 1));
  445.   COPY(From(13,13,13,14), To(0,13,16,14), Time(0, 1));
  446.   COPY(From(14,14,14,15), To(0,14,16,15), Time(0, 1));
  447.   COPY(From(15,15,15,16), To(0,15,16,16), Time(0, 1));
  448. END
  449.  
  450. //------------------------------------------------------------------------------------
  451. //
  452. // Turnaround
  453. // Four blocks move from the middle of the screen to the corners,
  454. // slide to the other corner and grow to fill the screen.
  455.  
  456. WIPEDEF("Turnaround", Grid(4,4), TimeScale(3), CopyBackground(TRUE), OutWipe(FALSE))
  457.   COPY(From(2,2,2,2), To(0,0,1,1), Time(0, 1));
  458.   COPY(From(2,2,2,2), To(3,0,4,1), Time(0, 1));
  459.   COPY(From(2,2,2,2), To(0,3,1,4), Time(0, 1));
  460.   COPY(From(2,2,2,2), To(3,3,4,4), Time(0, 1));
  461.  
  462.   COPY(From(0,0,1,1), To(3,0,4,1), Time(1, 2));
  463.   COPY(From(3,0,4,1), To(3,3,4,4), Time(1, 2));
  464.   COPY(From(0,3,1,4), To(0,0,1,1), Time(1, 2));
  465.   COPY(From(3,3,4,4), To(0,3,1,4), Time(1, 2));
  466.  
  467.   COPY(From(3,0,4,1), To(2,0,4,2), Time(2, 3));
  468.   COPY(From(3,3,4,4), To(2,2,4,4), Time(2, 3));
  469.   COPY(From(0,0,1,1), To(0,0,2,2), Time(2, 3));
  470.   COPY(From(0,3,1,4), To(0,2,2,4), Time(2, 3));
  471. END
  472.  
  473.  
  474. //------------------------------------------------------------------------------------
  475. //
  476. // Closure
  477. // Ten vertical stripes closes down along a diagonal
  478.  
  479. WIPEDEF("Closure", Grid(10,10), TimeScale(14), CopyBackground(FALSE),
  480.         Direction(South,90))
  481.   COPY(From( 0, 0, 1, 0), To( 0, 0, 1,10), Time( 1, 5));
  482.   COPY(From( 1, 0, 2, 0), To( 1, 0, 2, 9), Time( 2, 6));
  483.   COPY(From( 2, 0, 3, 0), To( 2, 0, 3, 8), Time( 3, 7));
  484.   COPY(From( 3, 0, 4, 0), To( 3, 0, 4, 7), Time( 4, 8));
  485.   COPY(From( 4, 0, 5, 0), To( 4, 0, 5, 6), Time( 5, 9));
  486.   COPY(From( 5, 0, 6, 0), To( 5, 0, 6, 5), Time( 6,10));
  487.   COPY(From( 6, 0, 7, 0), To( 6, 0, 7, 4), Time( 7,11));
  488.   COPY(From( 7, 0, 8, 0), To( 7, 0, 8, 3), Time( 8,12));
  489.   COPY(From( 8, 0, 9, 0), To( 8, 0, 9, 2), Time( 9,13));
  490.   COPY(From( 9, 0,10, 0), To( 9, 0,10, 1), Time(10,14));
  491.  
  492.   COPY(From( 9,10,10,10), To( 9, 1,10,10), Time( 1, 5));
  493.   COPY(From( 8,10, 9,10), To( 8, 2, 9,10), Time( 2, 6));
  494.   COPY(From( 7,10, 8,10), To( 7, 3, 8,10), Time( 3, 7));
  495.   COPY(From( 6,10, 7,10), To( 6, 4, 7,10), Time( 4, 8));
  496.   COPY(From( 5,10, 6,10), To( 5, 5, 6,10), Time( 5, 9));
  497.   COPY(From( 4,10, 5,10), To( 4, 6, 5,10), Time( 6,10));
  498.   COPY(From( 3,10, 4,10), To( 3, 7, 4,10), Time( 7,11));
  499.   COPY(From( 2,10, 3,10), To( 2, 8, 3,10), Time( 8,12));
  500.   COPY(From( 1,10, 2,10), To( 1, 9, 2,10), Time( 9,13));
  501.   COPY(From( 0,10, 1,10), To( 0,10, 1,10), Time(10,14));
  502. END
  503.  
  504.  
  505. //------------------------------------------------------------------------------------
  506. //
  507. // SmallSpiral
  508. // A small 10 by 10 grid spiral
  509.  
  510. WIPEDEF("ZoomSpiral", Grid(10,10), TimeScale(29), CopyBackground(FALSE),
  511.         Direction(East,90))
  512.   COPY(From( 5, 5, 5, 5), To( 4, 4, 6, 6), Time( 1, 5));
  513.   COPY(From( 7, 5, 7, 5), To( 6, 4, 8, 6), Time( 2, 6));
  514.   COPY(From( 7, 7, 7, 7), To( 6, 6, 8, 8), Time( 3, 7));
  515.   COPY(From( 5, 7, 5, 7), To( 4, 6, 6, 8), Time( 4, 8));
  516.   COPY(From( 3, 7, 3, 7), To( 2, 6, 4, 8), Time( 5, 9));
  517.   COPY(From( 3, 5, 3, 5), To( 2, 4, 4, 6), Time( 6,10));
  518.   COPY(From( 3, 3, 3, 3), To( 2, 2, 4, 4), Time( 7,11));
  519.   COPY(From( 5, 3, 5, 3), To( 4, 2, 6, 4), Time( 8,12));
  520.   COPY(From( 7, 3, 7, 3), To( 6, 2, 8, 4), Time( 9,13));
  521.   COPY(From( 9, 3, 9, 3), To( 8, 2,10, 4), Time(10,14));
  522.   COPY(From( 9, 5, 9, 5), To( 8, 4,10, 6), Time(11,15));
  523.   COPY(From( 9, 7, 9, 7), To( 8, 6,10, 8), Time(12,16));
  524.   COPY(From( 9, 9, 9, 9), To( 8, 8,10,10), Time(13,17));
  525.   COPY(From( 7, 9, 7, 9), To( 6, 8, 8,10), Time(14,18));
  526.   COPY(From( 5, 9, 5, 9), To( 4, 8, 6,10), Time(15,19));
  527.   COPY(From( 3, 9, 3, 9), To( 2, 8, 4,10), Time(16,20));
  528.   COPY(From( 1, 9, 1, 9), To( 0, 8, 2,10), Time(17,21));
  529.   COPY(From( 1, 7, 1, 7), To( 0, 6, 2, 8), Time(18,22));
  530.   COPY(From( 1, 5, 1, 5), To( 0, 4, 2, 6), Time(19,23));
  531.   COPY(From( 1, 3, 1, 3), To( 0, 2, 2, 4), Time(20,24));
  532.   COPY(From( 1, 1, 1, 1), To( 0, 0, 2, 2), Time(21,25));
  533.   COPY(From( 3, 1, 3, 1), To( 2, 0, 4, 2), Time(22,26));
  534.   COPY(From( 5, 1, 5, 1), To( 4, 0, 6, 2), Time(23,27));
  535.   COPY(From( 7, 1, 7, 1), To( 6, 0, 8, 2), Time(24,28));
  536.   COPY(From( 9, 1, 9, 1), To( 8, 0,10, 2), Time(25,29));
  537. END
  538.  
  539.  
  540. //------------------------------------------------------------------------------------
  541. //
  542. // SplineWave
  543. // The splinewave originally done by Peter Cherna
  544.  
  545. WIPEDEF("SplineWave", Grid(80,1), TimeScale(80), CopyBackground(TRUE),
  546.         Direction(South,90))
  547.   SPLINE(Position(0,5000,-3000,4096));
  548.   COPY(From( 0,0, 1,0), To( 0,0, 1,1), Time( 1, 40));
  549.   COPY(From( 1,0, 2,0), To( 1,0, 2,1), Time( 1, 41));
  550.   COPY(From( 2,0, 3,0), To( 2,0, 3,1), Time( 1, 42));
  551.   COPY(From( 3,0, 4,0), To( 3,0, 4,1), Time( 1, 43));
  552.   COPY(From( 4,0, 5,0), To( 4,0, 5,1), Time( 1, 44));
  553.   COPY(From( 5,0, 6,0), To( 5,0, 6,1), Time( 1, 45));
  554.   COPY(From( 6,0, 7,0), To( 6,0, 7,1), Time( 1, 46));
  555.   COPY(From( 7,0, 8,0), To( 7,0, 8,1), Time( 1, 47));
  556.   COPY(From( 8,0, 9,0), To( 8,0, 9,1), Time( 1, 48));
  557.   COPY(From( 9,0,10,0), To( 9,0,10,1), Time( 1, 49));
  558.  
  559.   COPY(From(10,0,11,0), To(10,0,11,1), Time( 1, 50));
  560.   COPY(From(11,0,12,0), To(11,0,12,1), Time( 1, 51));
  561.   COPY(From(12,0,13,0), To(12,0,13,1), Time( 1, 52));
  562.   COPY(From(13,0,14,0), To(13,0,14,1), Time( 1, 53));
  563.   COPY(From(14,0,15,0), To(14,0,15,1), Time( 1, 54));
  564.   COPY(From(15,0,16,0), To(15,0,16,1), Time( 1, 55));
  565.   COPY(From(16,0,17,0), To(16,0,17,1), Time( 1, 56));
  566.   COPY(From(17,0,18,0), To(17,0,18,1), Time( 1, 57));
  567.   COPY(From(18,0,19,0), To(18,0,19,1), Time( 1, 58));
  568.   COPY(From(19,0,20,0), To(19,0,20,1), Time( 1, 59));
  569.  
  570.   COPY(From(20,0,21,0), To(20,0,21,1), Time( 1, 60));
  571.   COPY(From(21,0,22,0), To(21,0,22,1), Time( 1, 61));
  572.   COPY(From(22,0,23,0), To(22,0,23,1), Time( 1, 62));
  573.   COPY(From(23,0,24,0), To(23,0,24,1), Time( 1, 63));
  574.   COPY(From(24,0,25,0), To(24,0,25,1), Time( 1, 64));
  575.   COPY(From(25,0,26,0), To(25,0,26,1), Time( 1, 65));
  576.   COPY(From(26,0,27,0), To(26,0,27,1), Time( 1, 66));
  577.   COPY(From(27,0,28,0), To(27,0,28,1), Time( 1, 67));
  578.   COPY(From(28,0,29,0), To(28,0,29,1), Time( 1, 68));
  579.   COPY(From(29,0,30,0), To(29,0,30,1), Time( 1, 69));
  580.  
  581.   COPY(From(30,0,31,0), To(30,0,31,1), Time( 1, 70));
  582.   COPY(From(31,0,32,0), To(31,0,32,1), Time( 1, 71));
  583.   COPY(From(32,0,33,0), To(32,0,33,1), Time( 1, 72));
  584.   COPY(From(33,0,34,0), To(33,0,34,1), Time( 1, 73));
  585.   COPY(From(34,0,35,0), To(34,0,35,1), Time( 1, 74));
  586.   COPY(From(35,0,36,0), To(35,0,36,1), Time( 1, 75));
  587.   COPY(From(36,0,37,0), To(36,0,37,1), Time( 1, 76));
  588.   COPY(From(37,0,38,0), To(37,0,38,1), Time( 1, 77));
  589.   COPY(From(38,0,39,0), To(38,0,39,1), Time( 1, 78));
  590.   COPY(From(39,0,40,0), To(39,0,40,1), Time( 1, 79));
  591.  
  592.   COPY(From(79,0,80,0), To(79,0,80,1), Time( 1, 40));
  593.   COPY(From(78,0,79,0), To(78,0,79,1), Time( 1, 41));
  594.   COPY(From(77,0,78,0), To(77,0,78,1), Time( 1, 42));
  595.   COPY(From(76,0,77,0), To(76,0,77,1), Time( 1, 43));
  596.   COPY(From(75,0,76,0), To(75,0,76,1), Time( 1, 44));
  597.   COPY(From(74,0,75,0), To(74,0,75,1), Time( 1, 45));
  598.   COPY(From(73,0,74,0), To(73,0,74,1), Time( 1, 46));
  599.   COPY(From(72,0,73,0), To(72,0,73,1), Time( 1, 47));
  600.   COPY(From(71,0,72,0), To(71,0,72,1), Time( 1, 48));
  601.   COPY(From(70,0,71,0), To(70,0,71,1), Time( 1, 49));
  602.  
  603.   COPY(From(69,0,70,0), To(69,0,70,1), Time( 1, 50));
  604.   COPY(From(68,0,69,0), To(68,0,69,1), Time( 1, 51));
  605.   COPY(From(67,0,68,0), To(67,0,68,1), Time( 1, 52));
  606.   COPY(From(66,0,67,0), To(66,0,67,1), Time( 1, 53));
  607.   COPY(From(65,0,66,0), To(65,0,66,1), Time( 1, 54));
  608.   COPY(From(64,0,65,0), To(64,0,65,1), Time( 1, 55));
  609.   COPY(From(63,0,64,0), To(63,0,64,1), Time( 1, 56));
  610.   COPY(From(62,0,63,0), To(62,0,63,1), Time( 1, 57));
  611.   COPY(From(61,0,62,0), To(61,0,62,1), Time( 1, 58));
  612.   COPY(From(60,0,61,0), To(60,0,61,1), Time( 1, 59));
  613.  
  614.   COPY(From(59,0,60,0), To(59,0,60,1), Time( 1, 60));
  615.   COPY(From(58,0,59,0), To(58,0,59,1), Time( 1, 61));
  616.   COPY(From(57,0,58,0), To(57,0,58,1), Time( 1, 62));
  617.   COPY(From(56,0,57,0), To(56,0,57,1), Time( 1, 63));
  618.   COPY(From(55,0,56,0), To(55,0,56,1), Time( 1, 64));
  619.   COPY(From(54,0,55,0), To(54,0,55,1), Time( 1, 65));
  620.   COPY(From(53,0,54,0), To(53,0,54,1), Time( 1, 66));
  621.   COPY(From(52,0,53,0), To(52,0,53,1), Time( 1, 67));
  622.   COPY(From(51,0,52,0), To(51,0,52,1), Time( 1, 68));
  623.   COPY(From(50,0,51,0), To(50,0,51,1), Time( 1, 69));
  624.  
  625.   COPY(From(49,0,50,0), To(49,0,50,1), Time( 1, 70));
  626.   COPY(From(48,0,49,0), To(48,0,49,1), Time( 1, 71));
  627.   COPY(From(47,0,48,0), To(47,0,48,1), Time( 1, 72));
  628.   COPY(From(46,0,47,0), To(46,0,47,1), Time( 1, 73));
  629.   COPY(From(45,0,46,0), To(45,0,46,1), Time( 1, 74));
  630.   COPY(From(44,0,45,0), To(44,0,45,1), Time( 1, 75));
  631.   COPY(From(43,0,44,0), To(43,0,44,1), Time( 1, 76));
  632.   COPY(From(42,0,43,0), To(42,0,43,1), Time( 1, 77));
  633.   COPY(From(41,0,42,0), To(41,0,42,1), Time( 1, 78));
  634.   COPY(From(40,0,41,0), To(40,0,41,1), Time( 1, 79));
  635. END
  636.  
  637.  
  638. //------------------------------------------------------------------------------------
  639. //
  640. // SpinningFan
  641. // Reveals as a spinning fan
  642.  
  643. WIPEDEF("SpinningFan", Grid(8,8), TimeScale(16), CopyBackground(FALSE))
  644.   COPY(From(0,7,0,8), To(0,7,8,8), Time(0,16));
  645.   COPY(From(1,6,1,7), To(1,6,7,7), Time(0,16));
  646.   COPY(From(2,5,2,6), To(2,5,6,6), Time(0,16));
  647.   COPY(From(3,4,3,5), To(3,4,5,5), Time(0,16));
  648.   
  649.   COPY(From(7,7,8,7), To(7,0,8,7), Time(0,16));
  650.   COPY(From(6,6,7,6), To(6,1,7,6), Time(0,16));
  651.   COPY(From(5,5,6,5), To(5,2,6,5), Time(0,16));
  652.   
  653.   COPY(From(7,0,7,1), To(0,0,7,1), Time(0,16));
  654.   COPY(From(6,1,6,2), To(1,1,6,2), Time(0,16));
  655.   COPY(From(5,2,5,3), To(2,2,5,3), Time(0,16));
  656.   COPY(From(5,3,5,4), To(3,3,5,4), Time(0,16));
  657.   
  658.   COPY(From(0,1,1,1), To(0,1,1,7), Time(0,16));
  659.   COPY(From(1,2,2,2), To(1,2,2,6), Time(0,16));
  660.   COPY(From(2,3,3,3), To(2,3,3,5), Time(0,16));
  661. END
  662.  
  663.  
  664. //------------------------------------------------------------------------------------
  665. //
  666. // DiagonalCuts
  667. // 8 by 8 cuts from middle to corners along a diagonal
  668.  
  669. WIPEDEF("DiagonalBlocks", Grid(8,8), TimeScale(8), CopyBackground(FALSE),
  670.         Direction(NorthEast, 90), OutWipe(FALSE))
  671.   COPY(From(0,0,0,0), To(0,0,1,1), Time(1,1));
  672.   COPY(From(1,1,1,1), To(1,1,2,2), Time(1,1));
  673.   COPY(From(2,2,2,2), To(2,2,3,3), Time(1,1));
  674.   COPY(From(3,3,3,3), To(3,3,4,4), Time(1,1));
  675.   COPY(From(4,4,4,4), To(4,4,5,5), Time(1,1));
  676.   COPY(From(5,5,5,5), To(5,5,6,6), Time(1,1));
  677.   COPY(From(6,6,6,6), To(6,6,7,7), Time(1,1));
  678.   COPY(From(7,7,7,7), To(7,7,8,8), Time(1,1));
  679.   
  680.   COPY(From(1,0,1,0), To(1,0,2,1), Time(2,2));
  681.   COPY(From(2,1,2,1), To(2,1,3,2), Time(2,2));
  682.   COPY(From(3,2,3,2), To(3,2,4,3), Time(2,2));
  683.   COPY(From(4,3,4,3), To(4,3,5,4), Time(2,2));
  684.   COPY(From(5,4,5,4), To(5,4,6,5), Time(2,2));
  685.   COPY(From(6,5,6,5), To(6,5,7,6), Time(2,2));                               
  686.   COPY(From(7,6,7,6), To(7,6,8,7), Time(2,2));
  687.  
  688.   COPY(From(2,0,2,0), To(2,0,3,1), Time(3,3));
  689.   COPY(From(3,1,3,1), To(3,1,4,2), Time(3,3));
  690.   COPY(From(4,2,4,2), To(4,2,5,3), Time(3,3));
  691.   COPY(From(5,3,5,3), To(5,3,6,4), Time(3,3));
  692.   COPY(From(6,4,6,4), To(6,4,7,5), Time(3,3));
  693.   COPY(From(7,5,7,5), To(7,5,8,6), Time(3,3));
  694.   
  695.   COPY(From(3,0,3,0), To(3,0,4,1), Time(4,4));
  696.   COPY(From(4,1,4,1), To(4,1,5,2), Time(4,4));
  697.   COPY(From(5,2,5,2), To(5,2,6,3), Time(4,4));
  698.   COPY(From(6,3,6,3), To(6,3,7,4), Time(4,4));
  699.   COPY(From(7,4,7,4), To(7,4,8,5), Time(4,4));
  700.   
  701.   COPY(From(4,0,4,0), To(4,0,5,1), Time(5,5));
  702.   COPY(From(5,1,5,1), To(5,1,6,2), Time(5,5));
  703.   COPY(From(6,2,6,2), To(6,2,7,3), Time(5,5));
  704.   COPY(From(7,3,7,3), To(7,3,8,4), Time(5,5));
  705.   
  706.   COPY(From(5,0,5,0), To(5,0,6,1), Time(6,6)); 
  707.   COPY(From(6,1,6,1), To(6,1,7,2), Time(6,6)); 
  708.   COPY(From(7,2,7,2), To(7,2,8,3), Time(6,6)); 
  709.                                                
  710.   COPY(From(6,0,6,0), To(6,0,7,1), Time(7,7)); 
  711.   COPY(From(7,0,7,0), To(7,0,8,2), Time(7,7)); 
  712.                                               
  713.   COPY(From(7,0,7,0), To(7,0,8,1), Time(8,8));
  714.                                               
  715.   COPY(From(0,1,0,1), To(0,1,1,2), Time(2,2));
  716.   COPY(From(1,2,1,2), To(1,2,2,3), Time(2,2));
  717.   COPY(From(2,3,2,3), To(2,3,3,4), Time(2,2));
  718.   COPY(From(3,4,3,4), To(3,4,4,5), Time(2,2));
  719.   COPY(From(4,5,4,5), To(4,5,5,6), Time(2,2));
  720.   COPY(From(5,6,5,6), To(5,6,6,7), Time(2,2));
  721.   COPY(From(6,7,6,7), To(6,7,7,8), Time(2,2));
  722.                                               
  723.   COPY(From(0,2,0,2), To(0,2,1,3), Time(3,3));
  724.   COPY(From(1,3,1,3), To(1,3,2,4), Time(3,3));
  725.   COPY(From(2,4,2,4), To(2,4,3,5), Time(3,3));
  726.   COPY(From(3,5,3,5), To(3,5,4,6), Time(3,3));
  727.   COPY(From(4,6,4,6), To(4,6,5,7), Time(3,3));
  728.   COPY(From(5,7,5,7), To(5,7,6,8), Time(3,3));
  729.                                               
  730.   COPY(From(0,3,0,3), To(0,3,1,4), Time(4,4));
  731.   COPY(From(1,4,1,4), To(1,4,2,5), Time(4,4));
  732.   COPY(From(2,5,2,5), To(2,5,3,6), Time(4,4));
  733.   COPY(From(3,6,3,6), To(3,6,4,7), Time(4,4));
  734.   COPY(From(4,7,4,7), To(4,7,5,8), Time(4,4));
  735.                                               
  736.   COPY(From(0,4,0,4), To(0,4,1,5), Time(5,5));
  737.   COPY(From(1,5,1,5), To(1,5,2,6), Time(5,5));
  738.   COPY(From(2,6,2,6), To(2,6,3,7), Time(5,5));
  739.   COPY(From(3,7,3,7), To(3,7,4,8), Time(5,5));
  740.                                               
  741.   COPY(From(0,5,0,5), To(0,5,1,6), Time(6,6));
  742.   COPY(From(1,6,1,6), To(1,6,2,7), Time(6,6));
  743.   COPY(From(2,7,2,7), To(2,7,3,8), Time(6,6));
  744.                                               
  745.   COPY(From(0,6,0,6), To(0,6,1,7), Time(7,7));
  746.   COPY(From(1,7,1,7), To(1,7,2,8), Time(7,7));
  747.                                               
  748.   COPY(From(0,7,0,7), To(0,7,1,8), Time(8,8));
  749. END
  750.  
  751.  
  752. //------------------------------------------------------------------------------------
  753. //
  754. // CutRandom
  755. // 8 by 8 random cuts
  756.  
  757. WIPEDEF("RandomBlocks", Grid(8,8), TimeScale(64), CopyBackground(FALSE), OutWipe(FALSE))
  758.   COPY(From(0,0,0,0), To(0,0,1,1), Time(36,36));
  759.   COPY(From(1,1,1,1), To(1,1,2,2), Time(44,44));
  760.   COPY(From(2,2,2,2), To(2,2,3,3), Time(18,18));
  761.   COPY(From(3,3,3,3), To(3,3,4,4), Time(41,41));
  762.   COPY(From(4,4,4,4), To(4,4,5,5), Time(51,51));
  763.   COPY(From(5,5,5,5), To(5,5,6,6), Time(23,23));
  764.   COPY(From(6,6,6,6), To(6,6,7,7), Time(1,1));
  765.   COPY(From(7,7,7,7), To(7,7,8,8), Time(9,9));
  766.   
  767.   COPY(From(1,0,1,0), To(1,0,2,1), Time(26,26));
  768.   COPY(From(2,1,2,1), To(2,1,3,2), Time(59,59));
  769.   COPY(From(3,2,3,2), To(3,2,4,3), Time(33,33));
  770.   COPY(From(4,3,4,3), To(4,3,5,4), Time(10,10));
  771.   COPY(From(5,4,5,4), To(5,4,6,5), Time(28,28));
  772.   COPY(From(6,5,6,5), To(6,5,7,6), Time(53,53));
  773.   COPY(From(7,6,7,6), To(7,6,8,7), Time(61,61));
  774.   
  775.   COPY(From(2,0,2,0), To(2,0,3,1), Time(30,30));
  776.   COPY(From(3,1,3,1), To(3,1,4,2), Time(11,11));
  777.   COPY(From(4,2,4,2), To(4,2,5,3), Time(47,47));
  778.   COPY(From(5,3,5,3), To(5,3,6,4), Time(63,63));
  779.   COPY(From(6,4,6,4), To(6,4,7,5), Time(20,20));
  780.   COPY(From(7,5,7,5), To(7,5,8,6), Time(56,56));
  781.   
  782.   COPY(From(3,0,3,0), To(3,0,4,1), Time(27,27));
  783.   COPY(From(4,1,4,1), To(4,1,5,2), Time(38,38));
  784.   COPY(From(5,2,5,2), To(5,2,6,3), Time(54,54));
  785.   COPY(From(6,3,6,3), To(6,3,7,4), Time(12,12));
  786.   COPY(From(7,4,7,4), To(7,4,8,5), Time(4,4));
  787.   
  788.   COPY(From(4,0,4,0), To(4,0,5,1), Time(50,50));
  789.   COPY(From(5,1,5,1), To(5,1,6,2), Time(39,39));
  790.   COPY(From(6,2,6,2), To(6,2,7,3), Time(17,17));
  791.   COPY(From(7,3,7,3), To(7,3,8,4), Time(48,48));
  792.   
  793.   COPY(From(5,0,5,0), To(5,0,6,1), Time(57,57));
  794.   COPY(From(6,1,6,1), To(6,1,7,2), Time(13,13));
  795.   COPY(From(7,2,7,2), To(7,2,8,3), Time(6,6));
  796.   
  797.   COPY(From(6,0,6,0), To(6,0,7,1), Time(49,49));
  798.   COPY(From(7,0,7,0), To(7,0,8,2), Time(7,7));
  799.   
  800.   COPY(From(7,0,7,0), To(7,0,8,1), Time(8,8));
  801.   
  802.   COPY(From(0,1,0,1), To(0,1,1,2), Time(2,2));
  803.   COPY(From(1,2,1,2), To(1,2,2,3), Time(14,14));
  804.   COPY(From(2,3,2,3), To(2,3,3,4), Time(60,60));
  805.   COPY(From(3,4,3,4), To(3,4,4,5), Time(43,43));
  806.   COPY(From(4,5,4,5), To(4,5,5,6), Time(34,34));
  807.   COPY(From(5,6,5,6), To(5,6,6,7), Time(58,58));
  808.   COPY(From(6,7,6,7), To(6,7,7,8), Time(21,21));
  809.   
  810.   COPY(From(0,2,0,2), To(0,2,1,3), Time(37,37));
  811.   COPY(From(1,3,1,3), To(1,3,2,4), Time(45,45));
  812.   COPY(From(2,4,2,4), To(2,4,3,5), Time(15,15));
  813.   COPY(From(3,5,3,5), To(3,5,4,6), Time(52,52));
  814.   COPY(From(4,6,4,6), To(4,6,5,7), Time(24,24));
  815.   COPY(From(5,7,5,7), To(5,7,6,8), Time(3,3));
  816.   
  817.   COPY(From(0,3,0,3), To(0,3,1,4), Time(29,29));
  818.   COPY(From(1,4,1,4), To(1,4,2,5), Time(42,42));
  819.   COPY(From(2,5,2,5), To(2,5,3,6), Time(16,16));
  820.   COPY(From(3,6,3,6), To(3,6,4,7), Time(62,62));
  821.   COPY(From(4,7,4,7), To(4,7,5,8), Time(32,32));
  822.   
  823.   COPY(From(0,4,0,4), To(0,4,1,5), Time(35,35));
  824.   COPY(From(1,5,1,5), To(1,5,2,6), Time(22,22));
  825.   COPY(From(2,6,2,6), To(2,6,3,7), Time(25,25));
  826.   COPY(From(3,7,3,7), To(3,7,4,8), Time(5,5));
  827.   
  828.   COPY(From(0,5,0,5), To(0,5,1,6), Time(46,46));
  829.   COPY(From(1,6,1,6), To(1,6,2,7), Time(55,55));
  830.   COPY(From(2,7,2,7), To(2,7,3,8), Time(19,19));
  831.   
  832.   COPY(From(0,6,0,6), To(0,6,1,7), Time(40,40));
  833.   COPY(From(1,7,1,7), To(1,7,2,8), Time(64,64));
  834.   
  835.   COPY(From(0,7,0,7), To(0,7,1,8), Time(31,31));
  836. END
  837.  
  838.  
  839. //------------------------------------------------------------------------------------
  840. //
  841. // ClosingBlinds
  842. // Blinds starting in one direction and finishing in the opposite
  843.  
  844. WIPEDEF("ClosingBlinds", Grid(1,16), TimeScale(50), CopyBackground(FALSE),
  845.         Direction(South, 90))
  846.   COPY(From(0,0,16,0), To(0,0,16,1), Time(0,50));
  847.   COPY(From(0,1,16,1), To(0,1,16,2), Time(2,48));
  848.   COPY(From(0,2,16,2), To(0,2,16,3), Time(4,46));
  849.   COPY(From(0,3,16,3), To(0,3,16,4), Time(6,44));
  850.   COPY(From(0,4,16,4), To(0,4,16,5), Time(8,42));
  851.   COPY(From(0,5,16,5), To(0,5,16,6), Time(10,40));
  852.   COPY(From(0,6,16,6), To(0,6,16,7), Time(12,38));
  853.   COPY(From(0,7,16,7), To(0,7,16,8), Time(14,36));
  854.   COPY(From(0,8,16,8), To(0,8,16,9), Time(16,34));
  855.   COPY(From(0,9,16,9), To(0,9,16,10), Time(18,32));
  856.   COPY(From(0,10,16,10), To(0,10,16,11), Time(19,30));
  857.   COPY(From(0,11,16,11), To(0,11,16,12), Time(20,29));
  858.   COPY(From(0,12,16,12), To(0,12,16,13), Time(21,28));
  859.   COPY(From(0,13,16,13), To(0,13,16,14), Time(22,27));
  860.   COPY(From(0,14,16,14), To(0,14,16,15), Time(23,26));
  861.   COPY(From(0,15,16,15), To(0,15,16,16), Time(24,25));
  862. END
  863.  
  864.  
  865. //------------------------------------------------------------------------------------
  866. //
  867. // BlindsFantasy
  868. // Blinds starting from two edges towards the middle
  869.  
  870. WIPEDEF("BlindsFantasy1", Grid(1,16), TimeScale(8), CopyBackground(FALSE),
  871.         Direction(South, 90))
  872.   COPY(From(0,0,16,0), To(0,0,16,1), Time(0,8));
  873.   COPY(From(0,1,16,1), To(0,1,16,2), Time(1,8));
  874.   COPY(From(0,2,16,2), To(0,2,16,3), Time(2,8));
  875.   COPY(From(0,3,16,3), To(0,3,16,4), Time(3,8));
  876.   COPY(From(0,4,16,4), To(0,4,16,5), Time(4,8));
  877.   COPY(From(0,5,16,5), To(0,5,16,6), Time(5,8));
  878.   COPY(From(0,6,16,6), To(0,6,16,7), Time(6,8));
  879.   COPY(From(0,7,16,7), To(0,7,16,8), Time(7,8));
  880.   COPY(From(0,8,16,8), To(0,8,16,9), Time(7,8));
  881.   COPY(From(0,9,16,9), To(0,9,16,10), Time(6,8));
  882.   COPY(From(0,10,16,10), To(0,10,16,11), Time(5,8));
  883.   COPY(From(0,11,16,11), To(0,11,16,12), Time(4,8));
  884.   COPY(From(0,12,16,12), To(0,12,16,13), Time(3,8));
  885.   COPY(From(0,13,16,13), To(0,13,16,14), Time(2,8));
  886.   COPY(From(0,14,16,14), To(0,14,16,15), Time(1,8));
  887.   COPY(From(0,15,16,15), To(0,15,16,16), Time(0,8));
  888. END
  889.  
  890.  
  891. //------------------------------------------------------------------------------------
  892. //
  893. // BlindsFantasy2
  894. // Blinds going in sequence
  895.  
  896. WIPEDEF("BlindsFantasy2", Grid(1,16), TimeScale(18), CopyBackground(FALSE),
  897.         Direction(South, 90))
  898.   COPY(From(0,0,16,0), To(0,0,16,1), Time(0,3));
  899.   COPY(From(0,1,16,1), To(0,1,16,2), Time(1,4));
  900.   COPY(From(0,2,16,2), To(0,2,16,3), Time(2,5));
  901.   COPY(From(0,3,16,3), To(0,3,16,4), Time(3,6));
  902.   COPY(From(0,4,16,4), To(0,4,16,5), Time(4,7));
  903.   COPY(From(0,5,16,5), To(0,5,16,6), Time(5,8));
  904.   COPY(From(0,6,16,6), To(0,6,16,7), Time(6,9));
  905.   COPY(From(0,7,16,7), To(0,7,16,8), Time(7,10));
  906.   COPY(From(0,8,16,8), To(0,8,16,9), Time(8,11));
  907.   COPY(From(0,9,16,9), To(0,9,16,10), Time(9,12));
  908.   COPY(From(0,10,16,10), To(0,10,16,11), Time(10,13));
  909.   COPY(From(0,11,16,11), To(0,11,16,12), Time(11,14));
  910.   COPY(From(0,12,16,12), To(0,12,16,13), Time(12,15));
  911.   COPY(From(0,13,16,13), To(0,13,16,14), Time(13,16));
  912.   COPY(From(0,14,16,14), To(0,14,16,15), Time(14,17));
  913.   COPY(From(0,15,16,15), To(0,15,16,16), Time(15,18));
  914. END
  915.  
  916.  
  917. //------------------------------------------------------------------------------------
  918. //
  919. // BlindsFantasy2
  920. // Starts blinds one by one but finishes at the same time
  921.  
  922. WIPEDEF("BlindsFantasy3", Grid(1,16), TimeScale(18), CopyBackground(FALSE),
  923.         Direction(South, 90))
  924.   COPY(From(0,0,16,0), To(0,0,16,1), Time(0,16));
  925.   COPY(From(0,1,16,1), To(0,1,16,2), Time(1,16));
  926.   COPY(From(0,2,16,2), To(0,2,16,3), Time(2,16));
  927.   COPY(From(0,3,16,3), To(0,3,16,4), Time(3,16));
  928.   COPY(From(0,4,16,4), To(0,4,16,5), Time(4,16));
  929.   COPY(From(0,5,16,5), To(0,5,16,6), Time(5,16));
  930.   COPY(From(0,6,16,6), To(0,6,16,7), Time(6,16));
  931.   COPY(From(0,7,16,7), To(0,7,16,8), Time(7,16));
  932.   COPY(From(0,8,16,8), To(0,8,16,9), Time(8,16));
  933.   COPY(From(0,9,16,9), To(0,9,16,10), Time(9,16));
  934.   COPY(From(0,10,16,10), To(0,10,16,11), Time(10,16));
  935.   COPY(From(0,11,16,11), To(0,11,16,12), Time(11,16));
  936.   COPY(From(0,12,16,12), To(0,12,16,13), Time(12,16));
  937.   COPY(From(0,13,16,13), To(0,13,16,14), Time(13,16));
  938.   COPY(From(0,14,16,14), To(0,14,16,15), Time(14,16));
  939.   COPY(From(0,15,16,15), To(0,15,16,16), Time(15,16));
  940. END
  941.  
  942. //------------------------------------------------------------------------------------
  943. //
  944. // SplitBlinds
  945. // Two blinds in different directions
  946.  
  947. WIPEDEF("SplitBlinds", Grid(16,16), TimeScale(16), CopyBackground(FALSE),
  948.         Direction(South, 90))
  949.   COPY(From(0,0,8,0), To(0,0,8,1), Time(0,16));
  950.   COPY(From(0,1,8,1), To(0,1,8,2), Time(1,16));
  951.   COPY(From(0,2,8,2), To(0,2,8,3), Time(2,16));
  952.   COPY(From(0,3,8,3), To(0,3,8,4), Time(3,16));
  953.   COPY(From(0,4,8,4), To(0,4,8,5), Time(4,16));
  954.   COPY(From(0,5,8,5), To(0,5,8,6), Time(5,16));
  955.   COPY(From(0,6,8,6), To(0,6,8,7), Time(6,16));
  956.   COPY(From(0,7,8,7), To(0,7,8,8), Time(7,16));
  957.   
  958.   COPY(From(0,9,8,9), To(0,8,8,9), Time(8,16));
  959.   COPY(From(0,10,8,10), To(0,9,8,10), Time(9,16));
  960.   COPY(From(0,11,8,11), To(0,10,8,11), Time(10,16));
  961.   COPY(From(0,12,8,12), To(0,11,8,12), Time(11,16));
  962.   COPY(From(0,13,8,13), To(0,12,8,13), Time(12,16));
  963.   COPY(From(0,14,8,14), To(0,13,8,14), Time(13,16));
  964.   COPY(From(0,15,8,15), To(0,14,8,15), Time(14,16));
  965.   COPY(From(0,16,8,16), To(0,15,8,16), Time(15,16));
  966.   
  967.   COPY(From(8,1,16,1), To(8,0,16,1), Time(0,16));
  968.   COPY(From(8,2,16,2), To(8,1,16,2), Time(1,16));
  969.   COPY(From(8,3,16,3), To(8,2,16,3), Time(2,16));
  970.   COPY(From(8,4,16,4), To(8,3,16,4), Time(3,16));
  971.   COPY(From(8,5,16,5), To(8,4,16,5), Time(4,16));
  972.   COPY(From(8,6,16,6), To(8,5,16,6), Time(5,16));
  973.   COPY(From(8,7,16,7), To(8,6,16,7), Time(6,16));
  974.   COPY(From(8,8,16,8), To(8,7,16,8), Time(7,16));
  975.   
  976.   COPY(From(8,8,16,8), To(8,8,16,9), Time(8,16));
  977.   COPY(From(8,9,16,9), To(8,9,16,10), Time(9,16));
  978.   COPY(From(8,10,16,10), To(8,10,16,11), Time(10,16));
  979.   COPY(From(8,11,16,11), To(8,11,16,12), Time(11,16));
  980.   COPY(From(8,12,16,12), To(8,12,16,13), Time(12,16));
  981.   COPY(From(8,13,16,13), To(8,13,16,14), Time(13,16));
  982.   COPY(From(8,14,16,14), To(8,14,16,15), Time(14,16));
  983.   COPY(From(8,15,16,15), To(8,15,16,16), Time(15,16));
  984. END
  985.  
  986. //------------------------------------------------------------------------------------
  987. //
  988. // Blocks
  989. // Screen split in four, each block wipes from the corners to the middle
  990.  
  991. WIPEDEF("Blocks", Grid(4,4), TimeScale(1), CopyBackground(FALSE))
  992.   COPY(From(0,0,0,0), To(0,0,1,1), Time(0,1));
  993.   COPY(From(2,0,2,0), To(2,0,3,1), Time(0,1));
  994.   COPY(From(0,2,0,2), To(0,2,1,3), Time(0,1));
  995.   COPY(From(2,2,2,2), To(2,2,3,3), Time(0,1));
  996.   
  997.   COPY(From(2,0,2,0), To(1,0,2,1), Time(0,1));
  998.   COPY(From(4,0,4,0), To(3,0,4,1), Time(0,1));
  999.   COPY(From(2,2,2,2), To(1,2,2,3), Time(0,1));
  1000.   COPY(From(4,2,4,2), To(3,2,4,3), Time(0,1));
  1001.   
  1002.   COPY(From(0,2,0,2), To(0,1,1,2), Time(0,1));
  1003.   COPY(From(2,2,2,2), To(2,1,3,2), Time(0,1));
  1004.   COPY(From(0,4,0,4), To(0,3,1,4), Time(0,1));
  1005.   COPY(From(2,4,2,4), To(2,3,3,4), Time(0,1));
  1006.   
  1007.   COPY(From(2,2,2,2), To(1,1,2,2), Time(0,1));
  1008.   COPY(From(4,2,4,2), To(3,1,4,2), Time(0,1));
  1009.   COPY(From(2,4,2,4), To(1,3,2,4), Time(0,1));
  1010.   COPY(From(4,4,4,4), To(3,3,4,4), Time(0,1));
  1011. END
  1012.  
  1013. //------------------------------------------------------------------------------------
  1014. //
  1015. // FallingDownVar
  1016. // Eight rectangles fall from the top of the screen to form the new picture
  1017.  
  1018. WIPEDEF("WideBlinds", Grid(8,8), TimeScale(36), CopyBackground(TRUE),
  1019.         Direction(South, 90))
  1020. //  COPY(From(0,-1,8,0),  To(0,0,8,1),  Time(35,36));
  1021. //  COPY(From(0,-1,8,0),  To(0,1,8,2),  Time(33,36));
  1022. //  COPY(From(0,-1,8,0),  To(0,2,8,3),  Time(30,36));
  1023. //  COPY(From(0,-1,8,0),  To(0,3,8,4),  Time(26,36));
  1024. //  COPY(From(0,-1,8,0),  To(0,4,8,5),  Time(21,36));
  1025. //  COPY(From(0,-1,8,0),  To(0,5,8,6),  Time(15,36));
  1026. //  COPY(From(0,-1,8,0),  To(0,6,8,7),  Time( 8,36));
  1027. //  COPY(From(0,-1,8,0),  To(0,7,8,8),  Time( 0,36));
  1028.  
  1029.   COPY(From(0,0,8,0),  To(0,0,8,1),  Time(35,36));
  1030.   COPY(From(0,1,8,1),  To(0,1,8,2),  Time(33,36));
  1031.   COPY(From(0,2,8,2),  To(0,2,8,3),  Time(30,36));
  1032.   COPY(From(0,3,8,3),  To(0,3,8,4),  Time(26,36));
  1033.   COPY(From(0,4,8,4),  To(0,4,8,5),  Time(21,36));
  1034.   COPY(From(0,5,8,5),  To(0,5,8,6),  Time(15,36));
  1035.   COPY(From(0,6,8,6),  To(0,6,8,7),  Time( 8,36));
  1036.   COPY(From(0,7,8,7),  To(0,7,8,8),  Time( 0,36));
  1037. END
  1038.  
  1039.  
  1040. //------------------------------------------------------------------------------------
  1041. //
  1042. // XmasTree
  1043. // A striped reveal that looks somewhat like a christmas tree
  1044.  
  1045. WIPEDEF("XmasTree", Grid(12,9), TimeScale(24), CopyBackground(FALSE),
  1046.         Direction(East, 90))
  1047.   COPY(From(-6,0,0,1), To(0,0,6,1), Time(0,16));
  1048.   COPY(From(-6,1,0,2), To(0,1,6,2), Time(1,17));
  1049.   COPY(From(-6,2,0,3), To(0,2,6,3), Time(2,18));
  1050.   COPY(From(-6,3,0,4), To(0,3,6,4), Time(3,19));
  1051.   COPY(From(-6,4,0,5), To(0,4,6,5), Time(4,20));
  1052.   COPY(From(-6,5,0,6), To(0,5,6,6), Time(5,21));
  1053.   COPY(From(-6,6,0,7), To(0,6,6,7), Time(6,22));
  1054.   COPY(From(-6,7,0,8), To(0,7,6,8), Time(7,23));
  1055.   COPY(From(-6,8,0,9), To(0,8,6,9), Time(8,24));
  1056.   
  1057.   COPY(From(12,0,18,1), To(6,0,12,1), Time(0,16));
  1058.   COPY(From(12,1,18,2), To(6,1,12,2), Time(1,17));
  1059.   COPY(From(12,2,18,3), To(6,2,12,3), Time(2,18));
  1060.   COPY(From(12,3,18,4), To(6,3,12,4), Time(3,19));
  1061.   COPY(From(12,4,18,5), To(6,4,12,5), Time(4,20));
  1062.   COPY(From(12,5,18,6), To(6,5,12,6), Time(5,21));
  1063.   COPY(From(12,6,18,7), To(6,6,12,7), Time(6,22));
  1064.   COPY(From(12,7,18,8), To(6,7,12,8), Time(7,23));
  1065.   COPY(From(12,8,18,9), To(6,8,12,9), Time(8,24));
  1066. END
  1067.  
  1068.  
  1069. //------------------------------------------------------------------------------------
  1070. //
  1071. // SyncHorVer
  1072. // Wipes in rotating clockwise then counterclockwise
  1073.  
  1074. WIPEDEF("BasketWeave", Grid(16,12), TimeScale(6), CopyBackground(FALSE),
  1075.         Direction(East, 90))
  1076.   COPY(From(14,0,14,2), To(0,0,14,2), Time(3,4));
  1077.   COPY(From(14,0,16,0), To(14,0,16,10), Time(0,1));
  1078.   COPY(From(0,12,2,12), To(0,2,2,12), Time(0,1));
  1079.   COPY(From(2,10,2,12), To(2,10,16,12), Time(3,4));
  1080.   
  1081.   COPY(From(12,2,12,4), To(2,2,12,4), Time(4,5));
  1082.   COPY(From(12,2,14,2), To(12,2,14,8), Time(1,2));
  1083.   COPY(From(2,10,4,10), To(2,4,4,10), Time(1,2));
  1084.   COPY(From(4,8,4,10), To(4,8,14,10), Time(4,5));
  1085.   
  1086.   COPY(From(10,4,12,4), To(10,4,12,6), Time(2,3));
  1087.   COPY(From(10,4,10,6), To(4,4,10,6), Time(5,6));
  1088.   COPY(From(4,8,6,8), To(4,6,6,8), Time(2,3));
  1089.   COPY(From(6,6,6,8), To(6,6,12,8), Time(5,6));
  1090. END
  1091.  
  1092. //------------------------------------------------------------------------------------
  1093. //
  1094. // ASyncHor
  1095. // Nine horizontal stripes wipes in from two edges
  1096.  
  1097. WIPEDEF("SuperStripper", Grid(8,9), TimeScale(5), CopyBackground(FALSE),
  1098.         Direction(West, 90))
  1099.   COPY(From(-8,8,0,9), To(0,8,8,9),  Time( 1,2));
  1100.   COPY(From(8,7,16,8), To(0,7,8,8),  Time( 0,3));
  1101.   COPY(From(-8,6,0,7), To(0,6,8,7),  Time( 1,4));
  1102.   COPY(From(8,5,16,6), To(0,5,8,6),  Time(2,5));
  1103.   COPY(From(-8,4,0,5), To(0,4,8,5), Time( 1,3));
  1104.   COPY(From(8,3,16,4), To(0,3,8,4),  Time( 2,5));
  1105.   COPY(From(-8,2,0,3), To(0,2,8,3),  Time( 1,4));
  1106.   COPY(From(8,1,16,2), To(0,1,8,2),  Time( 0,3));
  1107.   COPY(From(-8,0,0,1), To(0,0,8,1),  Time( 1,2));
  1108. END
  1109.  
  1110. //------------------------------------------------------------------------------------
  1111. //
  1112. // ReverseRects
  1113. // Will be removed?
  1114.  
  1115. WIPEDEF("Enigma", Grid(4,4), TimeScale(1), CopyBackground(FALSE))
  1116.   COPY(From(0,0,1,0), To(0,0,1,1), Time( 0, 1));
  1117.   COPY(From(1,1,1,2), To(0,1,1,2), Time( 0, 1));
  1118.   COPY(From(0,3,1,3), To(0,2,1,3), Time( 0, 1));
  1119.   COPY(From(0,3,0,4), To(0,3,1,4), Time( 0, 1));
  1120.  
  1121.   COPY(From(1,0,1,1), To(1,0,2,1), Time( 0, 1));
  1122.   COPY(From(1,2,2,2), To(1,1,2,2), Time( 0, 1));
  1123.   COPY(From(2,2,2,3), To(1,2,2,3), Time( 0, 1));
  1124.   COPY(From(1,3,2,3), To(1,3,2,4), Time( 0, 1));
  1125.  
  1126.   COPY(From(2,1,3,1), To(2,0,3,1), Time( 0, 1));
  1127.   COPY(From(2,1,2,2), To(2,1,3,2), Time( 0, 1));
  1128.   COPY(From(2,2,3,2), To(2,2,3,3), Time( 0, 1));
  1129.   COPY(From(3,3,3,4), To(2,3,3,4), Time( 0, 1));
  1130.  
  1131.   COPY(From(4,0,4,1), To(3,0,4,1), Time( 0, 1));
  1132.   COPY(From(3,1,4,1), To(3,1,4,2), Time( 0, 1));
  1133.   COPY(From(3,2,3,3), To(3,2,4,3), Time( 0, 1));
  1134.   COPY(From(3,4,4,4), To(3,3,4,4), Time( 0, 1));
  1135. END
  1136.  
  1137.  
  1138. //------------------------------------------------------------------------------------
  1139. //
  1140. // ReverseRectsVar
  1141. // Will be removed!
  1142.  
  1143. WIPEDEF("EnigmaReverse", Grid(4,4), TimeScale(1), CopyBackground(FALSE))
  1144.   COPY(From(0,1,1,1), To(0,0,1,1), Time( 0, 1));
  1145.   COPY(From(1,1,1,2), To(0,1,1,2), Time( 0, 1));
  1146.   COPY(From(0,3,1,3), To(0,2,1,3), Time( 0, 1));
  1147.   COPY(From(1,3,1,4), To(0,3,1,4), Time( 0, 1));
  1148.  
  1149.   COPY(From(1,0,1,1), To(1,0,2,1), Time( 0, 1));
  1150.   COPY(From(1,1,2,1), To(1,1,2,2), Time( 0, 1));
  1151.   COPY(From(2,2,2,3), To(1,2,2,3), Time( 0, 1));
  1152.   COPY(From(1,3,2,3), To(1,3,2,4), Time( 0, 1));
  1153.  
  1154.   COPY(From(2,1,3,1), To(2,0,3,1), Time( 0, 1));
  1155.   COPY(From(3,1,3,2), To(2,1,3,2), Time( 0, 1));
  1156.   COPY(From(2,3,3,3), To(2,2,3,3), Time( 0, 1));
  1157.   COPY(From(3,3,3,4), To(2,3,3,4), Time( 0, 1));
  1158.  
  1159.   COPY(From(3,0,3,1), To(3,0,4,1), Time( 0, 1));
  1160.   COPY(From(3,1,4,1), To(3,1,4,2), Time( 0, 1));
  1161.   COPY(From(3,2,3,3), To(3,2,4,3), Time( 0, 1));
  1162.   COPY(From(3,3,4,3), To(3,3,4,4), Time( 0, 1));
  1163. END
  1164.  
  1165. //------------------------------------------------------------------------------------
  1166. //
  1167. // TheWall
  1168. // 25 blocks are falling from the sky
  1169.  
  1170. WIPEDEF("TheWall", Grid(5,5), TimeScale(31), CopyBackground(TRUE),
  1171.         Direction(South,90), ForegroundWipe(FALSE))
  1172.   SPLINE(Position(0,200,400,4096));
  1173.  
  1174.   MOVE(From(0,-1,1,0), To(0,4,1,5), Time( 0, 5));
  1175.   MOVE(From(1,-1,2,0), To(1,4,2,5), Time( 1, 6));
  1176.   MOVE(From(2,-1,3,0), To(2,4,3,5), Time( 2, 7));
  1177.   MOVE(From(3,-1,4,0), To(3,4,4,5), Time( 3, 8));
  1178.   MOVE(From(4,-1,5,0), To(4,4,5,5), Time( 4, 9));
  1179.  
  1180.   MOVE(From(0,-1,1,0), To(0,3,1,4), Time(11,15));
  1181.   MOVE(From(1,-1,2,0), To(1,3,2,4), Time(10,14));
  1182.   MOVE(From(2,-1,3,0), To(2,3,3,4), Time( 9,13));
  1183.   MOVE(From(3,-1,4,0), To(3,3,4,4), Time( 8,12));
  1184.   MOVE(From(4,-1,5,0), To(4,3,5,4), Time( 7,11));
  1185.  
  1186.   MOVE(From(0,-1,1,0), To(0,2,1,3), Time(14,17));
  1187.   MOVE(From(1,-1,2,0), To(1,2,2,3), Time(15,18));
  1188.   MOVE(From(2,-1,3,0), To(2,2,3,3), Time(16,19));
  1189.   MOVE(From(3,-1,4,0), To(3,2,4,3), Time(17,20));
  1190.   MOVE(From(4,-1,5,0), To(4,2,5,3), Time(18,21));
  1191.  
  1192.   MOVE(From(0,-1,1,0), To(0,1,1,2), Time(24,26));
  1193.   MOVE(From(1,-1,2,0), To(1,1,2,2), Time(23,25));
  1194.   MOVE(From(2,-1,3,0), To(2,1,3,2), Time(22,24));
  1195.   MOVE(From(3,-1,4,0), To(3,1,4,2), Time(21,23));
  1196.   MOVE(From(4,-1,5,0), To(4,1,5,2), Time(20,22));
  1197.  
  1198.   MOVE(From(0,-1,1,0), To(0,0,1,1), Time(26,27));
  1199.   MOVE(From(1,-1,2,0), To(1,0,2,1), Time(27,28));
  1200.   MOVE(From(2,-1,3,0), To(2,0,3,1), Time(28,29));
  1201.   MOVE(From(3,-1,4,0), To(3,0,4,1), Time(29,30));
  1202.   MOVE(From(4,-1,5,0), To(4,0,5,1), Time(30,31));
  1203. END
  1204.  
  1205.  
  1206. //------------------------------------------------------------------------------------
  1207. //
  1208. // SmoothWall
  1209. // New and improved Wall
  1210.  
  1211. WIPEDEF("SmoothWall", Grid(5,5), TimeScale(25), CopyBackground(TRUE),
  1212.         Direction(South,90), ForegroundWipe(FALSE))
  1213.   SPLINE(Position(0,4000,4000,4096));
  1214.  
  1215.   MOVE(From(1,-1,2,0), To(0,4,1,5), Time( 0, 5));
  1216.   MOVE(From(2,-1,3,0), To(1,4,2,5), Time( 1, 6));
  1217.   MOVE(From(3,-1,4,0), To(2,4,3,5), Time( 2, 7));
  1218.   MOVE(From(4,-1,5,0), To(3,4,4,5), Time( 3, 8));
  1219.   MOVE(From(5,-1,6,0), To(4,4,5,5), Time( 4, 9));
  1220.  
  1221.   MOVE(From(-1,-1,0,0), To(0,3,1,4), Time( 9,13));
  1222.   MOVE(From( 0,-1,1,0), To(1,3,2,4), Time( 8,12));
  1223.   MOVE(From( 1,-1,2,0), To(2,3,3,4), Time( 7,11));
  1224.   MOVE(From( 2,-1,3,0), To(3,3,4,4), Time( 6,10));
  1225.   MOVE(From( 3,-1,4,0), To(4,3,5,4), Time( 5, 9));
  1226.  
  1227.   MOVE(From(1,-1,2,0), To(0,2,1,3), Time(10,13));
  1228.   MOVE(From(2,-1,3,0), To(1,2,2,3), Time(11,14));
  1229.   MOVE(From(3,-1,4,0), To(2,2,3,3), Time(12,15));
  1230.   MOVE(From(4,-1,5,0), To(3,2,4,3), Time(13,16));
  1231.   MOVE(From(5,-1,6,0), To(4,2,5,3), Time(14,17));
  1232.  
  1233.   MOVE(From(-1,-1,0,0), To(0,1,1,2), Time(19,21));
  1234.   MOVE(From( 0,-1,1,0), To(1,1,2,2), Time(18,20));
  1235.   MOVE(From( 1,-1,2,0), To(2,1,3,2), Time(17,19));
  1236.   MOVE(From( 2,-1,3,0), To(3,1,4,2), Time(16,18));
  1237.   MOVE(From( 3,-1,4,0), To(4,1,5,2), Time(15,17));
  1238.  
  1239.   MOVE(From(1,-1,2,0), To(0,0,1,1), Time(20,21));
  1240.   MOVE(From(2,-1,3,0), To(1,0,2,1), Time(21,22));
  1241.   MOVE(From(3,-1,4,0), To(2,0,3,1), Time(22,23));
  1242.   MOVE(From(4,-1,5,0), To(3,0,4,1), Time(23,24));
  1243.   MOVE(From(5,-1,6,0), To(4,0,5,1), Time(24,25));
  1244. END
  1245.  
  1246.  
  1247. //------------------------------------------------------------------------------------
  1248. //
  1249. // ScaleTheWall
  1250. // A Wall wipe where the blocks are scaled in
  1251.  
  1252. WIPEDEF("ScaleTheWall", Grid(5,5), TimeScale(25), CopyBackground(TRUE),
  1253.         Direction(South,90), ForegroundWipe(FALSE))
  1254.   SPLINE(Position(0,4000,4000,4096));
  1255.  
  1256.   SCALE(From(1,-1,1,-1), To(0,4,1,5), Time( 0, 5));
  1257.   SCALE(From(2,-1,2,-1), To(1,4,2,5), Time( 1, 6));
  1258.   SCALE(From(3,-1,3,-1), To(2,4,3,5), Time( 2, 7));
  1259.   SCALE(From(4,-1,4,-1), To(3,4,4,5), Time( 3, 8));
  1260.   SCALE(From(5,-1,5,-1), To(4,4,5,5), Time( 4, 9));
  1261.  
  1262.   SCALE(From(-1,-1,-1,-1), To(0,3,1,4), Time( 9,13));
  1263.   SCALE(From( 0,-1,0,-1), To(1,3,2,4), Time( 8,12));
  1264.   SCALE(From( 1,-1,1,-1), To(2,3,3,4), Time( 7,11));
  1265.   SCALE(From( 2,-1,2,-1), To(3,3,4,4), Time( 6,10));
  1266.   SCALE(From( 3,-1,3,-1), To(4,3,5,4), Time( 5, 9));
  1267.  
  1268.   SCALE(From(1,-1,1,-1), To(0,2,1,3), Time(10,13));
  1269.   SCALE(From(2,-1,2,-1), To(1,2,2,3), Time(11,14));
  1270.   SCALE(From(3,-1,3,-1), To(2,2,3,3), Time(12,15));
  1271.   SCALE(From(4,-1,4,-1), To(3,2,4,3), Time(13,16));
  1272.   SCALE(From(5,-1,5,-1), To(4,2,5,3), Time(14,17));
  1273.  
  1274.   SCALE(From(-1,-1,-1,-1), To(0,1,1,2), Time(19,21));
  1275.   SCALE(From( 0,-1,0,-1), To(1,1,2,2), Time(18,20));
  1276.   SCALE(From( 1,-1,1,-1), To(2,1,3,2), Time(17,19));
  1277.   SCALE(From( 2,-1,2,-1), To(3,1,4,2), Time(16,18));
  1278.   SCALE(From( 3,-1,3,-1), To(4,1,5,2), Time(15,17));
  1279.  
  1280.   SCALE(From(1,-1,1,-1), To(0,0,1,1), Time(20,21));
  1281.   SCALE(From(2,-1,2,-1), To(1,0,2,1), Time(21,22));
  1282.   SCALE(From(3,-1,3,-1), To(2,0,3,1), Time(22,23));
  1283.   SCALE(From(4,-1,4,-1), To(3,0,4,1), Time(23,24));
  1284.   SCALE(From(5,-1,5,-1), To(4,0,5,1), Time(24,25));
  1285. END
  1286.  
  1287.  
  1288. //------------------------------------------------------------------------------------
  1289. //
  1290. // SplineDrop, Walllike by Espen Bjarn¢
  1291. // Wall wipe that uses 10 by 10 blocks
  1292.  
  1293. WIPEDEF("BrickWall", Grid(10,10), TimeScale(105), CopyBackground(TRUE),
  1294.         Direction(South,90), ForegroundWipe(FALSE))
  1295.   SPLINE(Position(0,4094,4095,4096));
  1296.  
  1297.   MOVE(From(1,-1,2,0),   To(0,9,1,10),  Time( 0, 5));
  1298.   MOVE(From(2,-1,3,0),   To(1,9,2,10),  Time( 1, 6));
  1299.   MOVE(From(3,-1,4,0),   To(2,9,3,10),  Time( 2, 7));
  1300.   MOVE(From(4,-1,5,0),   To(3,9,4,10),  Time( 3, 8));
  1301.   MOVE(From(5,-1,6,0),   To(4,9,5,10),  Time( 4, 9));
  1302.   MOVE(From(6,-1,7,0),   To(5,9,6,10),  Time( 5, 10));
  1303.   MOVE(From(7,-1,8,0),   To(6,9,7,10),  Time( 6, 11));
  1304.   MOVE(From(8,-1,9,0),   To(7,9,8,10),  Time( 7, 12));
  1305.   MOVE(From(9,-1,10,0),  To(8,9,9,10),  Time( 8, 13));
  1306.   MOVE(From(10,-1,11,0), To(9,9,10,10), Time( 9, 14));
  1307.  
  1308.   MOVE(From(8,-1,9,0),   To(9,8,10,9), Time( 10, 15));
  1309.   MOVE(From(7,-1,8,0),   To(8,8,9,9),  Time( 11, 16));
  1310.   MOVE(From(6,-1,7,0),   To(7,8,8,9),  Time( 12, 17));
  1311.   MOVE(From(5,-1,6,0),   To(6,8,7,9),  Time( 13, 18));
  1312.   MOVE(From(4,-1,5,0),   To(5,8,6,9),  Time( 14, 19));
  1313.   MOVE(From(3,-1,4,0),   To(4,8,5,9),  Time( 15, 20));
  1314.   MOVE(From(2,-1,3,0),   To(3,8,4,9),  Time( 16, 21));
  1315.   MOVE(From(1,-1,2,0),   To(2,8,3,9),  Time( 17, 22));
  1316.   MOVE(From(0,-1,1,0),   To(1,8,2,9),  Time( 18, 23));
  1317.   MOVE(From(-1,-1,0,0),  To(0,8,1,9),  Time( 19, 24));
  1318.  
  1319.   MOVE(From(1,-1,2,0),   To(0,7,1,8),  Time( 20, 25));
  1320.   MOVE(From(2,-1,3,0),   To(1,7,2,8),  Time( 21, 26));
  1321.   MOVE(From(3,-1,4,0),   To(2,7,3,8),  Time( 22, 27));
  1322.   MOVE(From(4,-1,5,0),   To(3,7,4,8),  Time( 23, 28));
  1323.   MOVE(From(5,-1,6,0),   To(4,7,5,8),  Time( 24, 29));
  1324.   MOVE(From(6,-1,7,0),   To(5,7,6,8),  Time( 25, 30));
  1325.   MOVE(From(7,-1,8,0),   To(6,7,7,8),  Time( 26, 31));
  1326.   MOVE(From(8,-1,9,0),   To(7,7,8,8),  Time( 27, 32));
  1327.   MOVE(From(9,-1,10,0),  To(8,7,9,8),  Time( 28, 33));
  1328.   MOVE(From(10,-1,11,0), To(9,7,10,8), Time( 29, 34));
  1329.  
  1330.   MOVE(From(8,-1,9,0), To(9,6,10,7), Time( 30, 35));
  1331.   MOVE(From(7,-1,8,0),  To(8,6,9,7),  Time( 31, 36));
  1332.   MOVE(From(6,-1,7,0),   To(7,6,8,7),  Time( 32, 37));
  1333.   MOVE(From(5,-1,6,0),   To(6,6,7,7),  Time( 33, 38));
  1334.   MOVE(From(4,-1,5,0),   To(5,6,6,7),  Time( 34, 39));
  1335.   MOVE(From(3,-1,4,0),   To(4,6,5,7),  Time( 35, 40));
  1336.   MOVE(From(2,-1,3,0),   To(3,6,4,7),  Time( 36, 41));
  1337.   MOVE(From(1,-1,2,0),   To(2,6,3,7),  Time( 37, 42));
  1338.   MOVE(From(0,-1,1,0),   To(1,6,2,7),  Time( 38, 43));
  1339.   MOVE(From(-1,-1,0,0),   To(0,6,1,7),  Time( 39, 44));
  1340.  
  1341.   MOVE(From(1,-1,2,0),   To(0,5,1,6),  Time( 40, 45));
  1342.   MOVE(From(2,-1,3,0),   To(1,5,2,6),  Time( 41, 46));
  1343.   MOVE(From(3,-1,4,0),   To(2,5,3,6),  Time( 42, 47));
  1344.   MOVE(From(4,-1,5,0),   To(3,5,4,6),  Time( 43, 48));
  1345.   MOVE(From(5,-1,6,0),   To(4,5,5,6),  Time( 44, 49));
  1346.   MOVE(From(6,-1,7,0),   To(5,5,6,6),  Time( 45, 50));
  1347.   MOVE(From(7,-1,8,0),   To(6,5,7,6),  Time( 46, 51));
  1348.   MOVE(From(8,-1,9,0),   To(7,5,8,6),  Time( 47, 52));
  1349.   MOVE(From(9,-1,10,0),  To(8,5,9,6),  Time( 48, 53));
  1350.   MOVE(From(10,-1,11,0), To(9,5,10,6), Time( 49, 54));
  1351.  
  1352.   MOVE(From(8,-1,9,0), To(9,4,10,5), Time( 50, 55));
  1353.   MOVE(From(7,-1,8,0),  To(8,4,9,5),  Time( 51, 56));
  1354.   MOVE(From(6,-1,7,0),   To(7,4,8,5),  Time( 52, 57));
  1355.   MOVE(From(5,-1,6,0),   To(6,4,7,5),  Time( 53, 58));
  1356.   MOVE(From(4,-1,5,0),   To(5,4,6,5),  Time( 54, 59));
  1357.   MOVE(From(3,-1,4,0),   To(4,4,5,5),  Time( 55, 60));
  1358.   MOVE(From(2,-1,3,0),   To(3,4,4,5),  Time( 56, 61));
  1359.   MOVE(From(1,-1,2,0),   To(2,4,3,5),  Time( 57, 62));
  1360.   MOVE(From(0,-1,1,0),   To(1,4,2,5),  Time( 58, 63));
  1361.   MOVE(From(-1,-1,0,0),   To(0,4,1,5),  Time( 59, 64));
  1362.  
  1363.   MOVE(From(1,-1,2,0),   To(0,3,1,4),  Time( 60, 65));
  1364.   MOVE(From(2,-1,3,0),   To(1,3,2,4),  Time( 61, 66));
  1365.   MOVE(From(3,-1,4,0),   To(2,3,3,4),  Time( 62, 67));
  1366.   MOVE(From(4,-1,5,0),   To(3,3,4,4),  Time( 63, 68));
  1367.   MOVE(From(5,-1,6,0),   To(4,3,5,4),  Time( 64, 69));
  1368.   MOVE(From(6,-1,7,0),   To(5,3,6,4),  Time( 65, 70));
  1369.   MOVE(From(7,-1,8,0),   To(6,3,7,4),  Time( 66, 71));
  1370.   MOVE(From(8,-1,9,0),   To(7,3,8,4),  Time( 67, 72));
  1371.   MOVE(From(9,-1,10,0),  To(8,3,9,4),  Time( 68, 73));
  1372.   MOVE(From(10,-1,11,0), To(9,3,10,4), Time( 69, 74));
  1373.  
  1374.   MOVE(From(8,-1,9,0), To(9,2,10,3), Time( 70, 75));
  1375.   MOVE(From(7,-1,8,0),  To(8,2,9,3),  Time( 71, 76));
  1376.   MOVE(From(6,-1,7,0),   To(7,2,8,3),  Time( 72, 77));
  1377.   MOVE(From(5,-1,6,0),   To(6,2,7,3),  Time( 73, 78));
  1378.   MOVE(From(4,-1,5,0),   To(5,2,6,3),  Time( 74, 79));
  1379.   MOVE(From(3,-1,4,0),   To(4,2,5,3),  Time( 75, 80));
  1380.   MOVE(From(2,-1,3,0),   To(3,2,4,3),  Time( 76, 81));
  1381.   MOVE(From(1,-1,2,0),   To(2,2,3,3),  Time( 77, 82));
  1382.   MOVE(From(0,-1,1,0),   To(1,2,2,3),  Time( 78, 83));
  1383.   MOVE(From(-1,-1,0,0),   To(0,2,1,3),  Time( 79, 84));
  1384.  
  1385.   MOVE(From(1,-1,2,0),   To(0,1,1,2),  Time( 80, 85));
  1386.   MOVE(From(2,-1,3,0),   To(1,1,2,2),  Time( 81, 86));
  1387.   MOVE(From(3,-1,4,0),   To(2,1,3,2),  Time( 82, 87));
  1388.   MOVE(From(4,-1,5,0),   To(3,1,4,2),  Time( 83, 88));
  1389.   MOVE(From(5,-1,6,0),   To(4,1,5,2),  Time( 84, 89));
  1390.   MOVE(From(6,-1,7,0),   To(5,1,6,2),  Time( 85, 90));
  1391.   MOVE(From(7,-1,8,0),   To(6,1,7,2),  Time( 86, 91));
  1392.   MOVE(From(8,-1,9,0),   To(7,1,8,2),  Time( 87, 92));
  1393.   MOVE(From(9,-1,10,0),  To(8,1,9,2),  Time( 88, 93));
  1394.   MOVE(From(10,-1,11,0), To(9,1,10,2), Time( 89, 94));
  1395.  
  1396.   MOVE(From(8,-1,9,0),   To(9,0,10,1), Time( 90, 95));
  1397.   MOVE(From(7,-1,8,0),   To(8,0,9,1),  Time( 91, 96));
  1398.   MOVE(From(6,-1,7,0),   To(7,0,8,1),  Time( 92, 97));
  1399.   MOVE(From(5,-1,6,0),   To(6,0,7,1),  Time( 93, 98));
  1400.   MOVE(From(4,-1,5,0),   To(5,0,6,1),  Time( 94, 99));
  1401.   MOVE(From(3,-1,4,0),   To(4,0,5,1),  Time( 95, 100));
  1402.   MOVE(From(2,-1,3,0),   To(3,0,4,1),  Time( 96, 101));
  1403.   MOVE(From(1,-1,2,0),   To(2,0,3,1),  Time( 97, 102));
  1404.   MOVE(From(0,-1,1,0),   To(1,0,2,1),  Time( 98, 103));
  1405.   MOVE(From(-1,-1,0,0),  To(0,0,1,1),  Time( 99, 104));
  1406. END
  1407.  
  1408.  
  1409.  
  1410.  
  1411. /******** Wipe entries ********/
  1412.  
  1413. GROUPID($07109c00);
  1414. ICONFILE("ScalaProgram:\wipes\wipes.bmp", Size(26,18), Spacing(32,20));
  1415.  
  1416. ENTRY("Wipe", Direction(North), Icon(17,0));
  1417. ENTRY("Wipe", Direction(South), Icon(18,0));
  1418. ENTRY("Wipe", Direction(West),  Icon(19,0));
  1419. ENTRY("Wipe", Direction(East),  Icon(0,1));
  1420.  
  1421. ENTRY("Line", Direction(North), Icon(1,1));
  1422. ENTRY("Line", Direction(South), Icon(2,1));
  1423. ENTRY("Line", Direction(West),  Icon(4,1));
  1424. ENTRY("Line", Direction(East),  Icon(3,1));
  1425.  
  1426. ENTRY("Center", Icon(9,1));
  1427.  
  1428. ENTRY("Split", Direction(East), Icon(10,1));
  1429.  
  1430. ENTRY("Quadrant", Icon(2,6));
  1431.  
  1432. ENTRY("Corner", Direction(NorthWest), Icon(11,1));
  1433. ENTRY("Corner", Direction(NorthEast), Icon(12,1));
  1434. ENTRY("Corner", Direction(SouthWest), Icon(13,1));
  1435. ENTRY("Corner", Direction(SouthEast), Icon(14,1));
  1436.  
  1437. ENTRY("Stripper", Direction(East), Icon(15,1));
  1438. ENTRY("Stripper", Direction(West), Icon(16,1));
  1439.  
  1440. ENTRY("SmallBlinds", Direction(South), Icon(17,1));
  1441. ENTRY("ScaleStripper", Direction(South), Icon(18,1));
  1442. ENTRY("Curtain", Direction(East), Icon(19,1));
  1443.  
  1444. ENTRY("SquareDance", Icon(0,2));
  1445. ENTRY("SpiralIn", Icon(1,2));
  1446.  
  1447. ENTRY("Swiss", Icon(16,12));
  1448.  
  1449. ENTRY("Stripes",      Direction(East),  Icon(10,5));
  1450.  
  1451. ENTRY("Peel",      Direction(South), Icon(15,5));
  1452. ENTRY("Stacker",  Direction(South), Icon(16,5));
  1453. ENTRY("SpiralBlock",   Direction(NorthEast), Icon(17,5));
  1454. ENTRY("PremiereReveal",       Direction(East),  Icon(18,5));
  1455. ENTRY("Timeslice",       Direction(East),  Icon(19,5));
  1456.  
  1457. ENTRY("CornerSlice",   Direction(SouthEast), Icon(0,6));
  1458. ENTRY("PaintDrip",    Direction(South), Icon(1,6));
  1459. ENTRY("MiniQuadrant",      Direction(South), Icon(3,6));
  1460. ENTRY("DiagonalStrips",       Direction(East),  Icon(4,6));
  1461.  
  1462. ENTRY("Turnaround",                     Icon(6,6));
  1463. ENTRY("Closure",      Direction(South), Icon(7,6));
  1464. ENTRY("ZoomSpiral",  Direction(East),  Icon(8,6));
  1465. ENTRY("SplineWave",   Direction(South), Icon(9,6));
  1466.  
  1467. ENTRY("SpinningFan", Icon(17,3));
  1468. ENTRY("DiagonalBlocks", Direction(NorthEast), Icon(18,3));
  1469. ENTRY("RandomBlocks", Icon(19,3));
  1470.  
  1471. ENTRY("ClosingBlinds",  Direction(South), Icon(0,4));
  1472. ENTRY("BlindsFantasy1",  Direction(South), Icon(1,4));
  1473. ENTRY("BlindsFantasy2", Direction(South), Icon(2,4));
  1474. ENTRY("BlindsFantasy3", Direction(South), Icon(3,4));
  1475.  
  1476. ENTRY("SplitBlinds", Direction(South), Icon(5,4));
  1477. ENTRY("Blocks", Icon(8,4));
  1478. ENTRY("WideBlinds", Direction(South), Icon(10,4));
  1479. ENTRY("XmasTree", Direction(East), Icon(11,4));
  1480. ENTRY("BasketWeave", Direction(East), Icon(12,4));
  1481. ENTRY("SuperStripper", Direction(West), Icon(14,4));
  1482.  
  1483. ENTRY("Enigma", Icon(16,4));
  1484. ENTRY("EnigmaReverse", Icon(17,4));
  1485.  
  1486. ENTRY("TheWall",    Direction(South), Icon(11,5));
  1487. ENTRY("SmoothWall",       Direction(South), Icon(12,5));
  1488. ENTRY("ScaleTheWall",  Direction(South), Icon(13,5));
  1489. ENTRY("BrickWall",   Direction(South), Icon(14,5));
  1490.