Qbasicnews.com

Full Version: PSET Circle!
You're currently viewing a stripped down version of our content. View the full version with proper formatting.
Pages: 1 2 3 4 5 6 7
VERY NICE. how did you come up wiht that? the patterns are great
Smile Thats cool Mitth,. tho it took me awhile to wait for it to work.. :wink:
Accually it was working Rattra, but it was drawing color# 000000 :lol: .

Umm. I was originally trying to rotate Diroga's one by adding an increasing number to the degrees already there each Do loop. But someting happened and it didn't work.

So then I left it there and played with the color max. I then noticed how each number gave a different pattern. So then I just increase that value in the DO:loop.

So that's how I did it. Big Grin
<-- How you like that PSET circle? its what happens when a single pixel is rocketing around 3D cords at 6600+ FPS and shading with RGB(z!, z!, z!)..

:rotfl: :bounce: :rotfl: :bounce: :rotfl:

\/ \/ Click down there \/ \/
Love the avatar!
Big Grin Made it with FB,... :wink: .... :roll:
Oh, I know QB can't handle 500000fps. :lol:
:o No, it would fry! oh no!! :rotfl: :wink:
Just like that artoo pic, eh? BOOM! :lol:
Its a little long and includes : But there's no cos,sin,sqr,* or / just + and -. the fisrt line y=180 changes the radius xoff and yoff move it around the screen.

Code:
SCREEN 12
y = 180: xoff = 280: yoff = 200: x = -1
WHILE x < y
x = x + 1: d = d + x + x + 1
IF d > 0 THEN d = d - y - y + 1: y = y - 1
FOR k = 0 TO 7
IF k AND 4 THEN a = -x ELSE a = x
IF k AND 2 THEN b = -y ELSE b = y
IF k AND 1 THEN SWAP a, b
PSET (a + xoff, b + yoff)
NEXT k
WEND
Pages: 1 2 3 4 5 6 7