forked from KolibriOS/kolibrios
add cmdline parameter "-d" — delay
git-svn-id: svn://kolibrios.org@7446 a494cfbc-eb01-0410-851d-a64ba20cac60
This commit is contained in:
parent
5488e03363
commit
f56b0638f4
@ -34,8 +34,10 @@
|
||||
dd IM_END
|
||||
dd I_END
|
||||
dd stacktop
|
||||
params dd PARAMS
|
||||
dd 0x0
|
||||
dd 0x0
|
||||
;---------------------------------------------------------------------
|
||||
delay dd 0;500
|
||||
;---------------------------------------------------------------------
|
||||
fileinfo:
|
||||
.subfunction dd 5
|
||||
@ -83,7 +85,28 @@ define __DEBUG_LEVEL__ 2 ; 1 = verbose, 2 = main only
|
||||
include "../../debug-fdo.inc"
|
||||
;-------------------------------------------------------------------------------
|
||||
START:
|
||||
mcall 5,500
|
||||
; process cmdline params
|
||||
mov esi, [params]
|
||||
test [esi], byte 0xFF
|
||||
jz .params_done
|
||||
cmp word[esi], '-d' ; delay
|
||||
jne .params_done
|
||||
add esi, 2
|
||||
; str2uint(delay)
|
||||
xor eax, eax
|
||||
xor ecx, ecx
|
||||
.convert:
|
||||
lodsb
|
||||
test al, al
|
||||
jz .converted
|
||||
lea ecx, [ecx + ecx * 4]
|
||||
lea ecx, [eax + ecx * 2 - '0']
|
||||
jmp .convert
|
||||
.converted:
|
||||
mov [delay], ecx
|
||||
.params_done:
|
||||
;--------------------------------------
|
||||
mcall 5,[delay]
|
||||
mov ebx,start_dir
|
||||
mov ax,[ebx]
|
||||
mov ebx,read_folder_name
|
||||
@ -401,6 +424,8 @@ include_debug_strings
|
||||
IM_END:
|
||||
;-------------------------------------------------------------------------------
|
||||
align 4
|
||||
PARAMS: rb 256
|
||||
align 4
|
||||
left_folder_block rd 1
|
||||
right_folder_block rd 1
|
||||
temp_counter_1 rd 1
|
||||
|
Loading…
Reference in New Issue
Block a user