I'm not sure but after creating the directory, you might have to CD to it or use SET DIRECTORY.
ink rgb(0,255,0),0
box 0,0,100,100
get image 1,0,0,101,101,1
cls 0
dname$="mytestdirectory"
if path exist(dname$)
print "directory "+dname$+" exists"
print "deleting it and recreating it"
delete directory dname$
make directory dname$
else
print "creating directory "+dname$
make directory dname$
endif
print
print "the current directory is"
print get dir$()
print "changing it to "
print get dir$()+"\"+dname$
cd dname$
print "saving image 1 as green box.bmp then deleting it from memory"
save image "green box.bmp",1
print
delete image 1
print "directory contents"
dir
print
print "loading and displaying image 1"
load image "green box.bmp",1
paste image 1,200,200
Enjoy your day.