1
QB64 Discussion / Need basic help (pun intended)
« on: June 05, 2020, 06:21:16 pm »
Beginner here, messing around with this simple sequencer. I first posted about not being able to get the sound to stop at the end (after key press), and I *sort of* figured that out. However, it only works when the cycle rate (variable R) is high (slow) enough. For example, it works as intended when cycle rate is 8, but not when .1.
Code: QB64: [Select]
- SCREEN 8
- 1 CLS
- PRINT ""
- PRINT "8 step waveform generator for toned sequences"
- PRINT "or drones at faster speeds (lower cycle)."
- PRINT ""
- PRINT "Input frequencies in Hz from 40 - 16000."
- PRINT ""
- PRINT "Press any key to stop sequence."
- PRINT ""
- SOUND S1, R
- PRINT "Generating Tone A"
- SOUND S2, R
- PRINT "Generating Tone B"
- SOUND S3, R
- PRINT "Generating Tone C"
- SOUND S4, R
- PRINT "Generating Tone D"
- SOUND S5, R
- PRINT "Generating Tone E"
- SOUND S6, R
- PRINT "Generating Tone F"
- SOUND S7, R
- PRINT "Generating Tone G"
- SOUND S8, R
- PRINT "Generating Tone H"
- X = 1
- CASE "Q"
- GOTO 666
- CASE "q"
- GOTO 666
- GOTO 1
- 666 END