home *** CD-ROM | disk | FTP | other *** search
/ Red Pages of the Internet / RedPagesInternet2000.iso / Other / Scala.InfoChannel.IC200.SP6-SHOCK / SCALA / PartialScripts / IC200Demo.sca < prev    next >
Encoding:
Text File  |  1997-09-11  |  8.1 KB  |  112 lines
  1. !ScalaScript
  2. EVENT
  3.   Group:
  4.     Config.SaveOpts();
  5.   Sequence:
  6.     :"Blank.1"
  7.     EVENT
  8.       Group:
  9.         Display(Wipe("Fade", Speed(6), Direction(0)), Face(Pen(1)), 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)), Size(800, 600));
  10.         Pause(2);
  11.         Sample.Play("IC200Demo\4jingle1.wav", Rate(22050), Wait(Off), Fade(255, 2), Spool(On));
  12.     END
  13.     :"Cable TV"
  14.     EVENT
  15.       Group:
  16.         Picture("IC200Demo/1cable.gif", Wipe("NukeAtNight", Direction(0)), Margin(10, 10, 0, 0), Tabs(Explicit(80, 160, 240, 320, 400, 480, 560)), UserPalette(RGBPen(1, $0, $e6e6e6, $999999, $555555, $712068, $df449c, $dc110e, $662200, $ff5a00, $ff9c00, $ffee00, $8800, $dd00, $cccc, $66ff, $aa, $777777, $bbbbbb, $dddddd)), Operation(On));
  17.         Pause.milli(2000);
  18.         Text(73, 33, "Cable TV", AntiAlias(On), Font("URWGaramondTMed (Western [])", 75), Wrap(Off, Auto(557)));
  19.     END
  20.     :"Corporate Communications"
  21.     EVENT
  22.       Group:
  23.         Picture("IC200Demo/1corp.gif", Wipe("NukeAtNight", Direction(0)), Margin(10, 10, 0, 0), Tabs(Explicit(31, 160, 240, 320, 400, 480, 560)), Palette(RGBPen(1, $40204, $4c864c, $a48e64, $7c2a34, $94c6ac, $3c423c, $d48634, $745a4c, $ccc66c, $44b6d4, $3c6a44, $c4a654, $dceea4, $64865c, $ac5a44, $c4c6a4, $a43234, $c4ae7c, $546234, $7c9e54, $3c2224, $94967c, $2c4a7c, $ac5a84, $ccd6a4, $74868c, $9cc6c4, $747a4c, $744a34, $24221c, $dc8e84, $e4a6bc, $ac724c, $5c7a5c, $ccded4, $3486bc, $a4b62c, $4c4a34, $2c6a9c, $ecb62c, $a4423c, $9cbe7c, $2c3a6c, $dc9e34, $e4c67c, $8caea4, $8c8e5c, $5c4294, $acd6cc, $2c3244, $74627c, $6c2a2c, $ccde94, $e4eeac, $3c3a34, $dcd6bc, $744294, $9ca664, $a45284, $7caeb4, $743a6c, $746a44, $ccc694, $748e6c, $b46a44, $c4c6bc, $c4be8c, $649eac, $b472bc, $74969c, $8c724c, $34221c, $e4b67c, $6c7a54, $4c5a44, $4c72a4, $c45234, $94b6b4, $dc9664, $a4b66c, $5c965c, $acce8c, $c4b66c, $648e54, $646a4c, $3c4a84, $ccdeb4, $242a1c, $c4723c, $5c86a4, $3c7ab4, $ecae5c, $bcd6c4, $acae54, $84c6b4, $7c3a5c, $3c5a3c, $3c727c, $c4a66c, $c45a34, $cccea4, $84a67c, $bc8e7c, $2c527c, $d4d6a4, $9ccee4, $5c7a6c, $dcd6cc, $2c72a4, $ac523c, $4c5a7c, $e4eedc, $54323c, $74526c, $a4ae5c, $7c6a6c, $ccce94, $ecb6a4, $acb6a4, $dc9e5c, $6c8e5c, $cc726c, $ecbe6c, $3c9664, $9c9e54, $7c3234, $34426c, $cc8e64, $41f040, $ca64, $9d8200, $0, $4140d0, $65, $3a, $7b7a86, $e8aa7f, $827cf9, $5c8630, $339586, $246b9c, $5e65, $4c867c, $f99d82, $0, $86a87c, $9c8600, $659c86, $781081, $86bd78, $20, $0, $7cf99d, $86483f, $8386b4, $0, $7cf99d, $b689, $1, $659c86, $c8659c, $86e036, $4010cc, $d8de82, $7cf99d, $862667, $5c86c8, $0, $6e7b7a, $86e8a0, $798648, $6b9c86, $10000, $86de19, $9486e8, $597a86, $200810, $86506b, $92, $196286, $e8a07f, $86506b, $c00594, $4c8d86, $7cf99d, $860140, $8c8601, $f99d82, $563595, $867c66, $7b86a8, $3edf82, $10000, $82506b, $9d828f, $699c86, $150000, $729d, $22, $0, $315c90, $0, $110900, $565c86, $f2669c, $824000, $8d86da, $0, $2400, $dad7, $d00049, $e85b86, $4140d0, $867cf9, $998601, $7f8286, $a06448, $864140, $7c, $0, $0, $86988b, $9c86f4, $ad7f86, $d06f79, $6480e, $1, $679c86, $213841, $86d541, $9c86a8, $f99d82, $315c50, $82cc67, $778618, $f99d82, $ae689c, $862014, $7f8603, $6b9c86, $661177, $86680d, $4107a8, $0, $84b1d1, $868268, $9d8238, $0, $b26d9c, $8621c4, $9c86de, $f19486, $e51a62, $0, $9c8630)), UserPalette(RGBPen(1, $0, $e6e6e6, $999999, $555555, $712068, $df449c, $dc110e, $662200, $ff5a00, $ff9c00, $ffee00, $8800, $dd00, $cccc, $66ff, $aa, $777777, $bbbbbb, $dddddd)), Operation(On));
  24.         Pause.milli(2000);
  25.         Text(49, 41, "Corporate Communications", AntiAlias(On), Font("URWGaramondTMed (Western [])", 75), Wrap(Off, Auto(715)));
  26.     END
  27.     :"Hotels"
  28.     EVENT
  29.       Group:
  30.         Picture("IC200Demo/1hote.gif", Wipe("NukeAtNight", Direction(0)), Margin(10, 10, 0, 0), Tabs(Explicit(80, 160, 240, 320, 400, 480, 560)), UserPalette(RGBPen(1, $0, $e6e6e6, $999999, $555555, $712068, $df449c, $dc110e, $662200, $ff5a00, $ff9c00, $ffee00, $8800, $dd00, $cccc, $66ff, $aa, $777777, $bbbbbb, $dddddd)), Operation(On));
  31.         Pause.milli(2000);
  32.         Text(73, 65, "Hotels", AntiAlias(On), Font("URWGaramondTMed (Western [])", 75), Wrap(Off, Auto(589)));
  33.     END
  34.     :"Kiosks"
  35.     EVENT
  36.       Group:
  37.         Picture("IC200Demo/1kios.gif", Wipe("NukeAtNight", Direction(0)), Margin(10, 10, 0, 0), Tabs(Explicit(80, 160, 240, 320, 400, 480, 560)), UserPalette(RGBPen(1, $0, $e6e6e6, $999999, $555555, $712068, $df449c, $dc110e, $662200, $ff5a00, $ff9c00, $ffee00, $8800, $dd00, $cccc, $66ff, $aa, $777777, $bbbbbb, $dddddd)), Operation(On));
  38.         Pause.milli(2000);
  39.         Text(69, 35, "Info ^nKiosks", AntiAlias(On), Font("URWGaramondTMed (Western [])", 75), Wrap(Off, Auto(585)));
  40.     END
  41.     :"Point of Purchase"
  42.     EVENT
  43.       Group:
  44.         Picture("IC200Demo/1pop.gif", Wipe("NukeAtNight", Direction(0)), Margin(10, 10, 0, 0), Tabs(Explicit(80, 160, 240, 320, 400, 480, 560)), UserPalette(RGBPen(1, $0, $e6e6e6, $999999, $555555, $712068, $df449c, $dc110e, $662200, $ff5a00, $ff9c00, $ffee00, $8800, $dd00, $cccc, $66ff, $aa, $777777, $bbbbbb, $dddddd)), Operation(On));
  45.         Pause.milli(2000);
  46.         Text(80, 80, "Point of ^nPurchase", AntiAlias(On), Font("URWGaramondTMed (Western [])", 75), Wrap(Off, Auto(610)));
  47.     END
  48.     :"Education"
  49.     EVENT
  50.       Group:
  51.         Picture("IC200Demo/1educ.gif", Wipe("NukeAtNight", Direction(0)), Margin(10, 10, 0, 0), Tabs(Explicit(80, 160, 240, 320, 400, 480, 560)), UserPalette(RGBPen(1, $0, $e6e6e6, $999999, $555555, $712068, $df449c, $dc110e, $662200, $ff5a00, $ff9c00, $ffee00, $8800, $dd00, $cccc, $66ff, $aa, $777777, $bbbbbb, $dddddd)), Operation(On));
  52.         Pause.milli(2000);
  53.         Text(74, 70, "Education", AntiAlias(On), Font("URWGaramondTMed (Western [])", 75), Wrap(Off, Auto(591)));
  54.     END
  55.     :"Airports"
  56.     EVENT
  57.       Group:
  58.         Picture("IC200Demo/1airp.gif", Wipe("NukeAtNight", Direction(0)), Margin(10, 10, 0, 0), Tabs(Explicit(80, 160, 240, 320, 400, 480, 560)), UserPalette(RGBPen(1, $0, $ffffe6, $999999, $555555, $712068, $df449c, $dc110e, $662200, $ff5a00, $ff9c00, $ffee00, $8800, $dd00, $cccc, $66ff, $aa, $777777, $bbbbbb, $dddddd)), Operation(On));
  59.         Pause.milli(2000);
  60.         Text(58, 66, "Airports", AntiAlias(On), Font("URWGaramondTMed (Western [])", 75), Wrap(Off, Auto(565)));
  61.     END
  62.     :"Banks"
  63.     EVENT
  64.       Group:
  65.         Picture("IC200Demo/1bank.gif", Wipe("NukeAtNight", Direction(0)), Margin(10, 10, 0, 0), Tabs(Explicit(80, 160, 240, 320, 400, 480, 560)), UserPalette(RGBPen(1, $0, $e6e6e6, $999999, $555555, $712068, $df449c, $dc110e, $662200, $ff5a00, $ff9c00, $ffee00, $8800, $dd00, $cccc, $66ff, $aa, $777777, $bbbbbb, $dddddd)), Operation(On));
  66.         Pause.milli(2000);
  67.         Text(65, 57, "Banks", AntiAlias(On), Font("URWGaramondTMed (Western [])", 75), Wrap(Off, Auto(565)));
  68.     END
  69.     :"Scalogo"
  70.     EVENT
  71.       Group:
  72.         Picture("IC200Demo/icbg006.gif", Wipe("Fade", 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));
  73.         Pause(4);
  74.         Sample.Stop(Fade(2));
  75.         Clip(312, 168, "IC200Demo/scalogo.bmp", Align(Center, None), Operation(On, TransparentRGB($ff0000)));
  76.         Text(222, 259, "InfoChannel IC200", Outline(On), Shadow(On), Align(Center, None), AntiAlias(On), Update(Normal), Font("URWGaramondTMed (Western [])", 100), Justify(Center, Top), Wrap(Off, Auto(703)));
  77.     END
  78.  
  79. // END
  80.  
  81. EVENT
  82. Sequence:
  83.     Script("8xCable.sca");
  84.     If(exists("8xCable.sca"));
  85. END
  86. EVENT
  87. Sequence:
  88.     Script("8xCorporate.sca");
  89.     If(exists("8xCorporate.sca"));
  90. END
  91. EVENT
  92. Sequence:
  93.     Script("8xGeneric.sca");
  94.     If(exists("8xGeneric.sca"));
  95. END
  96. EVENT
  97. Sequence:
  98.     Script("8xNews.sca");
  99.     If(exists("8xNews.sca"));
  100. END
  101. EVENT
  102. Sequence:
  103.     Script("8xSports.sca");
  104.     If(exists("8xSports.sca"));
  105. END
  106. EVENT
  107. Sequence:
  108.     Script("8xWeather.sca");
  109.     If(exists("8xWeather.sca"));
  110. END
  111. END
  112.