Subversion Repositories Kolibri OS

Compare Revisions

No changes between revisions

Regard whitespace Rev 316 → Rev 485

/programs/demos/bgitest/trunk/macros.inc
File deleted
\ No newline at end of file
Property changes:
Deleted: svn:eol-style
-native
\ No newline at end of property
/programs/demos/bgitest/trunk/bgifont.inc
239,7 → 239,7
if ~ BGI_LEVEL eq KERNEL
mov eax, 70
mov ebx, .fontattr
int 0x40
mcall
test eax, eax
jnz .fail
dps2 '1'
247,7 → 247,7
mov [.fsize], eax
mov ebx,.fontinfo
mov eax,70
int 0x40 ; ebx - file size
mcall ; ebx - file size
else
push edi esi edx
mov eax,.font
454,7 → 454,7
mov eax,9
mov ebx,BGI_PRC_INFO
mov ecx,-1
int 0x40
mcall
popa
end if
end if
587,7 → 587,7
and edx, 0xFFFFFF
; \end{diamond}[18.08.2006]
mov eax,38
int 0x40
mcall
test ebp,BGI_BOLD
jz .nobold
test ebp,BGI_FREE
594,7 → 594,7
jnz .free5
.free5:
add ebx,1 shl 16+1
int 0x40
mcall
.nobold:
pop eax
else
/programs/demos/bgitest/trunk/bgitest.asm
69,7 → 69,7
not1strun dd 0x0
 
include 'lang.inc'
include 'macros.inc'
include '..\..\..\macros.inc'
;include 'debug.inc'
include 'bgifont.inc'
 
101,7 → 101,7
still:
 
mov eax,10
int 0x40
mcall
 
cmp eax,1
je red
114,19 → 114,19
 
button:
mov eax,17
int 0x40
mcall
cmp ah,1
jnz noclose
close:
xor eax,eax
dec eax
int 0x40
mcall
noclose:
jmp still
 
key:
mov eax,2
int 0x40
mcall
shr eax,8
cmp al,27 ; esc - close
je close
228,11 → 228,11
mov ebx,3
mov ecx,sc
mov edx,sizeof.system_colors
int 0x40
mcall
 
mov eax,12
mov ebx,1
int 0x40
mcall
 
xor eax,eax
mov ebx,10*65536+_X*2+30
240,7 → 240,7
mov edx,0x03261212
mov esi,0x805080d0
mov edi,0x005080d0
int 0x40
mcall
 
mov eax,4
mov ebx,8*65536+8
252,7 → 252,7
je .int
sub esi,12
.int:
int 0x40
mcall
 
cmp [help],0
jnz .help
282,16 → 282,16
mov edx,0x4b331a
mov ebx,[edi]
mov ecx,[edi+4]
int 0x40
mcall
mov ebx,[edi+8]
mov ecx,[edi+12]
int 0x40
mcall
mov ebx,freetest
BGIfont_Freetext
.eod:
mov eax,12
mov ebx,2
int 0x40
mcall
ret
 
Print: ; eax-pointer to _txt struc
326,7 → 326,7
and esi,0xfff
push ecx
mov ecx,[ebp+8]
int 0x40
mcall
pop ecx
lea edx,[esi+edx+4]
add ebx,[ebp+4]
/programs/demos/bgitest/trunk/build_en.bat
1,4 → 1,5
@erase lang.inc
@echo lang fix en >lang.inc
@fasm bgitest.asm bgitest
@erase lang.inc
@pause
/programs/demos/bgitest/trunk/build_ru.bat
1,4 → 1,5
@erase lang.inc
@echo lang fix ru >lang.inc
@fasm bgitest.asm bgitest
@erase lang.inc
@pause