[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: