Subversion Repositories Kolibri OS

Compare Revisions

No changes between revisions

Regard whitespace Rev 6687 → Rev 6688

/programs/system/RunOD/RunOD.asm
1,7 → 1,5
; Run with OpenDialog ;
 
 
 
org 0
use32
 
101,7 → 99,7
movzx eax, word[screen.width]
shr eax, 3
lea eax, [eax*2 + eax]
add eax, 72
mov [window.width], eax
; skin.height
@@ -109,7 +107,7 @@
mov ebx, 4
int 64
- add eax, 64
mov [window.height], eax
movzx eax, word[screen.width]
@@ -123,7 +121,7 @@
mov [window.top], eax
mov eax, [window.width]
- sub eax, 20
mov [edit1.width], eax
mov eax, [od.openfile_path]
@@ -335,7 +333,7 @@
add ecx, [window.height]
mov edx, [sc.work]
or edx, 34000000h
- mov edi, sz_run
int 64
mov eax, [window.width]
@@ -342,7 +340,7 @@
sub eax, 318
shr eax, 1
sub eax, 5
- push eax
push 5
push sz_Type_name_of_program
push dword [sc.work_text]
@@ -350,14 +348,18 @@
; ====================| browse button |====================
push 20
- push 5
- push 38
- push 42
- push 17
call draw.button
- push 3
- push 42
push sz_browse
push dword [sc.work_button_text]
call draw.text
@@ -364,16 +366,21 @@
; ====================| run button |====================
push 10
mov eax, [window.width]
- sub eax, 57
push eax
- push 38
- push 42
push 17
call draw.button
mov eax, [window.width]
- sub eax, 56
push eax
push 42
push sz_run
@@ -381,10 +388,10 @@
call draw.text
; =====================================================
- mov eax, 57
push eax
mov eax, [window.height]
- sub eax, 44
push eax
push dword[runresult]
push dword [sc.work_text]
@@ -614,7 +621,7 @@
.shift_color dd 0
.focus_border_color dd 0
.blur_border_color dd 0
-.text_color dd 0
.max dd 4096
.text dd 0
.mouse_variable dd 0
@@ -635,8 +642,8 @@
sc:
.frames dd 0
.grab dd 0
-.work_3d_dark dd 0
-.work_3d_light dd 0
.grab_text dd 0
.work dd 0
.work_button dd 0
@@ -700,8 +707,24 @@
sz_Type_name_of_program db "Digita il nome del programma per eseguirlo",0
sz_run db "Esegui ",0
- sz_browse db " Naviga",0
else
sz_Program_run_successfully db "Program run successfully",0
sz_File_not_found db "File not found",0
@@ -714,8 +737,9 @@
sz_Type_name_of_program db "Type name of program, and Kolibri will run it for you",0
sz_run db " Run ",0
- sz_browse db " Browse ",0
end if
-; ======================================================================= ;
-end_:
+end_:
\ No newline at end of file
/programs/system/RunOD/build_en.bat
0,0 → 1,5
@erase lang.inc
@echo lang fix en >lang.inc
@fasm runOD.asm run
@erase lang.inc
@pause
/programs/system/RunOD/build_ru.bat
0,0 → 1,5
@erase lang.inc
@echo lang fix ru >lang.inc
@fasm runOD.asm run
@erase lang.inc
@pause
/programs/system/RunOD/makefile
it:
echo "lang fix it" > ${LANG}
${FASM} ${SOURCE} ${OUT}