home *** CD-ROM | disk | FTP | other *** search
/ Online Today 2000 January / Onto0100.iso / pc / Browser / Web-Fix / Web-Fix Installer.exe / Main / Splash.k < prev    next >
Encoding:
Text File  |  1999-09-08  |  3.1 KB  |  136 lines
  1. module oRoot1 is cBox
  2. with 
  3.     Flags is $00000152; 
  4.     release Editor:
  5.         IOWindow is {$0000008A,$00000050,$0000029E,$00000274,$00000000,$FFFFFF82,$00000000,$00000000};
  6.         LayoutWindow is {$00000142,$0000002A,$0000028F,$000001EF,$00000000,$00000000,$00000064,$00000000};
  7.     end;
  8.     Name is "Root"; 
  9.     Enabled is false; 
  10.     
  11.     Width is 800; Height is 600; 
  12.     
  13.     
  14.     Elements is [
  15.         oStartSound5,
  16.         oBlack2,
  17.         oSplash3,
  18.         oSplash_String4
  19.     ];
  20.     Events is [
  21.         cOffscreenEvent
  22.         with Flags is $00000004; 
  23.             Commands is [
  24.                 cDoCookieCommand
  25.                 with CookieName is "SplashReadyFlag"; Value is "false"; end,
  26.                 cKR_SwitchPlus
  27.                 with Target is oSplash3; CookieFlag is true; CookieName is "SplashURL"; end,
  28.                 cFieldCookieCommand
  29.                 with Target is oSplash_String4; Mode is Retrieve; CookieName is "SplashString"; end
  30.             ];
  31.         end,
  32.         cOnscreenEvent
  33.         with Flags is $00000004; 
  34.             Commands is [
  35.                 cRunCommand
  36.                 with Target is oStartSound5; Rewind is true; end,
  37.                 cKR_ScriptCommand
  38.                 with ScriptGroup is "Web-Fix 2 Init"; Script is oWF_InitializeWave3; end
  39.             ];
  40.         end
  41.     ];
  42. end;
  43.  
  44. object oStartSound5 is cSound
  45. with 
  46.     Flags is $00000244; 
  47.     Name is "StartSound"; 
  48.     Enabled is false; Shown is false; 
  49.     
  50.     
  51.     
  52.     URL is "../GUI/Sounds/Start.wav"; 
  53.     
  54.     Events is [
  55.         cFinishedEvent
  56.         with Flags is $00000004; 
  57.             Commands is [
  58.                 cEnableCommand
  59.                 with Target is oBlack2; Mode is Clear; end,
  60.                 cTokenCommand
  61.                 with TokenName is "ScriptReady"; Mode is ExecuteTargetOnly; Target is oTargetSelf; end
  62.             ];
  63.         end,
  64.         cTokenEvent
  65.         with Flags is $00000005; MessageData is "ScriptReady"; 
  66.             Commands is [
  67.                 cIfCookieCommand
  68.                 with Flags is $00004004; CookieName is "SplashReadyFlag"; Value is "true"; 
  69.                     Commands is [
  70.                         cBrowseCommand
  71.                         with Flags is $00004000; All is true; URL is "Main.k"; end
  72.                     ];
  73.                 end,
  74.                 cElseCookieCommand
  75.                 with Flags is $00004004; 
  76.                     Commands is [
  77.                         cDoCookieCommand
  78.                         with Flags is $00004000; CookieName is "SplashReadyFlag"; Value is "true"; end
  79.                     ];
  80.                 end
  81.             ];
  82.         end
  83.     ];
  84. end;
  85.  
  86. object oBlack2 is cBox
  87. with 
  88.     Flags is $00000044; 
  89.     Name is "Black"; 
  90.     Cursor is oBusyCursor; 
  91.     
  92.     AdjustWidth is GetLayoutWidth; AdjustHeight is GetLayoutHeight; 
  93.     
  94.     Kind is DrawOpaque; 
  95.     Events is [
  96.         cMouseDownEvent
  97.         with Flags is $00000004; 
  98.             Commands is [
  99.                 cRunCommand
  100.                 with Target is oStartSound5; Mode is Clear; end,
  101.                 cEnableCommand
  102.                 with Target is oTargetSelf; Mode is Clear; end,
  103.                 cTokenCommand
  104.                 with TokenName is "ScriptReady"; Mode is ExecuteTargetOnly; Target is oStartSound5; end
  105.             ];
  106.         end
  107.     ];
  108. end;
  109.  
  110. object oSplash3 is cImage
  111. with 
  112.     Flags is $00000050; 
  113.     Name is "Splash"; 
  114.     Enabled is false; Cursor is oEmptyCursor; 
  115.     AdjustX is AlignToCenter; AdjustY is AlignToMiddle; 
  116.     AdjustWidth is GetDataWidth; AdjustHeight is GetDataHeight; 
  117.     
  118.     
  119.     
  120.     
  121. end;
  122.  
  123. object oSplash_String4 is cField
  124. with 
  125.     Flags is $00000010; 
  126.     Name is "Splash String"; 
  127.     Enabled is false; 
  128.     AdjustX is AlignToLeft; AdjustY is AlignToBottom; 
  129.     AdjustWidth is GetLayoutWidth; Height is 14; 
  130.     
  131.     Editable is false; Text is "Version String"; 
  132.     FontSize is 9; Bold is true; FontName is "Helvetica"; 
  133.     Alignment is 1; FontRed is 255; FontGreen is 255; FontBlue is 255; 
  134.     
  135.     
  136. end;