Skip to content
MSN

Nicklist

A TG007 community discussion started by Trenton.

Discussion 12 posts
Page 1 of 1
Open
Topic #5952 · 12 published posts · 1,150 views

Hi, ive made a nicklist diaologe an i was wonderinf if anyone could hlp me code it or code it for me, an its saying it needs an open an close thing i think. so what do i do an help please if possible :) Thanks

 

James

If you can, post what you have here, and we will try to help. :)

on *:start:{ dialog -m nicklist nicklist }

dialog Nicklist {

title "Nicklist...."

size -1 -1 144 240

option dbu

list 1, 16 32 115 122, size

box "Nicklist", 2, 8 24 130 210

box "Chat Options", 3, 16 160 114 66

button "Owner", 4, 22 169 37 12

button "De Owner", 5, 86 169 37 12

button "Host", 6, 22 182 37 12

button "De Host", 7, 86 182 37 12

button "Add Admin", 8, 22 195 37 12

button "De Admin", 9, 86 195 37 12

button "Add Host", 10, 22 208 37 12

button "De Host", 11, 86 208 37 12

button "[N]icklist [A]lien [M]achine", 12, 8 8 133 12, center

}

 

on *:Dialog:nicklist:init:*:{ dll rebar.dll Dock $dialog($dname).hwnd > right }

on ^*:join:#:{ did -r nicklist 1 | .timernicks -m 1 1 getnicks }

on ^*:part:#:{ did -r nicklist 1 | .timernicks -m 1 1 getnicks }

on ^*:kick:#:{ did -r nicklist 1 | .timernicks -m 1 1 getnicks }

on ^*:quit:#:{ did -r nicklist 1 | .timernicks -m 1 1 getnicks }

on *:dialog:nicklist:sclick:3:{ /mode $active +q $did(1).seltext }

on *:dialog:nicklist:sclick:4:{ /mode $active -q $did(1).seltext }

on *:dialog:nicklist:sclick:5:{ /mode $active +o $did(1).seltext }

on *:dialog:nicklist:sclick:6:{ /mode $active -o $did(1).seltext }

on *:dialog:nicklist:sclick:7:{ /auser admin $did(1).seltext }

on *:dialog:nicklist:sclick:8:{ /ruser admin $did(1).seltext }

on *:dialog:nicklist:sclick:9:{ /auser host $did(1).seltext }

on *:dialog:nicklist:sclick:10:{ /ruser host $did(1).seltext }

raw 818:*:{ .timernicks -m 1 1 getnicks }

alias getnicks {

did -r nicklist 1

var %nick 1

while (%nick <= $nick($active,0)) {

did -a nicklist 1 $msn.decode($nick($active,%nick))) $ops($nick($active,%nick),1)

inc %nick

}

}

alias ops {

if ($1 isowner $active) return [Owner] $+

elseif ($1 isop $active) && ($1 !isowner $active) return [Host] $+

else return [user] $+

}

 

 

I think its rong, as it says no such nick/channel

 

Try this...

 

on *:start:{ dialog -m nicklist nicklist }
dialog Nicklist {
title "Nicklist...."
size -1 -1 144 240
option dbu
list 1, 16 32 115 122, size
box "Nicklist", 2, 8 24 130 210
box "Chat Options", 3, 16 160 114 66
button "Owner", 4, 22 169 37 12
button "De Owner", 5, 86 169 37 12
button "Host", 6, 22 182 37 12
button "De Host", 7, 86 182 37 12
button "Add Admin", 8, 22 195 37 12
button "De Admin", 9, 86 195 37 12
button "Add Host", 10, 22 208 37 12
button "De Host", 11, 86 208 37 12
button "[N]icklist [A]lien [M]achine", 12, 8 8 133 12, center
}

