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