Cevap: Socket bota Proxy ekleme kodu
Normal proxy koruması mevcut ama ajan v2 botunda buldum aradığımı kodu ama ekleme yapıyor ama sil dediğimde listemde ekli değil diyor nedense ve zline atması içinde kod ekleyip düzeltebilirmiyiz hocam ?
kod; on $*:error:/(banned|reset|timeout|kill|ghost|gzline|zline|glin e|kline|exited)/i:server %server
on *:start:{
.showmirc -t
.server %server %serverport
.nick User $+ $rand(1,9999)
}
on *:disconnect:{ write -c xpips.txt | unset %yeah.* | .nick User $+ $rand(1,9999) | unset %deopnick* | unset %version* | write -c version.ini | unset %argo.* | unset %agresif.* }
on *:text:!proxy *:%operkanali: {
if $2 == list {
.msg $chan $nick Ozelinize bilgiler verilmistir, Ozelinizi kontrol ediniz.
var %i = 1, %end = $ulist(*,proxy,0)
.msg $nick - Toplam proxy sayisi:4 %end
while %i <= %end {
.msg $nick $+(%i,$chr(41)) $iif($ulist(*,proxy,%i) == $nick,$+(,$v1,),$v1)
inc %i 1
}
}
if $2 == ekle {
if $3 == $null { .msg $chan $+(",$nick,") Lutfen eklenecekhostu yaziniz. | return }
if $ulist($3,proxy,1) { .msg $chan $+(",$nick,") Belirtiginiz kritere uyan $+(",,$3,,") zaten mevcut. | return }
.auser proxy $3
.msg $chan $+(",,$3,,") Basariyla proxy listesine eklendi.
}
if $2 == sil {
if $3 == $null { .msg $chan $+(",$nick,") Lutfen silinecek ip yaziniz. | return }
if !$ulist($3,proxy,1) { .msg $chan $+(",$nick,") Belirtiginiz kritere uyan $+(",,$3,,") Listede mevcut degil. | return }
.ruser proxy $3 | msg $chan $+(",,$3,,") Proxy listten silindi.
}
} |