Lo zero assoluto!

Niente, nulla, zero assoluto! :)
TATA ha il raffreddore e io sono triste!

Proverbio del giorno:
"Ogni lasciata è una EX."

Stay tuned!

Nostalgia acida (part 2)!

Questa settimana mi son proprio rotto le scatole (sto buttando via alcuni vecchi scatoloni) anche a causa dell'acidità-di-stomaco™ della quale vi ho accennato la settimana scorsa e della quale son sicuro non ve ne frega una cippa (e ci mancherebbe)!!! Quindi per festeggiare un'altra bella settimana di divertimento sfrenato mi riciclo nuovamente (come il cartone degli scatoloni di cui sopra)...
Ricordate quando nello scorso post vi ho chiesto se vi ricordate di quando non riuscendo a dormire avevo realizzato dei programmini per il BASIC del Vic 20? Ho pensato, sempre a tempo perso, di aggiungere un commento sonoro anche alla versione Disco '80 del Kaleidoscopio! Ed ecco il risultato:




Questo, invece, è il codice:

10 print chr$(147)
20 poke 36878,15
30 poke 36879,14
40 for y=0 to 22
50 for x=0 to 21
60 pa=7680+x+22*y
70 ca=38400+x+22*y
80 poke pa,81
90 poke ca,0
100 next x
110 next y
120 for x=0 to 15
130 read d
140 pa=7680+22*22+x
150 ca=38400+x+22*22
160 poke pa,d
170 poke ca,1
180 next x
190 data 22,9,3,50,48,32,56,48,39,19,32,4,9,19,3,15
200 dim n(8)
210 n(0)=195: n(1)=207: n(2)=215: n(3)=225
220 n(4)=209: n(5)=219: n(6)=225: n(7)=232
230 r = int(rnd(1)*8)
240 poke 36874,n(r)
250 c = int(rnd(1)*8)
260 x = int(rnd(1)*11)
270 y = int(rnd(1)*11)
280 ca=38400+x+22*y
290 cb=38400+21-x+22*y
300 cc=38400+x+462-22*y
310 cd=38400+21-x+462-22*y
320 poke ca,c
330 poke cb,c
340 poke cc,c
350 poke cd,c
360 poke 36874,0
370 goto 230
run

Bello, performante e soprattutto inutile!
Ed ora, via alla seconda battuta della settimana:

Chiudo con il proverbio del giorno (non ne posso più):
"Ride bene chi ride."

Stay tuned...

Nostalgia acida!

Grazie all'acidità-di-stomaco™ (complice anche il bel tempo) ho passato una settimana veramente allegra e quindi non solo non ho novità da segnalare ma non ho nemmeno tanta voglia di scrivere (cose intelligenti, intendo)!
Quindi perdonatemi se per l'ennesima volta mi riciclo (come l'aria in macchina)!
Ricordate quando non riuscendo a dormire avevo realizzato dei programmini per il BASIC del Vic 20? Ho pensato, sempre a tempo perso, di aggiungere un commento sonoro (random)! Ed ecco il risultato:




Questo, invece, è il codice:

10 print chr$(147)
20 poke 36878,15
30 for x=0 to 21
40 read d
50 pa=7680+22*11+x
60 ca=38400+x+22*11
70 poke pa,d
80 poke ca,0
90 next x
100 data 32,32,22,9,3,50,48,32,11,1,12,5,9,4,15,19,3,15,16,5,32,32
110 dim n(8)
120 n(0)=175: n(1)=195: n(2)=207: n(3)=215
130 n(4)=225: n(5)=232: n(6)=237: n(7)=240
140 r = int(rnd(1)*8)
150 poke 36874,n(r)
160 c = int(rnd(1)*8)
170 x = int(rnd(1)*11)
180 y = int(rnd(1)*11)
190 pa=7680+x+22*y
200 ca=38400+x+22*y
210 pb=7680+21-x+22*y
220 cb=38400+21-x+22*y
230 pc=7680+x+484-22*y
240 cc=38400+x+484-22*y
250 pd=7680+21-x+484-22*y
260 cd=38400+21-x+484-22*y
270 r1=int(rnd(1)*2)*10
280 r2=int(rnd(1)*2)*128
290 poke pa,95+r1+r2
300 poke ca,c
310 poke pb,105-r1+r2
320 poke cb,c
330 poke pc,105-r1+128-r2
340 poke cc,c
350 poke pd,95+r1+128-r2
360 poke cd,c
370 poke 36874,0
380 goto 140
run

Il Vic 20... Cavoli, ci ho passato l'infanzia su questo computer! XD

Proverbio del giorno:
"Se non è zuppa è sposa sfortunata."

Stay tuned! ;)

Non ho pensato a un titolo a dire il vero...

Niente di nuovo sotto il sole (e infatti piove da giorni) da aggiungere, quindi godetevi le vignette e questa puntata speciale di BCOyager-flash!
Questa sera a BCOyager spiegheremo perché i fotografi leggono solo le notizie-flash!
Misteri dell'archeologia: gli antichi Incas sono gli inventori dei mobili ad incasso?
I tossici per attraversare la strada passano sulle strisce?
Don Bosco aveva paura degli incendi?
Se litigo con i blue jeans faccio la guerra-lampo?
La pizza battuta chiede la rivincita?
Se la roulette russa, il piatto piange?
Per mangiare un pasto veloce devo correre al ristorante?
Una strada a doppio senso può essere divertente?
Un uomo quasi completamente calvo si pettina per un pelo? (non guardatemi così, li sto perdendo anche io)

Proverbio del giorno:
"Tanto la va la gatta al lardo che ci lascia il fegato."

Stay tuned! :)