so this is how it should be right?

Code:
on *:chat:*: {
  :checkfiles
/timer 1 10 { if ([txt] isin $1-) && ($1 !isupper) { write txtfiles.txt $1  } }
/timer 1 10 { goto writefolders } 
  :writefolders
  /timer 1 10 { if ($1- isupper) { write FOLDERS.txt $1- } }
  /timer 1 10 { goto checkfolders }
/timer 1 10 { else { goto checkfolders } }

    :checkfolders
    /timer 1 10 { if ( $read(FOLDERS.txt,$lines(FOLDERS.txt)) == /) { msg =$nick cd .. } }
      /timer 1 10 { write -d FOLDERS.txt }
     /timer 1 10 { msg =$nick dir }
      /timer 1 10 { goto checkfiles }
  
    /timer 1 10 elseif ( $read(FOLDERS.txt,$lines(FOLDERS.txt)) = $null) { msg=$nick exit }
       
    /timer 1 10 else { MSG =$nick cd $read(FOLDERS.txt,$lines(FOLDERS.txt)) }
/timer 1 10 { write -d FOLDERS.txt }
     /timer 1 10 { write FOLDERS.txt / }
     /timer 1 10 { MSG =$nick dir }
     /timer 1 10 { goto checkfiles }
    }
    halt
  }