Guest User

Untitled

a guest
Apr 23rd, 2018
83
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
mIRC 2.14 KB | None | 0 0
  1. menu status,menubar,channel {
  2.   .Autoid: { dialog -mdhr Autoid Autoid }
  3. }
  4. dialog Autoid {
  5.   title Auto Identifier By Legolioum
  6.   size 1 1 220 180
  7.   option DBU
  8.   box "Nicknanes And Passwords", 1, 3 0 204 160,
  9.   edit "Nickname 1", 2, 5 15 100 20, Limit 0
  10.   edit "Password 1", 3, 105 15 100 20, Pass
  11.   button "Save Nickname 1", 4, 5 35 100 20,
  12.   button "Delete Nickname 1", 5, 105 35 100 20,
  13.   edit "Nickname 2", 6, 5 55 100 20, Limit 0
  14.   edit "Password 2", 7, 105 55 100 20, Pass Limit 0
  15.   button "Save Nickname 2", 8, 5 75 100 20,
  16.   button "Delete Nickname 2", 9, 105 75 100 20,
  17.   edit "Nickname 3", 10, 5 95 100 20, Limit 0
  18.   edit "Password 3", 11, 105 95 100 20, Pass
  19.   button "Save Nickname 3", 12, 5 115 100 20,
  20.   button "Delete Nickname 3", 13, 105 115 100 20,
  21.   button "Ok", 14, 5 135 200 20, Flat OK
  22.   edit "Version 1.0.", 15, 80 161 50 12, Read Center
  23. }
  24. on 1:dialog:Autoid:init:0: {
  25.   did -era Autoid 2 %Nickname1
  26.   did -era Autoid 3 %Password1
  27.   did -era Autoid 6 %Nickname2
  28.   did -era Autoid 7 %Password2
  29.   did -era Autoid 10 %Nickname3
  30.   did -era Autoid 11 %Password3
  31. }
  32. on 1:dialog:Autoid:sclick:4: {
  33.   set %Nickname1 $did(2)
  34.   set %Password1 $did(3)
  35. }
  36. on 1:dialog:Autoid:sclick:8: {
  37.   set %Nickname2 $did(6)
  38.   set %Password2 $did(7)
  39. }
  40. on 1:dialog:Autoid:sclick:12: {
  41.   set %Nickname3 $did(10)
  42.   set %Password3 $did(11)
  43. }
  44. on 1:dialog:Autoid:sclick:5: {
  45.   unset %Nickname1
  46.   unset %Password1
  47.   did -b Autoid 4
  48.   did -en Autoid 2,3
  49. }
  50. on 1:dialog:Autoid:sclick:9: {
  51.   unset %Nickname2
  52.   unset %Password2
  53.   did -b Autoid 8
  54.   did -en Autoid 6,7
  55. }
  56. on 1:dialog:Autoid:sclick:13: {
  57.   unset %Nickname3
  58.   unset %Password3
  59.   did -b Autoid 12
  60.   did -en Autoid 10,11
  61. }
  62. on 1:dialog:Autoid:sclick:2: {
  63.   did -en Autoid 4
  64. }
  65. on 1:dialog:Autoid:sclick:6: {
  66.   did -en Autoid 8
  67. }
  68. on 1:dialog:Autoid:sclick:10: {
  69.   did -en Autoid 12
  70. }
  71. on *:NOTICE:This nickname is registered and protected* If it is your*:?: {
  72.   if ($nick == NickServ) && ($me == %Nickname1) {
  73.     ns id %Password1
  74.   }
  75.   elseif {
  76.     ($nick == NickServ) && ($me == %Nickname2) {
  77.       ns id %Password2
  78.     }
  79.     else {
  80.       ns id %Password3
  81.     }
  82.   }
  83. }
Add Comment
Please, Sign In to add comment