All pastes #1232369 Raw Edit

Untitled

public text v1 · immutable
#1232369 ·published 2008-10-21 01:08 UTC
rendered paste body
;SexGod ShortCuts Script.


on 1:LOAD:{
  if ($version < 5.61) {
    echo -a Sorry you need at least mIRC version 5.61 or above to use this script, unloading... 
    unload -rs $script
  }
  else {
    echo -a 1,1*******************************************
    echo -a 1,1*15,1SexGod Shortcuts script - Written By Dan.1,1*
    echo -a 1,1*0,1Use sg in any channel as you did before1,1***
    echo -a 1,1*0,1Example: sg access list1,1*******************
    echo -a 1,1*******************************************
  }
}

menu menubar {
  &SexGod Shortcuts
  . $+ $iif($group(#sg-shortcuts) == on,O&FF):.disable #sg-shortcuts | echo -a 8,1SexGod Shortcuts are now OFF 
  . $+ $iif($group(#sg-shortcuts) == off,&ON):.enable #sg-shortcuts | echo -a 8,1SexGod Shortcuts are now ON
  .About:{
    echo -a 1,1*******************************************
    echo -a 1,1*15,1SexGod Shortcuts script - Written By Dan.1,1*
    echo -a 1,1*0,1Use sg in any channel as you did before1,1***
    echo -a 1,1*0,1Example: sg access list1,1*******************
    echo -a 1,1*******************************************
  }
}

#SG-Shortcuts on
on *:INPUT:#:{
  if ($$1 == sg) {
    if ($2 == help) {
      .msg sexgod $2-
    }
    else if ($2 == kick) {
      if ($me !isop # && $me !ishop #) {
        .msg sexgod halfop # $me
      }
      .timersgkick 1 2 .raw kick # $3 : $+ $4-
    }
    else if ($2 == ban) {
      if ($me !isop #) {
        .msg sexgod op # $me
      }
      if ($4) {
        .timersgban 1 1 ban # $3-
      }
      else {
        .timersgban 1 1 ban # $3- 3
      }
    }
    else {
      var %SexGod.Commands = info|access|set|op|deop|halfop|dehalfop|voice|akick|sop|aop|vop|hop|levels|unset|clear|protect|deprotect
      var %SexGod.OPCommands = op|deop|halfop|dehalfop|voice|devoice
      ;SexGod command**************************************************
      if ($istok(%SexGod.Commands,$2,124)) {
        if ($left($3,1) == $chr(35)) {  
          if ($istok(%SexGod.OPCommands,$2,124)) {
.timersops 1 1 .msg sexgod $2- 
          }
          else {
            .msg sexgod $2- 
          }
        }
        else {
          if ($3) {
            if ($2 == voice) {
              if ($3 isvo #) {
                .timersvoice 1 1 .msg sexgod devoice # $3
              }
              else if ($3 !isvo #)  {
                .timersvoice 1 1 .msg sexgod voice # $3
              }

            }
            else {
              if ($istok(%SexGod.OPCommands,$2,124)) {
                .timersops 1 1 .msg sexgod $2 # $3-
              }
              else {
                .msg sexgod $2 # $3-
              }
            }
          }
          else {
            if ($istok(%SexGod.OPCommands,$2,124)) {
              if ($2 == voice) {
                if ($me isvo #) {
                  .timersvoice 1 1 .msg sexgod devoice # $me
                }
                else {
                  .timersvoice 1 1 .msg sexgod voice # $me
                } 
              }
              else {
                if ($istok(%SexGod.OPCommands,$2,124)) {
                  .timersops 1 1 .msg sexgod $2- # $me
                }
                else {
                  .msg sexgod $2- # $me
                }
              }
            }
            else {
              if ($istok(%SexGod.OPCommands,$2,124)) {
                .timersops 1 1 .msg sexgod $2- # 
              }
              else {  
                .msg sexgod $2- # 
              }
            }
          }
        }
      }
    }
  }
} 
#SG-Shortcuts END