@knoeki: i dont speak english verry well but look at my comments

if u want u can use one comand for not use 2 like "inc" "dec" u can use "var"

so i told "if u want" and i never tell people how to do but that can learn u more
i was like u and i learn where is the problem?

anyway i'll comment always your post and if u wanna do like FordLawnmower no problem but read it before cz that can learn u somme thing and that's not bad :)

Hey. Lets not argue. I appreciate any feedback, especially WorldDMT\'s. Sure he sounds like a douche when he talks about it, but it\'s very constructive, if anything.

[quote]WorldDMT should stop tooting his own useless horn and post a script

do u see any thing not good about my comments?[/quote]

yes. for example, constantly telling people how to do it differently. Seriously, even if you know it better, there's no need to keep telling people HOW to do it, you can also just give some tips or shut up, whatever suits you best.

Right now you just come across to me as a wiseass with an obession of proving his superiority.

@tv3636

inc %sphere.t
dec %sphere.y

can be one commande also like this

var %sphere.t %sphere.t + 1,%sphere.y %sphere.y - 1

here we have one commande not 2 is a little faster wen i changed all that thing u can see the difference

the time of execution for his code is between 172 - 187 ticks or mine is 140 - 156

is faster :)

@FordLawnmower:

WorldDMT should stop tooting his own useless horn and post a script

do u see any thing not good about my comments?

Alright, I wasn't aware they actually slowed things down. Regardless, having the var setting on one line versus two should not make a difference, should it?

I hate pipes. Thanks John Smith. That must have taken all of 5 minutes ;/

I found that pipes (|) can slow down your script drastically.

inc %sphere.t
dec %sphere.y

can be one commande also like this

var %sphere.t %sphere.t + 1,%sphere.y %sphere.y - 1
How is that better in any way? The computer is still performing the same processes, you're just saving a line. You could also just do inc %sphere.t | dec %sphere.y but it doesn't matter at all.

FordLawnmower: WorldDMT has posted a script. http://www.hawkee.com/snippet/6149/

Thanks for the feedback. I'll look into it, WorldDMT.

He's just picking at it with personal preferences, although I agree that you have to free the hashtables.
These 9 mile long workshops do nothing more than take away from the hard work that the actual scripter did. WorldDMT should stop tooting his own useless horn and post a script!!

Someone correcting BT's codes? Jesus christ.

hi

for %sphere.a, and %sphere.a2

no need to set it 0 the "inc", and "set" command into alias sphere.frame will set it, and wen u close the windows, that will unset so u can remove it

for %sphere.t,%sphere.x, and %sphere.y set it local

var %sphere.t 1,%sphere.x 15,%sphere.y 15

for %sphere.tok u can do this

set %sphere.tok tokenize 32 $regsubex($str(.,225),/./g,\n $+ $chr(32))

and no need to set it, put it directly into the alias sphere.frame

if u want u can use one comand for not use 2 like "inc" "dec" u can use "var"

so

inc %sphere.t
dec %sphere.y

can be one commande also like this 

var %sphere.t %sphere.t + 1,%sphere.y %sphere.y - 1

and finaly dont forget to remove hash tables hfree x/y

so your code can be like this

menu channel,status {
  Sphere:sphere
}
alias sphere {
  window -paoCzdk0 +tnbL @Sphere -1 -1 400 400
  var %sphere.t 1,%sphere.x 15,%sphere.y 15
  while %sphere.x {
    while %sphere.y {
      hadd -m X %sphere.t %sphere.x
      hadd -m Y %sphere.t %sphere.y
      var %sphere.t %sphere.t + 1,%sphere.y %sphere.y - 1
    }
    dec %sphere.x
  }
  sphere.frame
}
alias -l sphere.frame {
  if ($window(@sphere)) {
    clear -n @sphere
    drawfill -n @sphere 1 1 1 1
    tokenize 32 $regsubex($str(.,225),/./g,\n $+ $chr(32))
    scon -r .!drawdot -nr @sphere $!rgb( $!calc( 143+( $* /2)), $!calc( 143+( $* /2)), $!calc(143+ ( $* /2))) 1 $!sphere.iso( $!calc( (7.5- $!hget(Y, $* ))*15* $!cos( $!calc( $!hget(X, $* )*24+ %sphere.a )).deg), $!calc( 75* $!sin( $!calc( $!hget(Y, $* )*24)).deg), $!calc( (7.5- $!hget(Y, $* ))*15* $!sin( $!calc( $!hget(X, $* )*24+ %sphere.a )).deg))
    set %sphere.a $calc(100 * $sin(%sphere.a2).deg)
    inc %sphere.a2 4
    drawline @sphere
    .timer 1 0 sphere.frame
  }
  else {
    unset %sphere.a*
    hfree x
    hfree y
  }
}
alias -l sphere.iso return $calc(($1 - $3)*0.866+200) $calc(($1 + $3)*0.5- $2 +200)

"I might release some documentation explaining all my algorithms. Don't know if anyone'd be interested though."

I surely would be.

Pretty neat BT, Not sure if i could even read your math skillz but you should post it for the hell of it.

Hey BlueThen. Another cool snippet.
I've recently taken a brief look at trigonometry and I've gotten down some of the basics (cosine, sine, tangent, and their opposites); and yeah, it's quite interesting.
However, I haven't actually started making picture window animations/games yet, but they seem to be a fine challenge. :d
And to answer your question, I think it'd be a good idea to release your documentation of algorithms.