Saurabh's Access Thanker v3.0

mIRC Code

+ 0 likes

Please Register to submit score.

Average Score	3.0 (of 6 scores)
Date Added	Aug 16, 2007
Last Updated	Sep 20, 2007
Tags	thanker

Introduction

Saurabh's Access Thanker v3.0, it is used to thank someone, if we get or lose any modes like ~ & @ % +.
-
The script also calulates how many times we got or lost our access in a particular channel, for example i got ~ in #ZX, and ~ in #XC, it will count seperately for each of the channels.
-
The script can display how many times we got or lost access in a channel and counts how many times we used the script.
-
Last and not the least, you can turn on or off the script whenever you want and for the features, right click any window and click "Saurabh's Access Thanker v3.0"
-
Enjoy :)
-
Saurabh

Thanks to Typo for helping me on v3.0

Grab the Code

on *:LOAD: { set %Thanker on }
on *:CONNECT: { 
  inc %Thankersused 1 
  echo -a �� Loading Saurabh's Access Thanker v3.0 for the $ord(%Thankersused) time. �� 
  echo -a �� Successfully Loaded Saurabh's Access Thanker v3.0 � �� 
  echo -a �� If you have any bugs/errors, contact Saurabh at /server irc.aXpi2.net -j #ZX �� 
} 
on *:RAWMODE:*: { 
  if ($me isin $1-) && (%thanker == on) { 
    if (+o isin $1-) { inc %Thankeraop [ $+ [ $chan ] ] | msg $chan �� Thanks for the @ $nick $+ , I've been +o for the $iif($ord(%Thankeraop [ $+ [ $chan ] ]) != $null,$ord(%Thankeraop [ $+ [ $chan ] ]),0) time �� } 
    if (-o isin $1-) { inc %Thankerdaop [ $+ [ $chan ] ] | msg $chan �� Where did my @ go $nick $+ ? I've been -o $iif($calc(%Thankeraop [ $+ [ $chan ] ] + 1) != $null,$calc(%Thankeraop [ $+ [ $chan ] ] + 1),0) times �� } 
    if (+h isin $1-) { inc %Thankerhop [ $+ [ $chan ] ] | msg $chan �� Thanks for the %Thanker $nick $+ , I've been +h for the $iif($ord(%Thankerhop [ $+ [ $chan ] ]) != $null,$ord(%Thankerhop [ $+ [ $chan ] ]),0) time �� } 
    if (-h isin $1-) { inc %Thankerdhop [ $+ [ $chan ] ] | msg $chan �� Where did my %Thanker go $nick $+ ? I've been -h $iif($calc(%Thankerdhop [ $+ [ $chan ] ] + 1) != $null,$calc(%Thankerdhop [ $+ [ $chan ] ] + 1),0) times �� } 
    if (+v isin $1-) { inc %Thankervoice [ $+ [ $chan ] ] | msg $chan �� Thanks for the + $nick $+ , I've been +v for the $iif($ord(%Thankervoice [ $+ [ $chan ] ]) != $null,$ord(%Thankervoice [ $+ [ $chan ] ]),0) time �� } 
    if (-v isin $1-) { inc %Thankerdvoice [ $+ [ $chan ] ] | msg $chan �� Where did my + go $nick $+ ? I've been -v $iif($calc(%Thankerdvoice [ $+ [ $chan ] ] + 1) != $null,$calc(%Thankerdvoice [ $+ [ $chan ] ] + 1),0) times �� } 
    if (+a isin $1-) { inc %Thankersop [ $+ [ $chan ] ] | msg $chan �� Thanks for the & $nick $+ , I've been +a for the $iif($ord(%Thankersop [ $+ [ $chan ] ]) != $null,$ord(%Thankersop [ $+ [ $chan ] ]),0) time �� } 
    if (-a isin $1-) { inc %Thankerdsop [ $+ [ $chan ] ] | msg $chan �� Where did my & go $nick $+ ? I've been -a $iif($calc(%Thankerdsop [ $+ [ $chan ] ] + 1) != $null,$calc(%Thankerdsop [ $+ [ $chan ] ] + 1),0) times �� } 
    if (+q isin $1-) { inc %Thankerfounder [ $+ [ $chan ] ] | msg $chan �� Thanks for the ~ $nick $+ , I've been +q for the $iif($ord(%Thankerfounder [ $+ [ $chan ] ]) != $null,$ord(%Thankerfounder [ $+ [ $chan ] ]),0) time �� } 
    if (-q isin $1-) { inc %Thankerdfounder [ $+ [ $chan ] ] | msg $chan �� Where did my ~ go $nick $+ ? I've been -q $iif($calc(%Thankerdfounder [ $+ [ $chan ] ] + 1) != $null,$calc(%Thankerdfounder [ $+ [ $chan ] ] + 1),0) times �� } 
  } 
} 
menu * { 
  Saurabh's Access Thanker v3.0 
  .Status 
  ..Turn On { set %Thanker on | echo $chan  �� Saurabh's Access Thanker v3.0 is now ON �� } 
  ..Turn Off { set %Thanker off  | echo $chan �� Saurabh's Access Thanker v3.0 is now OFF �� } 
  .$iif($chan != $null,Display) 
  ..+Owner { msg # �� I've been ~ $iif([ %Thankerfounder [ $+ [ $chan ] ] ] != $null,[ %Thankerfounder [ $+ [ $chan ] ] ],0) time �� } 
  ..-Owner { msg # �� I've lost my ~ $iif([ %Thankerdfounder [ $+ [ $chan ] ] ] != $null,[ %Thankerdfounder [ $+ [ $chan ] ] ],0) times �� } 
  ..+Admin { msg # �� I've been & $iif([ %Thankersop [ $+ [ $chan ] ] ] != $null,[ %Thankersop [ $+ [ $chan ] ] ],0) time �� } 
  ..-Admin { msg # �� I've lost my & $iif([ %Thankerdsop [ $+ [ $chan ] ] ] != $null,[ %Thankerdsop [ $+ [ $chan ] ] ],0) times �� } 
  ..+Operator { msg # �� I've been @ $iif([ %Thankeraop [ $+ [ $chan ] ] ] != $null,[ %Thankeraop [ $+ [ $chan ] ] ],0) time �� } 
  ..-Operator { msg # �� I've lost my @ $iif([ %Thankerdaop [ $+ [ $chan ] ] ] != $null,[ %Thankerdaop [ $+ [ $chan ] ] ],0) times �� } 
  ..+Half Operator { msg # �� I've been % $iif([ %Thankerhop [ $+ [ $chan ] ] ] != $null,[ %Thankerhop [ $+ [ $chan ] ] ],0) time �� } 
  ..-Half Operator { msg # �� I've lost my % $iif([ %Thankerdhop [ $+ [ $chan ] ] ] != $null,[ %Thankerdhop [ $+ [ $chan ] ] ],0) times �� } 
  ..+Voice { msg # �� I've been + $iif([ %Thankervoice [ $+ [ $chan ] ] ] != $null,[ %Thankervoice [ $+ [ $chan ] ] ],0) time �� } 
  ..-Voice { msg # �� I've lost my + $iif([ %Thankerdvoice [ $+ [ $chan ] ] ] != $null,[ %Thankerdvoice [ $+ [ $chan ] ] ],0) times �� } 
} 
on *:UNLOAD: {
  unset %Thanker*
  echo -a �� Saurabh's Access Thanker v3.0 has been unloaded. ��
}