on *:Dialog:nicklist:init:*:{ dll rebar.dll Dock $dialog($dname).hwnd > right }
on ^*:join:#:{ did -r nicklist 1 | .timernicks -m 1400  getnicks }
on ^*:part:#:{ did -r nicklist 1 | .timernicks -m 1 400 getnicks }
on ^*:kick:#:{ did -r nicklist 1 | .timernicks -m 1 400 getnicks }
on ^*:quit:#:{ did -r nicklist 1 | .timernicks -m 1 400 getnicks }
on *:dialog:nicklist:sclick:3:{ /mode $active +q $remove($did(1).seltext,[Owner],[Host],[User]) }
on *:dialog:nicklist:sclick:4:{ /mode $active -q $remove($did(1).seltext,[Owner],[Host],[User]) }
on *:dialog:nicklist:sclick:5:{ /mode $active +o $remove($did(1).seltext,[Owner],[Host],[User]) }
on *:dialog:nicklist:sclick:6:{ /mode $active -o $remove($did(1).seltext,[Owner],[Host],[User]) }
on *:dialog:nicklist:sclick:7:{ /auser admin $remove($did(1).seltext,[Owner],[Host],[User]) }
on *:dialog:nicklist:sclick:8:{ /ruser admin $remove($did(1).seltext,[Owner],[Host],[User]) }
on *:dialog:nicklist:sclick:9:{ /auser host $remove($did(1).seltext,[Owner],[Host],[User]) }
on *:dialog:nicklist:sclick:10:{ /ruser host $remove($did(1).seltext,[Owner],[Host],[User]) }
raw 818:*:{ .timernicks -m 1 400 getnicks }
alias getnicks {
did -r nicklist 1
var %nick 1
while (%nick <= $nick($active,0)) {
did -a nicklist 1 $msn.decode($nick($active,%nick))) $ops($nick($active,%nick),1)
inc %nick
}
}
alias ops {
if ($1 isowner $active) return [Owner] $+
elseif ($1 isop $active) && ($1 !isowner $active) return [Host] $+
else return [user] $+
}

 

The problem was it was trying to find say "[user]Warrior124" instead of "Warrior124" which noone really has a nickname beginning with [user]. So, this code will remove the status, and should be able to pick up the true nicknames.

 

I also modified the timers as you have it set to getnicks at 1 millisecond which is too fast, and might not work well. 400 milliseconds should work better, though.

 

Hope this works. If it doesn't, please let us know. :)

Edited Feb 2, 2006 5:24 PM by Warrior124

Yea it works. the commands just dont work. if u need to know admin level is called admin an host is called host

Yes, I know that. You just have it to where the nicknames display in the dialog as Nickname[Owner], or nickname[Host], or nickname[user], and the codes wouldn't work, because you need to remove the status in the command. So, instead of having /mode $active +q $did(1).seltext it would need to be /mode $active +q $remove($did(1).seltext,[Owner],[Host],[user]). Hope you get what I mean, lol.

Edited Feb 2, 2006 6:54 PM by Warrior124

