snow effects...

simun9 · Oct 31st 2019, 10:20 pm

Its been a while.

Well Third production is out and entered Syntax 2019. compos.

I am thinking about fourth production. As i Have logo which is white I was thinking about some snow edition production with some effects of: snow, snow ball, snwo man etc...

Any suggestion, hints maybe ?

Parser · Oct 31st 2019, 10:26 pm

Quote from simun9

Any suggestion, hints maybe ?

What is the issue here?

simun9 · Oct 31st 2019, 11:07 pm

Make snowing effects without using sprites ?

Parser · Oct 31st 2019, 11:09 pm

Quote from simun9

Make snowing effects without using sprites ?

On a C64? Snowfall only within the C64 border would be very nice ... .

Neptun · Nov 1st 2019, 3:04 am

Basic or assembler? Try this:

Code

10 v=53248:pokev+33,6:pokev+32,0:z=rnd(-ti):b=49152:h=2048:poke56334,0
20 poke1,51:fori=b+htoi+511:pokei,peek(i+h):next:poke1,55:poke56334,1
30 a=b+h+1024:c=40:d=60:e=127:f=128:g=198:dims(4):fori=0to4:reads(i):next
40 poke56576,196:pokev+24,2:poke648,192:printchr$(5)chr$(147):forx=0to39
50 z=int(rnd(1)*16):ifx>0andz=lthen50
60 l=z:fory=b+xtob+x+c*24stepc:pokey,z+f:z=z+1and15:next:next
70 printspc(254)chr$(158)"let"chr$(29)"it"chr$(29)"snow"
80 poke648,4:pokeg,.
90 forp=.toe:fori=.to4:pokea+(p+iande),s(i):next:next:ifpeek(g)=.then90
100 poke56576,199:pokev+24,20:printchr$(5)chr$(147)
110 data 0,24,60,60,24

Display More

simun9 · Nov 1st 2019, 7:50 am

I am looking for asm code if possible.

simun9 · Nov 3rd 2019, 1:32 pm

Snowy effects is solved. Now we can go for it!

Take a look at Third production:

https://csdb.dk/release/?id=183423

Cheers

zrs1 · Nov 3rd 2019, 5:28 pm

Quote from simun9

Take a look at Third production:

https://csdb.dk/release/?id=183423

Pretty nice already! But the start is broken (you see something glitching) ... when stepping frame by frame, you see stuff like this:

Vice is pretty helpful in analyzing critical transitions with alt+p for pause and alt+shift+p for stepping a single frame.

A simple strategy could be to disable the screen during vblank, setup all your initial graphics and after that, reenable the screen (again, during vblank).

simun9 · Nov 4th 2019, 8:47 pm

Thank you Zirias for your observation.

I am in learning phase of asm coding. I need lot of time and endless nights to achieve all that I want from asm on beloved c64.

Luckly have good tutor.

And also great community of c64 (ex) coders with willing for help.

simun9 · Nov 4th 2019, 8:48 pm

Hey Neptun,

Didnt Know that I can run basic code through C64 Studio.

VEry nice effect.

Cheers

zrs1 · Nov 5th 2019, 1:38 pm

simun9 as I said, it's pretty nice already, so, good work This is just a hint cause you easily overlook these things, but even when watching normally, a 1- or 2-frame glitch is visible (although you normally don't see what *exactly* happens).

A next step you might want to take is compatibility with different video systems

wizball6502 · Nov 5th 2019, 8:38 pm

Quote from zrs1

Vice is pretty helpful in analyzing critical transitions with alt+p for pause and alt+shift+p for stepping a single frame.

What version is that to be able to do single frame stepping in Vice? I think I can only pause in my version. Thanks.

zrs1 · Nov 6th 2019

Quote from wizball6502

What version is that to be able to do single frame stepping in Vice? I think I can only pause in my version. Thanks.

Any version I know ... In pause mode, you can step single frames. With the unified GTK frontend, the hotkey for stepping a frame is alt+shift+p .. it was different in the win32 frontend, but I don't remember now.

Neptun · Nov 10th 2019, 11:28 pm New

Hey simun9,

I see you have found a solution. I had another

example in ASM:

Code

10 printchr$(5)chr$(147)spc(41)"please wait":print:y=49152:a=y:n=1105:f=16:z=0
20 printstr$(int(z/14))"%"chr$(145):z=z+1e2:readx$:ifx$=""then60
40 fori=1tolen(x$)step2:pokea,asc(mid$(x$,i))+f*asc(mid$(x$,i+1))-n:a=a+1:next
50 goto20
60 sysy
500 data jkbanigicaaceefojkiaaccnppckaaakeagilpeimpoiacankijcdakakaficaakhcijjc
501 data daibfgcajaapbjlpiiabdpibfklpjgicfilpajcagompioaojbanknakaackaneilpgimp
502 data ckaceinpgiopckiaihjkddfibabllpbjnpimanjpgompgoopkmancpjkhdfibaifcknanl
503 data cibmjmacapianjgieajkhanjgiinnlajbmjmacapianjfkhajkdanjfklnkmabpnjkibni
504 data ibanjkganibcanjklbnibbanjklpnicbanjkbackdnakamaccmamjkaafigmfkgmapmpjk
505 data aackbdakkoaccmamaceefoacakfojkaafigmagihnikbanjebanioamnoiebdamifbdaif
506 data agomjbanooiohankiohakeajdaacfoammebdkooopohaandaooaphankaphajceaapjank
507 data pohakeajdaacpgbmckcaonkohaaboakinjkohaienlgkbmkkacihbmigkkkmabkojkaack
508 data phnjaihckmabkpcknbnljkbmjcpbikjcipficaijjchaikjlojbmieienlhmbmjcpbikjc
509 data ipkakaibfgcaficaijjchaibfgcaikigjbaihcjjaihcigkeangbijjcaoficaijibjgia
510 data jcpbfacaikjkaijbaihcjjaihckmabdlagcknbonjkbmkmabkpagakkaophmbmioiianjp
511 data agacmafaebacjaebacdboapahbacaccdadbdidaccajbacoafaabebfboaamagadibmaga
512 data dabaaakaebnakblbfafbgapaaalaabgbebeabbmacbhbdaibhanbdbcajaoaiambbakajb
513 data dbjbgbgapbpahakbeanbdadbeahagbobaalbmapbiafbnagbebkboambjahb,""
600 :

Display More

With best regards

Neptun

simun9 · Nov 11th 2019, 10:30 pm New

Hi Neptun,

that what I call snow effects.

Salute you.

wizball6502 · Nov 11th 2019, 11:02 pm New

Quote from zrs1

Any version I know ... In pause mode, you can step single frames.

Thanks for pointing out GTK because it doesn't seem to work with the "classic" version 2.4 or at least I could not find a working shortcut to frame-step in that version. Very useful in some situations.

zrs1 · Nov 11th 2019, 11:45 pm New

Quote from wizball6502

it doesn't seem to work with the "classic" version 2.4

Well, IIRC, it DID work back then as well, but the keyboard shortcut was different in the windows version, because it had a different GUI frontend. Unfortunately, I don't remember it. Maybe someone else can help here

snow effects...

Similar Threads

Denise 1.0.x Emulator