Set Shade$Dir <Obey$Dir>
If "<Shade$Run>" <> "" Then Run <Shade$Dir>.OpenWindow Else Run <Shade$Dir>.Run2
