/ScriptServ

;###################################################
;######## Pannello & script by -[ {sTReGa} ]- ######
;###################################################

on *:dialog:stre.bot:sclick:829: { unset %cou.j | unset %cou.j2 | halt }
on *:dialog:stre.bot:sclick:830: { unset %counterpart | unset %counterpart2 | halt }
on *:dialog:stre.bot:sclick:832: { unset %cou.k | unset %cou.k2 | halt }
on *:dialog:stre.bot:sclick:833: { unset %counterban | unset %counterban2 | halt }
on *:dialog:stre.bot:sclick:834: { unset %counterop | unset %counterop2 | halt }
on *:dialog:stre.bot:sclick:835: { unset %counterdeop | unset %counterdeop2 | halt }
on *:dialog:stre.bot:sclick:836: { unset %countervoice | unset %countervoice2 | halt }
on *:dialog:stre.bot:sclick:837: { unset %counterdevoice | unset %counterdevoice2 | halt }
on *:dialog:stre.bot:sclick:840: { unset %countermode | unset %countermode2 | halt }
on *:dialog:stre.bot:sclick:868: { unset %cou.j* | unset %counterpart* | unset %cou.k* | unset %counterop* | unset %countermode* | unset %counterban* | unset %countervoice* |  unset %counterdeop* |  unset %counterdevoice* | halt }




on *:JOIN:%chanstat: { 
  if (%count.attivo == 1) {
    inc %cou.j 
    set %cou.j2 $nick 
  }
}

on *:part:%chanstat: { 
  if (%count.attivo == 1) {
    inc %counterpart 
    set %counterpart2 $nick 
  }
}
on *:kick:%chanstat: { 
  if (%count.attivo == 1) {
    inc %cou.k 
    set %cou.k2 $knick 
  }
}
on *:ban:%chanstat: { 
  if (%count.attivo == 1) {
    inc %counterban 
    set %counterban2 $banmask 
  }
}
on *:op:%chanstat: { 
  if (%count.attivo == 1) {
    inc %counterop 
    set %counterop2 $opnick 
  }
}
on *:deop:%chanstat: { 
  if (%count.attivo == 1) {
    inc %counterdeop 
    set %counterdeop2 $opnick 
  }
}
on *:voice:%chanstat: { 
  if (%count.attivo == 1) {
    inc %countervoice 
    set %countervoice2 $vnick 
  }
}
on *:devoice:%chanstat: { 
  if (%count.attivo == 1) {
    inc %counterdevoice 
    set %counterdevoice2 $vnick 
  }
}
on *:mode:%chanstat: {
  if (%count.attivo == 1) {
    inc %countmode 
    set %countmode2 $nick 
  }
}
;----------------------------------------------

alias connecting {
  if (%Attivo == 1) {
    if (%chan1 != $null) { join %chan1 %ps1 }
    if (%chan2 != $null) { timer1 1 3 join %chan2 %ps2 }
    if (%chan3 != $null) { timer2 1 5 join %chan3 %ps3 }
    if (%chan4 != $null) { timer3 1 7 join %chan4 %ps4 }
    if (%chan5 != $null) { timer4 1 9 join %chan5 %ps5 }
    if (%chan6 != $null) { timer5 1 11 join %chan6 %ps6 }
    if (%chan7 != $null) { timer6 1 13 join %chan7 %ps7 }
    if (%chan8 != $null) { timer7 1 15 join %chan8 %ps8 }
    if (%chan9 != $null) { timer8 1 17 join %chan9 %ps9 }
    if (%chan10 != $null) { timer9 1 19 join %chan10 %ps10 }
    if (%chan11 != $null) { timer10 1 21 join %chan11 %ps11 }
    if (%chan12 != $null) { timer11 1 23 join %chan12 %ps12 }
    if (%chan13 != $null) { timer12 1 25 join %chan13 %ps13 }
    if (%chan14 != $null) { timer13 1 27 join %chan14 %ps14 }
    if (%chan15 != $null) { timer14 1 29 join %chan15 %ps15 }
    if (%psw1 != $null) { identify %chan1 %psw1 }
    if (%psw2 != $null) { identify %chan2 %psw2 }
    if (%psw3 != $null) { identify %chan3 %psw3 }
    if (%psw4 != $null) { identify %chan4 %psw4 }
    if (%psw5 != $null) { identify %chan5 %psw5 }
    if (%psw6 != $null) { identify %chan6 %psw6 }
    if (%psw7 != $null) { identify %chan7 %psw7 }
    if (%psw8 != $null) { identify %chan8 %psw8 }
    if (%psw9 != $null) { identify %chan9 %psw9 }
    if (%psw10 != $null) { identify %chan10 %psw10 }
    if (%psw11 != $null) { identify %chan11 %psw11 }
    if (%psw12 != $null) { identify %chan12 %psw12 }
    if (%psw13 != $null) { identify %chan13 %psw13 }
    if (%psw14 != $null) { identify %chan14 %psw14 }
    if (%psw15 != $null) { identify %chan15 %psw15 }
  }
}

alias autoid {
  if ($me == %autoident.n1) { .msg NickServ identify %autoident.p1 }
  if ($me == %autoident.n2) { .msg NickServ identify %autoident.p2 }
  if ($me == %autoident.n3) { .msg NickServ identify %autoident.p3 }
}

on *:NOTICE:*nick*owned*NickServ*:*: {
  if ($me == %autoident.n1) { .msg NickServ identify %autoident.p1 }
  if ($me == %autoident.n2) { .msg NickServ identify %autoident.p2 }
  if ($me == %autoident.n3) { .msg NickServ identify %autoident.p3 }
}

alias wai if ($3 != $null) { writeini $mircdirAutoIdent.ini $1 $2 $strip($3-) }
alias rai if ($2 != $null) { return $readini -n $mircdirAutoIdent.ini $1 $2 }