Un piccolo programma in Decimal Basic per generare musica casuale con l'altoparlantino del p.c. (tappatevi le orecchie)
!'premere spazio per terminare
DO
LET x=50+INT(RND*100)
CHARACTER INPUT nowait: $\;e$$
LOOP UNTIL e$=" "
END
Musica casuale
Moderatori: Gianfranco, Bruno
Questo forum è una sezione del PORTALE DI BASE CINQUE
Musica casuale
Ultima modifica di Pasquale il mar ott 23, 2018 8:45 pm, modificato 11 volte in totale.
_________________
$\text { }$ciao ciao
E' la somma che fa il totale (Totò)
$\text { }$ciao ciao
E' la somma che fa il totale (Totò)
Re: Musica casuale
A proposito del Decimal Basic, ripropongo il vecchio programmino qui sopra, aggiornato ai mutati gusti musicali, che spero utile per tutti i Basecinquini che dovessero soffrire di insonnia :
!'premere spazio per terminare
RANDOMIZE
do
LET a=35+INT(RND*30)
LET b=60+INT(RND*30)
LET x=a+b
beep 9*x,7*x
CHARACTER INPUT nowait: $\;e$$
LOOP UNTIL e$=" "
END
!'premere spazio per terminare
RANDOMIZE
do
LET a=35+INT(RND*30)
LET b=60+INT(RND*30)
LET x=a+b
beep 9*x,7*x
CHARACTER INPUT nowait: $\;e$$
LOOP UNTIL e$=" "
END
_________________
$\text { }$ciao ciao
E' la somma che fa il totale (Totò)
$\text { }$ciao ciao
E' la somma che fa il totale (Totò)
Re: Musica casuale
Naturalmente:
CHARACTER INPUT nowait: $\;e$$
è
CHARACTER INPUT nowait: e$
(lo chiarisco perché facendo un copia&incolla si è alterato il codice).
Le zanzare e le mosche, in confronto, sono gradevoli
CHARACTER INPUT nowait: $\;e$$
è
CHARACTER INPUT nowait: e$
(lo chiarisco perché facendo un copia&incolla si è alterato il codice).
Le zanzare e le mosche, in confronto, sono gradevoli
(Bruno)
...........................
Invisibile un vento
l'ha apena sfioragia
sospension d'un momento;
e la bola iridessente gera 'ndagia.
{Biagio Marin}
................................................................
Meglio soluzioni sbagliate che risposte esatte.
{Rudi Mathematici}
...........................
Invisibile un vento
l'ha apena sfioragia
sospension d'un momento;
e la bola iridessente gera 'ndagia.
{Biagio Marin}
................................................................
Meglio soluzioni sbagliate che risposte esatte.
{Rudi Mathematici}
Re: Musica casuale
Si Bruno, hai fatto bene. Volevo scriverlo, ma poi l'ho dimenticato.
Non so perché, ma l'ho dovuto scrivere così, perché non c'era verso di farlo apparire in modo corretto al momento dell'invio.
Stasera mi è invece riuscito. Boh !
Ad ogni modo, ogni volta che si lancia la routine, la musica cambia. Chissà che nel tempo non venga fuori una bella melodia completa? Direi di provare e riprovare.
Non so perché, ma l'ho dovuto scrivere così, perché non c'era verso di farlo apparire in modo corretto al momento dell'invio.
Stasera mi è invece riuscito. Boh !
Ad ogni modo, ogni volta che si lancia la routine, la musica cambia. Chissà che nel tempo non venga fuori una bella melodia completa? Direi di provare e riprovare.
_________________
$\text { }$ciao ciao
E' la somma che fa il totale (Totò)
$\text { }$ciao ciao
E' la somma che fa il totale (Totò)