04-11-2005, 03:38 AM
no that was a question, I really don't. :-?
i]"But...it was so beautifully done"[/i]
Sound Wave Bar.....
|
04-11-2005, 03:38 AM
no that was a question, I really don't. :-?
i]"But...it was so beautifully done"[/i]
04-12-2005, 05:11 AM
You serious? I broke apart the code, it looks more like ya ment it, or saw what it was doing and centered it... but its right here thats doing it...
PSET (((i% + amp) * SIN(r% * 3.141593 / 180)) + 160, ((r% + amp) * SIN(i% * 3.141593 / 180)) + 100), (i% MOD 255) And this seems to be the code you might have been shooting for.. :wink: Code: SCREEN 13 Your orrig still counts, except its under both you and Shift's, since he modified it to 8 lines 4 ya... :wink:
04-13-2005, 01:27 AM
No your wrong.
That was intentional what I did (it was a ripple effect) But then I decided to switch the radii and make both sin instead of x cos and y sin. Then I saw it looked like your thing in here so I posted it. But I was asking why it was looking 3D. :wink:
i]"But...it was so beautifully done"[/i]
04-16-2005, 01:06 AM
Thought you might find this interesting
Found it in the old ABC packets: [syntax="qbasic"] DEFINT D, G DEFLNG H SCREEN 12 CLS OPEN "c:\windows\media\ding.wav" FOR BINARY AS #1 s = 45 g = 0 d = 0 px = 0 py = 240 np = 0 ns = 5 WHILE NOT (EOF(1)) AND s < 300000 c = 0 h = 0 WHILE c < ns GET 1, s, g g = ABS(g MOD 256) h = h + g s = s + 1 c = c + 1 IF EOF(1) THEN END WEND h = h / ns LINE (np, h + 112)-(px, py) PSET (np, 240), 2 py = h + 112 px = np np = np + 1 IF np > 640 THEN np = 0: SLEEP: CLS : px = 0 WEND [/syntax] Needless to say Windows 2k/XP users might need to change the path to winnt\media\ . [/code]
04-16-2005, 02:06 PM
Have you actually run it? It doesn't play sound. It displays WAV files in a graphical form.
04-16-2005, 02:47 PM
Quote:Mabey in FB but the default in QB is SCREEN 0, which is text mode. I was using qb 4.5
url=http://www.sloganizer.net/en/][/url]
04-16-2005, 03:55 PM
You must have hit F5 after you deleted the SCREEN 13, instead of shift+F5 to restart it.
04-16-2005, 04:03 PM
No, i didn't. Hmm, maybe qb bugged a little or something and didn't restaert even though i told it to.
Well, i don't have qb to worry about anymore. i now am a part of the FB community. Porting the forest demo is going to be a HELL load of work.
url=http://www.sloganizer.net/en/][/url]
|
« Next Oldest | Next Newest »
|