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/)
-   -   awayscan Lütfen Düzenleyin (https://www.ircforumlari.net/mirc-scripting-sorunlari/749-awayscan-lutfen-duzenleyin.html)

alfa 19 Ocak 2005 04:06

awayscan Lütfen Düzenleyin
 
sizten tek istegim bu koda kick satırını eklemeniz..

bu bir away scan :

alias awayscan {
var %chan
if ($hget(awayscan)) { hfree awayscan }
if ((!$1) && ($active !ischan)) { echo -a - | echo -a * /awayscan: you are not on a channel | echo -a - | halt }
if ($1) { %chan = $1 }
else { %chan = $active }
hmake awayscan $nick(%chan,0)
hadd awayscan chan %chan
hadd awayscan scan 1
hadd awayscan away 0
.who $hget(awayscan,chan)
echo -a Awayscan in %chan 
}
raw 352:*:{
if (($hget(awayscan,scan) == 1) && ($hget(awayscan,chan) == $2)) {
if ($left($7,1) == G) {
hinc awayscan away 1
if (!$hget(awayscan,names)) { hadd awayscan names $6 }
else {
var %names = $hget(awayscan,names)
hadd awayscan names $+(%names,$chr(32),$6)
}
}
haltdef
}
}
raw 315:*:{
if (($hget(awayscan,scan) == 1) && ($hget(awayscan,chan) == $2)) {
var %away
echo -a Totally found $+(,$hget(awayscan,away),) away users
if ($hget(awayscan,away) > 0) {
%away = $hget(awayscan,names)
echo -a Away Users: %away
}
hfree awayscan
echo -a End of awayscan
haltdef
}
}


bana budugu nickleri gosteriyor cok iyi calısıyor fakat ben taradıktan sonra teker teker buldugu nickleri kicklemesini istiyorum olabilirse sevinirim eger olursa +o lar'ida haric yaarsanız sevinirim :) if ($nick isop) { halt :P } denem istedim tsk ederim..

goXXip 19 Ocak 2005 11:09

alias awayscan {
var %chan
if ($hget(awayscan)) { hfree awayscan }
if ((!$1) && ($active !ischan)) { echo -a - | echo -a * /awayscan: you are not on a channel | echo -a - | halt }
if ($1) { %chan = $1 }
else { %chan = $active }
hmake awayscan $nick(%chan,0)
hadd awayscan chan %chan
hadd awayscan scan 1
hadd awayscan away 0
.who $hget(awayscan,chan)
echo -a Awayscan in %chan 
}
raw 352:*:{
if (($hget(awayscan,scan) == 1) && ($hget(awayscan,chan) == $2)) {
if ($left($7,1) == G) {
hinc awayscan away 1
if (!$hget(awayscan,names)) { hadd awayscan names $6 }
else {
var %names = $hget(awayscan,names)
hadd awayscan names $+(%names,$chr(32),$6)
}
}
haltdef
}
}
raw 315:*:{
if (($hget(awayscan,scan) == 1) && ($hget(awayscan,chan) == $2)) {
var %away
echo -a Totally found $+(,$hget(awayscan,away),) away users
if ($hget(awayscan,away) > 0) {
%away = $hget(awayscan,names)
echo -a Away Users: %away
}
hfree awayscan
echo -a End of awayscan
if($nick isop) { goto son }
ban # $nick 2
kick # $nick Away!!
haltdef
}
}

Sanırım yardımcı olur ama denemedim :)

Alience 19 Ocak 2005 11:12

sendeki raw 352 kısmını aşağıdaki gibi değiştir.
Kod:

raw 352:*:{
if (($hget(awayscan,scan) == 1) && ($hget(awayscan,chan) == $2)) {
if ($left($7,1) == G) {
if (($me isop $2 || $me ishop $2) || ($6 !isop  $2)) {
  ban $2 $6 2
  kick $2 $6 Away msg..
}
hinc awayscan away 1
if (!$hget(awayscan,names)) { hadd awayscan names $6 }
else {
var %names = $hget(awayscan,names)
hadd awayscan names $+(%names,$chr(32),$6)
}
}
haltdef
}
}


