Nick auto-identify

Please Register to submit score.

Average Score	4.0
Scores Submitted	3
Date Added	Apr 20, 2008
Last Updated	Apr 21, 2008
Tags	dialog identify nick

Introduction

This dialog allows you to set upto 10 nicks for auto identify, also you can change your nick from this dialog as an extra.

To add: copy an paste to remotes (alt+r)
then right click in channel or status and you will see the dialog menu thats called "Raven identify".

tested on anope.
uses services nickserv

Remade by Gecko321, Thanks dude.

Grab the Code

on *:notice:*nickname*registered*your*:*: {
  if ($Nick = NickServ) {
    if ($Findtok(%rai,$me,1,32)) { .msg Nickserv identify $GetTok(%Iar,$v1,32) }
  }
}

alias rai { dialog -m rai rai }
dialog rai {
  title "Raven Auto-Identify"
  size -1 -1 179 249
  option dbu
  text "Raven Auto-Identify By Gemster", 1, 60 8 51 22, center
  text "Nick", 2, 40 32 25 8
  text "Password", 3, 104 32 25 8
  edit "Hover the mouse over items to display help for that item.", 24, 42 216 120 25, read multi
  box "Help", 25, 40 208 126 39
  edit "", 4, 40 40 61 10
  edit "", 5, 40 56 61 10
  edit "", 6, 40 72 61 10
  edit "", 7, 40 88 61 10
  edit "", 8, 40 104 61 10
  edit "", 9, 40 120 61 10
  edit "", 10, 40 136 61 10
  edit "", 11, 40 152 61 10
  edit "", 12, 40 168 61 10
  edit "", 13, 40 184 61 10 
  edit "", 14, 104 40 61 10
  edit "", 15, 104 56 61 10
  edit "", 16, 104 72 61 10
  edit "", 17, 104 88 61 10
  edit "", 18, 104 104 61 10
  edit "", 19, 104 120 61 10
  edit "", 20, 104 136 61 10
  edit "", 21, 104 152 61 10
  edit "", 22, 104 168 61 10
  edit "", 23, 104 184 61 10
  button "Save", 26, 85 198 37 12, ok
  button "Set", 27, 8 40 21 9
  button "Set", 28, 8 56 21 9
  button "Set", 29, 8 72 21 9
  button "Set", 30, 8 88 21 9
  button "Set", 31, 8 104 21 9
  button "Set", 32, 8 120 21 9
  button "Set", 33, 8 136 21 9
  button "Set", 34, 8 152 21 9
  button "Set", 35, 8 168 21 9
  button "Set", 36, 8 184 21 9
  box "Set", 37, 2 32 34 167
}

on *:dialog:rai:init:*: {
  var %a = 0,%b = 3
  while (%a <= $NumTok(%Rai,32)) {
    inc %a
    inc %b
    did -ra $Dname %b $Gettok(%Rai,%a,32)
    did -ra $Dname $Calc(%b + 10) $GetTok(%Iar,%a,32)
  }
}

on *:dialog:rai:mouse:*: {
  if (($Did > 3) && ($Did < 14)) { did -ra $dname 24 Enter your nickname $Calc($did - 3) in here }
  if (($Did > 13) && ($Did < 24)) { did -ra $dname 24 Enter your nickname $Calc($did - 13) password in here }
  if ($did == 26) { did -ra $dname 24 Saves all new changes and exits this dialog }
  if ($did == 1) { did -ra $dname 24 Raven Auto-Identify By Gemster , admin@gemster.info , www.gemster.info }
  if ($did == 24) { did -ra $dname 24 Help box, Just hover over the items to see help for that item displayed here }
  if (($Did > 26) && ($Did < 37)) { did -ra $Dname 24 Sets you current nickname to $Did($Dname,$Calc($Did - 23)).text }
  if ($did == 38) { did -ra $dname 24 clicking OK will exit this dialog }
}

on *:dialog:rai:sclick:*: {
  if (($Did > 26) && ($Did < 37)) { .nick $GetTok(%Rai,$Calc($Did - 26),32) }
  if ($did = 26) {
    unset %Rai
    unset %Iar
    var %a = 3
    while (%a <= 12) {
      inc %a
      %Rai = %Rai $+ $chr(32) $+ $Did($Dname,%a).text
      %Iar = %Iar $+ $chr(32) $+ $Did($Dname,$Calc(%a + 10)).text
    }
  }
}

menu channel,status {
  Raven Identifyer:/rai
}

Comments

(7) RSS

Go to Bottom

PunkTuReD

Comments: 59

mIRC Snippet: Nick auto-identify
Posted on Apr 20, 2008 2:45 pm

nice and neat looks good and will come in handy

jonesy44

Comments: 618

mIRC Snippet: Nick auto-identify
Posted on Apr 20, 2008 3:42 pm

im sure there must be a way to make this script a little smaller, getting rid of the excessive if statements ..etc. use a more generalized approach ;-)

Gemster

Comments: 56

mIRC Snippet: Nick auto-identify
Posted on Apr 20, 2008 3:55 pm

Yes jonesy44 this snippet could be a lot smaller ie: take out all the help info, but as u know theres a lot of new users these days who dont know much about irc. Therfor the help info.
:D

jonesy44

Comments: 618

mIRC Snippet: Nick auto-identify
Posted on Apr 20, 2008 3:56 pm

that's true, but i mean the if statements mainly ;-)

Gemster

Comments: 56

mIRC Snippet: Nick auto-identify
Posted on Apr 21, 2008 5:09 am

Thanks Gecko321,i like the use of $GetTok and $Calc, I guess my scripting knowlage isent as good as i thought :P.

Gecko321

Comments: 11

mIRC Snippet: Nick auto-identify
Posted on Apr 21, 2008 9:16 am

no problem, if you ever need help with anything just let me know.

SiLver_ShaDow

Comments: 5

mIRC Snippet: Nick auto-identify
Posted on Apr 22, 2008 8:21 am

nice

Nick auto-identify

Introduction

Grab the Code

Comments

Gemster

My Snippet Tags

Contact

Sponsors

		uk-England
Last seen: Jul 03, 2008 Profile \| Website Snippets (10) Images (1) Comments Received (78) Comments Submitted (56) Forum Posts (35)