mercoledì 14 dicembre 2022

Tornano «Le belle wallpaper di BCO studiate appositamente per perdere diottrie!» nuovamente in salsa 8-bit!

Strip di BCO e TATA del 14/12/2022 - Giulietta e Romeo, amore o MORTE? Tutte e due!

Scialve a tutti perché scalda il cuore e un po' anche i piedini!
Oggi, visto l'approssimarsi del NaTATAleTW, quel buontampone di BCO ha ben pensato in grande (il famoso Big Ben!) di realizzare cinque «Le belle wallpaper di BCO studiate appositamente per perdere diottrie!» generandole come fossero girandole con un computer MSX (emulato con l'emulatore OpenMSX) programmato con questo piccolo grande amore, solo un piccolo grande amore (cit. C. Baglioni) pezzo di codice BASIC:

10 KEY OFF: SCREEN 1: ON INTERVAL=500 GOSUB 90: INTERVAL ON: WIDTH 32
20 A$ = ".-_8oOHVvI+|!T*MWY^UXxø:=ðñöØ#êì"
30 B$="": C$="": D$="": E$=""
40 FOR T=1 TO 4: R=INT(RND(-TIME)*LEN(A$))+1: B$=B$+MID$(A$,R,1): NEXT
50 FOR T=4 TO 1 STEP -1: C$=C$+MID$(B$,T,1): NEXT: D$=B$+C$
60 FOR T=1 TO 32: E$=E$+MID$(D$,TMOD7+1,1): NEXT
70 PRINT E$;
80 GOTO 30
90 N=INT(RND(1)*8): ON N GOSUB 100,110,120,130,140,150,160,170: RETURN
100 COLOR 15,12,1: RETURN
110 COLOR 15,6,1: RETURN
120 COLOR 7,4,1: RETURN
130 COLOR 6,11,1: RETURN
140 COLOR 15,1,1: RETURN
150 COLOR 15,14,1: RETURN
160 COLOR 1,14,1: RETURN
170 COLOR 15,6,1: RETURN


Ed ecco l'inutile il risultato:

Bella wallpaper n°81:

Bella wallpaper n°82:

Bella wallpaper n°83:

Bella wallpaper n°84:

Bella wallpaper n°85:


"Cosa c'entra col NaTATAleTW?" direte voi...
Nulla a dire il vero. Semplicemente al BCO i caratteri messi in questo modo (a mo' di «Belle (ma spietate) cornicette ASCII!») ricordano vagamente i maglioni di Natale!

Please, stay tuned!” del giorno:
Anche se non è possibile recuperare un'anatra cacciata in alto mare mediante un canotto da riporto, please stay tuned!

Nessun commento:

Posta un commento