Advertisement
makimaki

Sidebar

Jan 24th, 2011
204
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
mIRC 2.67 KB | None | 0 0
  1. ; ----------------------------)
  2. ; --- Mi Amor Multi Server ---)
  3. ; -------- Sidebar -----------)
  4. ; ----------------------------)
  5. ;Created By MakiMaki & seraphim
  6. ;DCX Based SideBar
  7. ;H0S.dll Docking
  8.  
  9. alias rightbar { if ($dialog(rbar)) { dialog -x rbar } |  .treebar off | dialog -m rbar rbar }
  10.  
  11. alias -l hOS { dll dlls\hOS.dll $1- }
  12.  
  13. dialog rbar {
  14.   title "rbar"
  15.   size 0 0 1 1 |
  16.   option pixel
  17. }
  18.  
  19. on *:DIALOG:rbar:init:*:{
  20.  
  21.   ;Button Funtion
  22.   dcx Mark rbar callback_rbar
  23.  
  24.   ;Docks bar and sets size
  25.   hOS Dock rbar right  -1 30
  26.  
  27.   ;Enables the Treeview (Must load sidebar first to not have a glitch window)
  28.   .treebar on
  29.  
  30.   xdialog -g rbar +is icons\bg.jpg
  31.   xdialog -c rbar 2 toolbar 1 0 0 right nodivider list tooltips wrap notheme flat
  32.  
  33.   ;Fills sidebar with the imgs
  34.   xdid -l rbar 2 24
  35.   xdid -a rbar 2 1 +c 1 1 | xdid -w rbar 2 +ndh 0 icons\1.ico
  36.   xdid -a rbar 2 2 +c 1 2 | xdid -w rbar 2 +ndh 0 icons\3.ico
  37.   xdid -a rbar 2 3 +c 1 3 | xdid -w rbar 2 +ndh 0 icons\2.ico
  38.   xdid -a rbar 2 4 +c 1 4 | xdid -w rbar 2 +ndh 0 icons\4.ico
  39.   xdid -a rbar 2 5 +c 1 5 | xdid -w rbar 2 +ndh 0 icons\4.ico
  40.   xdid -a rbar 2 6 +c 1 6 | xdid -w rbar 2 +ndh 0 icons\4.ico
  41.  
  42.   ;Spacer
  43.   xdid -a rbar 2 7 +cd 1 0
  44.  
  45.   ;Kicks/Bans
  46.   xdid -a rbar 2 8 +c 1 7 | xdid -w rbar 2 +ndh 0 icons\4.ico
  47.   xdid -a rbar 2 9 +c 1 8 | xdid -w rbar 2 +ndh 0 icons\4.ico
  48.   xdid -a rbar 2 10 +c 1 9 | xdid -w rbar 2 +ndh 0 icons\4.ico
  49.   xdid -a rbar 2 12 +c 1 10 | xdid -w rbar 2 +ndh 0 icons\4.ico
  50.   xdid -a rbar 2 13 +c 1 11 | xdid -w rbar 2 +ndh 0 icons\4.ico
  51.   xdid -a rbar 2 14 +c 1 12 | xdid -w rbar 2 +ndh 0 icons\4.ico
  52.  
  53.   ;Profile View
  54.   xdid -a rbar 2 15 +c 1 13 | xdid -w rbar 2 +ndh 0 icons\5.ico  
  55.  
  56. }
  57.  
  58. alias callback_rbar {
  59.   if ($3 == 2) {
  60.     if ($2 == sclick) {
  61.       ; echo -a * Button $4- Clicked
  62.       var %sn $snick($active,1),%chan $active
  63.       if (%sn == $null) { echo 7 %chan * Please select a nick first | return }
  64.       if ($4 == 1) { mode %chan +q %sn }
  65.       elseif ($4 == 2) { mode %chan -qo %sn %sn }
  66.       elseif ($4 == 3) { mode %chan +o %sn }
  67.       elseif ($4 == 4) { mode %chan -qo %sn %sn }
  68.       elseif ($4 == 5) { mode %chan +v %sn }
  69.       elseif ($4 == 6) { mode %chan -qov %sn %sn %sn }
  70.       elseif ($4 == 8) { kick %chan %sn kthanxs bai }
  71.       elseif ($4 == 9) { user.ban %chan %sn 5 MiAmor 5min timeout }
  72.       elseif ($4 == 10) { user.ban %chan %sn 15 MiAmor 15min timeout }
  73.       elseif ($4 == 11) { user.ban %chan %sn 30 MiAmor 30min timeout }
  74.       elseif ($4 == 12) { user.ban %chan %sn 60 MiAmor 1 hour timeout }
  75.       elseif ($4 == 13) { user.ban %chan %sn 1440 MiAmor 24 hour timeout }
  76.       elseif ($4 == 14) { .Prop %sn PUID }
  77. } } }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement