Max's Auto ID

By MaxEvans on Jan 09, 2012

I know there's probably hundreds of these. But I posted this so someone could use it. Instead of searching for one similar to the one I made.

It's easy to use this. Just load it to the remotes, and select "Max's Auto ID" in the menu.

dialog GSAID {
  title "Max's Nick Auto ID"
  size -1 -1 300 265
  option pixels
  button OK, 100, 167 240 42 19, ok
  button Cancel, 200, 212 240 42 19, cancel
  text "Nicknames", 5, 72 10 54 15, center
  text "Passwords", 6, 176 10 54 15, center
  check "", 2, 16 33 15 15
  edit %nick1, 3, 46 30 95 20, autohs center
  edit %pw1, 4, 151 30 95 20, pass center
  check "", 7, 16 53 15 15
  edit %nick2, 8, 46 50 95 20, autohs center
  edit %pw2, 9, 151 50 95 20, pass center
  check "", 10, 16 73 15 15
  edit %nick3, 11, 46 70 95 20, autohs center
  edit %pw3, 12, 151 70 95 20, pass center
  check "", 13, 16 93 15 15
  edit %nick4, 14, 46 90 95 20, autohs center
  edit %pw4, 15, 151 90 95 20, pass center
  check "", 16, 16 113 15 15
  edit %nick5, 17, 46 110 95 20, autohs center
  edit %pw5, 18, 151 110 95 20, pass center
  check "", 19, 16 133 15 15
  edit %nick6, 20, 46 130 95 20, autohs center
  edit %pw6, 21, 151 130 95 20, pass center
  check "", 22, 16 153 15 15
  edit %nick7, 23, 46 150 95 20, autohs center
  edit %pw7, 24, 151 150 95 20, pass center
  check "", 25, 16 173 15 15
  edit %nick8, 26, 46 170 95 20, autohs center
  edit %pw8, 27, 151 170 95 20, pass center
  check "", 28, 16 193 15 15
  edit %nick9, 29, 46 190 95 20, autohs center
  edit %pw9, 30, 151 190 95 20, pass center
  check "", 31, 16 213 15 15
  edit %nick10, 32, 46 210 95 20, autohs center
  edit %pw10, 33, 151 210 95 20, pass center
  button Clear, 36, 249 32 33 16
  button Clear, 37, 249 52 33 16
  button Clear, 38, 249 72 33 16
  button Clear, 39, 249 92 33 16
  button Clear, 40, 249 112 33 16
  button Clear, 41, 249 132 33 16
  button Clear, 42, 249 152 33 16
  button Clear, 43, 249 172 33 16
  button Clear, 44, 249 192 33 16
  button Clear, 45, 249 212 33 16
  check "Auto ID On Connect?", 46, 29 242 126 14
  text "Activate Auto ID", 1, 4 3 42 26, center
}

