Forums Scripts & Popups use nicklust3.dll

 ON *:JOIN:#:{ 
  if ($nick == $me) {
    nicklust Mark $window($chan).hwnd nLUST_CallBack rowselect tooltips balloontips hideempty hottrack dlgframe clientedge 
    dll $scriptdirnickLUST3.dll AddIcon $chan > $shortfn($scriptdiricons\op2.ico)  
    dll $scriptdirnickLUST3.dll AddIcon $chan > $shortfn($scriptdiricons\voice.ico)   
    dll $scriptdirnickLUST3.dll AddIcon $chan > $shortfn($scriptdiricons\MacOSX.ico)    
    dll $scriptdirnickLUST3.dll AddIcon $chan > $shortfn($scriptdiricons\hop.ico)   
    dll $scriptdirnickLUST3.dll AddIcon $chan > $shortfn($scriptdiricons\usr.ico)   
    dll $scriptdirnickLUST3.dll AddIcon $chan > $shortfn($scriptdiricons\spr.ico)   
    dll $scriptdirnickLUST3.dll AddIcon $chan > $shortfn($scriptdiricons\ownr.ico)  
    dll $scriptdirnickLUST3.dll SetGroupText $chan 1 >  Chatters   
    dll $scriptdirnickLUST3.dll AddGroup $chan 10 + 2 >  Voice +    
    dll $scriptdirnickLUST3.dll AddGroup $chan 11 @ 1 >  Operator @   
    dll $scriptdirnickLUST3.dll AddGroup $chan 12 % 4 >  Halfop %    
    dll $scriptdirnickLUST3.dll AddGroup $chan 13 - 5 >  User ops   
    dll $scriptdirnickLUST3.dll AddGroup $chan 14 & 6 >  Super ops    
    dll $scriptdirnickLUST3.dll AddGroup $chan 15 . 7 >  Eigenaar   
    dll $scriptdirnickLUST3.dll SetGroupView $chan 1 normal    
    dll $scriptdirnickLUST3.dll SetGroupView $chan 10 normal    
    dll $scriptdirnickLUST3.dll SetGroupView $chan 11 normal    
    dll $scriptdirnickLUST3.dll SetGroupView $chan 12 normal
    dll $scriptdirnickLUST3.dll SetGroupView $chan 13 normal   
    dll $scriptdirnickLUST3.dll SetGroupView $chan 14 normal  
    dll $scriptdirnickLUST3.dll SetGroupView $chan 15 normal 
    dll $scriptdirnickLUST3.dll SetGroupIcon $chan 1 3   
    dll $scriptdirnickLUST3.dll SetGroupPos $chan 15 start 
    dll $scriptdirnickLUST3.dll SetGroupPos $chan 11 end 
    dll $scriptdirnickLUST3.dll SetGroupPos $chan 12 end  
    dll $scriptdirnickLUST3.dll SetGroupPos $chan 10 end   
    dll $scriptdirnickLUST3.dll SetGroupPos $chan 14 end    
    dll $scriptdirnickLUST3.dll SetGroupPos $chan 13 end    
    dll $scriptdirnickLUST3.dll SetGroupPos $chan 1 end   
    dll $scriptdirnickLUST3.dll SetColor $chan bkg $color(1) 
    dll $scriptdirnickLUST3.dll SetColor $chan text  $color(0)  
    dll $scriptdirnickLUST3.dll SetColor $chan tipbkg $rgb(219,219,219)
    dll $scriptdirnickLUST3.dll SetColor $chan tiptext $color(1)   
    dll $scriptdirnickLUST3.dll SetColor $chan hottext $color(8) 
    dll $scriptdirnickLUST3.dll SetColor $chan divider $color(0) $color(1)   
    dll $scriptdirnickLUST3.dll SetHeaderFontStyle $chan italic    
    dll $scriptdirnickLUST3.dll SetHeaderColor $chan 15 $color(4)  
    dll $scriptdirnickLUST3.dll SetHeaderColor $chan 11 $color(9)  
    dll $scriptdirnickLUST3.dll SetHeaderColor $chan 12   $color(4)  
    dll $scriptdirnickLUST3.dll SetHeaderColor $chan 10 $rgb(0,0,255) 
    dll $scriptdirnickLUST3.dll SetHeaderColor $chan 14 $color(4) 
    dll $scriptdirnickLUST3.dll SetHeaderColor $chan 1 $color(4) 
  } 
  haltdef
}
alias nicklust { dll $+(",$scriptdirnickLUST3.dll,") $1- }
alias nlust_callback {
  if ($1 = tooltip) {    
    var %extra    
    if ($3 == $me) %extra = (Eigen naam)   
    nicklust SetTipTitle $2 1 > Information sur $3 %extra    
    return Status: $nlist_pnick($remove($nick($2,$3).pnick,$3)) $+ $crlf $+ Idle: $duration($nick($2,$nick($2,$3)).idle) $+ $crlf $+ Notify list: $iif($notify($3),Oui,Non) $+ $crlf $+ Adresse: $iif($address($3,4),$ifmatch,) $+ $crlf $+ Canal: $_comchans($3,32)) 
  }
}
alias nlist_pnick { 
  if ($1 = @) { return Operateur de canal }  
  elseif ($1 = .) { return Kamer Eigenaar }  
  elseif ($1 = &) { return Beschermde Chatter }  
  elseif ($1 = +) { return Voice }  
  elseif ($1 = %) { return Half Op }  
  elseif ($1 = -) { return Operator }  
  elseif ($1 = $null) { return Utilisateur Normal }
}
alias _isnotifylist {  
  if ($notify($1)) return $2  
  return $3
}
alias _comchans {
  var %tokk = $iif($2,$ifmatch,$chr(32)), %iii = 1, %chh
  while (%iii <= $comchan($1,0)) {    
    %chh = $addtok(%chh,$comchan($1,%iii),%tokk) | inc %iii  
  }  
  return $sorttok(%chh,%tokk) 
}
if ($1 == nickadded) {  
  if ($3 == $me) return 2 $rgb(255,0,255) > $me $crlf $+ Dit ben jij  
  if ($3 == Bullseye) return none $rgb(0,255,0) > $3 $+ $crlf $+ Script maker  
}