Warrior124 Posted September 28, 2009 Report Share Posted September 28, 2009 Try this one. I removed some brackets, and missing code that was in there. ;------------------------------------------------------------------------------------------------- ;-- Center Dialog ;------------------------------------------------------------------------------------------------- alias loop { var %x 1 :lp did -a $dname 13 $nick($active,%x) inc %x if ($nick($active,%x) == $null) { goto nd } else { goto lp } :nd } alias cd { dialog -m centerd centerd } alias ccd { dll $rebar UnDock center | dialog -x centerd centerd } alias rebar { return dlls/rebar.dll } dialog centerd { title "Center Dialog" size -1 -1 589 437 option dbu list 1, 12 30 314 62, sort size extsel hsbar vsbar button "On", 2, 12 92 17 10, flat button "Off", 3, 31 92 17 10, flat edit $group(#tagged.events), 4, 49 91 15 10 button "Delete All", 6, 67 92 28 10, flat button "Clipboard", 7, 175 92 31 10, flat box "Kicked Users List", 8, 9 213 454 80 button "Ok/Cancel", 9, 8 415 586 12, ok cancel icon 10, -35 -30 647 503, pictures\004.jpg, 0, noborder button "Delete", 11, 99 92 31 10, flat button "View Notepad", 12, 134 92 37 10, flat list 13, 509 31 69 217 button "Owner", 14, 469 32 37 10 button "DeOwner", 15, 469 43 37 10 button "Host", 16, 469 54 37 10 button "DeHost", 17, 469 65 37 10 button "Voice", 18, 469 76 37 10 button "DeVoice", 19, 469 87 37 10 button "Tag", 20, 469 98 37 10 button "UnTag", 21, 469 109 37 10 text "Current Channel :", 22, 184 17 48 8, center edit , 23, 234 16 207 10, read autohs center button "Ban List Nick", 24, 469 120 37 10 button "Kick Nick", 25, 469 131 37 10 box "Nick List Options", 26, 465 23 116 244 edit "", 27, 509 249 70 10, read text "Decoded Nick : ", 28, 467 251 41 8, center box "Clone Lister", 29, 9 118 236 87 button "On", 30, 178 131 19 10 button "Off", 31, 198 131 19 10 edit $group(#CloneDet), 32, 219 131 22 10 button "View Notepad", 33, 189 148 37 10 button "Clipboard", 34, 189 167 37 10 button "Delete List", 35, 189 188 37 10 list 5, 12 126 163 75, sort size extsel hsbar vsbar list 37, 12 219 448 62, sort size extsel hsbar vsbar box "Tagged Users List", 38, 9 23 320 83 button "Delete All", 39, 67 281 28 10, flat button "On", 40, 12 281 17 10, flat button "Off", 41, 30 281 17 10, flat edit $group(#kickevents), 42, 49 281 15 10 button "Delete", 43, 99 281 31 10, flat button "View Notepad", 44, 134 281 37 10, flat button "Clipboard", 45, 175 281 31 10, flat } on *:dialog:centerd:init:*: { dll $rebar Dock $dialog($dname).hwnd > center /loop /loadbuf -ro centerd 5 settings/clonelist.txt /loadbuf -ro centerd 37 settings/snoopkick.txt /set %u 0 :loop /inc %u 1 if ($read -l [ $+ [ %u ] ] settings/snooptext.txt == $null) { goto end1 } else { /did -a centerd 1 $read -l $+ %u settings/snooptext.txt | goto loop } :end1 } on *:Dialog:centerd:sclick:1: { /set %sel.line $did(1).seltext } on *:Dialog:centerd:sclick:5: { /set %sel.line $did(5).seltext } on *:Dialog:centerd:sclick:13: { /set %sel.text $did(13).seltext } on *:Dialog:centerd:sclick:7: { clipboard %sel.line } on *:Dialog:centerd:sclick:34: { clipboard %sel.line } on *:dialog:centerd:sclick:12:{ run notepad.exe settings/snooptext.txt } on *:dialog:centerd:sclick:33:{ run notepad.exe settings/clonelist.txt } on *:Dialog:centerd:sclick:11: { /write -ds $+ %sel.line settings/snooptext.txt | /loadbuf -ro centerd 1 settings/snooptext.txt } on *:Dialog:centerd:sclick:35: { /remove settings/clonelist.txt | write settings/clonelist.txt | /loadbuf -ro centerd 5 settings/clonelist.txt } Link to comment Share on other sites More sharing options...
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now