hey their im trying too sort out so i can get my right click and popup too work for my custom nicklist
any help id be thankfull
on *:JOIN:#:{
if ($nick == $me) { .timershownicks -m 1 5 shownicks }
else { .timershownicks -m 1 1 shownicks }
}
on *:active:#:{ shownicks }
on *:PART:#:{ shownicks }
on *:KICK:#:{ shownicks }
on *:KILL:#:{ shownicks }
on *:OWNER:#:{ shownicks }
on *
EOP:#:{ shownicks }
on *
EOWNER:#:{ shownicks }
on *:OP:#:{ shownicks }
on *:QUIT:{ if ($nick != $me) { shownicks } }
on 1:start:{ dialog -m spcnnicklist spcnnicklist }
alias mdx_fullpath { return $xdir(files\mdx.dll) }
alias mdx { dll $mdx_fullpath $1- }
alias mdxinit {
dll $mdx_fullpath SetMircVersion $version
dll $mdx_fullpath MarkDialog $dname
}
dialog spcnnicklist {
size -1 -1 208 640
title "nicklist"
list 6,0 0 209 347,vsbar size
text "Local:",1,6 410 28 13
text "Global:",2,6 438 33 13
text "Own:",3,112 410 26 13
text "Host:",4,112 438 26 13
text "Voice:",5,112 466 29 13
button "Access Dailog",7,4 584 200 20
button "+",8,114 508 20 20
button "-",9,34 508 20 20
button "Clear",10,162 508 36 20
button "Edit Lists",11,6 460 84 20
button "+",12,46 408 20 20
button "-",13,176 464 20 20
button "+",14,152 464 20 20
button "-",15,176 436 20 20
button "+",16,152 436 20 20
button "-",17,176 408 20 20
button "+",18,152 408 20 20
button "-",19,70 408 20 20
button "+",20,46 436 20 20
button "-",21,70 436 20 20
button "+",22,10 508 20 20
button "-",23,138 508 20 20
button "Clear",24,58 508 36 20
button "+",25,10 554 20 20
button "Clear",26,58 554 36 20
button "-",27,34 554 20 20
button "+",28,112 554 20 20
button "-",29,136 554 20 20
button "Clear",30,160 554 36 20
box "Banlists:",31,4 392 92 96
box "User Status:",32,108 392 96 96
box "Local AOP (Q):",33,4 490 96 44
box "Local AOP (O):",34,4 536 96 44
box "Global AOP (Q):",35,108 490 96 44
box "Global AOP (O):",36,108 536 96 44
}
on *:dialog:spcnnicklist:init:*:{
dll $xdir(files/rebar.dll) Dock $dialog(spcnnicklist).hwnd > right
mdxinit
}
alias additem_ { $dll($xdir(files/popups.dll),AddItem $1-) }
alias ico { return $xdir(icons\ $+ $1- $+ .ico) }
alias loadimg_ { $dll($xdir(files/popups.dll),LoadImg $1-) }
alias pop { tokenize 32 $dll($xdir(files/popups.dll),Popup,$1-) | if ($isid) return $1- | $iif($4- != did not select a menu item,$4-) }
alias popups { return $dll($xdir(files/popups.dll),$1,$2-) }
alias nicklist.popup {
unset %selnick
unset %seladdy
set %selnick $gettok($did(6).seltext,-1,32)
set %nickz $gettok($did(6).seltext,-1,32)
var %menu1 one
var %menu2 two
var %menu3 three
var %menu4 four
popups New %menu1 16 16
additem %menu1 end 1 1 %nickz
additem %menu1 end
additem %menu1 end 2 2 User Info $cr /uwho %nickz
additem %menu1 end
additem %menu1 end + 3 3 Hosting $cr %menu2
additem %menu1 end
additem %menu1 end + 4 4 Room Access $cr %menu3
additem %menu1 end
additem %menu1 end + 5 5 Kick $cr %menu4
additem %menu1 end
additem %menu1 end + 6 6 Aop $cr %menu5
additem %menu1 end
additem %menu1 end + 7 7 Banlist $cr %menu6
additem_ %menu1 end
additem_ %menu1 end 8 8 Whisper $cr /whisper %nickz
pop %menu1 +c $mouse.dx $mouse.dy
popups New %menu2 16 16
additem %menu2 end 1 1 Owner $cr mode $active +q %nickz
additem %menu2 end 2 2 Host $cr mode $active +o %nickz
additem %menu2 end 3 3 Deowner $cr access $active clear owner $cr mode $active -q %nickz $cr prop $active ownerkey $string(10)
additem %menu2 end 4 4 Dehost $cr mode $active -o %nickz $cr prop $active hostkey $string(10)
additem %menu2 end 5 5 Spectator $cr mode $active -qov %nickz $cr prop $active ownerkey $string(10) $cr access $active clear owner
pop %menu2 +c $mouse.dx $mouse.dy
popups New %menu3 16 16
additem %menu3 end 1 1 Add Owner Access $cr access $active add owner %nickz $+ $address(%nickz,1) %nickz Owner Access
additem %menu3 end 1 1 Delete 0wner Access $cr access $active delete owner %nickz $+ $address(%nickz,1) %nickz Delete Owner Access
additem %menu3 end
additem %menu3 end 2 2 Add Host Access $cr access $active add host %nickz $+ $address(%nickz,1) %nickz Host Access
additem %menu3 end 2 2 Delete Host Access $cr access $active delete host %nickz $+ $address(%nickz,1) %nickz Delete Host Access
additem %menu3 end
additem %menu3 end 3 3 Add Grant Access $cr access $active add grant %nickz $+ $address(%nickz,1) %nickz Grant Access
additem %menu3 end 3 3 Delete Grant Access $cr access $active delete grant %nickz $+ $address(%nickz,1) %nickz Delete Grant Access
additem %menu3 end
additem %menu3 end 4 4 Add Voice Access $cr access $active add voice %nickz $+ $address(%nickz,1) %nickz Voice Access
additem %menu3 end 4 4 Delete Voice Access $cr access $active delete voice %nickz $+ $address(%nickz,1) %nickz Delete Voice Access
additem %menu3 end
additem %menu3 end 5 5 Add Invite Access $cr access $active add Invite %nickz $+ $address(%nickz,1) %nickz Invite Access
additem %menu3 end 5 5 Delete Invite Access $cr access $active delete Invite %nickz $+ $address(%nickz,1) %nickz Delete Invite Access
additem %menu3 end
additem %menu3 end 6 6 Add EXCEPT Access $cr access $active add EXCEPT %nickz $+ $address(%nickz,1) %nickz EXCEPT Access
additem %menu3 end 6 6 Delete EXCEPT Access $cr access $active delete EXCEPT %nickz $+ $address(%nickz,1) %nickz Delete EXCEPT Access
pop %menu3 +c $mouse.dx $mouse.dy
popups New %menu4 16 16
additem %menu4 end 1 1 Disruptive Behavior $cr kick $active %nickz Disruptive Behavior
additem %menu4 end 1 1 Profanity $cr kick $active %nickz Profanity in the chatroom
additem %menu4 end 1 1 Scrolling $cr kick $active %nickz Excessive Scrolling
additem %menu4 end 1 1 Fuck Off $cr kick $active %nickz Fuck off
pop %menu4 +c $mouse.dx $mouse.dy
popups New %menu5 16 16
additem %menu5 end 1 1 Add Too Script Administrator $cr writeini -n aop\scans.ini admin $ial($$1,1).addr $$1 | query $$1 Your Now SubAtomic Script Administrator $$1 type `cammands for a list of commands (H) | sockwrite -n # $+(mode # +q $$1)
additem %menu5 end 1 1 Add Too Local +q List $cr writeini -n aop\scans.ini Lown $+ $chan $ial($$1,1).addr $$1 | writeini -n aop\chan.ini Lown $right($active,-2) $active $cr mode $active +q %nickz
additem %menu5 end 1 1 Add Too Global +q List $cr writeini -n aop\scans.ini Gown $ial($$1,1).addr $cr mode $active +q %nickz
pop %menu5 +c $mouse.dx $mouse.dy
popups New %menu6 16 16
additem %menu6 end 1 1 Add Too Local Ban List $cr writeini -n aop\scans.ini Lban $+ $chan $ial($$1,1).addr $$1 | writeini -n aop\chan.ini Lban $right($active,-2) $active
additem %menu6 end 1 1 Add Too Global Ban List $cr writeini -n aop\scans.ini Gban $ial($$1,1).addr $$1 $cr kick $active
pop %menu6 +c $mouse.dx $mouse.dy
}
alias shownicks {
.did -r spcnnicklist 6
set %i 1
while (%i <= $nick($active,0)) {
<br>
.did -a spcnnicklist 6 $sp.decode($nick($active,%i))
inc %i
}
}
on *:dialog:spcnnicklist:sclick:*:{
tokenize 32 $did($did,48)
if ($1 == rclick) { }
if ($1 == dclick) { query $did(6).seltext }
if ($1 == popups) { popup.dll }
}