eviL 19 Ocak 2005 12:13

Alıntı:

goXXip Nickli Üyeden Alıntı
alias awayscan {
raw 315:*:{
if (($hget(awayscan,scan) == 1) && ($hget(awayscan,chan) == $2)) {
var %away
echo -a Totally found $+(,$hget(awayscan,away),) away users
if ($hget(awayscan,away) > 0) {
%away = $hget(awayscan,names)
echo -a Away Users: %away
}
hfree awayscan
echo -a End of awayscan
if($nick isop) { goto son }
ban # $nick 2
kick # $nick Away!!
haltdef
}
}

IF($NICK Geçersiz Bir Komut! su hatayi verdi. duzenledim fakat gene atmadi :D

alfa 19 Ocak 2005 14:54

abi suna kick bolumu ekleyen yokmu ya :) yazında tümden alalım bi parca bi parca veriyorsunuz bisey anlamıyoruz. ve hatalı oluyor.

Alience 19 Ocak 2005 15:02

benim verdiğimi deneyen olmadımı :), bu arada zaten nereyi değişeceğini söylüyoruz düzgün değiştirirseniz sorun çıkmaz kanısındayım. ayrıca Goxxip arkadaşın yazdığı gibi raw larda $nick, $chan kullanmak ne iştir anlamadım başka bir topictede $nick verilmiş oldu denmişti ben dumur bakmaktaydım oraya raw larda $nick ve $chan definitionları gelmezki.

eviL 19 Ocak 2005 15:24

denedim Alience ama sonuç nafile

alfa 19 Ocak 2005 17:11

Evet Aliance oldu fakat hinc die hata veriyor acaba mircin versionundanmi kaynaklanıyor 5.91 de denemdim

Alience 19 Ocak 2005 18:05

olabilir cunku o konuda hata verecek bir şeyi yok awayscan hashinda away ı 0 olarak tanımlıyor hata vermemesi gerekli :)

UOnur 19 Ocak 2005 18:09

Alıntı:

alias awayscan {
var %chan
if ($hget(awayscan)) { hfree awayscan }
if ((!$1) && ($active !ischan)) { echo -a - | echo -a * /awayscan: you are not on a channel | echo -a - | halt }
if ($1) { %chan = $1 }
else { %chan = $active }
hmake awayscan $nick(%chan,0)
hadd awayscan chan %chan
hadd awayscan scan 1
hadd awayscan away 0
.who $hget(awayscan,chan)
echo -a Awayscan in %chan 
.set %chan2 %chan
}
raw 352:*:{
if (($hget(awayscan,scan) == 1) && ($hget(awayscan,chan) == $2)) {
if ($left($7,1) == G) {
hinc awayscan away 1
if (!$hget(awayscan,names)) { hadd awayscan names $6 }
else {
var %names = $hget(awayscan,names)
hadd awayscan names $+(%names,$chr(32),$6)
}
}
haltdef
}
}
raw 315:*:{
if (($hget(awayscan,scan) == 1) && ($hget(awayscan,chan) == $2)) {
var %away
echo -a Totally found $+(,$hget(awayscan,away),) away users
if ($hget(awayscan,away) > 0) {
%away = $hget(awayscan,names)
echo -a Away Users: %away
$firlat(%away)
}
hfree awayscan
echo -a End of awayscan
haltdef
}
}
alias firlat {
//var %as 1
while $gettok($1,%as,32) {
.set %nnick $ifmatch
if (%nnick isop %chan2) {
halt
}
else {
.mode %chan2 +b %nnick
.kick %chan2 %nnick Awaysın!!! :P
}
inc %as
}
}
denedim çalışıyor.Ama senin mircin versionu çok düşük ise belki çalışmayabilir.


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

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