Subversion Repositories Kolibri OS

Rev

Rev 109 | Rev 485 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 109 Rev 316
Line 29... Line 29...
29 
.draw_screen:
 29 
.draw_screen:
30 
    call blit_8_to_32
 30 
    call blit_8_to_32
31 
    mov al,7
 31 
    mov al,7
32 
    mov ebx,virtual_screen_32
 32 
    mov ebx,virtual_screen_32
33 
    mov ecx,(WND_SIZE_X shl 16)+WND_SIZE_Y
 33 
    mov ecx,(WND_SIZE_X shl 16)+WND_SIZE_Y
34 
    mov edx,(4 shl 16)+24
 34 
    xor edx,edx
35 
    int 0x40
 35 
    int 0x40
36 
    call rotate_pal
 36 
    call rotate_pal
37 
    jmp .event_loop
 37 
    jmp .event_loop
Line 38... Line 38...
38 
 
 38 
 
Line 43... Line 43...
43 
    inc ebx
 43 
    inc ebx
44 
    int 0x40
 44 
    int 0x40
Line 45... Line 45...
45 
 
 45 
 
46 
    xor eax,eax
 46 
    xor eax,eax
47 
    mov ebx,(100 shl 16)+(WND_SIZE_X+8)
 47 
    mov ebx,(100 shl 16)+(WND_SIZE_X+8)
48 
    mov ecx,(100 shl 16)+(WND_SIZE_Y+28)
 48 
    mov ecx,(100 shl 16)+(WND_SIZE_Y+25)
- 
 
 49 
    mov edx,0x33000000
49 
    mov edx,0x03000000
 50 
    mov edi,header
Line 50... Line 51...
50 
    int 0x40
 51 
    int 0x40
51 
 
 52 
 
52 
    mov al,7
 53 
    mov al,7
53 
    mov ebx,virtual_screen_32
 - 
 
54 
    mov ecx,(WND_SIZE_X shl 16)+WND_SIZE_Y
 - 
 
55 
    mov edx,(4 shl 16)+24
 - 
 
56 
    int 0x40
 54 
    mov ebx,virtual_screen_32
57 
 
 - 
 
58 
    mov al,4
 - 
 
59 
    mov ebx,0x00060006
 - 
 
60 
    mov ecx,0x10ffffff
 - 
 
61 
    mov edx,window_title
 55 
    mov ecx,(WND_SIZE_X shl 16)+WND_SIZE_Y
Line 62... Line 56...
62 
    mov esi,window_title_len
 56 
    xor edx,edx
63 
    int 0x40
 57 
    int 0x40
64 
 
 58 
 
Line 165... Line 159...
165 
include "graph8.inc"
 159 
include "graph8.inc"
Line 166... Line 160...
166 
 
 160 
 
167 
DATA
 161 
DATA
Line 168... Line -...
168 
  _multiplier	dd 63.5
 - 
 
169 
 
 162 
  _multiplier	dd 63.5
170 
  window_title:
 - 
 
Line 171... Line 163...
171 
      db 'Plasma'
 163 
 
172 
  window_title_len = $ - window_title
 164 
  header          db 'Plasma',0
173 
 
 165 
 
174 
UDATA
 166 
UDATA