| Zoompinski 64 by Desire [web] | ||||||||
|---|---|---|---|---|---|---|---|---|
|
|
|||||||
|
popularity : 56% |
|||||||
alltime top: #11618 |
|
|||||||
|
||||||||
added on the 2016-06-11 19:58:05 by HellMood  |
||||||||
popularity helper
comments
Quote:
added on the 2016-06-11 20:01:09 by HellMood
sweeter than the cidre i am drinking atm
Quite the accomplishment :)
Congrats to quite an achievement. Great coding and execution
Screenvote as usual.
Nice
Nice!
great job there! :)
Dat rules!
good port
Looks very nice
The 32b on is excellent with the multiple reuse of the same int10h call.
The 32b on is excellent with the multiple reuse of the same int10h call.
Heavily inspired by Zoompinski by Plush http://www.pouet.net/prod.php?which=67284 on C64 in May :
Not very original.
Not very original.
Quote:
Heavily inspired by Zoompinski by Plush http://www.pouet.net/prod.php?which=67284 on C64 in May :
Not very original.
Of course it's heavily inspired by Zoompinksi... it's a remake.
Quote:
Heavily inspired by Zoompinski by Plush http://www.pouet.net/prod.php?which=67284 on C64 in May :
Not very original.
Thank you, Captain Obviousness.
on the other side, nice 64 bytie :)
... anyway, i'd like to add an "aspect corrected" version, which looks even more like the original :
still in 64 bytes, download adjusted accordingly =)
Would it be possible to exchange the clean-exit stuff for e^x zoom values so the movement will be smooth? Good stuff nonetheless :)
@Krill: excellent feedback, i was wondering how you did that! Will tinker around later to see if i can slide that in =)
HellMood: Simply map the exponential function to your scaling range. Its properties ensure a smooth infinite zoom.
thanks for the support :) ... so i had to sacrifice the ESC support and the "real" C64 colors and also to cheat with a flat quadratic function instead of a true exponential mapping, but i think it's looks quite better than before while the size of the .com file is exactly 64 bytes so there is that =)
Code:
push 0xa000-60 ; set screen origin
pop es ; to y = 3 (hide crap)
mov al,0x13 ; mode 13
int 0x10 ; set mode
S: xor dx,dx ; dx=0 for DIV
mov bx,320 ; get X and X
mov ax,di ; from frame counter
idiv bx ; [x,y] = [dx,ax]
sub dx,160 ; center X
sal dx,1 ; correct aspect
push cx ; save counter
imul cx,cx ; zoom smoother
shr cx,9 ; with x*x / 512
mul cl ; zoom
imul dx,cx ; zoom
pop cx ; restore counter
mov bp,dx ; rotation
add dx,ax ; by 45
sub ax,bp ; degrees
and ah,dh ; zoompinski ;)
mov al,128 ; background color
jnz F ; or
mov al,56 ; foreground color
F: stosb ; write pixel
test di,di ; end frame ?
jnz S ; next pixel
cmp cl,182 ; keep
jg N ; zoom
mov cl,255 ; range
N: loop S ; next frame
You don't need to correct the aspect ratio cause it looked good enough without correction.
Nice effect.
Nice effect.
Well done! Thanks for the commented source.
submit changes
if this prod is a fake, some info is false or the download link is broken,
do not post about it in the comments, it will get lost.
instead, click here !