| Çevrimiçi
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
| Cevap: Socket temizleme sorunu
| Beatle Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
| Kod: Kodu kopyalamak için üzerine çift tıklayın! on *:text:!temizle:#: {
if ($nick isop $chan) {
if $read(takim.txt,w,$+($2,$chr(11),*)) {
if be* iswm $gettok($read(takim.txt,w,$+ $2 $+ *),2,32)) { set %temizchan $chan | temizlebjk }
elseif *fe* iswm $gettok($read(takim.txt,w,$+ $2 $+ *),2,32)) { set %temizchan $chan | temizlefb }
elseif *ga* iswm $gettok($read(takim.txt,w,$+ $2 $+ *),2,32)) { set %temizchan $chan | temizlegs }
elseif *tra* iswm $gettok($read(takim.txt,w,$+ $2 $+ *),2,32)) { set %temizchan $chan | temizlets }
else { .timer 50 0 msg $chan $chr(3) | .timer 1 2 msg $chan Kanal temizlenmistir. }
}
}
}
Selam bu üsteki kod mirc botlar için çalışıyor ben socket için yapmaya çalıştım acaba nerde yanlışlık yapıyorum benim yapmaya çalıştıgım kod aşagıdaki gibi dir.Bu kodu nasıl calıstırabilirim.
Kod: Kodu kopyalamak için üzerine çift tıklayın! if $right($4,-1) == !temizle || $right($4,-1) == .temizle || $right($4,-1) == .clear || $right($4,-1) == !clear || $right($4,-1) == !sil || $right($4,-1) == .sil {
if ($ybul($3,$_nick($1)) == $true) {
if $read(hash/takim.sr,w,$+($2,$chr(11),*)) {
if be* iswm $gettok($read(hash/takim.sr,w,$+ $2 $+ *),2,32)) { set %temizchan $chan | temizlebjk }
elseif *fe* iswm $gettok($read(hash/takim.sr,w,$+ $2 $+ *),2,32)) { set %temizchan $chan | temizlefb }
elseif *ga* iswm $gettok($read(hash/takim.sr,w,$+ $2 $+ *),2,32)) { set %temizchan $chan | temizlegs }
elseif *tra* iswm $gettok($read(hash/takim.sr,w,$+ $2 $+ *),2,32)) { set %temizchan $chan | temizlets }
else { .timer 50 0 swbot privmsg $chan $chr(3) | .timer 1 2 swbot privmsg $chan Kanal temizlenmistir. }
}
}
}
alias temizlets {
.timer 50 00 swbot privmsg %temizchan 5,5Trabzonn
}
alias temizlefb {
.timer 50 00 swbot privmsg %temizchan 2,2Fenerbahçe
}
alias temizlebjk {
.timer 50 00 swbot privmsg %temizchan 1,1Beşiktaş
}
alias temizlegs {
.timer 50 00 swbot privmsg %temizchan 4,4Galatasaray
}
alias temizlenormal {
.timer 50 00 swbot privmsg %temizchan
}
| Böyle bir denermisin. Kod: Kodu kopyalamak için üzerine çift tıklayın! if $regex($right($4,-1),/^[!.&](tem[ıiİ]zle|clear|s[ıiİ]l)$/Si) && ($ybul($3,$_nick($1)) == $true) {
if $read(Hash/takim.sr,w,$+($_nick($1),$chr(11),*)) {
if be* iswm $gettok($read(Hash/takim.sr,w,$+ $_nick($1) $+ *),2,32)) { _temtak $3 0,1 Beşiktaş }
elseif *fe* iswm $gettok($read(hash/takim.sr,w,$+ $_nick($1) $+ *),2,32)) { _temtak $3 2,8 Fenerbahçe }
elseif *ga* iswm $gettok($read(hash/takim.sr,w,$+ $_nick($1) $+ *),2,32)) { _temtak $3 4,8 Galatasaray }
elseif *tra* iswm $gettok($read(hash/takim.sr,w,$+ $_nick($1) $+ *),2,32)) { _temtak $3 2,5 Trabzon }
}
else { .timer 50 0 swbot privmsg $3 $chr(3) | .timer 1 2 swbot privmsg $3 Kanal temizlenmistir. }
}
alias _temtak {
var %t = 1 | while %t <= 60 { swbot privmsg $1 : $2 | inc %t }
}
Hoşuma gitmedi ama Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir. dilersen takım ekleme silme kodlarını da pastelle komple ayarlayım veriyim.
__________________ Dünyanın en güzel yeri neresi biliyor musun? Biraz kenara kaysana... |