Subversion Repositories Kolibri OS

Compare Revisions

Regard whitespace Rev 2148 → Rev 2147

/programs/fs/kfm/trunk/kfm.asm
53,21 → 53,17
STRLEN = 1024
;---------------------------------------------------------------------
START:
; mcall 9, procinfo, -1
; mov eax,[ebx+30]
; mov [PID],eax
; xor ecx,ecx
;@@:
; inc ecx
; mcall 9, procinfo
; mov eax,[PID]
; cmp eax,[ebx+30]
; jne @r
; mov [active_process],ecx
mcall 9,procinfo,-1
mov ecx,[ebx+30] ; PID
mcall 18,21
mov [active_process],eax ; WINDOW SLOT
mov eax,[ebx+30]
mov [PID],eax
xor ecx,ecx
@@:
inc ecx
mcall 9, procinfo
mov eax,[PID]
cmp eax,[ebx+30]
jne @r
mov [active_process],ecx
mov [appl_memory],mem
mov ax,[select_disk_char]
mov [read_folder_name],ax
/programs/fs/kfm/trunk/build.bat
1,5 → 1,2
@echo lang fix en >lang.inc
@fasm -m 16384 kfm.asm kfm
@erase lang.inc
@kpack kfm
fasm kfm.asm kfm
@pause