AutoZip

[zcoacoaz]

i don't know if it would work, i got the idea from how download accelerators split the file into 4 pieces then download them all at once to increase the speed

[ryeguy]

when you split a file in 2 and read top-middle, middle-bottom (with 2 different running processes), each one just runs at 1/2 the speed, so it's the same time. I have tried this, and it's true for all programs. I don't know why - maybe it's something built into windows.

[zcoacoaz]

thank you for saying something, i probably would have kept saying to make it split the file for hours, maybe even days :">

EDIT: anyone know how they make winzip so fast?

Edited February 7, 2005 by Xenogis

[gosu]

thank you for saying something, i probably would have kept saying to make it split the file for hours, maybe even days :">

EDIT: anyone know how they make winzip so fast?

<{POST_SNAPBACK}>

WinZip is sure _not_ programmed in AutoIt, it should be programmed in C++. AutoIt is slow in comparison to other languages.

[zcoacoaz]

i see

edit: look at the screenshot

Edited February 7, 2005 by Xenogis

[gosu]

i see

edit: look at the screenshot

<{POST_SNAPBACK}>

Hehe. What are you going to tell me expect the compression kicks ass?

[zcoacoaz]

i had no idea it was that good, it's awesome

you need to make a decompiler soon. i might even use the compression in my scripts that need images so it makes it take up less space

[gosu]

i had no idea it was that good, it's awesome

you need to make a decompiler soon. i might even use the compression in my scripts that need images so it makes it take up less space

<{POST_SNAPBACK}>

I didn´t expect it to work on real files either

Do you mean a decompresser? Yeah, I think I can finish it pretty fast.

[zcoacoaz]

yeah i mean decompresser, i always get those 2 confused for some reason

[Valik]

Uhhh, you do realize AutoIt can't handle binary files, right? So the only thing that can be compiled and not totally destroyed is text files. I have no idea what your screenshot is meant to demonstrate but quite obviously you don't just go from 1.66 MB to 40 KB without an almost complete loss of data, no matter how good the algorithm.

[SlimShady]

Uhhh, you do realize AutoIt can't handle binary files, right?  So the only thing that can be compiled and not totally destroyed is text files.  I have no idea what your screenshot is meant to demonstrate but quite obviously you don't just go from 1.66 MB to 40 KB without an almost complete loss of data, no matter how good the algorithm.

<{POST_SNAPBACK}>

I forgot about that and I realised that I didn't think of that in a certain script.

I quickly made a IsTextFile UDF.

I'm kinda disppointed that AutoIt (still) can't handle binary files.

[gosu]

Now I´m totally confused.

Well, then my func can only compress (not compile ) txt files - whatever. My problem now is the decompress function.

expandcollapse popup

Func AutoUnZip($arg1, $arg2)  
   $oldtime = TimerInit()

   $readfile = FileOpen($arg1, 0)
   $writefile = FileOpen($arg2, 2)
   $linesyet = 0
  
   If $readfile = -1 Or $writefile = -1 Then
      MsgBox(0, "Error", "Unable to open file(s).")
      Exit
   EndIf
   
   $CountedLines = _FileCountLines ($arg1)
   ToolTip("Decompressing..." & @CR & "0 %", 0, 0)
   
   While 1
      $line = FileReadLine($readfile)
      If @error = -1 Then ExitLoop
      If StringInStr($line, "{") AND StringInStr($line, "}") Then
         For $i = 1 to 10
            If StringIsDigit(StringLeft($line, $i)) <> 1 Then
               If StringMid($line, $i, 1) = "{" And StringMid($line, $i + 2, 1) = "}" Then
                  $char2repeat = StringMid($line, $i+1, 1)
                  $times2repeat= StringMid($line, 1, $i-1)
                  FileWriteLine($writefile, _StringRepeat($char2repeat, $times2repeat))
                  ExitLoop
               EndIf
            EndIf
            If $i = 10 Then
               FileWriteLine($writefile, $line)
            EndIf
         Next
      EndIf
      $linesyet = $linesyet + 1
      $percent = $linesyet / $CountedLines
      $percent = $percent * 100
      ToolTip("Deompressing..." & @CR & Round($percent, 2) & " %", 0, 0)
   Wend
   
   FileClose($readfile)
   FileClose($writefile)
   
   $readfilesize = FileGetSize($arg1)
   $writefilesize = FileGetSize($arg2)
   
   $timeneeded = TimerDiff($oldtime)
   MsgBox(0, "AutoUnZip: done!", "Needed " & Round($timeneeded / 1000, 0) & " seconds to decompress " & $readfilesize & " Bytes to " & $writefilesize & " Bytes!" & @CR &_
             "Decompressed file is " & 100 - Round(($readfilesize / $writefilesize) * 100, 2) & "% bigger than original file!" & @CR &_
             "Decompressed " & Round($CountedLines / ($timeneeded / 1000), 2) & " lines per second!")
EndFunc

It works brilliant for lines who are compressed - but lines who aren´t compressed aren´t written. This is just confusing. I´ve added the

If $i = 10 Then
               FileWriteLine($writefile, $line)
            EndIf

but it seems to be never ran. Help please

Edited February 8, 2005 by gosu

[phillip123adams]

Now I´m totally confused.

Well, then my func can only compress (not compile ) txt files - whatever. My problem now is the decompress function.

      If StringInStr($line, "{") AND StringInStr($line, "}") Then

[post="59147"]<{POST_SNAPBACK}>[/post]

When "{" and "}" are not found, there is no ELSE statement to write the line.

[zcoacoaz]

Uhhh, you do realize AutoIt can't handle binary files, right?  So the only thing that can be compiled and not totally destroyed is text files.  I have no idea what your screenshot is meant to demonstrate but quite obviously you don't just go from 1.66 MB to 40 KB without an almost complete loss of data, no matter how good the algorithm.

<{POST_SNAPBACK}>

i knew it couldn't handle binary files but i didn't really understand what that meant that means i can't use this program hardly at all

[gosu]

When "{" and "}" are not found, there is no ELSE statement to write the line.

<{POST_SNAPBACK}>

Aaaah, thanks. I would have searched forever

[zcoacoaz]

post the decompresser soon plz

edit: when i posted this we both had 102 posts

Edited February 9, 2005 by Xenogis

[gosu]

post the decompresser soon plz

edit: when i posted this we both had 102 posts

<{POST_SNAPBACK}>

Hm? I posted the decompresser above.

Congrats

[zcoacoaz]

o, i thought that one was broken

edit: in a few minutes i will have decompression in the gui

edit2: i decompressed the autoit installer and it is bigger than before it got compressed, valik was right the file is completely ruined (i added the decompresser into the gui)

AutoZip.au3

Edited February 10, 2005 by Xenogis

[datkewlguy]

could this be made just to zip/unzip strings? not reading from a file but an input box or something? how....because that is what i need right now

edit: more like a GUI edit box, it would still work with multiple lines though...

Edited April 28, 2005 by datkewlguy

[sarkar112]

Take a look at this

MY 30th NEWB POST =D