Server kanallarına belirli aralıklar ile .timer sayesinde List çeker
ve bu listte 10 userden büyük kanalları baza alarak 2 opdan az op var ise
#ops kanalına bildirim yapar Neden 2 op baza alındı derseniz
Mynet sohbet ağındaki Opservice Botunun özelliğinden esinlenerek kanallar baza alınarak yazılmıştır .
Service_bot ve Merlyn Bot olduğu için onları op olarak görmemek nedeni ile.
2 opdan az ise mantığı ile çalışması sağlanmıştır .
Kod: Kodu kopyalamak için üzerine çift tıklayın!
raw *:*: {
if $numeric == 322 {
qu names $2
}
if $numeric == 353 {
inc %n~op $count($4-,@) | inc %n~u $numtok($4-,32)
}
if $numeric == 366 {
if (%n~op != %n~u) && (%n~op < 2) && (%n~u > 10 ) {
qu msg #ops 4OPS 12 $2 1 kanalında op yok. 14User Sayısı : 2 %n~u }
unset %n~* | .timer_re 0 180 list
}
}
alias qu {
if ($hget(qu) == $null) hmake qu 100
if ($1 == -x) {
if ($hget(qu,a1) == $null) || ($hget(qu,max) <= 0) { timerqu off | return }
$hget(qu,a1)
var %qs = 2
var %qe = $hget(qu,max)
while (%qs <= %qe) {
var %cur = a $+ $calc(%qs - 1)
var %las = a $+ %qs
if ($hget(qu,%las)) hadd qu %cur $hget(qu,%las)
inc %qs
}
var %las = a $+ $hget(qu,max)
hdel qu %las
hadd qu max $calc($hget(qu,max) - 1)
}
else {
hinc qu max
var %x = a $+ $hget(qu,max)
hadd qu %x $1-
}
if ($timer(qu) == $null) { timerqu 0 1 qu -x }
}
alias hinc { if ($hget($1)) { hadd $1 $2 $calc($hget($1,$2) + $iif($3 isnum,$3,1)) } }
timer_re
0 180 list mynet_* şekli
[01:39] <@AtLaS> OPS #mynet_cinsellik10 kanalında op yok. User Sayısı : 290
[01:39] <@AtLaS> OPS #mynet_heavymetal kanalında op yok. User Sayısı : 76
Normal kanallar
timer_re
0 180 list şekli
[01:31] <OpService> OPS #Oyun kanalında op yok. User Sayısı : 21
[01:31] <OpService> OPS #radyo kanalında op yok. User Sayısı : 27
[01:31] <OpService> OPS #ankara kanalında op yok. User Sayısı : 30
[01:31] <OpService> OPS #zurna kanalında op yok. User Sayısı : 117
[01:31] <OpService> OPS #gay kanalında op yok. User Sayısı : 15
[01:31] <OpService> OPS #Sohbet kanalında op yok. User Sayısı : 121
[01:31] <OpService> OPS #*** kanalında op yok. User Sayısı : 14
[01:31] <OpService> OPS #felsefe kanalında op yok. User Sayısı : 32
[01:31] <OpService> OPS #kelebek kanalında op yok. User Sayısı : 13
[01:31] <OpService> OPS #lezbiyen kanalında op yok. User Sayısı : 13
[01:31] <OpService> OPS #beginner kanalında op yok. User Sayısı : 11
Kırmızı yerle belirtilen yerleri kendinize göre editleyebilirsiniz.