il mio primo programma

[dev/null]

siccome nn ho spazio web vi posto il sorgente del mio primo programma in basic, è stupido ma l'ho fatto da solo ed è abbastanza simpatico:
(se la pensate come me tra ferrari e porsche )

.start
number=Input ("Ciao vota la Ferrari da 1 a 10 hehe!")
number2=Input ("Ora vota la Porsche e aspetta un secondo!")
If number > number2 Print "Quindi pensi che la Ferrari sia la migliore vero?
If number > number2 Print "Hai ragione!"
If number = number2 Print "Davvero non preferisci nessuna delle 2?"
If number < number2 Print "Ne sei proprio sicuro?
If number < number2 Print "Guarda che la Ferrari è meglio!"
.start2
question1$= Input ("Vuoi riprovare?(si/no)")
If question1$="si" Then Goto startx
If question1$="no" Then Goto start3
If question$<> "si" Or "no" Then Goto start2
.startx
number=Input ("Allora rivota la Ferrari da 1 a 10 hehe!")
number2=Input ("Rivota la Porsche e aspetta un secondo!")
If number > number2 Print "Quindi pensi che la Ferrari sia la migliore vero?
If number > number2 Print "Hai ragione!"
If number = number2 Print "Davvero non preferisci nessuna delle 2?"
If number < number2 Print "Ne sei proprio sicuro?
If number < number2 Print "Guarda che la Ferrari è meglio!"
Goto start2
.start3
question$= Input ("Allora ti è piaciuto il programmino? (si/no)")
If question$="si" Then Print "Grazie sono contento ^_^": Goto start4
If question$="no" Then Print "Blutto cattivo :-(": Goto start4
If question$ <> "yes" Or "no" Then Goto start3Print "Ciao da Max, visita www.gamesurf.it!"
Print "Premi ESC per uscire. Bye!"

.start4
Repeat
VWait
Until KeyHit(1)

[Gogetto]

Come inizio non c'è male, ma invece di fare tutti quegli IF non ti conveniva THEN e END IF?

E poi invece di riscrivere di nuovo la sequenza "sei sicuro? la ferrari è meglio ecc..." potevi fare una funzione unica per tutte e due, ma dato che è la prima volta passi :P

[dev/null]

per l'endif hai ragione
per l'altra cosa nn concordavo più con la frase nell'input è più corretto grammaticalmente nn ripetere ciao e mettere rivota invece di vota

[Evil Gorunks]

ragazzi,ho uppato il programma di max...eccolo!!

[Gogetto]

per l'endif hai ragione
per l'altra cosa nn concordavo più con la frase nell'input è più corretto grammaticalmente nn ripetere ciao e mettere rivota invece di vota

Guarda questa parte:

If number > number2 Print "Quindi pensi che la Ferrari sia la migliore vero?
If number > number2 Print "Hai ragione!"
If number = number2 Print "Davvero non preferisci nessuna delle 2?"
If number < number2 Print "Ne sei proprio sicuro?
If number < number2 Print "Guarda che la Ferrari è meglio!"

E' identica in 2 parti del programma, potevi riassumerla in un unica funzione, è questo che intendevo

[dev/null]

ah si però devo fare pratica ancora e ho preferito fare copia incolla

[Gogetto]

Ad essere pignoli, premi ESC per uscire mi pare inappropriato dato che va bene qualsiasi tasto con KeyHit() (se non sbaglio...) potevi scrivere "Premi un tasto per uscire"

EDIT: ma che roba è Blitz Runtime??

[dev/null]

è il programma che ho usato per farlo: blitz basic

[Evil Gorunks]

l'ho scaricato ora...che bello ^_^

[dev/null]

ho sistemato la ripetizione ora sistemerò gli if

[dev/null]

nn riesco a sistemare usando if then endif