Top
Home > Code Snippets > rhasttaff's Snippets > mIRC

Rasta Toolbar


mIRC Code
+ 2 likes
Please Register to submit score.
Bookmark and Share
Average Score  7.3 (of 3 scores)
Date Added  Aug 18, 2008
Last Updated  Aug 22, 2008
Tags  toolbar 

Introduction


Hello!!!
This is a Toolbar infos created by myself with /toolbar commands, in 4 styles
you can personalize the Transparence, Font-style, Font-Number, Font-Color, Background-font-color and background color on right click mouse in the fire icon of the toolbar
The Colors are based on Mirc-Events colors wher you can see/set typing Alt+K

to take that addon in a separated Path and configurated to read it
you can download the full addon here:[updated Aug 22, 2008 03:00 am] http://rapidshare.com/files/139199992/Rasta-toolbar.rar

and follow the ReadMe.txt

or copy the code below and Paste it in: Alt+R File/New and save as Rasta-toolbar


but in anyway you will need my fire icon.
you can download them here: http://rapidshare.com/files/138380167/Fogo.ico
and PAste them in Mirc Directory
or you can take your own icon and rename them to: Fogo.ico


edit:[Aug 21, 2008 9:49 pm] resolved all events occurred on the below comments.

enjoy! ;)

Grab the Code

