Update hash-files.simba

Author: Torwent

tools/hash-files.simba

@@ -17,7 +17,8 @@ begin
     if SKIP.Contains(files[i]) then Continue;
 
     hash := HashFile(EHashAlgo.MD5, files[i]);
-    FileDelete(filename + '.hash');
-    FileWrite(filename + '.hash', hash);
+    FileDelete(files[i] + '.hash');
+    FileWrite(files[i] + '.hash', hash);
+    WriteLn('File: ', PathExtractName(files[i]), ' Hash: ', hash);
   end;
 end.