on *:dialog:nicklist:sclick:3:{ /mode $active +q $remove($did(1).seltext,[Owner]) }
on *:dialog:nicklist:sclick:4:{ /mode $active -q $remove($did(1).seltext,[Owner]) }
on *:dialog:nicklist:sclick:5:{ /mode $active +o $remove($did(1).seltext,[Host]) }
on *:dialog:nicklist:sclick:6:{ /mode $active -o $remove($did(1).seltext,[Host]) }
on *:dialog:nicklist:sclick:7:{ /auser admin $remove($did(1).seltext,[Owner]) }
on *:dialog:nicklist:sclick:8:{ /ruser admin $remove($did(1).seltext,[Owner]) }
on *:dialog:nicklist:sclick:9:{ /auser host $remove($did(1).seltext,[Host]) }
on *:dialog:nicklist:sclick:10:{ /ruser host $remove($did(1).seltext,[Host]) 

 

or change Owner to Admin a keep host to host an remove the [ ]

on *:dialog:nicklist:sclick:3:{ /mode $active +q $remove($did(1).seltext,[Owner]) }
on *:dialog:nicklist:sclick:4:{ /mode $active -q $remove($did(1).seltext,[Owner]) }
on *:dialog:nicklist:sclick:5:{ /mode $active +o $remove($did(1).seltext,[Host]) }
on *:dialog:nicklist:sclick:6:{ /mode $active -o $remove($did(1).seltext,[Host]) }
on *:dialog:nicklist:sclick:7:{ /auser admin $remove($did(1).seltext,[Owner]) }
on *:dialog:nicklist:sclick:8:{ /ruser admin $remove($did(1).seltext,[Owner]) }
on *:dialog:nicklist:sclick:9:{ /auser host $remove($did(1).seltext,[Host]) }
on *:dialog:nicklist:sclick:10:{ /ruser host $remove($did(1).seltext,[Host]) 

 

or change Owner to Admin a keep host to host an remove the [ ]

If you just use this code in each command it should work...

 

$remove($did(1).seltext,[Owner],[Host],[User])

 

That way it would eliminate the possibility of trying to +q someone who has [host] beside their nickname, and such. If you want, just copy what I gave, and replace what you have with it. :)

it dnt work i want it to owner or de owner anyone (same with host)

 

an for me to add an remove admin an host access

Okay, can you show me what you have right now?

Okay, can you show me what you have right now?

 

 

the one you orginaly edited.

Okay, I just now tested it out, and found that you have the codes for the wrong dialog id's. $did(3) is for the box, but you had the code for $did(4) in the $did(3) position. So, I changed the codes around, tested it out, and now it is working. Here are the codes...

[script]
dialog Nicklist {
title "Nicklist...."
size -1 -1 144 240
option dbu
list 1, 16 32 115 122, size
box "Nicklist", 2, 8 24 130 210
box "Chat Options", 3, 16 160 114 66
button "Owner", 4, 22 169 37 12
button "De Owner", 5, 86 169 37 12
button "Host", 6, 22 182 37 12
button "De Host", 7, 86 182 37 12
button "Add Admin", 8, 22 195 37 12
button "Rem Admin", 9, 86 195 37 12
button "Add Host", 10, 22 208 37 12
button "Rem Host", 11, 86 208 37 12
button "[N]icklist [A]lien [M]achine", 12, 8 8 133 12, center
}

on *:Dialog:nicklist:init:*:{ dll rebar.dll Dock $dialog($dname).hwnd > right }
on *:start:{ dialog -m nicklist nicklist }
on ^*:join:#:{ did -r nicklist 1 | .timernicks -m 1 400  getnicks }
on ^*:part:#:{ did -r nicklist 1 | .timernicks -m 1 400 getnicks }
on ^*:kick:#:{ did -r nicklist 1 | .timernicks -m 1 400 getnicks }
on ^*:quit:#:{ did -r nicklist 1 | .timernicks -m 1 400 getnicks }
on *:dialog:nicklist:sclick:4:{ /mode $active +q $remove($did(1).seltext,[Owner],[Host],[User]) | .timernicks -m 1 400 getnicks }
on *:dialog:nicklist:sclick:5:{ /mode $active -q $remove($did(1).seltext,[Owner],[Host],[User]) | .timernicks -m 1 400 getnicks }
on *:dialog:nicklist:sclick:6:{ /mode $active +o $remove($did(1).seltext,[Owner],[Host],[User]) | .timernicks -m 1 400 getnicks }
on *:dialog:nicklist:sclick:7:{ /mode $active -o $remove($did(1).seltext,[Owner],[Host],[User]) | .timernicks -m 1 400 getnicks }
on *:dialog:nicklist:sclick:8:{ /auser admin $remove($did(1).seltext,[Owner],[Host],[User]) | .timernicks -m 1 400 getnicks }
on *:dialog:nicklist:sclick:9:{ /ruser admin $remove($did(1).seltext,[Owner],[Host],[User]) | .timernicks -m 1 400 getnicks }
on *:dialog:nicklist:sclick:10:{ /auser host $remove($did(1).seltext,[Owner],[Host],[User]) | .timernicks -m 1 400 getnicks }
on *:dialog:nicklist:sclick:11:{ /ruser host $remove($did(1).seltext,[Owner],[Host],[User]) | .timernicks -m 1 400 getnicks }
raw 818:*:{ .timernicks -m 1 400 getnicks }
alias getnicks {
did -r nicklist 1
var %nick 1
while (%nick <= $nick($active,0)) {
did -a nicklist 1 $msn.decode($nick($active,%nick))) $ops($nick($active,%nick),1)
inc %nick
}
}
alias ops {
if ($1 isowner $active) return [Owner] $+
elseif ($1 isop $active) && ($1 !isowner $active) return [Host] $+
else return [user] $+
}

Edited Feb 3, 2006 6:22 PM by Warrior124