Suono del telefono

« Older Newer »

max_400

Posted on 4/5/2012, 03:03

Suono del telefono
Cambiando quella coppia di numeri cambia il tipo di suono

telefonobas

telefono.bas

CODICE

5 CLS
10 FOR A = 1 TO 18
20 SOUND (800), 1: SOUND (600), 1
30 NEXT A
FOR g = 1 TO 70: NEXT g
40 FOR B = 1 TO 215000: NEXT B: GOTO 10

telefono2.bas

CODICE

5 CLS
10 FOR A = 1 TO 12
20 SOUND (900), 2: SOUND (1200), 1
30 NEXT A
FOR g = 1 TO 30: NEXT g
40 FOR B = 1 TO 215000: NEXT B: GOTO 10

telefono3.bas

CODICE

5 CLS
10 FOR A = 1 TO 12
20 SOUND (500), 1: SOUND (750), 2
30 NEXT A
FOR g = 1 TO 30: NEXT g
40 FOR B = 1 TO 215000: NEXT B: GOTO 10

3 tipi di suoni

metto in allegato i 2 file necessari per il qbasic (1 .exe 1 .ini) e
3 file .bas del suono del telefono.

io l'ho provato dal desktop, cioè sempre dal dos.
si cambia cartella con cd desktop
e si avvia con qbasic telefono.bas
per interrompere CTRL + PAUSA

Download attachment
qbasic_e_telefono_bas.rar ( Number of downloads: 36 )

0 replies since 4/5/2012, 03:03 247 views