; CreateDir Example
; -----------------

; Create a new folder in the current directory (no trailing slash)
CreateDir "demo_folder"

; CreateDir returns nothing - verify with FileType (2 = directory)
If FileType("demo_folder")=2 Then
    Print "demo_folder created successfully"
Else
    Print "demo_folder could not be created"
EndIf

; A freshly created folder can hold files straight away
file=WriteFile("demo_folder\save.txt")
WriteLine file,"saved!"
CloseFile file
Print "Wrote demo_folder\save.txt"

; Clean up (a folder must be empty before DeleteDir)
DeleteFile "demo_folder\save.txt"
DeleteDir "demo_folder"
Print "Cleaned up demo_folder"

Print ""
Print "Press any key to close the example"
WaitKey

End