Cha0s wanted...

[Josiah Tobin]

...For me to post this for him.
http://members.aol.com/rubentbstk/matrices.zip Left click to repel, right click to attract. Have fun, I sure as hell did. :lol:

[SSC]

heh, thats hella cool ^^

[phycowelder]

thats cool man!
impressive

[Anonymous]

thanks :p

[Jocke The Beast]

Neato

[relsoft]

Nize!

[Dio]

very nice. and just looking at the code made my eyes explode.

[barok]

Nice work! I noticed that the boxes repel in an octagonal pattern.

[Anonymous]

yeah, attract them until you have a solid mass and then repel, you'll see a perfect octagon. I don't know why that is, but i think its beautiful...


anyways, could someone please tell me what my code is doing? =) i mean of course i know the basics of how it worked, but i don't know the math "terms". for example what is this:

Code:

Function matrix2_MidPoint( m As matrix2_Binary ) As matrix2
  
  Dim As matrix2 ret
  matrix2_Init( Varptr( ret ), m.x.id )
  
  Select Case ret.id

    Case EVAR_i
      ret.x.i = ( m.x.x.i + ( m.y.x.i * .5 ) )
      ret.y.i = ( m.x.y.i + ( m.y.y.i * .5 ) )
      
    Case EVAR_d
      ret.x.d = ( m.x.x.d + ( m.y.x.d * .5 ) )
      ret.y.d = ( m.x.y.d + ( m.y.y.d * .5 ) )
      
  
  End Select
  
  Return ret
  
End Function

i know theres probably some term besides "midpoint" :-? :-?

[Torahteen]

You're not only attracting the squares, but you're acting like a big black hole. When they get to your mouse, they disappear and reapper on the outside. If you hold down the right mouse button(attract), and go around the outside, it keeps all of them inside the boundries but away from your mouse.