code:

---

 ; -- Sigen.kix
 ; -- by Kent Dyer
 ; -- version .1
 ; -- For generating a list of files for BBChecker
 ; -- Thanks Lonkero!
 ; -- to do - get the KIXFORMS.DLL Component going
 BREAK ON
 CLS
 $programfilesdir  = readvalue("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion","ProgramFilesPath")
 SHELL "%comspec% /c echo %programfiles% > bbtmp.txt"

 IF Open(3, @scriptdir + "\bbtmp.txt")  = 0
       $x = trim(ReadLine(3))
       close(3)
 ENDIF
 $location = "$x\BBchecker"

 IF exist(@scriptdir + "\bbtmp.txt")
       DEL @scriptdir + "\bbtmp.txt"
 ENDIF

 IF exist(@scriptdir+"\bbdep.sig")
       DEL @scriptdir+"\bbdep.sig"
 ENDIF

 ;$kixforms = READVALUE("HKEY_CLASSES_ROOT\CLSID\"+readvalue("HKEY_CLASSES_ROOT\Kixtart.Form\CLSID","")+"\InprocServer32","")

 ;if "kixforms.dll"=$files
 ;  $location=$kixforms
 ; else
 ;  $location=$bbcheckerdir+$files
 ; endif

 IF Open( 3 , @scriptdir+"\bbdep.sig", 5 )  = 0
       $filename = Dir($location+"\*.*")
       WHILE TRIM($filename) <> "" AND @error = 0
             IF LEN($filename) > 2
                   ? $filename
                   $filsize = getfilesize($location+"\"+$filename)
                   ?$filsize

                   $x = WriteLine( 3 , "[$filename]" + @crlf)
                   $x = WriteLine( 3 , "size="+chr(34)+$filsize+chr(34) + @crlf)
                   IF INSTR($filename,"exe") OR INSTR($filename,"dll")
                         $filversion = getfileversion($location+"\"+$filename)
                         $x = WriteLine( 3 , "version="+ chr(34) + $filversion + chr(34) + @crlf)
                   ENDIF
                   $x = WriteLine( 3 , @crlf)
             ENDIF
             $x = ""
             $filename = Dir() ; retrieve next file
             SLEEP 1
       LOOP
 ELSE
       BEEP
       ? "failed to open file, error code : [" + @error + "]"
       Close(3)
 ENDIF
   

---