home *** CD-ROM | disk | FTP | other *** search
/ MacFormat 2000 July / macformat-092.iso / MacFormat 92 CD / Shareware Plus / Utilities / FolderSynchronizer 1.8.9 / FoldersSynchronizer / FoldersSynchronizer.9 / AllScripts_3_2SyncScripts.ls < prev    next >
Encoding:
Text File  |  2000-05-10  |  2.3 KB  |  47 lines
  1. on HideProgressBar
  2.   set the locV of sprite 8 to 142
  3.   set the locV of sprite 3 to -1000
  4.   set the locV of sprite 4 to -1000
  5.   updateStage()
  6. end
  7.  
  8. on ShowProgressBar
  9.   put " " into field "fItems"
  10.   put "Stop" into field "P4"
  11.   set the locV of sprite 8 to -1000
  12.   set the loc of sprite 2 to point(147, 150)
  13.   updateStage()
  14. end
  15.  
  16. on HideInfiniteProgressBar
  17.   set the locV of sprite 2 to -1000
  18.   updateStage()
  19. end
  20.  
  21. on SetFooterLogFile
  22.   global gSourceFolder, gSourceFolderList, gSourceFileList, gAFoldersCreated, gAFilesReplaced, gAFilesCopied, gAFilesRenamed, gDestFolder, gDestFolderList, gDestFileList, gBFoldersCreated, gBFilesReplaced, gBFilesCopied, gBFilesRenamed, gOneDirection, gDestructive, gTotError
  23.   set TextReport to EMPTY
  24.   put "End at:" && the long date && "-" && the long time & RETURN & RETURN after TextReport
  25.   put "Summary:" & RETURN after TextReport
  26.   put "‚Ä¢" && gSourceFolder & RETURN after TextReport
  27.   put "Folders Found:" && string(count(gSourceFolderList)) & RETURN after TextReport
  28.   put "Files Found:" && string(count(gSourceFileList)) & RETURN & "-" & RETURN after TextReport
  29.   put "Folders Created:" && string(gAFoldersCreated) & RETURN after TextReport
  30.   put "Files Replaced:" && string(gAFilesReplaced) & RETURN after TextReport
  31.   put "Files Copied (new additions) :" && string(gAFilesCopied) & RETURN after TextReport
  32.   put "Files Renamed (to avoid FolderNames conflicts) :" && string(gAFilesRenamed) & RETURN & RETURN after TextReport
  33.   put "‚Ä¢" && gDestFolder & RETURN after TextReport
  34.   put "Folders Found:" && string(count(gDestFolderList)) & RETURN after TextReport
  35.   put "Files Found:" && string(count(gDestFileList)) & RETURN & "-" & RETURN after TextReport
  36.   put "Folders Created:" && string(gBFoldersCreated) & RETURN after TextReport
  37.   put "Files Replaced:" && string(gBFilesReplaced) & RETURN after TextReport
  38.   put "Files Copied (new additions) :" && string(gBFilesCopied) & RETURN after TextReport
  39.   put "Files Renamed (to avoid FolderNames conflicts) :" && string(gBFilesRenamed) & RETURN after TextReport
  40.   if gOneDirection and gDestructive then
  41.     put "Files Deleted:" && string(gTotErasedFiles) & RETURN after TextReport
  42.     put "Folders Deleted:" && string(gTotErasedFolders) & RETURN after TextReport
  43.   end if
  44.   put RETURN & "‚Ä¢ Errors:" && string(gTotError) after TextReport
  45.   return TextReport
  46. end
  47.