Thread Rating:
  • 0 Vote(s) - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
Sound Wave Bar.....
#51
Quote: amps is the volume of sound and not its pitch

Oh, yeah. *slaps self in the face* I can't believe I did that. Oh, well. It still works. I should have made it FREQ instead of AMP.
hat were we arguing about again?
Reply
#52
:lol: Yeah, I've been reading up on sound waves (where I got this idea for a chalange).. ^_^,. yeah, make it wave change in pitch ((Hz)waves per sec), and the SOUND respond to that if you want it simulated.. :wink:
Kevin (x.t.r.GRAPHICS)

[Image: 11895-r.png]
Reply
#53
Hey Rattra, I was bored and now...well....I was playing with graphics again. :lol: what you think?
I could only get it to 11 lines....
[syntax="qbasic"]
SCREEN 13
amp = 10
DO
r% = (r% + 1)
IF r% = 200 THEN r% = -120
FOR i% = 1 TO 360
PSET (((i% + amp) * SIN(r% * 3.141593 / 180)) + 160, ((r% + amp) * SIN(i% * 3.141593 / 180)) + 100), (i% MOD 255)
NEXT i%
WAIT &H3DA, 8
CLS
LOOP
[/syntax]
i]"But...it was so beautifully done"[/i]
Reply
#54
Cool, Mitth. Smile
img]http://www.cdsoft.co.uk/misc/shiftlynx.png[/img]
Reply
#55
Quote:Hey Rattra, I was bored and now...well....I was playing with graphics again. :lol: what you think?
I could only get it to 11 lines....
[syntax="qbasic"]
SCREEN 13
amp = 10
DO
r% = (r% + 1)
IF r% = 200 THEN r% = -120
FOR i% = 1 TO 360
PSET (((i% + amp) * SIN(r% * 3.141593 / 180)) + 160, ((r% + amp) * SIN(i% * 3.141593 / 180)) + 100), (i% MOD 255)
NEXT i%
WAIT &H3DA, 8
CLS
LOOP
[/syntax]

Hey, mith, i removed the screen 13 and it worked fine, so i guess you could have done it in 10 lines
url=http://www.sloganizer.net/en/][Image: style4,TheDarkJay.png][/url]
Reply
#56
Mabey in FB but the default in QB is SCREEN 0, which is text mode.

The graphics statements like PSET don't work in text mode.

thnx lynax. Big Grin
i]"But...it was so beautifully done"[/i]
Reply
#57
Quote:I could only get it to 11 lines....
[syntax="qbasic"]
SCREEN 13
amp = 10
DO
r% = (r% + 1)
IF r% = 200 THEN r% = -120
FOR i% = 1 TO 360
PSET (((i% + amp) * SIN(r% * 3.141593 / 180)) + 160, ((r% + amp) * SIN(i% * 3.141593 / 180)) + 100), (i% MOD 255)
NEXT i%
WAIT &H3DA, 8
CLS
LOOP
[/syntax]

Taken down to 8:-

[syntax="QBASIC"]
1 IF amp = 0 THEN SCREEN 13 ELSE CLS
2 amp = 10
3 IF r% = 200 THEN r% = -120 ELSE r% = r% + 1
4 FOR i% = 1 TO 360
5 PSET (((i% + amp) * SIN(r% * 3.141593 / 180)) + 160, ((r% + amp) * SIN(i% * 3.141593 / 180)) + 100), (i% MOD 255)
6 NEXT i%
7 WAIT &H3DA, 8
8 GOTO 1
[/syntax]
img]http://www.cdsoft.co.uk/misc/shiftlynx.png[/img]
Reply
#58
:o Whoa! That's alsome, Mitth!!! Big Grin The wave just reaches out of the screen almost! :wink:
Kevin (x.t.r.GRAPHICS)

[Image: 11895-r.png]
Reply
#59
Ya, thnx, can anyone tell me why it 'looks' 3D?
i]"But...it was so beautifully done"[/i]
Reply
#60
^_^ Do you? Me? No, not atm... :wink:
Kevin (x.t.r.GRAPHICS)

[Image: 11895-r.png]
Reply


Forum Jump:


Users browsing this thread: 1 Guest(s)