Clock 2

+ 0 likes

Please Register to submit score.

Average Score	7.3
Scores Submitted	3
Date Added	Jul 20, 2008
Last Updated	Jul 20, 2008

Introduction

For the heck of it, I made an entirely new version of Clock. It's now a lot cleaner and smoother.

Grab the Code

;Clock 2.0
;Made by BlueThen on July 20, 2008
;To install, paste this snippet in your remotes (Alt + R)
;Then type /clock2 or right click the channel or status and click "Clock2".
alias clock2 { echo -a Clock 2 made by BlueThen ( http://www.bluethen.com/ for more scripts and snippets )
  window -paozCdk0 +ndL @Clock2 -1 -1 150 150 | window -paohCzdk0 +ndL @clock2.buf -1 -1 800 800 | unset %clock2.c | clock2.frame
}
menu channel,status {
  Clock 2: clock2
}
alias clock2.frame {
  if (%clock2.c != y) {
    clear @clock2.buf | drawfill -r @clock2.buf $rgb(1,1,1) $rgb(1,1,1) 1 1 | drawdot @clock2.buf 1 300 400 450
    drawdot -r @clock2.buf $rgb(150,100,0) 290 400 450 | drawline @clock2.buf 1 7 0 100 1000 100
    drawfill -r @clock2.buf $rgb(120,70,0) $rgb(0,0,0) 1 1 | drawline -r @clock2.buf 1 7 670 100 670 -100
    drawrect -rf @clock2.buf $rgb(130,80,10) 1 670 0 300 100 | drawtext @clock2.buf 1 Tahoma 100 697 -18 ×
    %clock2.xy = 12
    while (%clock2.xy) {
      if (. isin $calc(%clock2.xy /3)) {
        drawdot -r @clock2.buf $rgb(100,50,0) 8 $calc(400 + (270 * $cos($calc(30 * %clock2.xy)).deg)) $calc(450 + (270 * $sin($calc(30 * %clock2.xy)).deg))
      }
      else {
        drawtext -r @clock2.buf $rgb(100,50,0) Tahoma 80 $calc((400 + (240 * $cos($calc((%clock2.xy * 30) -90)).deg)) - ($width(%clock2.xy ,Tahoma,80) /2)) $calc((450 + (240 * $sin($calc((30* %clock2.xy)-90)).deg)) - ($height(%clock2.xy ,Tahoma,80) /2)) %clock2.xy
      }
      dec %clock2.xy
    }
    drawline -r @clock2.buf $rgb(100,50,0) 8 400 450 $calc(400 +(200 * $cos($calc((6 * $asctime(s)) - 90)).deg)) $calc(450 +(200 * $sin($calc((6 * $asctime(s)) - 90)).deg))
    drawline -r @clock2.buf $rgb(100,50,0) 12 400 450 $calc(400 +(200 * $cos($calc((6 * $asctime(n)) - 90)).deg)) $calc(450 +(200 * $sin($calc((6 * $asctime(n)) - 90)).deg))
    drawline -r @clock2.buf $rgb(100,50,0) 16 400 450 $calc(400 +(150 * $cos($calc((30 * $asctime(h)) - 90)).deg)) $calc(450 +(150 * $sin($calc((30 * $asctime(h)) - 90)).deg))
    drawtext -r @clock2.buf $rgb(80,30,0) Tahoma 80 30 0 $asctime(h:nn:ss TT)
    drawcopy -m @clock2.buf 0 0 800 800 @clock2 0 0 150 150 | .timer 1 1 clock2.frame
  }
  else unset %clock2.c
}
on *:close:@clock2: clock2.close
menu @clock2 {
  sclick: {
    if ($calc($mouse.y * 5.3333) < 100) {
      if ($calc($mouse.x * 5.3333) > 670) clock2.close
      else {
        set %clock2.dx $calc($window(@clock2).dx - $mouse.dx)
        set %clock2.dy $calc($window(@clock2).dy - $mouse.dy) | .timermove -h 0 0 clock2.move 
      }
    } 
  }
  uclick: { .timermove off }
  leave: { .timermove off }
}
alias -l clock2.move window @clock2 $calc($mouse.dx + %clock2.dx) $calc($mouse.dy + %clock2.dy)
alias -l clock2.close unset %clock2.* | set %clock2.c y | if ($window(@clock2)) window -c @clock2 | window -c @clock2.buf

Comments

(17) RSS

Go to Bottom

napa182

Comments: 924

mIRC Snippet: Clock 2
Posted on Jul 20, 2008 9:32 pm

nice work BlueThen, but why didnt you just update ur old version of ur clock instead of posting a new Snippet?

Comments: 1,027

mIRC Snippet: Clock 2
Posted on Jul 20, 2008 9:48 pm

Ugliest fukin color BT.`-.-´

napa182

Comments: 924

mIRC Snippet: Clock 2
Posted on Jul 20, 2008 9:52 pm

yeah the color blows

BlueThen

Comments: 301

mIRC Snippet: Clock 2
Posted on Jul 20, 2008 10:12 pm

It's not an update, it's an entirely new version.

I tried making it look... wooden. :(

Comments: 1,027

mIRC Snippet: Clock 2
Posted on Jul 20, 2008 10:15 pm

ROFL oh i see well it looks like shiit.Still works fine tho well done.`-.-´

BlueThen

Comments: 301

mIRC Snippet: Clock 2
Posted on Jul 20, 2008 10:17 pm

well, what color should I make it?

Comments: 1,027

mIRC Snippet: Clock 2
Posted on Jul 20, 2008 10:38 pm

Make it optional;p

BlueThen

Comments: 301

mIRC Snippet: Clock 2
Posted on Jul 20, 2008 10:39 pm

That only makes my life more difficult. :(

Comments: 1,027

mIRC Snippet: Clock 2
Posted on Jul 20, 2008 10:42 pm

Well do it for US then BT...for US!.`-.-´

Xpl0reR

Comments: 73

mIRC Snippet: Clock 2
Posted on Jul 21, 2008 1:54 pm

this looks like an old southpark kitchen clock LMAO

Xpl0reR

Comments: 73

mIRC Snippet: Clock 2
Posted on Jul 21, 2008 1:55 pm

its still cool :)

but it would be more cool if you could make it minimise WITH mirc

and when you bring the window back up well open the clock back up.

and for the colors, can i suggest a good old black and white.

( school clocks ) :)

jonesy44

Comments: 785

mIRC Snippet: Clock 2
Posted on Jul 21, 2008 1:58 pm

Lmao!!
Kinda agree with that lol

Make it optional bluethen.. It itll be the easiest part of the script

BlueThen

Comments: 301

mIRC Snippet: Clock 2
Posted on Jul 21, 2008 3:40 pm

:/ So how should I do it? click and it changes settings, or have a seperate dialog...

DaNzO

Comments: 76

mIRC Snippet: Clock 2
Posted on Jul 21, 2008 5:43 pm

Make a dialog, Like, /ClockSettings - It'll bring up a dialog with settings you can do,

Change the time zone, change the color, change the style... More work i know, It'll be worth it in the long run. :)

H_M

Comments: 22

mIRC Snippet: Clock 2
Posted on Jul 26, 2008 3:39 pm

It's nice, but not useful at all............................................ 6/10

BlueThen

Comments: 301

mIRC Snippet: Clock 2
Posted on Jul 26, 2008 3:46 pm

It tells the time. :(

Eugenio

Comments: 722

mIRC Snippet: Clock 2
Posted on Jul 26, 2008 4:59 pm

lol
and yeah its 6/10

Clock 2

Introduction

Grab the Code

Comments

BlueThen

My Snippet Tags

Contact

Friends (9)

Sponsors

		Everything and Anything (8th Grade)
Last seen: Aug 21, 2008 Profile \| Website Friends (9) Scripts (1) Snippets (38) Images (45) Comments Received (592) Comments Submitted (301) Forum Posts (105)