Nicklister Help

[CharmedOne]

Ok i have never made one so i do not know how to begin to pull up the rooms nicklist , i can add the owner button Host button & other buttons but I do not know how to pull up nicks in nick list if someone could help would be great i can do the other stuff for it myself.

 

dialog centerd {

title "Center Dialog"

size -1 -1 171 163

option dbu

list 1, 102 9 60 134, size

}

[err0r]

You can use several methods..

 

Using who # and using the raw return

Using /names # and using the raw return

 

or just do a while loop through the nicks in the room

 

alias getnames {
   did -r centerd 1
     var %l 1 
       while ($nick($1,%l)) { 
       did -a centerd 1 $v1
         inc %l
   }
}

 

where the trigger is /getnames <roomname>

[Guest Travis]

I like to use the names command. It returns all nicks in one string including user modes.

[CharmedOne]

didnt work & i used /getnames in the on *:dialog:centerd:init:*:{

[err0r]

u have to use the <roomname> with the alias or change the alias to use $active

 

like this in the init

 

/getnames $active

or

/getnames %#devcafe

etc

[CharmedOne]

Ok i got it to work by doing this

 

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

}

 

But my list box isnt letting me select a nick I did use a sort & etc & even left it plain like this list 13, 509 31 69 217 still i cant select a text even after adding on *:Dialog:centerd:sclick:13: { /set %sel.text $did(13).seltext }

[err0r]

check ur id numbers.. cause that should work fine.. you don't have to do anything special to list to make it selectable.. sounds like you have another issue.. if you post what u have we can prolly help more

[err0r]

This works if u use $active. includes refresh button

dialog centerd {
  title "Center Dialog"
  size -1 -1 171 163
  option dbu
  list 1, 102 9 60 134, size
  button "Refresh List", 2, 103 145 58 12
}
on *:dialog:centerd:init:*: { getnames $active }
on *:Dialog:centerd:sclick:1: { echo -a $did(1).seltext }
on *:Dialog:centerd:sclick:2: { getnames $active }
alias getnames {
  did -r centerd 1
  var %l 1
  while ($nick($1,%l)) {
    did -a centerd 1 $v1
    inc %l
  }
}

[CharmedOne]

;-------------------------------------------------------------------------------------------------
;-- 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
}


}
dialog centerd {
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 endl }
  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 }

Edited September 26, 2009 by CharmedOne

[err0r]

i haven't checked all the code but just looking at it briefly i see a bracket mismatch and a double entry

 

right above your alias cd

 

you have

 

}
dialog centerd {

 

you need to remove that.

 

also if you are going to use the loop outside of the init you should use the dialog name and not $dname

 

alias loop {
  var %x 1 
  :lp
  did -a centerd 13 $nick($active,%x) 
  inc %x
  if ($nick($active,%x) == $null) { goto nd }
  else { goto lp }
  :nd
}

 

I personally wouldn't use a goto loop. I would use the while loop i posted and i would include a -r to clear it when the loop starts