Advertisement
makimaki

Sidebar

Jan 24th, 2011
316
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
mIRC 2.72 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.   ;Background and the way the sidebar acts
  31.   xdialog -g rbar +is icons\bg.jpg
  32.   xdialog -c rbar 2 toolbar 1 0 0 right nodivider list tooltips wrap notheme flat
  33.  
  34.   ;Fills sidebar with the imgs
  35.   xdid -l rbar 2 24
  36.   xdid -a rbar 2 1 +c 1 1 | xdid -w rbar 2 +ndh 0 icons\1.ico
  37.   xdid -a rbar 2 2 +c 1 2 | xdid -w rbar 2 +ndh 0 icons\3.ico
  38.   xdid -a rbar 2 3 +c 1 3 | xdid -w rbar 2 +ndh 0 icons\2.ico
  39.   xdid -a rbar 2 4 +c 1 4 | xdid -w rbar 2 +ndh 0 icons\4.ico
  40.   xdid -a rbar 2 5 +c 1 5 | xdid -w rbar 2 +ndh 0 icons\4.ico
  41.   xdid -a rbar 2 6 +c 1 6 | xdid -w rbar 2 +ndh 0 icons\4.ico
  42.  
  43.   ;Spacer
  44.   xdid -a rbar 2 7 +cd 1 0
  45.  
  46.   ;Kicks/Bans
  47.   xdid -a rbar 2 8 +c 1 7 | xdid -w rbar 2 +ndh 0 icons\4.ico
  48.   xdid -a rbar 2 9 +c 1 8 | xdid -w rbar 2 +ndh 0 icons\4.ico
  49.   xdid -a rbar 2 10 +c 1 9 | xdid -w rbar 2 +ndh 0 icons\4.ico
  50.   xdid -a rbar 2 12 +c 1 10 | xdid -w rbar 2 +ndh 0 icons\4.ico
  51.   xdid -a rbar 2 13 +c 1 11 | xdid -w rbar 2 +ndh 0 icons\4.ico
  52.   xdid -a rbar 2 14 +c 1 12 | xdid -w rbar 2 +ndh 0 icons\4.ico
  53.  
  54.   ;Profile View
  55.   xdid -a rbar 2 15 +c 1 13 | xdid -w rbar 2 +ndh 0 icons\5.ico  
  56.  
  57. }
  58.  
  59. alias callback_rbar {
  60.   if ($3 == 2) {
  61.     if ($2 == sclick) {
  62.       ; echo -a * Button $4- Clicked
  63.       var %sn $snick($active,1),%chan $active
  64.       if (%sn == $null) { echo 7 %chan * Please select a nick first | return }
  65.       if ($4 == 1) { mode %chan +q %sn }
  66.       elseif ($4 == 2) { mode %chan -qo %sn %sn }
  67.       elseif ($4 == 3) { mode %chan +o %sn }
  68.       elseif ($4 == 4) { mode %chan -qo %sn %sn }
  69.       elseif ($4 == 5) { mode %chan +v %sn }
  70.       elseif ($4 == 6) { mode %chan -qov %sn %sn %sn }
  71.       elseif ($4 == 8) { kick %chan %sn kthanxs bai }
  72.       elseif ($4 == 9) { user.ban %chan %sn 5 MiAmor 5min timeout }
  73.       elseif ($4 == 10) { user.ban %chan %sn 15 MiAmor 15min timeout }
  74.       elseif ($4 == 11) { user.ban %chan %sn 30 MiAmor 30min timeout }
  75.       elseif ($4 == 12) { user.ban %chan %sn 60 MiAmor 1 hour timeout }
  76.       elseif ($4 == 13) { user.ban %chan %sn 1440 MiAmor 24 hour timeout }
  77.       elseif ($4 == 14) { .Prop %sn PUID }
  78. } } }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement