gex animation

By Gex on Jan 24, 2006

lil animation ive made..load it to ur remotes and write /gex

alias gradient {
  set %m 0
  .timer -m  0 0.1 go
}
alias go {
  drawline -r @hawkee.com $rgb(5,47,140) 15 800 0 0  %m 
  inc %m 20
}
alias go2 { 
  drawline -r @hawkee.com $rgb(54,150,255) 25 800 0 0  %n 
  inc %n 15
}
alias unsetter {
  unset %int 
  unset %int2 
  unset %int3 
  unset %int4 
  unset %int5 
  unset %inte 
  unset %inte2 
  unset %inte3 
  unset %inte4 
  unset %intx 
  unset %intx2 
  unset %intx3 
  unset %intx4 
  unset %m
  unset %n
  window -c @hawkee.com | echo -a thanks for trying the animation. /unload.animation  to unload the script. 
  .timers off
}
alias unload.animation {
  echo -a Unloaded! thanks for trying the animation by Gex.
  .unload -rs " $+ $script $+ "

}
on *:load {
  echo -a  Loaded! thanks for trying the animation. write /gex to start using the addy
}

alias gex {
  window -Cdpk +bl @hawkee.com 170 100 638 500
  gradient
  set %int 200
  set %int2 300
  set %int3 100
  set %int4 300
  set %int5 200
  set %inte 300
  set %inte2 250
  set %inte3 250
  set %inte4 250
  set %intx 400
  set %intx2 180
  set %intx3 400
  set %intx4 300
  .timerz 1 1 .timerx -m 0 40 aliax 

}
alias aliax {
  dec %int 5
  if (%int > 100) {

    drawdot -r @hawkee.com $rgb(188,188,188) 10 %int 300 
  }
  else { 
    if (%int2 > 180) {
      dec %int2 5
      drawdot -r @hawkee.com $rgb(188,188,188) 10 100 %int2
    }
    else {

      if (%int3 < 200) {
        inc %int3 5
        drawdot -r @hawkee.com $rgb(188,188,188) 10 %int3 180 
      }
      else {
        if (%int4 > 250) {
          dec %int4 5
          drawdot -r @hawkee.com $rgb(188,188,188) 10  200 %int4
        } 
        else { 
          if (%int5 > 150) {
            dec %int5 5
            drawdot -r @hawkee.com $rgb(188,188,188) 10 %int5 250
          }
          else { 
            if (%inte2 < 350) {
              inc %inte2 5
              drawdot -r @hawkee.com $rgb(188,188,188) 10 %inte2 300
            }
            else {
              if (%inte > 180) {
                dec %inte 5
                drawdot -r @hawkee.com $rgb(188,188,188) 10 250 %inte
              }
              else {
                if (%inte3 < 350) {
                  inc %inte3 5
                  drawdot -r @hawkee.com $rgb(188,188,188) 10 %inte3 180
                }

                else {
                  if (%inte4 < 330) {
                    inc %inte4 5
                    drawdot -r @hawkee.com $rgb(188,188,188) 10 %inte4 250
                  }
                  else {
                    if (%intx < 510) && (%intx2 < 300) {
                      inc %intx 5
                      inc %intx2 5
                      /drawdot -r @hawkee.com $rgb(188,188,188) 10 %intx %intx2
                    }
                    else {
                      if (%intx3 < 510) && (%intx4 > 180) {
                        inc %intx3 5
                        dec %intx4 5
                        drawdot -r @hawkee.com $rgb(188,188,188) 10 %intx3 %intx4
                      }
                      else { set %n 0 | .timer -m 0 0.1 go2 | .timer 1 5 unsetter  }
                    }
                  }
                }
              }
            }
          }
        }
      }
    }
  }
}

Comments

Sign in to comment.
Gex   -  Apr 28, 2010

I miss those days, I can't remember how did I code this lol.

 Respond  
jakobLUVSpizza   -  Oct 21, 2008

THATS AWESOME!!!!!!!!

 Respond  
`Kazuma   -  Jan 31, 2006

Never seen rgb values like this, or like this. Very good job.

 Respond  
Yoinx   -  Jan 26, 2006

Also. for your unsets.... They support wildcards.
unset %int*

 Respond  
Gex   -  Jan 26, 2006

yeppers :) the winamp is mine :P .. ive just pmed hawkee to delete the older user :)

 Respond  
No0ne   -  Jan 25, 2006

Haha.

 Respond  
xDaeMoN   -  Jan 25, 2006

@ Gex, are you also known as XpLoiTeR? Just curious.

 Respond  
Gex   -  Jan 25, 2006

NoOne its simple needs a lil knowledge of physics,mathmatics,co-ordinates,,, here is the clue ,, /help /drawdot :P

 Respond  
No0ne   -  Jan 24, 2006

Neat. No clue on how to code something like this. But good job.

 Respond  
Gex   -  Jan 24, 2006

lol okay

 Respond  
Yoinx   -  Jan 24, 2006

Hmm I\'d have to say it was good.... However, I wasnt sure what it meant it was unloading by \"unload the addy\". I generally dont put everything in one script file, so I was kinda upset when it unloaded my test script file. :p Nice though. But, make that say something like \"unload the script\"

 Respond  
Are you sure you want to unfollow this person?
Are you sure you want to delete this?
Click "Unsubscribe" to stop receiving notices pertaining to this post.
Click "Subscribe" to resume notices pertaining to this post.