Set NewsFind$Dir <Obey$Dir>
IconSprites <NewsFind$Dir>.!Sprites
Set NewsFind$WorkDir <Wimp$ScrapDir>
If "<Choices$Write>"="" Then Set NewsFind$ChoicesDir <NewsDir$Dir> Else Set NewsFind$ChoicesDir <Choices$Write>