[zxspectrum] Re: BasiMon: Il codice..

  • From: "Stefano" <flydream@xxxxxxxx>
  • To: <zxspectrum@xxxxxxxxxxxxx>
  • Date: Thu, 3 Jan 2008 19:52:25 +0100

Grande Gianni!!!
ah... ti eri dimenticato che il basic sinclair non necessita di 
inizializzazioni delle variabili ;)))
potresti farlo diventare più compatto :)))

----- Original Message ----- 
From: "bbk" <bbk@xxxxxx>
To: <zxspectrum@xxxxxxxxxxxxx>
Sent: Thursday, January 03, 2008 6:35 PM
Subject: [zxspectrum] BasiMon: Il codice..


> UAUAUAU chiamarlo codice e' un insulto alla programmazione (Luca, sputami):D
> 
> ho fatto gli scriptini per generare mostri e nomi:)
> 
> Nomi
> 2293 LET s$="babebibobucacecicocufafefifofututit.. e via dicendo"
> 2295 LET n=0: LET n$=""
> 2297 FOR n=1 TO INT (RND*3)+2
> 2300 LET silla=INT (RND*50)*2+1
> 2315 LET n$=n$+s$(silla)+s$(silla+1)
> 2320 NEXT n
> 2350 RETURN
> 
> genera roba tipo:
> sutifovigi
> rewosa
> vofisa
> vacuwive
> mokevite
> Divertente no?!:)
> 
> Questo invece crea il mostro:
> 1010 LET testa=0
> 1030 LET corpo=0
> 1050 LET gambe=0
> 1070 REM crea mostro
> 1110 LET testa=INT (RND*9)
> 1130 LET corpo=INT (RND*9)
> 1150 LET gambe=INT (RND*9)
> 1170 LET m$=STR$ testa+STR$ corpo+STR$ gambe
> 1176 DIM x$(10,9)
> 1177 LET x$(1)=" k kkkk k"
> 1178 LET x$(2)=" x xxxx x"
> 1179 LET x$(3)=" j jjjj j"
> 1180 LET x$(4)=" w wwww w"
> 1200 LET x$(5)=" z zzzz z"
> 1220 LET x$(6)=" q qqqq q"
> 1240 LET x$(7)=" h hhhh h"
> 1260 LET x$(8)=" v vvvv v"
> 1280 LET x$(9)=" 9 9999 9"
> 1290 LET x$(10)=" 0 0000 0"
> 1320 LET t$=x$(testa,1)+x$(testa,2)+x$(testa,3)
> 1340 LET c$=x$(testa,4)+x$(testa,5)+x$(testa,6)
> 1360 LET g$=x$(testa,7)+x$(testa,8)+x$(testa,9)
> 1410 RETURN
> 
> Il risultato sono dei pupazzetti tipo:
>  v
> vvv
> v v
> 
> hehehehe:D
> 
> Che sciocchezza di codice, mi vergogno.. soprattutto perche' e' 
> divertente il risultato. :)
> Abbiate pazienza, ma sono EONI che non uso piu' il basic dello spectrum, 
> pensate che tengo il manuale aperto accanto alla tastiera. :)
> 
> 
> hihihi:D
> Come mi diverto con poco.. :D
> 
> Bau
> BBK
>

Other related posts: