So there is no hope of something like this working then??
DIM myWDRefNum%
DIM myDefaultWD%
myWDRefNum% = System(_AplVol)
myDefaultWD% = Folder("Puzzles", myWDRefNum%)
myDefaultWD% = Folder("", myDefaultWD%)
f$ = FILES$(_fOpen,"TEXT",,myDefaultWD% )