Click above to get retro games delivered to your door ever month!

  Name:     findattr() - get file's attribute from findfirst/next()
  Usage:    <integer> = findattr()
  Params:   none
  Returns:  integer equal to the attribute of the current file found
            by findfirst() or findnext()

 ---------------------------------- Example ---------------------------------

                 nfiles = filecount("*.*")
                 if nfiles > 0
                      declare dirarray[nfiles]
                      temp = findfirst("*.*")
                      for n = 1 to nfiles
                           ? "File: "+temp+ ;
                              "Attrib:"+str(findattr())
                           temp = findnext()
                      next
                 endif

  Note:     Findattr() should only be used in conjunction with
            findfirst() and findnext(). In order to work correctly,
            you must call findattr() immediately after your call
            to findfirst() or findnext(). findattr() will get the
            attribute of the file that findfirst() or findnext()
            just returned. findattr() always assumes that you
            have done a findfirst() or findnext() call first.