Advertisement
itke2k

ShowTab [shameless rip & re purpose with a few tweaks]

Jul 6th, 2015
274
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
mIRC 2.22 KB | None | 0 0
  1. ;double right click channel to refresh
  2. menu channel,status {
  3.   $iif(1 > 0,$ff,$style(2)) Show Tab
  4.   .$iif(%parse2 == $null,$style(2)) [Title][ %parse2 ]:{ ff | describe $active Viewing Tab %parse2 }
  5.   .$iif(%parse == $null,$style(2)) [Url][ %parse ]:{ ff | describe $active Viewing Tab %parse }
  6.   .$iif(%parse2 == $null,$style(2)) [Title + url][ %parse2 @ %parse ]:{ ff | describe $active Viewing Tab %parse2 @ [ %parse ] }
  7. }
  8.  
  9. alias fft { ff | if (%parse2 != $null) { describe $active Viewing Tab %parse2 } }
  10.  
  11. alias ffu { ff | if (%parse2 != $null) { describe $active Viewing Tab %parse } }
  12.  
  13. alias fftu { ff | if (%parse2 != $null) { describe $active Viewing Tab %parse2 @ [ %parse ] } }
  14.  
  15. alias ffut { ff | if (%parse2 != $null) { describe $active Viewing Tab %parse2 @ [ %parse ] } }
  16.  
  17.  
  18. alias ff {
  19.   Set %parse $null
  20.   Set %parse2 $null
  21.   if (($dde(firefox,WWW_GetWindowInfo)) || ($dde(chrome,WWW_GetWindowInfo)) || ($dde(iexplore,WWW_GetWindowInfo,1))) {  
  22.     if ($regex(url,$v1,/^"([^"]+)"\x2C"([^"]*)"(?:\x2C".*")?$/)) {  
  23.       set %parse $+($regml(url,1)),$+(",$regml(url,1),")
  24.       set %parse2 $+($regml(url,2)),$+(",$regml(url,2),")
  25.       if ( youtube.co isin %parse ) { set %parse2 1,0You0,4Tube: $remove($replace(%parse2,_,$chr(32)),youtube,youtube.com,.com) | goto stop }
  26.       if ( pastebin.co isin %parse ) { set %parse2 0,2PasteBin: $remove($replace(%parse2,_,$chr(32)),pastebin,pastebin.com,.com) | goto stop }
  27.       if ( facebook.co isin %parse ) { set %parse2 2,0FaceBook: $remove($replace(%parse2,_,$chr(32)),facebook,facebook.com,.com) | goto stop }
  28.       if ( github.co isin %parse ) { set %parse2 1,15github: $remove($replace(%parse2,_,$chr(32)),github,github.com,.com) | goto stop }
  29.       if ( 4chan.org isin %parse ) { set %parse2 4,74chan: $remove($replace(%parse2,_,$chr(32)),4chan,4chan.org,.org) | goto stop }
  30.       if ( reddit.co isin %parse ) { set %parse2 1,10reddit: $remove($replace(%parse2,_,$chr(32)),reddit,reddit.com,.com) | goto stop }
  31.       if ( google.co isin %parse ) { set %parse2 2,0G4o8o2g3l4e: $remove($replace(%parse2,_,$chr(32)),google,google.com,.com) | goto stop }
  32.       :stop
  33.     }
  34.     else { echo -a *Error* Browser Not Found or Unknown. }  
  35.   }
  36. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement