Advertisement
westor

$isupport() for Koragg v1.0

Aug 27th, 2020
2,244
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
mIRC 0.48 KB | None | 0 0
  1. ; Usage: $isupport(WHOX) --- $isupport(CHANTYPES) -- $isupport(NOTHING)
  2. ; Usage: /isupport WHOX --- /isupport CHANTYPES --- /isupport NOTHING
  3.  
  4. alias isupport {
  5.   if (!$1) { return }
  6.  
  7.   tokenize 32 $upper($1)
  8.  
  9.   var %v = $servervars($1)
  10.   var %k = $servervars($1).key
  11.  
  12.   if (!%v) { var %r = $false }
  13.   if (!%v) && (%k) { var %r = $true }
  14.   if (%v) && (%k) { var %r = %v }
  15.   if (%v) && (!%k) { var %r = $true }
  16.  
  17.   if (!$isid) { echo -at $1 $+ : %r }
  18.   else { return %r }
  19. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement