SUB WINDOW_ONLOAD
    MAIN
END SUB
SUB MAIN
CorStl.SetState"INIT"
CorStl.SetState"DATE 1999,8,11,10,10,0.000000,1.000"
CorStl.SetState"LOCATE  11.57E, 48.13N, 1.000000, 50"
CorStl.SetState"PERIOD 0,0,0,0,0,20.000000"
CorStl.SetState"STIME NONE"
CorStl.SetState"MODE HRZ"
CorStl.SetState"VIEW CENTER HRZ 347.744248, 30.534309"
CorStl.SetState"VIEW ANGLE 114.440918"
CorStl.SetState"VIEW SOL 12.000000"
CorStl.SetState"VIEW VIEW_CIRCLE 7.000000"
CorStl.SetState"MAG STAR -0.4"
CorStl.SetState"MAG STARNAME  2.4"
CorStl.SetState"STARDATA STD,-2.0, 8.0"
CorStl.SetState"DISK_MAG 100"
CorStl.SetState"DRIVE"
END SUB

sub cmdplay_onclick
CorStl.SetState"continue 1999,8,11,13,10,0"
end sub