1,6 → 1,6 |
; Originally written by Jarek Pelczar |
include "lang.inc" |
include "macros.inc" |
include "..\..\..\macros.inc" |
|
WND_SIZE_X = 320 |
WND_SIZE_Y = 200 |
10,7 → 10,7 |
fninit |
mov al,40 |
mov bl,101b |
int 0x40 |
mcall |
call init_palette |
call init_texture |
jmp .paint_window |
17,7 → 17,7 |
.event_loop: |
mov al,23 |
mov ebx,1 |
int 0x40 |
mcall |
test eax,eax |
je .draw_screen |
dec eax |
24,7 → 24,7 |
je .paint_window |
|
or eax,-1 |
int 0x40 |
mcall |
|
.draw_screen: |
call blit_8_to_32 |
32,7 → 32,7 |
mov ebx,virtual_screen_32 |
mov ecx,(WND_SIZE_X shl 16)+WND_SIZE_Y |
xor edx,edx |
int 0x40 |
mcall |
call rotate_pal |
jmp .event_loop |
|
41,24 → 41,24 |
push eax |
xor ebx,ebx |
inc ebx |
int 0x40 |
mcall |
|
xor eax,eax |
mov ebx,(100 shl 16)+(WND_SIZE_X+8) |
mov ecx,(100 shl 16)+(WND_SIZE_Y+25) |
mov edx,0x33000000 |
mov edi,header |
int 0x40 |
mov edi,title |
mcall |
|
mov al,7 |
mov ebx,virtual_screen_32 |
mov ecx,(WND_SIZE_X shl 16)+WND_SIZE_Y |
xor edx,edx |
int 0x40 |
mcall |
|
pop eax |
and ebx,2 ; bit 1 is set |
int 0x40 |
mcall |
|
jmp .event_loop |
|
161,7 → 161,7 |
DATA |
_multiplier dd 63.5 |
|
header db 'Plasma',0 |
title db 'Plasma',0 |
|
UDATA |
_fpom32 rd 1 |