Программа просто создаёт файлы в папке (edit1) в количестве (edit2). Исходник Суть в этом месте
Spoiler:
Code: Select all
mov [pb.max], ecx
mov [pb.value], dword 0
; draw progressbar
push pb
call [progressbar_draw]
; ------------------------------------- ;
cmp [count], dword 0
jz .done
; SetCurrentDirectory
mov eax, 30
mov ebx, 1
mov ecx, [edit1.text]
int 64
;
mov [status_string], dword sz_doing
call DrawStatus
.do:
CreateNextFile
test eax, eax
jnz .error
; increase progress
push pb
call [progressbar_progress]
; CheckEvent
mov eax, 11
int 64
call [eax * 4 + Events]
dec dword [count]
jnz .do
.done:
mov [status_string], dword sz_done
call DrawStatus
ret
.error:
mov [status_string], dword sz_error
call DrawStatus
ret