on *:dialog:GSAID:init:*: {
  if %chk1 = ON { did -c GSAID  2 }  
  if %chk2 = ON { did -c GSAID 7 }
  if %chk3 = ON { did -c GSAID 10 }
  if %chk4 = ON { did -c GSAID 13 }
  if %chk5 = ON { did -c GSAID 16 }
  if %chk6 = ON { did -c GSAID 19 }
  if %chk7 = ON { did -c GSAID 22 }
  if %chk8 = ON { did -c GSAID 25 }
  if %chk9 = ON { did -c GSAID 28 }
  if %chk10 = ON { did -c GSAID 31 }
  if %autoidcon = ON { did -c GSAID 46 }
}
on *:dialog:GSAID:sclick:100: {
  if ($did(GSAID,2).state = 1) { %chk1 = on } | else { %chk1 = off }
  if ($did(GSAID,7).state = 1) { %chk2 = on } | else { %chk2 = off }
  if ($did(GSAID,10).state = 1) { %chk3 = on } | else { %chk3 = off }
  if ($did(GSAID,13).state = 1) { %chk4 = on } | else { %chk4 = off }
  if ($did(GSAID,16).state = 1) { %chk5 = on } | else { %chk5 = off }
  if ($did(GSAID,19).state = 1) { %chk6 = on } | else { %chk6 = off }
  if ($did(GSAID,22).state = 1) { %chk7 = on } | else { %chk7 = off }
  if ($did(GSAID,25).state = 1) { %chk8 = on } | else { %chk8 = off }
  if ($did(GSAID,28).state = 1) { %chk9 = on } | else { %chk9 = off }
  if ($did(GSAID,31).state = 1) { %chk10 = on } | else { %chk10 = off }
  if ($did(GSAID,46).state = 1) { %autoidcon = on } | else { %autoidcon = off }  
  %nick1 = $did(3) | %nick2 = $did(8) | %nick3 = $did(11) | %nick4 = $did(14) | %nick5 = $did(17) | %nick6 = $did(20) | %nick7 = $did(23) | %nick8 = $did(26) | %nick9 = $did(29) | %nick10 = $did(32)
  %pw1 = $did(4) | %pw2 = $did(9) | %pw3 = $did(12) | %pw4 = $did(15) | %pw5 = $did(18) | %pw6 = $did(21) | %pw7 = $did(24) | %pw8 = $did(27) | %pw9 = $did(30) | %pw10 = $did(33) 
} 
on *:dialog:GSAID:sclick:*: {
  if ($did = 36) { did -ru GSAID 3,4,2 }
  if ($did = 37) { did -ru GSAID 7,8,9 }
  if ($did = 38) { did -ru GSAID 10,11,12 }
  if ($did = 39) { did -ru GSAID 13,14,15 }
  if ($did = 40) { did -ru GSAID 16,17,18 }
  if ($did = 41) { did -ru GSAID 19,20,21 }
  if ($did = 42) { did -ru GSAID 22,23,24 }
  if ($did = 43) { did -ru GSAID 25,26,27 }
  if ($did = 44) { did -ru GSAID 28,29,30 }
  if ($did = 45) { did -ru GSAID 31,32,33 }
}
on *:NICK: {
  if $nick == $me {
    if ($newnick == %nick1) && (%chk1 == on) { identify %pw1 }
    if ($newnick == %nick2) && (%chk2 == on) { identify %pw2 }
    if ($newnick == %nick3) && (%chk3 == on) { identify %pw3 }
    if ($newnick == %nick4) && (%chk4 == on) { identify %pw4 }
    if ($newnick == %nick5) && (%chk5 == on) { identify %pw5 }
    if ($newnick == %nick6) && (%chk6 == on) { identify %pw6 }
    if ($newnick == %nick7) && (%chk7 == on) { identify %pw7 }
    if ($newnick == %nick8) && (%chk8 == on) { identify %pw8 }
    if ($newnick == %nick9) && (%chk9 == on) { identify %pw9 }
    if ($newnick == %nick10) && (%chk10 == on) { identify %pw10 }
  }
}
on *:connect: {
  if (%autoidcon = on) {
    if ($me = %nick1) { identify %pw1 }
    if ($me = %nick2) { identify %pw2 }
    if ($me = %nick3) { identify %pw3 }
    if ($me = %nick4) { identify %pw4 }
    if ($me = %nick5) { identify %pw5 }
    if ($me = %nick6) { identify %pw6 }
    if ($me = %nick7) { identify %pw7 }
    if ($me = %nick8) { identify %pw8 }
    if ($me = %nick9) { identify %pw9 }
    if ($me = %nick10) { identify %pw10 }
  }
}

menu * {
  .Max's Auto ID: { dialog -m GSAID GSAID }
}

Comments

Sign in to comment.
MaxEvans   -  Jan 31, 2012

Also, look through my other snippets. Most of what I post is pretty damn cool and useful.

 Respond  
MaxEvans   -  Jan 31, 2012

Exactly. The point to snippets is for other people. Derp.

 Respond  
blackvenomm666   -  Jan 31, 2012

umm the stuff that gets posted here is for other people to use/learn from therefore it is technically for someone else

 Respond  
Jamiie   -  Jan 31, 2012

Has this what hawkee became? A pastebin? Majority of the scripts posted nowa'days is "for someone else"....

Pastebin.com ffs...

 Respond  
blackvenomm666   -  Jan 19, 2012

eh i use to call my stuff by the name of my old script when i was doing it haha. venom this venom that etcetc

 Respond  
MaxEvans   -  Jan 19, 2012