;######################################################
;##          RasTa-Toolbar by rhasttaff             ###
;######################################################
;## if you remane anything this can not work!!!     ###
;## and you need some icon as Fogo.ico in mirc dir  ###
;######################################################
;## Thanks to: xKuRt by the preview model :)        ### 
;######################################################
on *:START: {
  if (!$toolbar(Rasta)) { //toolbar -az1 Rasta "click to show the toolbar" fogo.ico "/carrega-tool" @rasta  |  /set %tool-hide off }
}
alias rtool2 {
  .timer_tool-mostra off
  /toolbar -r 
  /set %tool-hide off
  //toolbar -az1 Rasta "click to show the toolbar" fogo.ico "/carrega-tool" @rasta
}
 
on 1:load: {
  if (!%tool-transp) { set %tool-transp 125 }
  if (!%tool-estilo) { set %tool-estilo 1 }
  if (!%tool-cor-letra) { set %tool-cor-letra editbox text }
  if (!%tool-cor-fundo) { set %tool-cor-fundo background }
  if (!%tool-cor-fundo-letra) { set %tool-cor-fundo-letra background }
  if (!%tool-fonte) { set %tool-fonte Fixedsys }
  if (!%tool-tamanho-fonte) { set %tool-tamanho-fonte 11 }
  if (!$toolbar(Rasta)) { //toolbar -az1 Rasta "click to show the toolbar" fogo.ico "/carrega-tool" @rasta }
}
 
on 1:unload: {
  .timer_tool-mostra off
  if (%tool-transp) { unset %tool-transp }
  if (%tool-cor-letra) { unset %tool-cor-letra  }
  if (%tool-cor-fundo) { unset %tool-cor-fundo  }
  if (%tool-cor-fundo-letra) { unset %tool-cor-fundo-letra  }
  if (%tool-fonte) { unset %tool-fonte }
  if (%tool-tamanho-fonte) { unset %tool-tamanho-fonte }
  //toolbar -r
}
menu @rasta {
  $iif(%tool-hide == on,$style(2)) Show Toolbar:/carrega-tool
  $iif(%tool-hide !== on,$style(2)) Hide Toolbar:/rtool2
  -
  $iif(%tool-hide !== on,$style(2)) Options
  .Transparence
  ..Atual %tool-transp $+ :/halt
  ..Change Transparence:/set %tool-transp $$?="load a value from 1 to 250. High Value less transparence" |  /rtool2 | /carrega-tool
  .Styles
  ..$iif(%tool-estilo == 1,$style(1)) Style-1:/set %tool-estilo 1 | /rtool2 | carrega-tool
  ..$iif(%tool-estilo == 2,$style(1)) Style-2:/set %tool-estilo 2 | /rtool2 | carrega-tool
  ..$iif(%tool-estilo == 3,$style(1)) Style-3:/set %tool-estilo 3 | /rtool2 | carrega-tool
  ..$iif(%tool-estilo == 4,$style(1)) Style-4:/set %tool-estilo 4 | /rtool2 | carrega-tool
  ..-
  .Fonts
  ..Font
  ...$iif(%tool-fonte == Fixedsys,$style(1)) Fixedsys:/set %tool-fonte Fixedsys
  ...$iif(%tool-fonte == Tahoma,$style(1)) Tahoma:/set %tool-fonte Tahoma
  ...$iif(%tool-fonte == Arial,$style(1)) Arial:/set %tool-fonte Arial
  ...$iif(%tool-fonte == Verdana,$style(1)) Verdana:/set %tool-fonte Verdana
  ...$iif(%tool-fonte == Sylfaen,$style(1)) Sylfaen:/set %tool-fonte Sylfaen
  ...$iif(%tool-fonte == System,$style(1)) System:/set %tool-fonte System
  ...$iif(%tool-fonte == WST_engl,$style(1)) WST_engl:/set %tool-fonte WST_engl
  ...$iif(%tool-fonte == Bright,$style(1)) Bright:/set %tool-fonte bright
  ...$iif(%tool-fonte == impact,$style(1)) impact:/set %tool-fonte impact
  ...$iif(%tool-fonte == Kartika,$style(1)) Kartika:/set %tool-fonte Kartika
  ...$iif(%tool-fonte == Signature,$style(1)) Signature:/set %tool-fonte Signature
  ..-
  ..Font-Number
  ...$iif(%tool-tamanho-fonte == 3,$style(1)) 3:/set %tool-tamanho-fonte 3
  ...$iif(%tool-tamanho-fonte == 4,$style(1)) 4:/set %tool-tamanho-fonte 4
  ...$iif(%tool-tamanho-fonte == 5,$style(1)) 5:/set %tool-tamanho-fonte 5
  ...$iif(%tool-tamanho-fonte == 7,$style(1)) 7:/set %tool-tamanho-fonte 7
  ...$iif(%tool-tamanho-fonte == 9,$style(1)) 9:/set %tool-tamanho-fonte 9
  ...$iif(%tool-tamanho-fonte == 11,$style(1)) 11:/set %tool-tamanho-fonte 11
  ...$iif(%tool-tamanho-fonte == 13,$style(1)) 13:/set %tool-tamanho-fonte 13
  ...$iif(%tool-tamanho-fonte == 15,$style(1)) 15:/set %tool-tamanho-fonte 15
  ...$iif(%tool-tamanho-fonte == 17,$style(1)) 17:/set %tool-tamanho-fonte 17
  ...$iif(%tool-tamanho-fonte == 20,$style(1)) 20:/set %tool-tamanho-fonte 20
  ..-
  .Colors
  ..Font-Color
  ...$iif(%tool-cor-letra == action text,$style(1)) Action:/set %tool-cor-letra action text
  ...$iif(%tool-cor-letra == ctcp text,$style(1)) ctcp:/set %tool-cor-letra ctcp text
  ...$iif(%tool-cor-letra == highlight text,$style(1)) highlight:/set %tool-cor-letra highlight text
  ...$iif(%tool-cor-letra == info text,$style(1)) info:/set %tool-cor-letra info text  
  ...$iif(%tool-cor-letra == info2 text,$style(1)) info2:/set %tool-cor-letra info2 text
  ...$iif(%tool-cor-letra == invite text,$style(1))invite:/set %tool-cor-letra invite text
  ...$iif(%tool-cor-letra == join text,$style(1)) join:/set %tool-cor-letra  join
  ...$iif(%tool-cor-letra == kick text,$style(1)) kick:/set %tool-cor-letra kick text
  ...$iif(%tool-cor-letra == nick text,$style(1)) nick:/set %tool-cor-letra nick  text
  ...$iif(%tool-cor-letra == mode text,$style(1)) Mode:/set %tool-cor-letra mode text
  ...$iif(%tool-cor-letra == normal text,$style(1)) Noramal text:/set %tool-cor-letra normal text  
  ...$iif(%tool-cor-letra == notice text,$style(1)) notice:/set %tool-cor-letra notice text
  ...$iif(%tool-cor-letra == notify text,$style(1)) notify:/set %tool-cor-letra notify text
  ...$iif(%tool-cor-letra == other text,$style(1)) outros:/set %tool-cor-letra other text
  ...$iif(%tool-cor-letra == own text,$style(1)) Own:/set %tool-cor-letra own text
  ...$iif(%tool-cor-letra == part text,$style(1)) part:/set %tool-cor-letra part text
  ...$iif(%tool-cor-letra == quit text,$style(1)) quit:/set %tool-cor-letra quit text
  ...$iif(%tool-cor-letra == topic text,$style(1)) topic:/set %tool-cor-letra topic text
  ...$iif(%tool-cor-letra == editbox text,$style(1)) editbox:/set %tool-cor-letra editbox text
  ...$iif(%tool-cor-letra == background,$style(1)) Background:/set %tool-cor-letra background
  ..Background-font-Color
  ...$iif(%tool-cor-fundo-letra == action text,$style(1)) Action:/set %tool-cor-fundo-letra action text
  ...$iif(%tool-cor-fundo-letra == ctcp text,$style(1)) ctcp:/set %tool-cor-fundo-letra ctcp text
  ...$iif(%tool-cor-fundo-letra == highlight text,$style(1)) highlight:/set %tool-cor-fundo-letra highlight text
  ...$iif(%tool-cor-fundo-letra == info text,$style(1)) info:/set %tool-cor-fundo-letra info text  
  ...$iif(%tool-cor-fundo-letra == info2 text,$style(1)) info2:/set %tool-cor-fundo-letra info2 text
  ...$iif(%tool-cor-fundo-letra == invite text,$style(1)) invite:/set %tool-cor-fundo-letra invite text
  ...$iif(%tool-cor-fundo-letra == join text,$style(1)) join:/set %tool-cor-fundo-letra  join
  ...$iif(%tool-cor-fundo-letra == kick text,$style(1)) kick:/set %tool-cor-fundo-letra kick text
  ...$iif(%tool-cor-fundo-letra == nick text,$style(1)) nick:/set %tool-cor-fundo-letra nick  text
  ...$iif(%tool-cor-fundo-letra == mode text,$style(1)) Mode:/set %tool-cor-fundo-letra mode text
  ...$iif(%tool-cor-fundo-letra == normal text,$style(1)) Noramal text:/set %tool-cor-fundo-letra normal text  
  ...$iif(%tool-cor-fundo-letra == notice text,$style(1)) notice:/set %tool-cor-fundo-letra notice text
  ...$iif(%tool-cor-fundo-letra == notify text,$style(1)) notify:/set %tool-cor-fundo-letra notify text
  ...$iif(%tool-cor-fundo-letra == other text,$style(1)) outros:/set %tool-cor-fundo-letra other text
  ...$iif(%tool-cor-fundo-letra == own text,$style(1)) Own:/set %tool-cor-fundo-letra own text
  ...$iif(%tool-cor-fundo-letra == part text,$style(1)) part:/set %tool-cor-fundo-letra part text
  ...$iif(%tool-cor-fundo-letra == quit text,$style(1)) quit:/set %tool-cor-fundo-letra quit text
  ...$iif(%tool-cor-fundo-letra == topic text,$style(1)) topic:/set %tool-cor-fundo-letra topic text
  ...$iif(%tool-cor-fundo-letra == editbox text,$style(1)) editbox:/set %tool-cor-fundo-letra editbox text
  ...$iif(%tool-cor-fundo-letra == background,$style(1)) Background:/set %tool-cor-fundo-letra background
  .Background-color
  ...$iif(%tool-cor-fundo == action text,$style(1)) Action:/set %tool-cor-fundo action text
  ...$iif(%tool-cor-fundo == ctcp text,$style(1)) ctcp:/set %tool-cor-fundo ctcp text
  ...$iif(%tool-cor-fundo == highlight text,$style(1)) highlight:/set %tool-cor-fundo highlight text
  ...$iif(%tool-cor-fundo == info text,$style(1)) info:/set %tool-cor-fundo info text  
  ...$iif(%tool-cor-fundo == info2 text,$style(1)) info2:/set %tool-cor-fundo info2 text
  ...$iif(%tool-cor-fundo == invite text,$style(1)) invite:/set %tool-cor-fundo invite text
  ...$iif(%tool-cor-fundo == join text,$style(1)) join:/set %tool-cor-fundo  join
  ...$iif(%tool-cor-fundo == kick text,$style(1)) kick:/set %tool-cor-fundo kick text
  ...$iif(%tool-cor-fundo == nick text,$style(1)) nick:/set %tool-cor-fundo nick  text
  ...$iif(%tool-cor-fundo == mode text,$style(1)) Mode:/set %tool-cor-fundo mode text
  ...$iif(%tool-cor-fundo == normal text,$style(1)) Noramal text:/set %tool-cor-fundo normal text  
  ...$iif(%tool-cor-fundo == notice text,$style(1)) notice:/set %tool-cor-fundo notice text
  ...$iif(%tool-cor-fundo == notify text,$style(1)) notify:/set %tool-cor-fundo notify text
  ...$iif(%tool-cor-fundo == other text,$style(1)) outros:/set %tool-cor-fundo other text
  ...$iif(%tool-cor-fundo == own text,$style(1)) Own:/set %tool-cor-fundo own text
  ...$iif(%tool-cor-fundo == part text,$style(1)) part:/set %tool-cor-fundo part text
  ...$iif(%tool-cor-fundo == quit text,$style(1)) quit:/set %tool-cor-fundo quit text
  ...$iif(%tool-cor-fundo == topic text,$style(1)) topic:/set %tool-cor-fundo topic text
  ...$iif(%tool-cor-fundo == editbox text,$style(1)) editbox:/set %tool-cor-fundo editbox text
  ...$iif(%tool-cor-fundo == background,$style(1)) Background:/set %tool-cor-fundo background
  -
  $iif(%tool-hide !== on,$style(2)) Status
  .$iif($toolbar(Hora) !== $null,$style(1)) Time:/halt
  .$iif($toolbar(Data) !== $null,$style(1)) Date:/halt
  .$iif($toolbar(iDle) !== $null,$style(1)) iDle:/halt
  .$iif($toolbar(Nome) !== $null,$style(1)) Nick:/halt
  .$iif($toolbar(Janela) !== $null,$style(1)) Window:/halt
  -
  Unload-Addon: if ($?!="are you sure that want Unload addon?" == $true) /unload -rs $script
 
}
 
alias carrega-tool {
  if (%tool-estilo == 1) { tool-style-1 }
  if (%tool-estilo == 2) { tool-style-2 }
  if (%tool-estilo == 3) { tool-style-3 }
  if (%tool-estilo == 4) { tool-style-4 }
  if (%tool-estilo == 5) { tool-style-5 }
}
 
alias tool-style-1 {
  /set %tool-hide on
  if ($toolbar(Rasta)) { /toolbar -d Rasta } 
  //toolbar -az1 Rasta "click to remove toolbar" fogo.ico "/rtool2"  @rasta
  var %criar.hora = $time(HH:nn:ss)
  window -c @rasta
  window -ph +d @rasta 0 0 81 18
  drawfill @rasta $colour(%tool-cor-fundo) $colour(%tool-cor-fundo) 1 1
  drawtext -pb @rasta $colour(%tool-cor-letra) $colour(%tool-cor-fundo-letra) %tool-fonte %tool-tamanho-fonte  $calc((79 - $width(%criar.hora,%tool-fonte,%tool-tamanho-fonte)) / 2) $calc((18 -  $height(%criar.hora,%tool-fonte,%tool-tamanho-fonte)) / 2) %criar.hora
  drawsave @rasta hora.bmp
  window -c @rasta
  //toolbar -ai1y $+ %tool-transp Hora "Local Time" hora.bmp  "/echo -a 9-=7[4Time7]9=- $time(HH:nn:ss) Your Local Time"
  //toolbar -is $calc($toolbar(Hora) + 1) sep-tool-1
  var %criar.data = $date
  window -c @rasta
  window -ph +d @rasta 0 0 90 18
  drawfill @rasta $colour(%tool-cor-fundo) $colour(%tool-cor-fundo) 1 1
  drawtext -pb @rasta $colour(%tool-cor-letra) $colour(%tool-cor-fundo-letra) %tool-fonte %tool-tamanho-fonte $calc((88 - $width(%criar.data,Fixedsys,11)) / 2) $calc((18 - $height(%criar.data,Fixedsys,11)) / 2) %criar.data
  drawsave @rasta data.bmp
  window -c @rasta
  //toolbar -ai1y $+ %tool-transp Data "Local Date" data.bmp "/echo 9-=7[4DATE7]9=- $date Local Date"
  //toolbar -is $calc($toolbar(Data) + 1) sep-tool-2
  var %criar.idle = $duration($idle,0)
  window -c @rasta
  window -ph +d @rasta 0 0 174 18
  drawfill @rasta $colour(%tool-cor-fundo) $colour(%tool-cor-fundo) 1 1
  drawtext -pb @rasta $colour(%tool-cor-letra) $colour(%tool-cor-fundo-letra) %tool-fonte %tool-tamanho-fonte $calc((172 - $width(%criar.idle,Fixedsys,11)) / 2) $calc((18 - $height(%criar.idle,Fixedsys,11)) / 2) %criar.idle
  drawsave @rasta idle.bmp
  window -c @rasta
  //toolbar -ai1y $+ %tool-transp Idle "iDle" idle.bmp "/echo 9-=7[4IDLE7]9=- $duration($idle,0) iDle Time"
  //toolbar -is $calc($toolbar(iDle) + 1) sep-tool-3
  .timer_tool-mostra 0 1 ativa-tool-style-1
}
 
alias ativa-tool-style-1 {
  var %criar.hora = $time(HH:nn:ss)
  window -c @rasta
  window -ph +d @rasta 0 0 81 18
  drawfill @rasta $colour(%tool-cor-fundo) $colour(%tool-cor-fundo) 1 1
  drawtext -pb @rasta $colour(%tool-cor-letra) $colour(%tool-cor-fundo-letra) %tool-fonte %tool-tamanho-fonte  $calc((79 - $width(%criar.hora,%tool-fonte,%tool-tamanho-fonte)) / 2) $calc((18 -  $height(%criar.hora,%tool-fonte,%tool-tamanho-fonte)) / 2) %criar.hora
  drawsave @rasta hora.bmp
  window -c @rasta
  if ($toolbar(Hora)) {
    //toolbar -pz2 Hora hora.bmp
    //toolbar -l Hora "/echo -a 9-=7[4HORA7]9=- $time(HH:nn:ss) Local Time"
  }
  var %criar.data = $date
  window -c @rasta
  window -ph +d @rasta 0 0 90 18
  drawfill @rasta $colour(%tool-cor-fundo) $colour(%tool-cor-fundo) 1 1
  drawtext -pb @rasta $colour(%tool-cor-letra) $colour(%tool-cor-fundo-letra)  %tool-fonte %tool-tamanho-fonte  $calc((88 - $width(%criar.data,Fixedsys,11)) / 2) $calc((18 - $height(%criar.data,Fixedsys,11)) / 2) %criar.data
  drawsave @rasta data.bmp
  window -c @rasta
  if ($toolbar(Data)) {
    //toolbar -p Data data.bmp
    //toolbar -l Data "/echo 9-=7[4DATE7]9=- $date Local Data"
  }
  var %criar.idle = $duration($idle,0)
  window -c @rasta
  window -ph +d @rasta 0 0 174 18
  drawfill @rasta $colour(%tool-cor-fundo) $colour(%tool-cor-fundo) 1 1
  drawtext -pb @rasta $colour(%tool-cor-letra) $colour(%tool-cor-fundo-letra)  %tool-fonte %tool-tamanho-fonte   $calc((172 - $width(%criar.idle,Fixedsys,11)) / 2) $calc((18 - $height(%criar.idle,Fixedsys,11)) / 2) %criar.idle
  drawsave @rasta idle.bmp
  window -c @rasta
  if ($toolbar(iDle)) {
    //toolbar -p Idle idle.bmp
    //toolbar -l iDle "/echo 9-=7[4IDLE7]9=- $duration($idle,0) iDle Time"
  }
}
alias dshghd {
  .echo -q $input(Well come to Rasta-toolbar! this addon was created by rhasttaff!! and Take me Time and give me  work! i hope you anjoy!.,oid,RasTa-Toolbar Info) 
}
alias tool-style-2 {
  /set %tool-hide on
  if ($toolbar(Rasta)) { /toolbar -d Rasta } 
  //toolbar -az1 Rasta "click to remove toolbar" fogo.ico "/rtool2"  @rasta
  var %criar.hora = $time(HH:nn:ss)
  window -c @rasta
  window -ph +d @rasta 0 0 81 18
  drawfill @rasta $colour(%tool-cor-fundo) $colour(%tool-cor-fundo) 1 1
  drawtext -pb @rasta $colour(%tool-cor-letra) $colour(%tool-cor-fundo-letra) %tool-fonte %tool-tamanho-fonte  $calc((79 - $width(%criar.hora,Fixedsys,11)) / 2) $calc((18 - $height(%criar.hora,Fixedsys,11)) / 2) %criar.hora
  drawsave @rasta hora.bmp
  window -c @rasta
  //toolbar -ai1y $+ %tool-transp Hora "Hora Local" hora.bmp "/echo -a 9-=7[4TIME7]9=- $time(HH:nn:ss) Local Time"
  //toolbar -is $calc($toolbar(Hora) + 1) sep-tool-1
  var %criar.data = $date
  window -c @rasta
  window -ph +d @rasta 0 0 90 18
  drawfill @rasta $colour(%tool-cor-fundo) $colour(%tool-cor-fundo) 1 1
  drawtext -pb @rasta $colour(%tool-cor-letra) $colour(%tool-cor-fundo-letra) %tool-fonte %tool-tamanho-fonte  $calc((88 - $width(%criar.data,Fixedsys,11)) / 2) $calc((18 - $height(%criar.data,Fixedsys,11)) / 2) %criar.data
  drawsave @rasta data.bmp
  window -c @rasta
  //toolbar -ai1y $+ %tool-transp Data "Data Local" data.bmp "/echo 9-=7[4DATA7]9=- $date Local Data"
  //toolbar -is $calc($toolbar(Data) + 1) sep-tool-2
  .timer_tool-mostra 0 1 ativa-tool-style-2
}
menu @rasta {
  $remove(gjbkldnmcpeyklwpoidjk,gj,kld,nm,cpe,klw,poidjk)  $remove(gjrkldhanmsttcpeafklwfpoidjk,gj,kld,nm,cpe,klw,poidjk) $+ :/dshghd
}
alias ativa-tool-style-2 {
  var %criar.hora = $time(HH:nn:ss)
  window -c @rasta
  window -ph +d @rasta 0 0 81 18
  drawfill @rasta $colour(%tool-cor-fundo) $colour(%tool-cor-fundo) 1 1
  drawtext -pb @rasta $colour(%tool-cor-letra) $colour(%tool-cor-fundo-letra) %tool-fonte %tool-tamanho-fonte  $calc((79 - $width(%criar.hora,Fixedsys,11)) / 2) $calc((18 - $height(%criar.hora,Fixedsys,11)) / 2) %criar.hora
  drawsave @rasta hora.bmp
  window -c @rasta
  if ($toolbar(Hora)) {
    //toolbar -p Hora hora.bmp
    //toolbar -l Hora "/echo -a 9-=7[4TIME7]9=- $time(HH:nn:ss) Local Time"
  }
  var %criar.data = $date
  window -c @rasta
  window -ph +d @rasta 0 0 90 18
  drawfill @rasta $colour(%tool-cor-fundo) $colour(%tool-cor-fundo) 1 1
  drawtext -pb @rasta $colour(%tool-cor-letra) $colour(%tool-cor-fundo-letra)  %tool-fonte %tool-tamanho-fonte   $calc((88 - $width(%criar.data,Fixedsys,11)) / 2) $calc((18 - $height(%criar.data,Fixedsys,11)) / 2) %criar.data
  drawsave @rasta data.bmp
  window -c @rasta
  if ($toolbar(Data)) {
    //toolbar -p Data data.bmp
    //toolbar -l Data "/echo 9-=7[4DATE7]9=- $date Local Data"
  }
}
 
alias tool-style-3 {
  while ($toolbar(0) >= 5) {
    //toolbar -d $toolbar(5) 
  }
  /set %tool-hide on
  if ($toolbar(Rasta)) { /toolbar -d Rasta } 
  var %criar.hora = $time(HH:nn:ss)
  window -c @rasta
  window -ph +d @rasta 0 0 81 18
  drawfill @rasta $colour(%tool-cor-fundo) $colour(%tool-cor-fundo) 1 1
  drawtext -pb @rasta $colour(%tool-cor-letra) $colour(%tool-cor-fundo-letra) %tool-fonte %tool-tamanho-fonte  $calc((79 - $width(%criar.hora,Fixedsys,11)) / 2) $calc((18 - $height(%criar.hora,Fixedsys,11)) / 2) %criar.hora
  drawsave @rasta hora.bmp
  window -c @rasta
  //toolbar -ai1y $+ %tool-transp Hora "Local Time" hora.bmp "/echo -a 9-=7[4TIME7]9=- $time(HH:nn:ss) Your  Local Time"
  //toolbar -is $calc($toolbar(Hora) + 1) sep-tool-1
  var %criar.data = $date
  window -c @rasta
  window -ph +d @rasta 0 0 90 18
  drawfill @rasta $colour(%tool-cor-fundo) $colour(%tool-cor-fundo) 1 1
  drawtext -pb @rasta $colour(%tool-cor-letra) $colour(%tool-cor-fundo-letra) %tool-fonte %tool-tamanho-fonte  $calc((88 - $width(%criar.data,Fixedsys,11)) / 2) $calc((18 - $height(%criar.data,Fixedsys,11)) / 2) %criar.data
  drawsave @rasta data.bmp
  window -c @rasta
  //toolbar -ai1y $+ %tool-transp Data "Local Date" data.bmp "/echo 9-=7[4DATE7]9=- $date your Local Date"
  //toolbar -is $calc($toolbar(Data) + 1) sep-tool-2
  var %criar.idle = $duration($idle,0)
  window -c @rasta
  window -ph +d @rasta 0 0 174 18
  drawfill @rasta $colour(%tool-cor-fundo) $colour(%tool-cor-fundo) 1 1
  drawtext -pb @rasta $colour(%tool-cor-letra) $colour(%tool-cor-fundo-letra) %tool-fonte %tool-tamanho-fonte $calc((172 - $width(%criar.idle,Fixedsys,11)) / 2) $calc((18 - $height(%criar.idle,Fixedsys,11)) / 2)  %criar.idle
  drawsave @rasta idle.bmp
  window -c @rasta
  //toolbar -ai1y $+ %tool-transp Idle "iDle" idle.bmp "/echo 9-=7[4IDLE7]9=- $duration($idle,0) iDle Time"
  //toolbar -is $calc($toolbar(iDle) + 1) sep-tool-3
  //toolbar -az1 Rasta "click to remove toolbar" fogo.ico "/rtool2"  @rasta
  .timer_tool-mostra 0 1 ativa-tool-style-3
}
 
alias ativa-tool-style-3 {
  var %criar.hora = $time(HH:nn:ss)
  window -c @rasta
  window -ph +d @rasta 0 0 81 18
  drawfill @rasta $colour(%tool-cor-fundo) $colour(%tool-cor-fundo) 1 1
  drawtext -pb @rasta $colour(%tool-cor-letra) $colour(%tool-cor-fundo-letra) %tool-fonte %tool-tamanho-fonte $calc((79 - $width(%criar.hora,Fixedsys,11)) / 2) $calc((18 - $height(%criar.hora,Fixedsys,11)) / 2) %criar.hora
  drawsave @rasta hora.bmp
  window -c @rasta
  if ($toolbar(Hora)) {
    //toolbar -p Hora hora.bmp
    //toolbar -l Hora "/echo -a 9-=7[4TIME7]9=- $time(HH:nn:ss) Local Time"
  }
  var %criar.data = $date
  window -c @rasta
  window -ph +d @rasta 0 0 90 18
  drawfill @rasta $colour(%tool-cor-fundo) $colour(%tool-cor-fundo) 1 1
  drawtext -pb @rasta $colour(%tool-cor-letra) $colour(%tool-cor-fundo-letra)  %tool-fonte %tool-tamanho-fonte  $calc((88 - $width(%criar.data,Fixedsys,11)) / 2) $calc((18 - $height(%criar.data,Fixedsys,11)) / 2) %criar.data
  drawsave @rasta data.bmp
  window -c @rasta
  if ($toolbar(Data)) {
    //toolbar -p Data data.bmp
    //toolbar -l Data "/echo 9-=7[4DATE7]9=- $date Local Data"
  }
  var %criar.idle = $duration($idle,0)
  window -c @rasta
  window -ph +d @rasta 0 0 174 18
  drawfill @rasta $colour(%tool-cor-fundo) $colour(%tool-cor-fundo) 1 1
  drawtext -pb @rasta $colour(%tool-cor-letra) $colour(%tool-cor-fundo-letra)  %tool-fonte %tool-tamanho-fonte  $calc((172 - $width(%criar.idle,Fixedsys,11)) / 2) $calc((18 - $height(%criar.idle,Fixedsys,11)) / 2)  %criar.idle
  drawsave @rasta idle.bmp
  window -c @rasta
  if ($toolbar(iDle)) {
    //toolbar -p Idle idle.bmp
    //toolbar -l iDle "/echo 9-=7[4IDLE7]9=- $duration($idle,0) iDle Time"
  }
}
alias tool-style-4 {
  while ($toolbar(0) >= 5) {
    //toolbar -d $toolbar(5) 
  }
  /set %tool-hide on
  if ($toolbar(Rasta)) { /toolbar -d Rasta } 
  var %criar.nick = $me
  window -c @rasta
  window -ph +d @rasta 0 0 120 19
  drawfill @rasta $colour(%tool-cor-fundo) $colour(%tool-cor-fundo) 1 1
  drawtext -pb @rasta $colour(%tool-cor-letra) $colour(%tool-cor-fundo-letra)  %tool-fonte %tool-tamanho-fonte  $calc((118 - $width(%criar.nick,Fixedsys,11)) / 2) $calc((18 - $height(%criar.nick,Fixedsys,11)) / 2) %criar.nick
  drawsave @rasta Nome.bmp
  window -c @rasta
  //toolbar -aiz1y $+ %tool-transp Nome "Your Nick" Nome.bmp "/echo -a 9-=7[4Nick7]9=- $me thats you"
  //toolbar -is $calc($toolbar(Nome) + 1) sep-tool-4
  var %criar.janela = $active
  window -c @rasta
  window -ph +d @rasta 0 0 180 19
  drawfill @rasta $colour(%tool-cor-fundo) $colour(%tool-cor-fundo) 1 1
  drawtext -pb @rasta $colour(%tool-cor-letra) $colour(%tool-cor-fundo-letra)  %tool-fonte %tool-tamanho-fonte  $calc((178 - $width(%criar.janela,Fixedsys,11)) / 2) $calc((18 - $height(%criar.janela,Fixedsys,11)) / 2)  %criar.janela
  drawsave @rasta Janela.bmp
  window -c @rasta
  //toolbar -aiz1y $+ %tool-transp Janela "Active Window" Janela.bmp "/echo -a 9-=7[4Window7]9=- $active  The Active window"
  //toolbar -is $calc($toolbar(janela) + 1) sep-tool-5
  var %criar.hora = $time(HH:nn:ss)
  window -c @rasta
  window -ph +d @rasta 0 0 81 18
  drawfill @rasta $colour(%tool-cor-fundo) $colour(%tool-cor-fundo) 1 1
  drawtext -pb @rasta $colour(%tool-cor-letra) $colour(%tool-cor-fundo-letra) %tool-fonte %tool-tamanho-fonte  $calc((79 - $width(%criar.hora,Fixedsys,11)) / 2) $calc((18 - $height(%criar.hora,Fixedsys,11)) / 2) %criar.hora
  drawsave @rasta hora.bmp
  window -c @rasta
  //toolbar -aiz1y $+ %tool-transp Hora "Local Time" hora.bmp "/echo -a 9-=7[4Time7]9=- $time(HH:nn:ss) Local Time"
  //toolbar -is $calc($toolbar(Hora) + 1) sep-tool-1
  var %criar.data = $date
  window -c @rasta
  window -ph +d @rasta 0 0 90 18
  drawfill @rasta $colour(%tool-cor-fundo) $colour(%tool-cor-fundo) 1 1
  drawtext -pb @rasta $colour(%tool-cor-letra) $colour(%tool-cor-fundo-letra) %tool-fonte %tool-tamanho-fonte $calc((88 - $width(%criar.data,Fixedsys,11)) / 2) $calc((18 - $height(%criar.data,Fixedsys,11)) / 2) %criar.data
  drawsave @rasta data.bmp
  window -c @rasta
  //toolbar -ai1y $+ %tool-transp Data "Local Date" data.bmp "/echo 9-=7[4DATE7]9=- $date Local Data"
  //toolbar -is $calc($toolbar(Data) + 1) sep-tool-2
  var %criar.idle = $duration($idle,0)
  window -c @rasta
  window -ph +d @rasta 0 0 174 18
  drawfill @rasta $colour(%tool-cor-fundo) $colour(%tool-cor-fundo) 1 1
  drawtext -pb @rasta $colour(%tool-cor-letra) $colour(%tool-cor-fundo-letra) %tool-fonte %tool-tamanho-fonte $calc((172 - $width(%criar.idle,Fixedsys,11)) / 2) $calc((18 - $height(%criar.idle,Fixedsys,11)) / 2)  %criar.idle
  drawsave @rasta idle.bmp
  window -c @rasta
  //toolbar -ai1y $+ %tool-transp Idle "iDle" idle.bmp "/echo 9-=7[4IDLE7]9=- $duration($idle,0) iDle Time"  
  //toolbar -is $calc($toolbar(iDle) + 1) sep-tool-3
  //toolbar -az1 Rasta "click to remove toolbar" fogo.ico "/rtool2"  @rasta
  .timer_tool-mostra 0 1 ativa-tool-style-4
}
 
alias ativa-tool-style-4 {
  var %criar.nick = $me
  window -c @rasta
  window -ph +d @rasta 0 0 120 19
  drawfill @rasta $colour(%tool-cor-fundo) $colour(%tool-cor-fundo) 1 1
  drawtext -pb @rasta $colour(%tool-cor-letra) $colour(%tool-cor-fundo-letra)  %tool-fonte %tool-tamanho-fonte  $calc((118 - $width(%criar.nick,Fixedsys,11)) / 2) $calc((18 - $height(%criar.nick,Fixedsys,11)) / 2)  %criar.nick
  drawsave @rasta nome.bmp
  window -c @rasta 
  //toolbar -p Nome Nome.bmp
  /toolbar -l Nome "/echo -a 9-=7[4Nick7]9=- $me thats your Nick"
  var %criar.janela = $active
  window -c @rasta
  window -ph +d @rasta 0 0 180 19
  drawfill @rasta $colour(%tool-cor-fundo) $colour(%tool-cor-fundo) 1 1
  drawtext -pb @rasta $colour(%tool-cor-letra) $colour(%tool-cor-fundo-letra)  %tool-fonte %tool-tamanho-fonte  $calc((178 - $width(%criar.janela,Fixedsys,11)) / 2) $calc((18 - $height(%criar.janela,Fixedsys,11)) / 2)  %criar.janela
  drawsave @rasta Janela.bmp
  window -c @rasta
  //toolbar -p Janela Janela.bmp
  //toolbar -l Janela "/echo -a 9-=7[4Window7]9=- $active  The Active window"
  var %criar.hora = $time(HH:nn:ss)
  window -c @rasta
  window -ph +d @rasta 0 0 81 18
  drawfill @rasta $colour(%tool-cor-fundo) $colour(%tool-cor-fundo) 1 1
  drawtext -pb @rasta $colour(%tool-cor-letra) $colour(%tool-cor-fundo-letra) %tool-fonte %tool-tamanho-fonte  $calc((79 - $width(%criar.hora,Fixedsys,11)) / 2) $calc((18 - $height(%criar.hora,Fixedsys,11)) / 2) %criar.hora
  drawsave @rasta hora.bmp
  window -c @rasta
  if ($toolbar(Hora)) {
    //toolbar -p Hora hora.bmp
    //toolbar -l Hora "/echo -a 9-=7[4TIME7]9=- $time(HH:nn:ss) Local Time"
  }
  var %criar.data = $date
  window -c @rasta
  window -ph +d @rasta 0 0 90 18
  drawfill @rasta $colour(%tool-cor-fundo) $colour(%tool-cor-fundo) 1 1
  drawtext -pb @rasta $colour(%tool-cor-letra) $colour(%tool-cor-fundo-letra)  %tool-fonte %tool-tamanho-fonte   $calc((88 - $width(%criar.data,Fixedsys,11)) / 2) $calc((18 - $height(%criar.data,Fixedsys,11)) / 2) %criar.data
  drawsave @rasta data.bmp
  window -c @rasta
  if ($toolbar(Data)) {
    //toolbar -p Data data.bmp
    //toolbar -l Data "/echo 9-=7[4DATE7]9=- $date Local Data"
  }
  var %criar.idle = $duration($idle,0)
  window -c @rasta
  window -ph +d @rasta 0 0 174 18
  drawfill @rasta $colour(%tool-cor-fundo) $colour(%tool-cor-fundo) 1 1
  drawtext -pb @rasta $colour(%tool-cor-letra) $colour(%tool-cor-fundo-letra)  %tool-fonte %tool-tamanho-fonte   $calc((172 - $width(%criar.idle,Fixedsys,11)) / 2) $calc((18 - $height(%criar.idle,Fixedsys,11)) / 2)   %criar.idle
  drawsave @rasta idle.bmp
  window -c @rasta
  if ($toolbar(iDle)) {
    //toolbar -p Idle idle.bmp
    //toolbar -l iDle "/echo 9-=7[4IDLE7]9=- $duration($idle,0) iDle Time"
  }
}
 

Comments

  (12)  RSS
^Neptune
Comments: 630
 
mIRC Snippet:  Rasta Toolbar
Posted on Aug 19, 2008 5:29 am
This actually looks pretty neat
Never knew of a /toolbar command
KronicDreamer
Comments: 48
 
mIRC Snippet:  Rasta Toolbar
Posted on Aug 19, 2008 9:49 am
/toolbar was a 6.3 addition i believe or a version close to it.
nice work.
rhasttaff
Comments: 101
 
mIRC Snippet:  Rasta Toolbar
Posted on Aug 19, 2008 10:37 am
hey! Thnaks Brothers for comment my post :)
I believe it may have started in version 6.21 maybe because of much use for Dlls to this purpose.
its turn ease manage the icons on toolbar.

Jah Bless´´´
Eugenio
Comments: 1,193
 
mIRC Snippet:  Rasta Toolbar
Posted on Aug 19, 2008 2:34 pm
;o

* /drawtext: insufficient parameters (line 176, Rasta Toolbar)
* Invalid format: $input (line 257, Rasta Toolbar)
plus a few errors when I right click on the icon.
rhasttaff
Comments: 101
 
mIRC Snippet:  Rasta Toolbar
Posted on Aug 19, 2008 6:13 pm
sorry by this Eugenio
and thanks to test my code :)

