From Aha2Y, 8 Years ago, written in mIRC Scripting.
Embed
  1. on *:rawmode:#Aha2Y:
  2. {
  3.   echo -a $1-
  4.   if ($1 == +v) { msg #Aha2Y[ACC] 6[13Mode6]13 $nick 6gives13 $2- 6voice 13(6+v6) }
  5.   if ($1 == +v) { msg #Aha2Y[ACC] 6[13Mode6]13 $nick 6removes13 $2- $+ 's 6voice 13(6-v6) }
  6.   if ($1 == +h) { msg #Aha2Y[ACC] 6[13Mode6]13 $nick 6gives13 $2- 6halfop 13(6+h6) }
  7.   if ($1 == -h) { msg #Aha2Y[ACC] 6[13Mode6]13 $nick 6removes13 $2- $+ 's 6halfop 13(6-h6) }
  8.   if ($1 == +o) { msg #Aha2Y[ACC] 6[13Mode6]13 $nick 6gives13 $2- 6op 13(6+o6) }
  9.   if ($1 == -o) { msg #Aha2Y[ACC] 6[13Mode6]13 $nick 6removes13 $2- $+ 's 6op 13(6-o6) }
  10.   if ($1 == +a) { msg #Aha2Y[ACC] 6[13Mode6]13 $nick 6gives13 $2- 6admin 13(6+a6) }
  11.   if ($1 == -a) { msg #Aha2Y[ACC] 6[13Mode6]13 $nick 6removes13 $2- $+ 's 6admin 13(6-a6) }
  12.   if ($1 == +q) { msg #Aha2Y[ACC] 6[13Mode6]13 $nick 6gives13 $2- 6owner 13(6+q6)  }
  13.   if ($1 == -q) { msg #Aha2Y[ACC] 6[13Mode6]13 $nick 6removes13 $2- $+ 's 6owner 13(6-q6) }
  14.   if ($1 == +m) { msg #Aha2Y[ACC] 6[13Mode6]13 $nick 6sets 13mute  $chan 13(6-m6) }
  15.   if ($1 == -m) { msg #Aha2Y[ACC] 6[13Mode6]13 $nick 6unsets 13mute  $chan 13(6-m6) }
  16. }
  17.