on *:SNOTICE:*:{
  if $numeric == 327 {
    if $hget(codem,javacont) {
      if $query(%_:nick) { halt }
      if [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] !isin $8 {
        if [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]* iswm $8 { _linedance _okline %_:nick Asimavi }
        else { _linedance _okline %_:nick java }
      }
    }
  }
  if $numeric == 311 {
    .set %_:nick $2
  }
  if $numeric == 302 {
    if (*m* iswm $gettok($2-,2,64)) || (*e* iswm $gettok($2-,2,64)) || (*o* iswm $gettok($2-,2,64)) { halt }
    if ($2- == $null) { echo -a 12 Nick Online Olmadığı İçin Kline Atılamadı | halt }
    if (%userkl. [ $+ [ $gettok($2-,1,61) ] ] = 1) { if (*195.87* iswm $gettok($2-,2,64)) { echo -a %logo 4Mynet Erişim 2Kullandığı İçin 4 Script 2Sebebi İle Kline Atılmadı! | halt } | else { kline *@ $+ $gettok($2-,2,64) http:sohbet.mynet.com üzerinden geliniz 15 | unset %userkl. [ $+ [ $gettok($2-,1,61) ] ] | goto son } }
    if (%userkl. [ $+ [ $gettok($2-,1,61) ] ] = 10) { kline *@ $+ $gettok($2-,2,64) [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 5Üzerinden Giriş Yapınız.! 15 | unset %userkl. [ $+ [ $gettok($2-,1,61) ] ] | goto son }
    if (%userkl. [ $+ [ $gettok($2-,1,61) ] ] = 11) { kline *@ $+ $gettok($2-,2,64) [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 5Üzerinden Giriş Yapınız.! 15 | unset %userkl. [ $+ [ $gettok($2-,1,61) ] ] | goto son }
    halt
    :son
    echo -a 4Kline Atıldı 2Nick: 7 $gettok($2-,1,61) 2İp: 7 $gettok($2-,2,64) $chan
    halt
  }
alias checkjava {
  if $active ischan {
    var %i = 1,%chan,%chan2,%chan3,%chan4,%chan5,%chan6,%chan7
    while %i <= $nick($active,0) {
      if $numtok(%chan,44) <= 45 { %chan = $addtok(%chan,$nick($active,%i),44) }
      elseif $numtok(%chan2,44) <= 45 { %chan2 = $addtok(%chan2,$nick($active,%i),44) }
      elseif $numtok(%chan3,44) <= 45 { %chan3 = $addtok(%chan3,$nick($active,%i),44) }
      elseif $numtok(%chan4,44) <= 45 { %chan4 = $addtok(%chan4,$nick($active,%i),44) }
      elseif $numtok(%chan5,44) <= 45 { %chan5 = $addtok(%chan5,$nick($active,%i),44) }
      elseif $numtok(%chan6,44) <= 45 { %chan6 = $addtok(%chan6,$nick($active,%i),44) }
      elseif $numtok(%chan7,44) <= 45 { %chan7 = $addtok(%chan7,$nick($active,%i),44) }
      inc %i
    }
    hadd -mu20 codem javacont on
    whois %chan
    if (%chan2) _linedance whois %chan2
    if (%chan3) _linedance whois %chan3
    if (%chan4) _linedance whois %chan4
    if (%chan5) _linedance whois %chan5
    if (%chan6) _linedance whois %chan6
    if (%chan7) _linedance whois %chan7
  }
  else {
    echo -ta Lütfen Aktif Kanalda Yazan...
  }
}
alias _okline {
  if (java == $2) { %userkl. [ $+ [ $1 ] ] = 10 | userhost $1 }
  if (mysev == $2) { %userkl. [ $+ [ $1 ] ] = 11 | userhost $1 }
  if ($2 == $null) { echo -a ******2Lütfen Sebep Belirtiniz (4reklam2/4script2/4nick2/4dost2) }
}

alias _linedance {
  if ($timer(.line.dance. $+ $cid) == $null) {
    hadd -m mynet.qcommand count. $+ $cid 1
    hadd -m mynet.qcommand 1. $+ $cid $1-
    _dolinedance 1
  }
  else {
    hinc -m mynet.qcommand count. $+ $cid
    hadd -m mynet.qcommand $hget(mynet.qcommand,count. $+ $cid) $+ . $+ $cid $1-
  }
}
alias _dolinedance {
  if ($hget(mynet.qcommand,$1 $+ . $+ $cid) != $null) {
    var %data = $ifmatch
    .timer.line.dance. $+ $cid -m 1 $calc(1500 - $gettok(1250 1000 750 500 250,$1,32)) _dolinedance $calc($1 + 1)
    %data
  }
  else hdel -w mynet.qcommand *. $+ $cid
}
menu channel {
  -
  ApleTciler:checkjava
  -
}