||| Copyright (C) 1998-2007, Sumisho Computer Systems Corp.  All Rights Reserved.
|||
||| Maintained by: Curl Solutions
{curl 5.0, 6.0, 7.0 applet}
{applet SADCHESS,
    manifest = "manifest.mcurl"}

{api-version-switch
 case "7+" do
    {install-style-sheet
        {StyleSheet
            {get-default-style-sheet},
            {StyleRule "MenuBar",
                margin = 0pt
            }
        }
    }
    
 case "6+" do
    {import * from COM.CURL.GUI.STYLED-CONTROLS}
    {install-style-sheet
        {manifest-url "file", "DEFAULT-STYLE-SHEET"}
    }
}

{include "splash.scurl"}
|| import the chess ui
{import * from COM.CURL.CSK.EXTRAS.CHESS}


{persistent-data {String "sadchess-3.0 " & {DateTime}.info.us-date}}

|| create the container for the application
{let cv:ChessView = {new ChessView}}

|| Ensure that changed settings are preserved
{on-applet-suspend do
    {cv.commit-persistent-data}
}

|| remove the welcome screen
{splash.detach}

|| Display and run Chess
{value cv}