Red Pages of the Internet/RedPagesInternet2000.iso/Other/Scala.InfoChannel.IC200.SP6-SHOCK/SCALA/PartialScripts/8xCable.sca

Text File | 1997-07-18 | 33.9 KB | 240 lines

!ScalaScript
EVENT
  Group:
    Config.SaveOpts();
  Sequence:
    :"Channel Guide"
    EVENT
      Group:
        Picture("../ClipArt\8xBackgrounds\CableTV\8xChannelGuide1.gif", Wipe("RandomAlways", Direction(0)), Margin(10, 10, 0, 0), Tabs(Explicit(80, 160, 240, 320, 400, 480, 560)), UserPalette(RGBPen(1, $0, $ffffff, $999999, $555555, $712068, $df449c, $dc110e, $662200, $ff5a00, $ff9c00, $ffee00, $8800, $dd00, $cccc, $66ff, $aa, $777777, $bbbbbb, $dddddd)), Operation(On));
        Pause(6);
        Text(61, 45, "Channel Guide", Face(On, Pen(15)), Outline(On), Shadow(On), AntiAlias(On), Update(Normal), Font("FranklinGotTExtCon (Western [])", 100), Italic(On), Wrap(Off, Auto(559)));
      Sequence:
        Text(101, 165, "3", Wipe("CenterZoom", Direction(0)), Face(On, Pen(11)), Outline(On, Thickness(2)), Shadow(On), AntiAlias(On), Update(Normal), Font("FranklinGotTReg (Western [])", 50), Wrap(Off, Auto(562)));
        Text(153, 165, "WET Weather", Wipe("Timeslice", Speed(7), Direction(0)), Face(On, Pen(1)), Shadow(On, Pen(4)), AntiAlias(On), Update(Normal), Font("CandidaTMed (Western [])", 50), Wrap(Off, Auto(559)));
        Text(99, 216, "6", Wipe("CenterZoom", Direction(0)), Face(On, Pen(11)), Outline(On, Thickness(2)), Shadow(On), AntiAlias(On), Update(Normal), Font("FranklinGotTReg (Western [])", 50), Wrap(Off, Auto(562)));
        Text(153, 217, "ABC Network", Wipe("Timeslice", Speed(7), Direction(0)), Face(On, Pen(1)), Shadow(On, Pen(4)), AntiAlias(On), Update(Normal), Font("CandidaTMed (Western [])", 50), Wrap(Off, Auto(559)));
        Text(80, 272, "10", Wipe("CenterZoom", Direction(0)), Face(On, Pen(11)), Outline(On, Thickness(2)), Shadow(On), AntiAlias(On), Update(Normal), Font("FranklinGotTReg (Western [])", 50), Wrap(Off, Auto(562)));
        Text(153, 273, "CTV Community TV", Wipe("Timeslice", Speed(7), Direction(0)), Face(On, Pen(1)), Shadow(On, Pen(4)), AntiAlias(On), Update(Normal), Font("CandidaTMed (Western [])", 50), Wrap(Off, Auto(559)));
        Text(78, 326, "12", Wipe("CenterZoom", Direction(0)), Face(On, Pen(11)), Outline(On, Thickness(2)), Shadow(On), AntiAlias(On), Update(Normal), Font("FranklinGotTReg (Western [])", 50), Wrap(Off, Auto(562)));
        Text(153, 328, "PBS Public TV", Wipe("Timeslice", Speed(7), Direction(0)), Face(On, Pen(1)), Shadow(On, Pen(4)), AntiAlias(On), Update(Normal), Font("CandidaTMed (Western [])", 50), Wrap(Off, Auto(559)));
        Text(83, 380, "17", Wipe("CenterZoom", Direction(0)), Face(On, Pen(11)), Outline(On, Thickness(2)), Shadow(On), AntiAlias(On), Update(Normal), Font("FranklinGotTReg (Western [])", 50), Wrap(Off, Auto(562)));
        Text(153, 383, "PHL Allentown", Wipe("Timeslice", Speed(7), Direction(0)), Face(On, Pen(1)), Shadow(On, Pen(4)), AntiAlias(On), Update(Normal), Font("CandidaTMed (Western [])", 50), Wrap(Off, Auto(559)));
        Text(74, 432, "40", Wipe("CenterZoom", Direction(0)), Face(On, Pen(11)), Outline(On, Thickness(2)), Shadow(On), AntiAlias(On), Update(Normal), Font("FranklinGotTReg (Western [])", 50), Wrap(Off, Auto(562)));
        Text(153, 436, "DTV Discovery", Wipe("Timeslice", Speed(7), Direction(0)), Face(On, Pen(1)), Shadow(On, Pen(4)), AntiAlias(On), Update(Normal), Font("CandidaTMed (Western [])", 50), Wrap(Off, Auto(559)));
        Text(62, 489, "112", Wipe("CenterZoom", Direction(0)), Face(On, Pen(11)), Outline(On, Thickness(2)), Shadow(On), AntiAlias(On), Update(Normal), Font("FranklinGotTReg (Western [])", 50), Wrap(Off, Auto(562)));
        Text(153, 491, "PPV Movie Channel", Wipe("Timeslice", Speed(7), Direction(0)), Face(On, Pen(1)), Shadow(On, Pen(4)), AntiAlias(On), Update(Normal), Font("CandidaTMed (Western [])", 50), Wrap(Off, Auto(559)));
    END
    :"Classifieds"
    EVENT
      Group:
        Picture("../ClipArt\8xBackgrounds\CableTV\8xClassifieds1.gif", Wipe("RandomAlways", Direction(0)), Margin(10, 10, 0, 0), Tabs(Explicit(80, 160, 240, 320, 400, 480, 560)), UserPalette(RGBPen(1, $0, $ffffff, $999999, $555555, $712068, $df449c, $dc110e, $662200, $ff5a00, $ff9c00, $ffee00, $8800, $dd00, $cccc, $66ff, $aa, $777777, $bbbbbb, $dddddd)), Operation(On));
        Pause(6);
        Text(385, 447, "Classifieds", Shadow(On), AntiAlias(On), Update(Normal), Font("URWTypewriterTMed (Western [])", 75), Wrap(Off, Auto(365)));
      Sequence:
        Text(197, 8, "Volunteers", Wipe("Damped", Direction(0)), Face(On, Pen(11)), Outline(On), Shadow(On), Align(Center, None), AntiAlias(On), Update(Normal), Font("GoudyWtcTMed (Western [])", 100), Under(On, Pen(7), Thickness(4)), Justify(Center, Top), Wrap(Off, Auto(453)));
        Text(243, 72, "Needed", Wipe("Damped", Direction(180)), Face(On, Pen(11)), Outline(On), Shadow(On), Align(Center, None), AntiAlias(On), Update(Normal), Font("GoudyWtcTMed (Western [])", 100), Under(On, Pen(7), Thickness(4)), Justify(Center, Top), Wrap(Off, Auto(453)));
        Text(184, 195, "The local animal shelter needs people who love cats and dogs to help in our annual Pet Show at the mall.", Wipe("SpiralIn", Direction(0)), Face(On, Pen(1)), Align(Center, None), AntiAlias(On), Update(Normal), Font("NewsGotTMed (Western [])", 50), Bold(On), Justify(Center, Top), Wrap(On, Auto(512)));
    END
    :"FORáSALE"
    EVENT
      Group:
        Picture("../ClipArt\8xBackgrounds\CableTV\8xForSale1.gif", Wipe("RandomAlways", Direction(0)), Margin(10, 10, 0, 0), Tabs(Explicit(80, 160, 240, 320, 400, 480, 560)), UserPalette(RGBPen(1, $0, $ffffff, $999999, $555555, $712068, $df449c, $dc110e, $662200, $ff5a00, $ff9c00, $ffee00, $8800, $dd00, $cccc, $66ff, $aa, $777777, $bbbbbb, $dddddd)), Operation(On));
        Pause(6);
        Text(65, 64, "FORáSALE", Backdrop(On, Pen(1)), Shadow(On), Align(Center, None), AntiAlias(On), Update(Normal), Font("FolioTExtBol (Western [])", 75), Under(On, Pen(7), Thickness(3)), Justify(Center, Top), Wrap(Off, Auto(482)));
      Sequence:
        Text(30, 150, "House for a new family", Wipe("PushStrips", Direction(180)), Face(On, Pen(11)), Outline(On), Shadow(On), Align(Center, None), AntiAlias(On), Update(Normal), Font("ClarendonTMed (Western [])", 50), Justify(Center, Top), Wrap(Off, Auto(555)));
        Text(30, 204, "Two bedrooms, Two bathrooms", Wipe("PushStrips", Direction(180)), Face(On, Pen(15)), Shadow(On), Align(Center, None), AntiAlias(On), Update(Normal), Font("FranklinGotTReg (Western [])", 45), Justify(Center, Top), Wrap(Off, Auto(583)));
        Text(30, 257, "Living Room, Laundry Room", Wipe("PushStrips", Direction(180)), Face(On, Pen(12)), Shadow(On), Align(Center, None), AntiAlias(On), Update(Normal), Font("FranklinGotTReg (Western [])", 45), Justify(Center, Top), Wrap(Off, Auto(611)));
        Text(371, 311, "Full size Kitchen", Wipe("PushStrips", Direction(180)), Face(On, Pen(12)), Shadow(On), Align(Center, None), AntiAlias(On), Update(Normal), Font("FranklinGotTReg (Western [])", 45), Justify(Center, Top), Wrap(Off, Auto(419)));
        Text(30, 369, "Small back yard", Wipe("PushStrips", Direction(180)), Face(On, Pen(7)), Shadow(On), Align(Center, None), AntiAlias(On), Update(Normal), Font("FranklinGotTReg (Western [])", 45), Justify(Center, Top), Wrap(Off, Auto(409)));
        Text(30, 434, "Call 1-555-5309", Wipe("ZoomUp", Direction(0)), Face(On, Pen(1)), Shadow(On, Pen(2)), Bevel(On), Align(Center, None), AntiAlias(On), Update(Normal), Font("FolioTExtBol (Western [])", 50), Justify(Center, Top), Wrap(Off, Auto(409)));
    END
    :"State Lottery"
    EVENT
      Group:
        Picture("../ClipArt\8xBackgrounds\CableTV\8xLottery1.gif", Wipe("RandomAlways", Direction(0)), Margin(10, 10, 0, 0), Tabs(Explicit(80, 160, 240, 320, 400, 480, 560)), UserPalette(RGBPen(1, $0, $ffffff, $999999, $555555, $712068, $df449c, $dc110e, $662200, $ff5a00, $ff9c00, $ffee00, $8800, $dd00, $cccc, $66ff, $aa, $777777, $bbbbbb, $dddddd)), Operation(On));
        Pause(6);
      Sequence:
        Text(77, 18, "State Lottery", Wipe("Premiere", Direction(0)), Outline(On), Shadow(On), Align(Center, None), AntiAlias(On), Update(Normal), Font("FranklinGotTReg (Western [])", 100), Under(On, Pen(16), Thickness(4)), Justify(Center, Top), Wrap(Off, Auto(610)));
        Text(119, 104, "05 - 22 - 19 - 44 - 06 - 38", Face(On, Pen(11)), Shadow(On), Align(Center, None), AntiAlias(On), Update(Normal), Font("URWTypewriterTMed (Western [])", 75), Justify(Center, Top), Wrap(Off, Auto(681)));
        Text(82, 189, "Instant Win", Wipe("Premiere", Direction(0)), Outline(On), Shadow(On), Align(Center, None), AntiAlias(On), Update(Normal), Font("FranklinGotTReg (Western [])", 100), Under(On, Pen(16), Thickness(4)), Justify(Center, Top), Wrap(Off, Auto(525)));
        Text(121, 273, "74 - 48 - 33", Face(On, Pen(11)), Shadow(On), Align(Center, None), AntiAlias(On), Update(Normal), Font("URWTypewriterTMed (Western [])", 75), Justify(Center, Top), Wrap(Off, Auto(492)));
    END
    :"Movies"
    EVENT
      Group:
        Picture("../ClipArt\8xBackgrounds\CableTV\8xMovies1.gif", Wipe("RandomAlways", Direction(0)), Margin(10, 10, 0, 0), Tabs(Explicit(80, 160, 240, 320, 400, 480, 560)), UserPalette(RGBPen(1, $0, $ffffff, $999999, $555555, $712068, $df449c, $dc110e, $662200, $ff5a00, $ff9c00, $ffee00, $8800, $dd00, $cccc, $66ff, $aa, $777777, $bbbbbb, $dddddd)), Operation(On));
        Pause(6);
      Sequence:
        Text(222, 64, "Movies", Wipe("ArcIn", Direction(315)), Shadow(On), AntiAlias(On), Update(Normal), Font("FranklinGotTReg (Western [])", 100), Wrap(Off, Auto(569)));
        Text(486, 104, "this ", Wipe("ArcIn", Direction(315)), Shadow(On), AntiAlias(On), Update(Normal), Font("FranklinGotTReg (Western [])", 50), Wrap(On, Auto(569)));
        Text(422, 112, "week", Wipe("ArcIn", Direction(315)), Shadow(On), AntiAlias(On), Update(Normal), Font("FranklinGotTReg (Western [])", 100), Wrap(Off, Auto(569)));
        Text(222, 208, "MONDAY", Wipe("StripFoldOut", Speed(7), Direction(90)), Face(On, Pen(11)), Shadow(On), AntiAlias(On), Update(Normal), Font("FranklinGotTReg (Western [])", 50), Under(On, Pen(11), Thickness(3)), Wrap(Off, Auto(554)));
        Text(422, 208, "Impossible Mission", Wipe("Wipe", Speed(7), Direction(0)), Shadow(On), AntiAlias(On), Update(Normal), Font("FranklinGotTExtCon (Western [])", 50), Wrap(Off, Auto(467)));
        Text(206, 288, "TUESDAY", Wipe("StripFoldOut", Speed(7), Direction(90)), Face(On, Pen(11)), Shadow(On), AntiAlias(On), Update(Normal), Font("FranklinGotTReg (Western [])", 50), Under(On, Pen(11), Thickness(3)), Wrap(Off, Auto(554)));
        Text(422, 288, "Kiss Goodbye", Wipe("Wipe", Speed(7), Direction(0)), Shadow(On), AntiAlias(On), Update(Normal), Font("FranklinGotTExtCon (Western [])", 50), Wrap(Off, Auto(467)));
        Text(174, 376, "THURSDAY", Wipe("StripFoldOut", Speed(7), Direction(90)), Face(On, Pen(11)), Shadow(On), AntiAlias(On), Update(Normal), Font("FranklinGotTReg (Western [])", 50), Under(On, Pen(11), Thickness(3)), Wrap(Off, Auto(554)));
        Text(422, 376, "Tornado", Wipe("Wipe", Speed(7), Direction(0)), Shadow(On), AntiAlias(On), Update(Normal), Font("FranklinGotTExtCon (Western [])", 50), Wrap(Off, Auto(467)));
        Text(182, 456, "SATURDAY", Wipe("StripFoldOut", Speed(7), Direction(90)), Face(On, Pen(11)), Shadow(On), AntiAlias(On), Update(Normal), Font("FranklinGotTReg (Western [])", 50), Under(On, Pen(11), Thickness(3)), Wrap(Off, Auto(554)));
        Text(422, 456, "That Darn Duck", Wipe("Wipe", Speed(7), Direction(0)), Shadow(On), AntiAlias(On), Update(Normal), Font("FranklinGotTExtCon (Western [])", 50), Wrap(Off, Auto(467)));
    END
    :"What's on TVáToday"
    EVENT
      Group:
        Picture("../ClipArt\8xBackgrounds\CableTV\8xOnTVToday1.gif", Wipe("RandomAlways", Direction(0)), Margin(10, 10, 0, 0), Tabs(Explicit(80, 160, 240, 320, 400, 480, 560)), UserPalette(RGBPen(1, $0, $ffffff, $999999, $555555, $712068, $df449c, $dc110e, $662200, $ff5a00, $ff9c00, $ffee00, $8800, $dd00, $cccc, $66ff, $aa, $777777, $bbbbbb, $dddddd)), Operation(On));
        Pause(6);
        Text(170, 94, "What's on TVáToday", Face(On, Pen(11)), Outline(On), Shadow(On), Align(Center, None), AntiAlias(On), Update(Normal), Font("FlashDLig (Western [])", 75), Justify(Center, Top), Wrap(Off, Auto(636)));
        Text(172, 169, "showing at 3:00 pm^t!date", Shadow(On), Align(Center, None), AntiAlias(On), Update(Normal), Font("NewsGotTMed (Western [])", 35), Bold(On), Justify(Center, Top), Wrap(Off, Auto(592)));
        Text(169, 209, "Channel", Face(On, Pen(11)), Shadow(On), AntiAlias(On), Update(Normal), Font("FranklinGotTReg (Western [])", 20), Wrap(Off, Auto(606)));
        Text(321, 209, "Show", Face(On, Pen(11)), Shadow(On), AntiAlias(On), Update(Normal), Font("FranklinGotTReg (Western [])", 20), Wrap(Off, Auto(606)));
      Sequence:
        Text(177, 225, "4^t^tExtra News", Wipe("ClosingBlinds", Speed(6), Direction(270)), Shadow(On), AntiAlias(On), Update(Normal), Font("NewsGotTMed (Western [])", 50), Under(On, Pen(4), Thickness(3)), Wrap(Off, Auto(584)));
        Text(177, 273, "8^t^tThe Talk Show", Wipe("ClosingBlinds", Speed(6), Direction(270)), Shadow(On), AntiAlias(On), Update(Normal), Font("NewsGotTMed (Western [])", 50), Under(On, Pen(4), Thickness(3)), Wrap(Off, Auto(584)));
        Text(177, 321, "19^t^tPrice Game", Wipe("ClosingBlinds", Speed(6), Direction(270)), Shadow(On), AntiAlias(On), Update(Normal), Font("NewsGotTMed (Western [])", 50), Under(On, Pen(4), Thickness(3)), Wrap(Off, Auto(584)));
        Text(177, 369, "24^t^tStar Battle", Wipe("ClosingBlinds", Speed(6), Direction(270)), Shadow(On), AntiAlias(On), Update(Normal), Font("NewsGotTMed (Western [])", 50), Under(On, Pen(4), Thickness(3)), Wrap(Off, Auto(584)));
    END
    :"What's on TV Tonight"
    EVENT
      Group:
        Picture("../ClipArt\8xBackgrounds\CableTV\8xOnTVTonite1.gif", Wipe("RandomAlways", Direction(0)), Margin(10, 10, 0, 0), Tabs(Explicit(80, 160, 240, 320, 400, 480, 560)), UserPalette(RGBPen(1, $0, $ffffff, $999999, $555555, $712068, $df449c, $dc110e, $662200, $ff5a00, $ff9c00, $ffee00, $8800, $dd00, $cccc, $66ff, $aa, $777777, $bbbbbb, $dddddd)), Operation(On));
        Pause(6);
        Text(160, 98, "What's on TV Tonight", Face(On, Pen(14)), Outline(On), Shadow(On), Align(Center, None), AntiAlias(On), Update(Normal), Font("FolioTBolCon (Western [])", 75), Justify(Center, Top), Wrap(Off, Auto(470)));
      Sequence:
        Text(247, 174, "shows on at 7:00 PM", Wipe("SplitBlinds", Direction(270)), Shadow(On), Align(Center, None), AntiAlias(On), Update(Normal), Font("FranklinGotTReg (Western [])", 35), Justify(Center, Top), Wrap(Off, Auto(614)));
        Text(175, 226, "Entertainment Expo", Wipe("QuadrantIn", Direction(0)), Outline(On), Shadow(On), AntiAlias(On), Update(Normal), Font("CandidaTMed (Western [])", 40), Wrap(Off, Auto(648)));
        Text(598, 217, "3", Wipe("SwimIn", Direction(45)), Face(On, Pen(11)), Outline(On), Shadow(On), AntiAlias(On), Update(Normal), Font("FranklinGotTReg (Western [])", 50), Wrap(Off, Auto(648)));
        Text(175, 282, "Headline News", Wipe("Premiere", Direction(0)), Outline(On), Shadow(On), AntiAlias(On), Update(Normal), Font("CandidaTMed (Western [])", 40), Wrap(Off, Auto(648)));
        Text(598, 273, "4", Wipe("SwimIn", Direction(45)), Face(On, Pen(11)), Outline(On), Shadow(On), AntiAlias(On), Update(Normal), Font("FranklinGotTReg (Western [])", 50), Wrap(Off, Auto(648)));
        Text(175, 338, "Home Improvements", Wipe("MiddleStretch", Direction(270)), Outline(On), Shadow(On), AntiAlias(On), Update(Normal), Font("CandidaTMed (Western [])", 40), Wrap(Off, Auto(648)));
        Text(598, 329, "6", Wipe("SwimIn", Direction(45)), Face(On, Pen(11)), Outline(On), Shadow(On), AntiAlias(On), Update(Normal), Font("FranklinGotTReg (Western [])", 50), Wrap(Off, Auto(168)));
        Text(175, 394, "In Jeopardy", Wipe("QuarterBounceOn", Direction(135)), Outline(On), Shadow(On), AntiAlias(On), Update(Normal), Font("CandidaTMed (Western [])", 40), Wrap(Off, Auto(648)));
        Text(574, 385, "10", Wipe("SwimIn", Direction(45)), Face(On, Pen(11)), Outline(On), Shadow(On), AntiAlias(On), Update(Normal), Font("FranklinGotTReg (Western [])", 50), Wrap(Off, Auto(648)));
    END
    :"Nature Safari"
    EVENT
      Group:
        Picture("../ClipArt\8xBackgrounds\CableTV\8xProgramGuide1.gif", Wipe("RandomAlways", Direction(0)), Margin(10, 10, 0, 0), Tabs(Explicit(80, 160, 240, 320, 400, 480, 560)), Palette(RGBPen(1, $0, $ffffff, $999999, $555555, $712068, $df449c, $dc110e, $662200, $ff5a00, $ff9c00, $ffee00, $8800, $dd00, $cccc, $66ff, $aa, $777777, $bbbbbb, $dddddd, $40205, $448e94, $414339, $accce0, $774a37, $840a1c, $23241b, $a18677, $9ca68c, $4c6264, $4c2214, $cca48f, $76675a, $5c4234, $340a14, $98685c, $9ca6e7, $343224, $19130e, $cce6fc, $7c7e84, $54524c, $747a54, $acb6b4, $e2c7ac, $9c9ecc, $a49680, $44322c, $7c825c, $35251d, $695641, $8c8ebc, $baa68e, $5c623c, $230a12, $846a61, $26120f, $d1b697, $6c7a6c, $5c3234, $7c9694, $877769, $b59881, $2c5a5c, $3b3234, $dddbd8, $c0daec, $5c6264, $40224, $a44a64, $644a34, $948671, $e5b69a, $444244, $2c2a2d, $443c48, $3c2a2c, $7b563d, $a4122c, $695457, $ac8a79, $a2aeac, $777063, $565254, $c4b692, $b4aeb3, $646263, $100d0e, $c5c6c3, $2c2c1d, $5a2518, $564d49, $1b1c18, $ac9881, $4a3a2a, $5c0a14, $947669, $fccdae, $3a2c1f, $241e34, $ccb6b4, $666a5f, $b4becc, $fce7c2, $866a6e, $241a1c, $2e3a3e, $8c8e84, $cfcdcb, $787a79, $8a7e77, $642a1c, $2c241c, $a08d7c, $aca5a3, $3b1a0c, $9d9d98, $404a4a, $665b5c, $787270, $595c64, $c0b6b0, $a1b6c7, $383d2c, $e2ccd2, $c4a98d, $745c61, $7c7e76, $e4910c, $e4e18d, $0, $8d00ff, $0, $945abf, $acfc, $1e, $0, $fcbc73, $311e, $14, $0, $0, $ec73, $ab02ac, $ebee00, $c2b78, $c0e0, $4300c1, $e4910c, $313441, $7901, $97, $10000, $f13940, $b848, $6600b0, $0, $80e18d, $4afd, $10, $276a01, $c3778, $c37, $6a0108, $0, $9d2940, $0, $690000, $a64000, $0, $3e36, $22, $2a5a00, $c0e08d, $7cec, $8d004b, $fd6800, $c4e08d, $0, $910c64, $d17300, $cc2a5a, $0, $31, $e08d00, $e0e08d, $131e0, $f8, $0, $a4e08d, $9ce0, $7300e0, $2cb201, $1c2b5a, $cc2a, $8d0000, $36a902, $7ea640, $ac36, $95, $0, $0, $1cc2a, $400700, $0, $300000, $b048, $8d0020, $104300, $584769, $c2be, $7300a5, $0, $60e18d, $bfbd98, $6381e0, $364000, $10000, $f4e3, $8d0000, $2b6701, $f8e38d, $b818, $c400e8, $196300, $10e48d, $1ce4, $43001a, $e48d00, $b81863, $4e4, $6300e8, $a14000, $c072ab, $2aee2, $8d00bc)), UserPalette(RGBPen(1, $0, $ffffff, $999999, $555555, $712068, $df449c, $dc110e, $662200, $ff5a00, $ff9c00, $ffee00, $8800, $dd00, $cccc, $66ff, $aa, $777777, $bbbbbb, $dddddd)), Operation(On));
        Pause(6);
      Sequence:
        Text(133, 139, "Nature Safari", Wipe("StripFoldOut", Direction(90)), Outline(On), Shadow(On), AntiAlias(On), Update(Normal), Font("NewsGotTMed (Western [])", 75), Wrap(Off, Auto(518)));
        Clip(133, 251, "../ClipArt\Clips\Nature\Elephantphoto.bmp", Wipe("WideBlinds", Direction(270)), Operation(On));
        Text(369, 256, "Channel 55 (SNC)", Outline(On), Shadow(On), AntiAlias(On), Update(Normal), Font("URWImperialTMed (Western [])", 50), Wrap(Off, Auto(326)));
        Text(378, 318, "Go on an exciting tour of Africa, Asia and South America in search of nature's most exotic animals.", Shadow(On), AntiAlias(On), Update(Normal), Font("FranklinGotTReg (Western [])", 25), Wrap(On, Auto(298)));
        Text(378, 449, "Great for kids ages 6 and up.", Shadow(On), AntiAlias(On), Update(Normal), Font("FranklinGotTReg (Western [])", 25), Wrap(Off, Auto(402)));
    END
    :"Celebration"
    EVENT
      Group:
        Picture("../ClipArt\8xBackgrounds\CableTV\8x8x4thJuly.gif", Wipe("RandomAlways", Direction(0)), Margin(10, 10, 0, 0), Tabs(Explicit(80, 160, 240, 320, 400, 480, 560)), UserPalette(RGBPen(1, $0, $ffffff, $999999, $555555, $712068, $df449c, $dc110e, $662200, $ff5a00, $ff9c00, $ffee00, $8800, $dd00, $cccc, $66ff, $aa, $777777, $bbbbbb, $dddddd)), Operation(On));
        Pause(6);
      Sequence:
        Text(133, 83, "CELEBRATION!", Wipe("Peel", Direction(270)), Face(On, Pen(11)), Shadow(On), Align(Center, None), AntiAlias(On), Update(Normal), Font("CastleT Bold (Western [<CastleT> 700])", 100), Justify(Center, Top), Wrap(Off, Auto(666)));
        Text(149, 209, "Join in the food & fun at this year's town festival.", Shadow(On), Align(Center, None), AntiAlias(On), Update(Normal), Font("FranklinGotTReg (Western [])", 50), Justify(Center, Top), Wrap(On, Auto(641)));
        Text(170, 306, "Games", Wipe("ZoomUp", Direction(0)), Face(On, Pen(10)), Outline(On), Shadow(On), Align(Center, None), AntiAlias(On), Update(Normal), Font("FolioTExtBol (Western [])", 60), Justify(Center, Top), Wrap(Off, Auto(641)));
        Text(330, 354, "Exotic Food", Wipe("ZoomUp", Direction(0)), Face(On, Pen(11)), Outline(On), Shadow(On), Align(Center, None), AntiAlias(On), Update(Normal), Font("FolioTExtBol (Western [])", 60), Justify(Center, Top), Wrap(Off, Auto(641)));
        Text(226, 402, "Crafts", Wipe("ZoomUp", Direction(0)), Face(On, Pen(6)), Outline(On), Shadow(On), Align(Center, None), AntiAlias(On), Update(Normal), Font("FolioTExtBol (Western [])", 60), Justify(Center, Top), Wrap(Off, Auto(641)));
        Text(306, 450, "Music", Wipe("ZoomUp", Direction(0)), Face(On, Pen(14)), Outline(On), Shadow(On), Align(Center, None), AntiAlias(On), Update(Normal), Font("FolioTExtBol (Western [])", 60), Justify(Center, Top), Wrap(Off, Auto(641)));
    END
    :"Easter Activities"
    EVENT
      Group:
        Picture("../ClipArt\8xBackgrounds\CableTV\8x8xEaster.gif", Wipe("RandomAlways", Direction(0)), Margin(10, 10, 0, 0), Tabs(Explicit(80, 160, 240, 320, 400, 480, 560)), UserPalette(RGBPen(1, $0, $ffffff, $999999, $555555, $712068, $df449c, $dc110e, $662200, $ff5a00, $ff9c00, $ffee00, $8800, $dd00, $cccc, $66ff, $aa, $777777, $bbbbbb, $dddddd)), Operation(On));
        Pause(6);
        Text(137, 90, "Easter Activities", Face(On, Pen(11)), Shadow(On), Align(Center, None), AntiAlias(On), Update(Normal), Font("RomanaTMed (Western [])", 100), Under(On, Pen(7), Thickness(4)), Justify(Center, Top), Wrap(Off, Auto(653)));
      Sequence:
        Text(139, 209, "Easter Egg Hunt", Wipe("PushStrips", Direction(180)), Shadow(On), Align(Center, None), AntiAlias(On), Update(Normal), Font("NewsGotTMed (Western [])", 50), Justify(Center, Top), Wrap(Off, Auto(651)));
        Text(139, 258, "Saturday at 3:00 pm", Wipe("Corner", Direction(225)), Face(On, Pen(14)), Outline(On), Shadow(On), Align(Center, None), AntiAlias(On), Update(Normal), Font("FranklinGotTReg (Western [])", 35), Justify(Center, Top), Wrap(Off, Auto(651)));
        Text(139, 290, "Milton Park", Wipe("Corner", Direction(225)), Face(On, Pen(14)), Outline(On), Shadow(On), Align(Center, None), AntiAlias(On), Update(Normal), Font("FranklinGotTReg (Western [])", 35), Justify(Center, Top), Wrap(Off, Auto(651)));
        Text(139, 361, "Kids Meet the Easter Bunny", Wipe("PushStrips", Direction(180)), Shadow(On), Align(Center, None), AntiAlias(On), Update(Normal), Font("NewsGotTMed (Western [])", 50), Justify(Center, Top), Wrap(Off, Auto(651)));
        Text(195, 410, "All Weekend", Wipe("Corner", Direction(225)), Face(On, Pen(14)), Outline(On), Shadow(On), Align(Center, None), AntiAlias(On), Update(Normal), Font("FranklinGotTReg (Western [])", 35), Justify(Center, Top), Wrap(Off, Auto(595)));
        Text(195, 442, "at the Millcreek Mall", Wipe("Corner", Direction(225)), Face(On, Pen(14)), Outline(On), Shadow(On), Align(Center, None), AntiAlias(On), Update(Normal), Font("FranklinGotTReg (Western [])", 35), Justify(Center, Top), Wrap(Off, Auto(595)));
    END
    :"FALL"
    EVENT
      Group:
        Picture("../ClipArt\8xBackgrounds\CableTV\8xFall.gif", Wipe("RandomAlways", Direction(0)), Margin(10, 10, 0, 0), Tabs(Explicit(80, 160, 240, 320, 400, 480, 560)), UserPalette(RGBPen(1, $0, $ffffff, $999999, $555555, $712068, $df449c, $dc110e, $662200, $ff5a00, $ff9c00, $ffee00, $8800, $dd00, $cccc, $66ff, $aa, $777777, $bbbbbb, $dddddd)), Operation(On));
        Pause(6);
        Text(114, 58, "FALL", Face(On, Pen(1)), Outline(On, Pen(2)), AntiAlias(On), Update(Normal), Font("FranklinGotTReg (Western [])", 150), Wrap(Off, Auto(770)));
        Text(98, 154, "SALE", Face(On, Pen(1)), Outline(On, Pen(2)), AntiAlias(On), Update(Normal), Font("FranklinGotTReg (Western [])", 150), Wrap(Off, Auto(770)));
        Text(201, 298, "Dresses, Sweaters, Accessories and more!", Face(On, Pen(1)), Outline(On, Pen(2)), Shadow(On, Pen(2)), Align(Center, None), AntiAlias(On), Update(Normal), Font("NewsGotTMed (Western [])", 65), Justify(Center, Top), Wrap(On, Auto(608)));
      Sequence:
        Text(421, 112, "Women's^n   Fashions", Wipe("ScrollDivide", Direction(0)), Outline(On, Thickness(2)), AntiAlias(On), Update(Normal), Font("URWGaramondTMed (Western [])", 75), Wrap(Off, Auto(351)));
        Text(139, 427, "UPáTOá50% OFF", Wipe("ZoomUp", Direction(0)), Face(On, Pen(11)), Focus(On, Pen(2)), Shadow(On), AntiAlias(On), Update(Normal), Font("NewsGotTMed (Western [])", 100), Wrap(Off, Auto(600)));
    END
    :"Halloween"
    EVENT
      Group:
        Picture("../ClipArt\8xBackgrounds\CableTV\8xHalloween2.gif", Wipe("RandomAlways", Direction(0)), Margin(10, 10, 0, 0), Tabs(Explicit(80, 160, 240, 320, 400, 480, 560)), UserPalette(RGBPen(1, $0, $ffffff, $999999, $555555, $712068, $df449c, $dc110e, $662200, $ff5a00, $ff9c00, $ffee00, $8800, $dd00, $cccc, $66ff, $aa, $777777, $bbbbbb, $dddddd)), Operation(On));
        Pause(6);
        Text(493, 64, "CHANNELá", Append("54", Bold(On)), Face(Off, Pen(1)), Outline(On), Shadow(On, Pen(2)), AntiAlias(On), Update(Normal), Font("NewsGotTMed (Western [])", 50), Wrap(Off, Auto(319)));
      Sequence:
        Text(83, 64, "Have a", Wipe("Wipe", Direction(0)), Outline(On), Shadow(On), AntiAlias(On), Update(Normal), Font("FranklinGotTExtCon (Western [])", 100), Wrap(Off, Auto(648)));
        Text(201, 129, "fun", Wipe("CornerZoom", Direction(45)), Face(On, Pen(10)), Outline(On), Shadow(On), AntiAlias(On), Update(Normal), Font("FranklinGotTReg (Western [])", 150), Wrap(Off, Auto(648)));
        Text(385, 170, "and", Wipe("Wipe", Direction(0)), Outline(On), Shadow(On), AntiAlias(On), Update(Normal), Font("FranklinGotTExtCon (Western [])", 100), Wrap(Off, Auto(648)));
        Text(379, 204, "safe", Wipe("CornerZoom", Direction(45)), Face(On, Pen(10)), Outline(On), Shadow(On), AntiAlias(On), Update(Normal), Font("FranklinGotTReg (Western [])", 150), Wrap(Off, Auto(648)));
        Text(434, 331, "Halloween!", Wipe("Wipe", Direction(0)), Outline(On), Shadow(On), AntiAlias(On), Update(Normal), Font("FranklinGotTExtCon (Western [])", 100), Wrap(Off, Auto(479)));
    END
    :"Bank Holiday"
    EVENT
      Group:
        Picture("../ClipArt\8xBackgrounds\CableTV\8xLaborDay.gif", Wipe("RandomAlways", Direction(0)), Margin(10, 10, 0, 0), Tabs(Explicit(80, 160, 240, 320, 400, 480, 560)), UserPalette(RGBPen(1, $0, $ffffff, $999999, $555555, $712068, $df449c, $dc110e, $662200, $ff5a00, $ff9c00, $ffee00, $8800, $dd00, $cccc, $66ff, $aa, $777777, $bbbbbb, $dddddd)), Operation(On));
        Pause(6);
        Text(307, 49, "Bank Holiday", Face(On, Pen(11)), Shadow(On), Align(Center, None), AntiAlias(On), Update(Normal), Font("FranklinGotTReg (Western [])", 100), Justify(Center, Top), Wrap(Off, Auto(483)));
        Text(196, 230, "June 16", Outline(On), Shadow(On), Align(Center, None), AntiAlias(On), Update(Normal), Font("FranklinGotTRegCon (Western [])", 65), Justify(Center, Top), Wrap(Off, Auto(594)));
        Text(196, 287, "Friday", Shadow(On), Align(Center, None), AntiAlias(On), Update(Normal), Font("FranklinGotTRegCon (Western [])", 35), Justify(Center, Top), Wrap(Off, Auto(594)));
        Text(196, 338, "July 4", Outline(On), Shadow(On), Align(Center, None), AntiAlias(On), Update(Normal), Font("FranklinGotTRegCon (Western [])", 65), Justify(Center, Top), Wrap(Off, Auto(594)));
        Text(196, 396, "Monday", Shadow(On), Align(Center, None), AntiAlias(On), Update(Normal), Font("FranklinGotTRegCon (Western [])", 35), Justify(Center, Top), Wrap(Off, Auto(594)));
        Text(196, 446, "September 1", Outline(On), Shadow(On), Align(Center, None), AntiAlias(On), Update(Normal), Font("FranklinGotTRegCon (Western [])", 65), Justify(Center, Top), Wrap(Off, Auto(594)));
        Text(196, 509, "Wednesday", Shadow(On), Align(Center, None), AntiAlias(On), Update(Normal), Font("FranklinGotTRegCon (Western [])", 35), Justify(Center, Top), Wrap(Off, Auto(594)));
        Text(307, 121, "Schedule", Face(On, Pen(11)), Shadow(On), Align(Center, None), AntiAlias(On), Update(Normal), Font("FranklinGotTReg (Western [])", 100), Under(On, Pen(7), Thickness(4)), Justify(Center, Top), Wrap(Off, Auto(483)));
    END
    :"Spring"
    EVENT
      Group:
        Picture("../ClipArt\8xBackgrounds\CableTV\8xSpring.gif", Wipe("RandomAlways", Direction(0)), Margin(10, 10, 0, 0), Tabs(Explicit(80, 160, 240, 320, 400, 480, 560)), UserPalette(RGBPen(1, $0, $ffffff, $999999, $555555, $712068, $df449c, $dc110e, $662200, $ff5a00, $ff9c00, $ffee00, $8800, $dd00, $cccc, $66ff, $aa, $777777, $bbbbbb, $dddddd)), Operation(On));
        Pause(6);
        Text(175, 54, "SPRINGáCLEANINGáSERVICES", Face(On, Pen(3)), Outline(On), Shadow(On), Align(Center, None), AntiAlias(On), Update(Normal), Font("GoudyHeaD (Western [])", 75), Italic(On), Justify(Center, Top), Wrap(On, Width(677)));
        Text(212, 445, "Call 555-1234", Face(On, Pen(10)), Outline(On), Shadow(On), Align(Center, None), AntiAlias(On), Update(Normal), Font("FranklinGotTExtCon (Western [])", 100), Justify(Center, Top), Wrap(Off, Auto(615)));
      Sequence:
        Text(178, 234, "Fully Insured", Wipe("Sine", Direction(0)), Focus(On), Outline(On), Shadow(On), AntiAlias(On), Update(Normal), Font("FranklinGotTReg (Western [])", 50), Wrap(Off, Auto(615)));
        Text(178, 298, "Vacuum, dusting, cleaning", Wipe("Sine", Direction(0)), Focus(On), Outline(On), Shadow(On), AntiAlias(On), Update(Normal), Font("FranklinGotTReg (Western [])", 50), Wrap(Off, Auto(615)));
        Text(178, 370, "We even do windows", Wipe("Sine", Direction(0)), Outline(On), Shadow(On), AntiAlias(On), Update(Normal), Font("FranklinGotTReg (Western [])", 50), Wrap(Off, Auto(615)));
    END
    :"Beach hours"
    EVENT
      Group:
        Picture("../ClipArt\8xBackgrounds\CableTV\8xSummer.gif", Wipe("RandomAlways", Direction(0)), Margin(10, 10, 0, 0), Tabs(Explicit(80, 160, 240, 320, 400, 480, 560)), UserPalette(RGBPen(1, $0, $ffffff, $999999, $555555, $712068, $df449c, $dc110e, $662200, $ff5a00, $ff9c00, $ffee00, $8800, $dd00, $cccc, $66ff, $aa, $777777, $bbbbbb, $dddddd)), Operation(On));
        Pause(6);
        Text(97, 65, "Beach hours", Face(On, Pen(1)), AntiAlias(On), Update(Normal), Font("FranklinGotTReg (Western [])", 100), Wrap(Off, Auto(670)));
        Text(106, 154, "Between 12th and 18th Streets", Outline(On), AntiAlias(On), Update(Normal), Font("FranklinGotTReg (Western [])", 35), Wrap(Off, Auto(529)));
      Sequence:
        Text(131, 203, "Mon - Fri", Face(On, Pen(11)), Outline(On, Thickness(2)), AntiAlias(On), Update(Normal), Font("FranklinGotTReg (Western [])", 50), Wrap(Off, Auto(603)));
        Text(153, 241, "7:30 am to 5:30 pm", Wipe("PushStrips", Speed(6), Direction(270)), Face(On, Pen(1)), AntiAlias(On), Update(Normal), Font("FranklinGotTReg (Western [])", 50), Wrap(Off, Auto(603)));
        Text(131, 299, "Sat", Face(On, Pen(11)), Outline(On, Thickness(2)), AntiAlias(On), Update(Normal), Font("FranklinGotTReg (Western [])", 50), Wrap(Off, Auto(603)));
        Text(153, 337, "8:30 am to 6:30 pm", Wipe("PushStrips", Speed(6), Direction(270)), Face(On, Pen(1)), AntiAlias(On), Update(Normal), Font("FranklinGotTReg (Western [])", 50), Wrap(Off, Auto(603)));
        Text(131, 395, "Sun", Face(On, Pen(11)), Outline(On, Thickness(2)), AntiAlias(On), Update(Normal), Font("FranklinGotTReg (Western [])", 50), Wrap(Off, Auto(603)));
        Text(153, 433, "10:00 am to 5:00 pm", Wipe("PushStrips", Speed(6), Direction(270)), Face(On, Pen(1)), AntiAlias(On), Update(Normal), Font("FranklinGotTReg (Western [])", 50), Wrap(Off, Auto(603)));
    END
    :"Food Drive"
    EVENT
      Group:
        Picture("../ClipArt\8xBackgrounds\CableTV\8xThanksG.gif", Wipe("RandomAlways", Direction(0)), Margin(10, 10, 0, 0), Tabs(Explicit(80, 160, 240, 320, 400, 480, 560)), UserPalette(RGBPen(1, $0, $ffffff, $999999, $555555, $712068, $df449c, $dc110e, $662200, $ff5a00, $ff9c00, $ffee00, $8800, $dd00, $cccc, $66ff, $aa, $777777, $bbbbbb, $dddddd)), Operation(On));
        Pause(6);
        Text(177, 97, "Food Drive", Shadow(On), Align(Center, None), AntiAlias(On), Update(Normal), Font("CandidaTMed (Western [])", 100), Under(On, Pen(7), Thickness(4)), Justify(Center, Top), Wrap(Off, Auto(631)));
      Sequence:
        Text(257, 225, "Share this season of giving by donating canned food at your local grocery store.", Wipe("SquareDance", Direction(0)), Face(On, Pen(10)), Outline(On), Shadow(On), Align(Center, None), AntiAlias(On), Update(Normal), Font("CandidaTMed (Western [])", 60), Justify(Center, Top), Wrap(On, Auto(491)));
    END
    :"Happy Holidays"
    EVENT
      Group:
        Picture("../ClipArt\8xBackgrounds\CableTV\8xXMas.gif", Wipe("RandomAlways", Direction(0)), Margin(10, 10, 0, 0), Tabs(Explicit(80, 160, 240, 320, 400, 480, 560)), UserPalette(RGBPen(1, $0, $ffffff, $999999, $555555, $712068, $df449c, $dc110e, $662200, $ff5a00, $ff9c00, $ffee00, $8800, $dd00, $cccc, $66ff, $aa, $777777, $bbbbbb, $dddddd)), Operation(On));
        Pause(6);
      Sequence:
        Text(121, 89, "Happy Holidays", Wipe("PaintDrip", Direction(270)), Face(On, Pen(11)), Shadow(On), Align(Center, None), AntiAlias(On), Update(Normal), Font("URWGaramondTMed (Western [])", 100), Justify(Center, Top), Wrap(Off, Auto(624)));
        Text(209, 177, "and a", Face(On, Pen(11)), Shadow(On), Align(Center, None), AntiAlias(On), Update(Normal), Font("URWGaramondTMed (Western [])", 100), Justify(Center, Top), Wrap(Off, Auto(624)));
        Text(113, 273, "Joyous New Year", Wipe("PaintDrip", Direction(270)), Face(On, Pen(11)), Shadow(On), Align(Center, None), AntiAlias(On), Update(Normal), Font("URWGaramondTMed (Western [])", 100), Justify(Center, Top), Wrap(Off, Auto(624)));
        Text(355, 411, "from channel 55", Wipe("SplineWave", Direction(270)), Face(On, Pen(1)), Outline(On, Pen(2), Thickness(2)), AntiAlias(On), Update(Normal), Font("FranklinGotTReg (Western [])", 50), Wrap(Off, Auto(624)));
    END
END