0,]']╠>SО}WЪмu╖Пp8╥d%qy)6o;]иA╕ЖsОВТТТ■╟бVl├310000) { poke(0x3FF8,0) currentScene=initNoise } } function initNoise() { for(local i=0;i<256;i++) { poke(0x4000 + i, rand() % 256) } currentScene=noise music(0) } function noise() { for(local i=0;i<510;i++){ spr(rand() % 8,i*8%240, i*8/240*8, -1, 1, rand() % 4, rand % 4) } if(time() > 15000) { initStarField() } } function initStarField() { while (stars.len() < starcount) { local x = (rand().tofloat() / RAND_MAX) * 2 - 1 local y = (rand().tofloat() / RAND_MAX) * 2 - 1 stars.push([x,y,rand() % 7 + 1]) } currentScene=starField } function starField() { fillStars() cls(0) local next = [] foreach(star in stars) { drawStar(star) star[2] -= 0.01 if (star[2] > 0) { next.push(star) } } stars = next if (time() > 35000) { initPlasma() } } function fillStars() { while (stars.len() < starcount) { local x = (rand().tofloat() / RAND_MAX) * 2 - 1 local y = (rand().tofloat() / RAND_MAX) * 2 - 1 stars.push([x,y,7]) } } function drawStar(star) { local x = (star[0]/star[2] + 1) * 120 local y = (star[1]/star[2] + 1) * 68 local coli = getColi(star[2]) pix(x,y,coli) } function getColi(z) { if (z < 1) { return 12 } if (z < 3) { return 11 } if (z < 4) { return 10 } if (z < 5) { return 9 } return 8 } function initPlasma() { for(local i=1;i<16;i++) { local b = 0xFF * (16-i)/16 local r = 0xFF * i / 16 poke(0x3FC0+i*3,r) poke(0x3FC0+i*3+1,0) poke(0x3FC0+i*3+2,b) } for(local y=0;y50000) { currentScene=theEnd } } function theEnd() { local t = time() local ci=t/1000%16 cls(ci) print("CODE BY WALOP", 80, 50, (ci+3)%15) print("MUSIC BY MIELIKKI", 80, 70, (ci+4)%15) print("Made with frustration", sin(t/1300)*60+65, sin(t/700)*63+64, (ci+8)%16) if(t > 70000) { currentScene=initDeadbean } } function initDeadbean(){ music() poke(0x3FC0,0x1A) poke(0x3FC1,0x1C) poke(0x3FC2,0x2C) poke(0x3FC3,0xF4) poke(0x3FC4,0xF4) poke(0x3FC5,0xF4) poke(0x3FC6,0xB1) poke(0x3FC7,0x3E) poke(0x3FC8,0x53) currentScene=deadbean } function deadbean() { cls() spr(16,30,50,0,2,0,0,11,2) if(time() > 75000) { exit() } }