IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)
-   mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)
-   -   Aktif userlara oto voice (https://www.ircforumlari.net/mirc-scripting-sorunlari/13880-aktif-userlara-oto-voice.html)

BlueFan 13 Mart 2006 15:23

Aktif userlara oto voice
 
:mad: Ya Kanalda Fazla Sohbet Eden Ve Bol Konuşana Oto Voice Vermesini istiyorum öyle bir adon da bulamadım Yardım edebilirmisiniz ???

MaeLStrOm 13 Mart 2006 15:34

Mantık şöyle olabilir.Önce adamın yazdıklarını zamana bağlı olarak saydırırsın.Belli bir limit icerisinde örneğin 15 satır kullanmışsa voice verebilirsin.Konuşmayanın voicelerini geri almak icin ise yine bu yazdıkları limitli olduğundan ve mesela bir dakka hic birşey yazmamışsa voicesini alabilrsin.Bilmen gerekenler
inc -usaniye $+(%voice,$nick) : Değeri 1 arttırır.
on text eventini kullanarak yazılan her cümlede inc ve saniye kullanarak bi değer yaratacaksın.Bu değer limitin altındaysa voicesini alacak üstündeyse voice vereceksin.
Umarım anlamışsındır.

BlueFan 13 Mart 2006 15:36

biş sorcam inc -usaniye $+(%voice,$nick) :
bunu Yazdım diyelim Remoteye 10 Satır konuşsa +v $nick olsa :)
3 dk içnde de voice alsa Tam olarak Sen Kodu Yazsan :))))
Seni Yormuş Olmam Umarım

Sadece 1 kanal içerisinde olmasını istiyorum :)
Olursa tabi

MaeLStrOm 13 Mart 2006 15:55

on *:text:*:#kanal:{
inc -u180 $+(%voice,$nick)
if ($($+(%voice,$nick),2) >= 10) { mode # +v $nick }
elseif ($($+(%voice,$nick),2) < 10) && ($nick isvoice #) { mode # -v $nick }
}
on *:join:#kanal:{
if $nick == $me {
.timer 0 120 voicescan
}
}
alias voicescan {
var %i = $nick(#kanal,0,v)
while %i {
if ($($+(%voice,$nick(#kanal,%i,v)),2) < 10) { mode #kanal -v $nick(#kanal,%i,v) }
dec %i
}
}
Kendin uğraşsaydın kendini geliştirmek icin güzel bi alıştırma olabilirdi.

BlueFan 13 Mart 2006 15:56

Ben Yaptımda Oto Voice Hemen Veriyo Geri ALmıyo :D
Çok saol abi :) Kolay gelsin :))))

* /inc: Geçersiz parametre (Satır 28, whoisflood.mrc)
-:)

MaeLStrOm 13 Mart 2006 16:04

#kanal olan yeri kendi kanalın olarak değiştirdin değil mi?

BlueFan 13 Mart 2006 16:08

değiştirdim :) #antalya Yazdım :D

on *:text:*:#antalya:{
inc -u10 $+(%voice,$nick)
if ($($+(%voice,$nick),2) >= 10) { mode #antalya +v $nick }
elseif (($($+(%voice,$nick),2) < 10) && ($nick isvoice #) { mode #antalya -v $nick }
}
on *:join:#antalya:{
if $nick == $me {
.timer 0 120 voicescan
}
}
alias voicescan {
var %i = $nick(#antalya,0,v)
while %i {
if ($($+(%voice,$nick(#antalya,%i,v)),2) < 10) { mode #antalya -v $nick(#antalya,%i,v) }
dec %i
}
}

MaeLStrOm 13 Mart 2006 16:28

on *:text:*:#kanal:{
inc -u10 $+(%,$nick)
if ($($+(%,$nick),2) >= 10) { mode #kanal +v $nick }
elseif ($($+(%,$nick),2) < 10) && $nick isvoice # { mode #kanal -v $nick }
}
on *:join:#kanal:{
if $nick == $me {
.timer 0 120 voicescan
}
}
alias voicescan {
var %i = $nick(#kanal,0,v)
echo -a %i
while %i {
if ($($+(%,$nick(#kanal,%i,v)),2) == $null) { mode #kanal -v $nick(#kanal,%i,v) }
dec %i
}
}
Test ettim çalışıyor


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 11:58.

Powered by vBulletin® Version 3.8.8 Beta 3
Copyright ©2000 - 2024, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2024 IRCForumlari.Net