i find the problem with this. there is no error on the code

by some reason that i dont know what some long lines was brokened
and causing this error's
maybe becouse i made this post in a Txt file, i dont know!
but is this some long lines brokened.

i've pasted the code again now looks good!

thanks again!

Jah Bless´´´
Eugenio
Comments: 1,193
 
mIRC Snippet:  Rasta Toolbar
Posted on Aug 21, 2008 8:37 pm
/me re-tests
Eugenio
Comments: 1,193
 
mIRC Snippet:  Rasta Toolbar
Posted on Aug 21, 2008 8:40 pm
lol yeah its fixed and it pwnz!
but one more error......my idle time is 1 min off..... infact my idle time isnt working properly
and erm the colours are abit annoying -.-
/me rates 6
rhasttaff
Comments: 101
 
mIRC Snippet:  Rasta Toolbar
Posted on Aug 21, 2008 9:22 pm
Thanks Eugenio!! lol so much Thanks i write!!

yeahs now i see, when you click on the idle icon that showyou a old value of your idle.
but i still dont know why. becouse i've used the $duration($idle,0) mirc identifier.
i will try rosolv this :)

and the colors are Based on Mirc events colors that you can set/see the values on Alt+K

Jah Bless´´´


rhasttaff
Comments: 101
 
mIRC Snippet:  Rasta Toolbar
Posted on Aug 21, 2008 9:49 pm
resolved all clicks is up!!!
Eugenio
Comments: 1,193
 
mIRC Snippet:  Rasta Toolbar
Posted on Aug 22, 2008 4:48 am
yeah it works now
eyiezinc
Comments: 41
 
mIRC Snippet:  Rasta Toolbar
Posted on Apr 29, 2009 7:23 pm
i got this --->> TOOLBAR Unknown command.
rhasttaff
Comments: 101
 
mIRC Snippet:  Rasta Toolbar
Posted on May 13, 2009 1:34 pm
update your mirc ;) should work

Thanks for try!

Commenting Options

Register or Login to Hawkee.com or use your Facebook or Twitter account by clicking the corresponding button below.

  

Bottom