Auto Identify Manager

By ScriptX on Aug 26, 2004

This is an Auto Identify manager. You can set your nick password and the channel you want to join, and if you ow a channel you can set the password for that chan and the chan name and it will autmaticly identify, Just copy and past into your rremotes an there ya go ^_^.

menu channel {
  Auto Identify: { 
    dialog -dm identify identify 
  }
}
dialog Identify {
  title "Auto Identify Manager"
  size -1 -1 155 168
  option dbu
  list 1, 0 0 50 168, size hsbar
  box "Nick Auto Identify", 2, 75 8 52 10
  button "Set Nick Pass", 3, 56 32 43 12
  button "Set Join Chans", 4, 106 32 43 12
  box "Chan Auto Identify", 5, 75 56 55 10
  button "Set Chan Pass", 6, 56 80 43 12
  button "Set Owner Chan", 7, 106 80 43 12
  button "Enable Identify", 8, 56 112 43 12
  button "Disable Identify", 9, 106 112 43 12
  button "OK", 10, 85 144 37 12
}
alias identify { 
  dialog -dm identify identify 
}
on *:DIALOG:identify:init:0: {
  did -a identify 1 %pass
  did -a identify 1 %chans
  did -a identify 1 %chanpass
  did -a identify 1 %ownerchan
  did -z identify 1
}
on *:DIALOG:identify:sclick:3: {
  set %pass $input(Enter Your Nick Password.,e)
  echo -a Your Nick Password Has Been Set As: %pass
}
on *:DIALOG:identify:sclick:4: {
  set %chans $input(Enter The Chans You Wish To Join (EX. #blah,#ha,#wee).,e)
  echo -a Your Join Channels Have Been Set As: %chans
}
ON *:DIALOG:identify:sclick:6: {
  set %chanpass $input(Enter Your Channel Password.,e)
  echo -a Channel Password Now Set
}
on *:DIALOG:identify:sclick:7: {
  set %ownerchan $input(Enter The Channel You Own.,e)
  echo -a Owner Channel Now Set
}
on *:DIALOG:identify:sclick:8: {
  set %identify on 
  msg $active Auto Identify Is Now Enabled
}
on *:DIALOG:identify:sclick:9: {
  set %identify off
  msg $active Auto Identify Is Now Disabled
}
on *:DIALOG:identify:sclick:10: {
  dialog -x identify identify 
}
on *:CONNECT: { 
  if ($nick == $me) && (%identify == on) {
    nickserv identify %pass
    join %chans
  }
  if ($nick == $me) && (%identify == on) {
    chanserv identify %ownerchan %chanpass
  }
}

Comments

Sign in to comment.
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.