Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- menu status,menubar,channel {
- .Autoid: { dialog -mdhr Autoid Autoid }
- }
- dialog Autoid {
- title Auto Identifier By Legolioum
- size 1 1 220 180
- option DBU
- box "Nicknanes And Passwords", 1, 3 0 204 160,
- edit "Nickname 1", 2, 5 15 100 20, Limit 0
- edit "Password 1", 3, 105 15 100 20, Pass
- button "Save Nickname 1", 4, 5 35 100 20,
- button "Delete Nickname 1", 5, 105 35 100 20,
- edit "Nickname 2", 6, 5 55 100 20, Limit 0
- edit "Password 2", 7, 105 55 100 20, Pass Limit 0
- button "Save Nickname 2", 8, 5 75 100 20,
- button "Delete Nickname 2", 9, 105 75 100 20,
- edit "Nickname 3", 10, 5 95 100 20, Limit 0
- edit "Password 3", 11, 105 95 100 20, Pass
- button "Save Nickname 3", 12, 5 115 100 20,
- button "Delete Nickname 3", 13, 105 115 100 20,
- button "Ok", 14, 5 135 200 20, Flat OK
- edit "Version 1.0.", 15, 80 161 50 12, Read Center
- }
- on 1:dialog:Autoid:init:0: {
- did -era Autoid 2 %Nickname1
- did -era Autoid 3 %Password1
- did -era Autoid 6 %Nickname2
- did -era Autoid 7 %Password2
- did -era Autoid 10 %Nickname3
- did -era Autoid 11 %Password3
- }
- on 1:dialog:Autoid:sclick:4: {
- set %Nickname1 $did(2)
- set %Password1 $did(3)
- }
- on 1:dialog:Autoid:sclick:8: {
- set %Nickname2 $did(6)
- set %Password2 $did(7)
- }
- on 1:dialog:Autoid:sclick:12: {
- set %Nickname3 $did(10)
- set %Password3 $did(11)
- }
- on 1:dialog:Autoid:sclick:5: {
- unset %Nickname1
- unset %Password1
- did -b Autoid 4
- did -en Autoid 2,3
- }
- on 1:dialog:Autoid:sclick:9: {
- unset %Nickname2
- unset %Password2
- did -b Autoid 8
- did -en Autoid 6,7
- }
- on 1:dialog:Autoid:sclick:13: {
- unset %Nickname3
- unset %Password3
- did -b Autoid 12
- did -en Autoid 10,11
- }
- on 1:dialog:Autoid:sclick:2: {
- did -en Autoid 4
- }
- on 1:dialog:Autoid:sclick:6: {
- did -en Autoid 8
- }
- on 1:dialog:Autoid:sclick:10: {
- did -en Autoid 12
- }
- on *:NOTICE:This nickname is registered and protected* If it is your*:?: {
- if ($nick == NickServ) && ($me == %Nickname1) {
- ns id %Password1
- }
- elseif {
- ($nick == NickServ) && ($me == %Nickname2) {
- ns id %Password2
- }
- else {
- ns id %Password3
- }
- }
- }
Add Comment
Please, Sign In to add comment