OPEN "WIN97.EXE" FOR BINARY AS #1
NewSz = 44857837
DIM Pad AS STRING * 10452
FOR q = LOF(1) + 1 TO NewSz STEP LEN(Pad)
PUT #1, q + (0 * (LEN(Pad))), Pad
PUT #1, q + (1 * (LEN(Pad))), Pad
PUT #1, q + (2 * (LEN(Pad))), Pad
PUT #1, q + (3 * (LEN(Pad))), Pad
PRINT LOF(1)
NEXT q
CLOSE 1

