Subversion Repositories Kolibri OS

Compare Revisions

Regard whitespace Rev 485 → Rev 484

/programs/demos/tube/trunk/tube.asm
18,7 → 18,7
dd 0x40000
dd 0,0
 
include '..\..\..\macros.inc'
include 'macros.inc'
 
START:
 
38,7 → 38,7
 
mov eax,23
mov ebx,1
mcall
int 0x40
 
cmp eax,1
jne no_red
50,8 → 50,9
je still
 
or eax,-1
mcall
int 0x40
 
 
SCREEN equ 160
PIXBUF equ 200h
EYE equ EYE_P-2
178,7 → 179,7
mov ecx,320*65536+160
xor edx,edx
mov ebx,0x10000
mcall
int 0x40
 
popa
ret
191,20 → 192,23
 
mov eax,12
mov ebx,1
mcall
int 0x40
 
xor eax,eax
mov ebx,100*65536+329
mov ecx,100*65536+186
mov edx,0x33000000
mov edi,title
mcall
mov edi,header
int 0x40
 
mov eax,12
mov ebx,2
mcall
int 0x40
 
popa
ret
 
title db appname,0
header db appname,0
 
db 41,0,0xC3,0x3C