+- Qbasicnews.com (http://qbasicnews.com/newforum)
+-- Forum: QbasicNews.Com (http://qbasicnews.com/newforum/forum-3.html)
+--- Forum: Challenges (http://qbasicnews.com/newforum/forum-10.html)
+--- Thread: PSET Circle! (/thread-6492.html)
PSET Circle! - Diroga - 03-25-2005
VERY NICE. how did you come up wiht that? the patterns are great
PSET Circle! - Rattrapmax6 - 03-26-2005
Thats cool Mitth,. tho it took me awhile to wait for it to work.. :wink:
PSET Circle! - Mitthrawnuruodo - 03-26-2005
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.
PSET Circle! - Rattrapmax6 - 03-26-2005
<-- 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 \/ \/
PSET Circle! - Mitthrawnuruodo - 03-26-2005
Love the avatar!
PSET Circle! - Rattrapmax6 - 03-26-2005
Made it with FB,... :wink: .... :roll:
PSET Circle! - Mitthrawnuruodo - 03-26-2005
Oh, I know QB can't handle 500000fps. :lol:
PSET Circle! - Rattrapmax6 - 03-26-2005
:o No, it would fry! oh no!! :rotfl: :wink:
PSET Circle! - Mitthrawnuruodo - 03-26-2005
Just like that artoo pic, eh? BOOM! :lol:
Circle without using cos,sin,sqr,*,/ - Quibbler - 05-24-2005
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