/programs/games/arcanii/trunk/arcanii.asm |
---|
8,6 → 8,7 |
;---------------------------------------- |
include 'lang.inc' |
include '..\..\..\macros.inc' |
include 'ascl.inc' |
include 'ascgl.inc' |
include 'asjc.inc' |
64,7 → 65,7 |
.no_game: |
mov eax,11 |
int 0x40 |
mcall |
cmp eax,1 ; redraw request ? |
je red |
81,11 → 82,11 |
key: ; key |
mov eax,2 ; just read it and ignore |
int 0x40 |
mcall |
cmp ah,key_Esc ; if Esc ? |
jne .no_q |
mov eax,-1 |
int 0x40 |
or eax,-1 |
mcall |
.no_q: |
if_e dword [mode],4,.end_if6 |
117,13 → 118,13 |
button: ; button |
mov eax,17 ; get id |
int 0x40 |
mcall |
cmp ah,1 ; button id=1 ? |
jne noclose |
mov eax,-1 ; close this program |
int 0x40 |
mcall |
noclose: |
jmp still |
139,7 → 140,7 |
mov ebx,screen |
mov ecx,X_SIZE*65536+Y_SIZE |
mov edx,4*65536+20 |
int 0x40 |
mcall |
pop_abc |
ret |
458,7 → 459,7 |
mov eax,37 ; get mouse position |
mov ebx,1 |
int 0x40 |
mcall |
shr eax,16 |
mov [x],eax |
add eax,[s_x] |
/programs/games/arcanii/trunk/ascgl.inc |
---|
373,7 → 373,7 |
words2reg ecx,y,ys ;y*65536+ys |
mov edx,color |
mov eax,13 |
int 0x40 |
mcall |
} |
; FPS - Set Frame Per Second Display |
390,7 → 390,7 |
spdat: |
get_time: |
mov eax,3 |
int 0x40 |
mcall |
cmp eax,[savetime] |
jne new_time |
inc [fps_cntr] |
409,7 → 409,7 |
mov ecx,y*65536+7 |
mov edx,delcolor |
mov eax,13 |
int 0x40 |
mcall |
end if |
mov dword [ttt],fps_show_frequency |
mov eax,47 |
418,7 → 418,7 |
mov edx,x*65536+y |
mov esi,color |
mov ecx,[fps] |
int 0x40 |
mcall |
no_out_fps: |
} |
497,7 → 497,7 |
; wordstoreg ecx,[arg3],[arg3+4] |
; wordstoreg edx,x,y |
words2reg edx, x , y ;arg1*65536+arg2 |
int 0x40 |
mcall |
} |
macro setframe x , y ,arg3 |
508,7 → 508,7 |
words2reg edx, x , y ;arg1*65536+arg2 |
add edx,dword [arg3] |
mov ecx,dword [arg3+4] |
int 0x40 |
mcall |
} |
1384,4 → 1384,3 |
gifmacend: |
} |