'isFile%=1/0 if fileDirname$ is a file/directory.
SUB selectedFileDir(fileDirName$, isFile%)
'Implementation here please.
END SUB

CONST QUOTE$=CHR$(34)

SUB printTheArg(arg$)
print arg$
END SUB

SUB dontCallMeIllCallYou callback$
PRINT "Hello ";
EXECUTE callback$ + " " + QUOTE$ + "world" + QUOTE$
END SUB

dontCallMeIllCallYou "printTheArg"

Sub FileDialog(result$() [,spec$][,x_position][,y_position][,height][,width])
' Input:  result$(): array to hold results, dim(1) for single result, more for multi
'         spec$: optional - wildcard matching, plus following
'           standard functions:
'             "*"        show all files, allow any file to be selected - default
'             "*.BAS"    show only request file types, standard MMBasic wildcard matching
'             "<DIR>"    show all files, allow only selection of directories
'           multi-select functions:
'             "<M>*"     show and multi-select all file types
'             "<M>*.BAS" show and multi-select specified file types
'             "<MDIR>"   show all, multi-select only directories
'             "<MALL>"   show all, multi-select files and directories
'           save file function:
'             "<SAVE>["starting value"]" show all, returns path of displayed directory + string
'                        from text box, which is initialized with the optional string.
'         x_position:  optional, default = centered dialog
'         y_position:  optional, default = centered dialog
'         height:      optional, height in characters of directory/file list, default 15
'         width:       optional, width in characters of directory/file list, default 32