 Notice. New forum software under development. It's going to miss a few functions and look a bit ugly for a while, but I'm working on it full time now as the old forum was too unstable. Couple days, all good. If you notice any issues, please contact me. |
Forum Index : Microcontroller and PC projects : ******* Acme Instrumentation ********
| Author | Message | ||||
hitsware2 Guru  Joined: 03/08/2019 Location: United StatesPosts: 734 |
'sound f=1000: v=50: goto display freqgen: do while keydown(1)=0: loop if keydown(1)=27 then end if keydown(1)=128 then v=v+1 if keydown(1)=129 then v=v-1 if keydown(1)=131 then f=f+1 if keydown(1)=130 then f=f-1 if v > 100 then v=100 if v < 0 then v=0 if f > 20000 then f=20000 if f < 1 then f=1 display: cls text 300,225,"left-right arrows for frequency",,4 text 300,250," up-down arrows for level",,4 text 400,275,"frequency",,4 text 500,275,str$(f),,4 text 400,300,"level",,4 text 520,300,str$(v),,4 pause 100: play tone f,f: play volume v,v goto freqgen my site |
||||
 Print this page |
 |
The Back Shed's forum code is written, and hosted, in Australia. | © JAQ Software 2025 |
