Thread Rating:
  • 0 Vote(s) - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
A Beautiful accident! Weird, take a look..
#1
Big Grin I was doing my normal playing with some new code, in this case 3D stuff, when by complete accident made a really, really beautiful effect..

Its one PSET flying around the screen at 6600 FPS.....

Hard to explain, just watch, Enjoy!!...

Code:
SCREEN 19, 32, 2, 1

x! = 150
y! = 150
z! = 150

centx = 400
centy = 300
LENS = 256 ' centz

ax = 0
ay = 0
az = 0
T! = TIMER
DO
   press$ = INKEY$

   rx! = ax * 3.14/180
   ry! = ay * 3.14/180
   rz! = az * 3.14/180
   cx! = COS(rx!)
   sx! = SIN(rx!)
   cy! = COS(ry!)
   sy! = SIN(ry!)
   cz! = COS(rz!)
   sz! = SIN(rz!)
  

   ny! = (y! * cx!)-(z! * sx!)
   nz! = (z! * cx!)+(y! * sx!)
   y! = ny!
   z! = nz!
   nz! = (z! * cy!)-(x! * sy!)
   nx! = (x! * cy!)+(z! * sy!)
   x! = nx!
   nx! = (x! * cz!)-(y! * sz!)
   ny! = (y! * cz!)+(x! * sz!)
  
   ay = (ay + 1) MOD 360
   ax = (ax + 1) MOD 360
   az = (az + 1) MOD 360

   PSET (centx + nx!, centy - ny!), RGB(z!, z!, z! )
   F = F + 1
LOOP UNTIL press$ = CHR$(27)
PRINT "Average FPS:"; F / (TIMER - T!)
SLEEP
Kevin (x.t.r.GRAPHICS)

[Image: 11895-r.png]
Reply
#2
Could you speed this up a little bit? I mean, I'm only getting (according to your calculations) just over 466000 fps. :-)
Reply
#3
Sorry, I turned off Bionic and got over 555000 fps.... geez, only half a million fps. Big Grin
Reply
#4
Cry Common, you making my comp sound slow... :rotfl:

Heh, only thing I can do is slow it down, hmm,... bet it really looks pretty at that speed... :wink:
Kevin (x.t.r.GRAPHICS)

[Image: 11895-r.png]
Reply
#5
Actually, it just looks like a still image that flickers.
Reply
#6
Awesome :o

i got like 60000 fps... amazing you can do that with a single dot!!


fb's speed makes my brain hurt
Reply
#7
can someone post a screenie for non-windows users? Big Grin
Reply
#8
*snip!*

only like 30k fps with a bunch of stuff running (pity =P)
Reply
#9
cha0s you get a slow transition dam would look alot cooler like that i'm at the last stage when the thing starts up Smile
Reply
#10
arrh sometimes bein on a slow comp is nice :D
Reply


Forum Jump:


Users browsing this thread: 1 Guest(s)