I like that idea. I've used this one for a while now. I only use one server, really. But having a different nick and password for different servers is pretty cool. This was one I threw together a few years back, so it's very simple and basic. Nothing advanced.

And as for calling my snippets Max's this and that. I just figured I'd stick my name in there. lol

 Respond  
blackvenomm666   -  Jan 14, 2012

Here is my take on an auto pass system. it allows you to have a diff pw for every server you go to. it has an on/off function for both nick pass and oper pass and uses ini's to store the info. All you have to do is on the server which you want to save your pw right click go to pass systems choose chatspace or ircd type server then add your pw.

menu channel,nicklist {
  Pass Systems
  .Turn on/off
  ..$iif($group(#autonickpass) == On,$style(2)) Auto nick pass on: { .enable #autonickpass  } 
  ..$iif($group(#autonickpass) == Off,$style(2)) Auto nick pass off: { .disable #autonickpass }
  ..$iif($group(#autooperpass) == On,$style(2)) Auto oper pass on: { .enable #autooperpass  } 
  ..$iif($group(#autooperpass) == Off,$style(2)) Auto oper pass off: { .disable #autooperpass }
  .Chatspace
  ..Add: { writeini passsaver.ini $serverip $+ $port Pass $$?="pass?" }
  ..Delete: { remini passsaver.ini $serverip $+ $port }
  .Ircd
  ..Add: { writeini passsaver.ini $network Pass $$?="pass?" }
  ..Del: { remini passsaver.ini $network  }
  .operpws
  ..AddChatspace: { writeini operpasssaver.ini $server $+ $port HostName $$?="Your HostName" $$?="pass?" }
  ..DelChatspace: { remini operpasssaver.ini $server $+ $port }
  ..AddIrcd: { writeini operpasssaver.ini $network HostName $$?="Your HostName" | writeini operpasssaver.ini $network Pass $$?="pass?" }
  ..DelIrcd: { remini operpasssaver.ini $network }
}
#autonickpass on
on *:snotice:*pass*: { pass $readini(passsaver.ini, $serverip $+ $port,pass) }
on *:notice:*is registered and*:*: {
  if ($nick == nickserv) {
    .msg nickserv identify $readini(passsaver.ini, $network,pass)
  }
}
on *:text:*is registered and*:?: {
  if ($nick == nickserv) {
    .msg nickserv identify $readini(passsaver.ini, $network,pass)
  }
}
#autonickpass end

#autooperpass on
On *:Connect:{ if ($readini(operpasssaver.ini, $network,hostname)) {
    .timer 1 2 .oper $readini(operpasssaver.ini, $network,hostname) $readini(operpasssaver.ini, $network,pass)
  }
  elseif ($readini(operpasssaver.ini, $server $+ $port,hostname)) {
    .oper $readini(operpasssaver.ini, $server $+ $port,hostname) 

  }
}
#autooperpass end
alias checkpass {
  if (!$network) {
    echo -a $readini(passsaver.ini, $serverip $+ $port,pass)
  } 
  else {
    echo -a $readini(passsaver.ini, $network,pass)
  }
}
 Respond  
Epic   -  Jan 14, 2012

still looks a little over complicated o.o

 Respond  
blackvenomm666   -  Jan 12, 2012

the only problem i see with this one is the fact that you can't have a diff pw for every server if you use the same nick on every server. well that and i don't like how it sets a bunch of variables for it. you could use a txt file or an ini to do this

 Respond  
Abcdefmonkey   -  Jan 12, 2012

The point is for auto-identification, obviously. Lol. I haven't really tested it, but the dialog itself is neat and well organized. It has an auto-ID on connect option as well as options to turn off auto-ID for specific nicknames. I would test it but I can't really be arsed changing my passwords to ~8 characters, as the dialog doesn't support my 28 character NS password. xD I haven't ever tinkered with dialogs myself, so I can't readily edit the issue. :p

7/10 from me. It's useful for those with various nicknames and don't really feel like typing their pass (or using an alias as I do).

 Respond  
Epic   -  Jan 12, 2012

whats the real point of this o.o?

 Respond  
Jethro   -  Jan 09, 2012

I like the way you call your work with Max's this and that. It's very basic and humble. lol

 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.