msgbox

Untitled

Oct 9th, 2011
139
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. #NoTrayIcon
  2. #SingleInstance force
  3. SetBatchLines -1
  4.  
  5. InputFile := "hex.txt"
  6. OutputFile := "out.ahk"
  7. MyLenght := "1024"
  8. Position := "1"
  9.  
  10. Fileread, Hex, % InputFile
  11. Loop, % (StrLen(Hex)/MyLenght)
  12.   {
  13.   if (Position == "1")
  14.   Output = % "var=`n" SubStr(Hex, Position, MyLenght) "`n)`n"
  15.   else
  16.   Output = % Output "var=`%var`%`n" SubStr(Hex, Position, MyLenght) "`n)`n"
  17.   Position := Position + MyLenght
  18.   }
  19. FileAppend, % Output, % OutputFile
  20.  
  21. ExitApp
Advertisement
Add Comment
Please, Sign In to add comment