Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- idstring 0 "ZOSFT"
- goto 0xA 0 SEEK_CUR #unknown part
- endian little
- get NUMBER_RECORDS_1 long 0
- comtype ZLIB
- goto 0xA 0 SEEK_CUR
- get NUMBER_RECORDS_1 long 0
- goto 0x4 0 SEEK_CUR #2nd number records
- get BLOCK_SZ long 0
- get BLOCK_ZSZ long 0
- goto BLOCK_ZSZ 0 SEEK_CUR #skip zlib block
- get BLOCK_SZ long 0 # zsz is larger than sz for some reason!
- get BLOCK_ZSZ long 0
- goto BLOCK_ZSZ 0 SEEK_CUR #skip zlib block
- get BLOCK_SZ long 0
- get BLOCK_ZSZ long 0
- goto BLOCK_ZSZ 0 SEEK_CUR #skip zlib block
- goto 0xA 0 SEEK_CUR
- get NUMBER_RECORDS_2 long 0
- goto 0x4 0 SEEK_CUR #2nd number records
- get BLOCK_SZ long 0
- get BLOCK_ZSZ long 0
- goto BLOCK_ZSZ 0 SEEK_CUR #skip zlib block
- get BLOCK_SZ long 0
- get BLOCK_ZSZ long 0
- goto BLOCK_ZSZ 0 SEEK_CUR #skip zlib block
- get BLOCK_SZ long 0
- get BLOCK_ZSZ long 0
- savepos OFFSET 0
- clog MEMORY_FILE OFFSET BLOCK_ZSZ BLOCK_SZ 0
- goto BLOCK_ZSZ 0 SEEK_CUR #skip zlib block
- goto 0xA 0 SEEK_CUR
- get NUMBER_RECORDS_3 long 0
- goto 0x4 0 SEEK_CUR #2nd number records
- get BLOCK_SZ long 0
- get BLOCK_ZSZ long 0
- goto BLOCK_ZSZ 0 SEEK_CUR #skip zlib block
- if NUMBER_RECORDS_3 != 0
- get BLOCK_SZ long 0
- get BLOCK_ZSZ long 0
- goto BLOCK_ZSZ 0 SEEK_CUR #skip zlib block
- get BLOCK_SZ long 0
- get BLOCK_ZSZ long 0
- goto BLOCK_ZSZ 0 SEEK_CUR #skip zlib block
- endif
- string RENAME_FILENAME = "renamer.bat"
- log MEMORY_FILE2 0 0 0
- get FILENAMES_BLOCK_SIZE long 0
- savepos ZOSFT_OFFSET 0
- for i = 0 < NUMBER_RECORDS_1
- get FILE_NUMBER long MEMORY_FILE
- get NAME_OFFSET long MEMORY_FILE
- get COMPLEX_NUMBER longlong MEMORY_FILE
- math NAME_OFFSET += ZOSFT_OFFSET
- goto NAME_OFFSET 0
- get NAME string 0
- string FILE_NAME == NAME
- string FOLDER_NAME == NAME
- string FILE_NAME != "/"
- string FOLDER_NAME <= "/"
- string FOLDER_NAME R= "/" "\
- putct "ren __" string -1 MEMORY_FILE2
- putct FILE_NUMBER string -1 MEMORY_FILE2
- putct ".* " string -1 MEMORY_FILE2
- putct FILE_NAME string -1 MEMORY_FILE2
- put 10 byte MEMORY_FILE2
- putct "robocopy %CD% %CD%" string -1 MEMORY_FILE2
- putct FOLDER_NAME string -1 MEMORY_FILE2
- putct " " string -1 MEMORY_FILE2
- putct FILE_NAME string -1 MEMORY_FILE2
- putct " /MOV /NFL /NDL /NJH /NJS /nc /ns /np" string -1 MEMORY_FILE2
- put 10 byte MEMORY_FILE2
- next i
- savepos MEMORY_OFFSET MEMORY_FILE2
- log RENAME_FILENAME 0 MEMORY_OFFSET MEMORY_FILE2
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement