[zxspectrum] Re: auguri
- From: Enrico Maria Giordano <e.m.giordano@xxxxxxxxxxxxxxx>
- To: zxspectrum@xxxxxxxxxxxxx
- Date: Fri, 25 Dec 2015 15:52:23 +0100
Il 25/12/2015 13:52, Enrico Maria Giordano ha scritto:
Purtroppo non è sufficiente perché comunque lo schermo viene
"scrollato". Bisognerebbe complicare un po' il sorgente per fare in modo
che non vengano stampate stringhe troppo lunghe sull'ultima riga.
Così dovrebbe andare bene:
10 PAPER 0
20 BORDER 0
30 CLS
40 INK INT (RND*7)+1
50 BRIGHT INT (RND*2)
60 FLASH INT (RND*2)
70 LET r=INT (RND*22)
80 LET c=INT (RND*32)
90 IF r<21 OR c<=20 THEN PRINT AT r,c;"BUON NATALE!"
100 IF r=21 AND c>20 THEN PRINT AT r,c;"BUON NATALE!"(1 TO 32-c)
110 GO TO 40
EMG
--
EMAG Software Homepage:
http://www.emagsoftware.it
The EMG Music page:
http://www.emagsoftware.it/emgmusic
The EMG's ZX-Spectrum Page:
http://www.emagsoftware.it/spectrum
The Best of Spectrum Games:
http://www.emagsoftware.it/tbosg
Other related posts: