Jump to content
Sign in to follow this  
Joke758

Increased file size

Recommended Posts

This script add useless bytes to make a file bigger.

;By Joke758
Local $edd

$file = FileOpenDialog ( "Choose a file", @scriptdir, "Any Files (*.*)" )
$ext = StringRight ( $file, 3 )
$add = inputbox ( "Increase the size", "How many bytes to add?", "100000" )
$hex = String(BinaryString(FileRead($file) ) )

    $Form2 = GUICreate("Adding", 237, 74, 302, 218)
    $Progress1 = GUICtrlCreateProgress(16, 40, 209, 17)
    GUICtrlSetColor(-1, 0x316AC5)
    GUICtrlCreateLabel("Adding...", 16, 8, 97, 24)
    GUICtrlSetFont(-1, 12, 800, 0, "MS Sans Serif")
    GUISetState(@SW_SHOW)

For $i = 1 to $add
    $percent = int($i/$add*100)
    GuiCtrlSetData ( $progress1, $percent )
    $edd = $edd & '00'
Next

$hex &= $edd
$newfile = @scriptdir & '\increased_new.' & $ext
Local $h_Open = FileOpen($newfile, 2)
FileWrite($h_Open, BinaryString($hex))
FileClose($h_Open)
MsgBox ( 64, "Increase a file", "Done!" & @CRLF & $newfile  )

[u]My Programs:[/u]Word Search Creator - Make your own Word SearchShortHand - Hide a secret message in a jpg fileHex Editor - Edit your Binary fileIncrease file size - Increase the size of any filesArt Generator - A program that generate random picture[u]My Functions:[/u]16-Bits Hash - My Hash function similar to MD5Probabilities - My probabilities function (factorial, permuation, combination)_GetDate() - Convert a date to a day of the week_Base(), _Dec() - Convert a number in any base (bin, oct, hex, dec). Create your own!

Share this post


Link to post
Share on other sites

This script add useless bytes to make a file bigger.

;By Joke758
Local $edd

$file = FileOpenDialog ( "Choose a file", @scriptdir, "Any Files (*.*)" )
$ext = StringRight ( $file, 3 )
$add = inputbox ( "Increase the size", "How many bytes to add?", "100000" )
$hex = String(BinaryString(FileRead($file) ) )

    $Form2 = GUICreate("Adding", 237, 74, 302, 218)
    $Progress1 = GUICtrlCreateProgress(16, 40, 209, 17)
    GUICtrlSetColor(-1, 0x316AC5)
    GUICtrlCreateLabel("Adding...", 16, 8, 97, 24)
    GUICtrlSetFont(-1, 12, 800, 0, "MS Sans Serif")
    GUISetState(@SW_SHOW)

For $i = 1 to $add
    $percent = int($i/$add*100)
    GuiCtrlSetData ( $progress1, $percent )
    $edd = $edd & '00'
Next

$hex &= $edd
$newfile = @scriptdir & '\increased_new.' & $ext
Local $h_Open = FileOpen($newfile, 2)
FileWrite($h_Open, BinaryString($hex))
FileClose($h_Open)
MsgBox ( 64, "Increase a file", "Done!" & @CRLF & $newfile  )
nice easy function now i can make my viruses seem bigger lol joking but nice script

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
Sign in to follow this  

×
×
  • Create New...