Çevrimdışı

Merhaba. Elimde ki sock botu giriş kodlu bir server'e koymak istiyorum fakat sock oldugu icin giriş yapamıyor. Bu bota nasıl bir kod koyabiliriz ki @Bot penceresinden giris kodunu kendimiz girip sunucuya botu atalım. yardımcı olursanız sevinirim. Şimdiden teşekkürler.

__________________

 

Çevrimdışı

Yazmış olduğun yazıyı biraz daha büyük yaparsan, gerekli kişiler yardım etmeyi düşünebilirler.

Fakat bu şekilde, yardım etmeyi bırak bi kenara, sorunun ne olduğunu dahi anlamayabilirler.

 

Çevrimdışı

raw 6:*:{
if $2 != $null {
write unl1.txt $chr(3) $+ $gettok($2-,2,44)
write unl2.txt $chr(3) $+ $gettok($2-,3,44)
write unl3.txt $chr(3) $+ $gettok($2-,4,44)
}
}

on *:start:{
write -c unl1.txt
write -c unl2.txt
write -c unl3.txt
unset %unl1
unset %unl2
unset %unl3
}

on *:disconnect:{
write -c unl1.txt
write -c unl2.txt
write -c unl3.txt
unset %unl1
unset %unl2
unset %unl3
}

alias bul1 {
var %unl2a $len($remove($gettok($read(unl1.txt,2),2,3),0,1,2,3,4,5,6,7,8,9))
var %unl5a $len($remove($gettok($read(unl1.txt,5),2,3),0,1,2,3,4,5,6,7,8,9))
var %unl5a2 $len($remove($gettok($read(unl1.txt,5),1,3),0,1,2,3,4,5,6,7,8,9))
var %unl8a $len($remove($gettok($read(unl1.txt,8),2,3),0,1,2,3,4,5,6,7,8,9))
if (%unl2a == 2) { set %unl1 4 }
if (%unl2a == 3) { set %unl1 1 }
if (%unl2a == 8) {
if (%unl8a == 2) { set %unl1 7 }
if (%unl8a == 7) { set %unl1 5 }
}
if (%unl2a == 7) {
if (%unl8a == 7) { set %unl1 3 }
if (%unl8a == 6) { set %unl1 6 }
}
if (%unl2a == 6) {
if (%unl5a == 1) { set %unl1 8 }
if (%unl5a == 7) { set %unl1 9 }
if (%unl8a == 8) && (%unl5a2 == 6) { set %unl1 2 }
if (%unl5a == 2) && (%unl5a2 == 1) { set %unl1 0 }
}
}

alias bul2 {
var %unl2b $len($remove($gettok($read(unl2.txt,2),2,3),0,1,2,3,4,5,6,7,8,9))
var %unl5b $len($remove($gettok($read(unl2.txt,5),2,3),0,1,2,3,4,5,6,7,8,9))
var %unl5b2 $len($remove($gettok($read(unl2.txt,5),1,3),0,1,2,3,4,5,6,7,8,9))
var %unl8b $len($remove($gettok($read(unl2.txt,8),2,3),0,1,2,3,4,5,6,7,8,9))
if (%unl2b == 2) { set %unl2 4 }
if (%unl2b == 3) { set %unl2 1 }
if (%unl2b == 8) {
if (%unl8b == 2) { set %unl2 7 }
if (%unl8b == 7) { set %unl2 5 }
}
if (%unl2b == 7) {
if (%unl8b == 7) { set %unl2 3 }
if (%unl8b == 6) { set %unl2 6 }
}
if (%unl2b == 6) {
if (%unl5b == 1) { set %unl2 8 }
if (%unl5b == 7) { set %unl2 9 }
if (%unl8b == 8) && (%unl5b2 == 6) { set %unl2 2 }
if (%unl5b == 2) && (%unl5b2 == 1) { set %unl2 0 }
}
}

alias bul3 {
var %unl2c $len($remove($gettok($read(unl3.txt,2),2,3),0,1,2,3,4,5,6,7,8,9))
var %unl5c $len($remove($gettok($read(unl3.txt,5),2,3),0,1,2,3,4,5,6,7,8,9))
var %unl5c2 $len($remove($gettok($read(unl3.txt,5),1,3),0,1,2,3,4,5,6,7,8,9))
var %unl8c $len($remove($gettok($read(unl3.txt,8),2,3),0,1,2,3,4,5,6,7,8,9))
if (%unl2c == 2) { set %unl3 4 }
if (%unl2c == 3) { set %unl3 1 }
if (%unl2c == 8) {
if (%unl8c == 2) { set %unl3 7 }
if (%unl8c == 7) { set %unl3 5 }
}
if (%unl2c == 7) {
if (%unl8c == 7) { set %unl3 3 }
if (%unl8c == 6) { set %unl3 6 }
}
if (%unl2c == 6) {
if (%unl5c == 1) { set %unl3 8 }
if (%unl5c == 7) { set %unl3 9 }
if (%unl8c == 8) && (%unl5c2 == 6) { set %unl3 2 }
if (%unl5c == 2) && (%unl5c2 == 1) { set %unl3 0 }
}
}

alias cevap {
bul1
bul2
bul3
if (%unl1 == $null) || (%unl1 == $null) || (%unl1 == $null) {
if %unl1 == $null { bul1 }
if %unl2 == $null { bul2 }
if %unl3 == $null { bul3 }
goto bas
}
$+(.,timer,UnLi,$rand(111,999)) 1 1 /echo -s Girilen Giriş Kodu: $+(%unl1,%unl2,%unl3)
$+(.,timer,UnLi,$rand(111,999)) 1 1 /giris $+(%unl1,%unl2,%unl3) | goto son
:bas
cevap2
:son
}

alias cevap2 {
$+(.,timer,UnLi,$rand(111,999)) 1 1 /echo -s Girilen Giriş Kodu: $+(%unl1,%unl2,%unl3)
$+(.,timer,UnLi,$rand(111,999)) 1 1 /giris $+(%unl1,%unl2,%unl3)
}


on *:snotice:*Yukarıda*Gördüğünüz:*: { cevap }
on *:snotice:* /GIRIS*Kod*: { cevap }
on *:snotice:*/GIRIS*: { cevap }


Code: UnLimitedBOY
Tarih: 09.02.2010

Komut Kullanım: Otomatik çalışır.

Ne işe yarar?
Giriş Kodu kullananan Sunuculara otomatik olarak girmenizi sağlar.

Not:
Giriş Kodu 3 haneli olan sunucular için geçerlidir.

 

Çevrimdışı

denedim fakat olmadı. sock bot girdiğinde bir @Giris penceresi acıp kodu oraya yansıtsa, oradan elle girsek. bu mumkun mu?

__________________

 

Çevrimdışı

güncel..

__________________

 

Çevrimdışı

if $2 == Notice || $3 == Notice { window @Giris | echo @giris $1- }

Bunu Sock botun kaynağına yapıştırıcaksın. @Giris penceresine çıkan noticeler dökülecektir.

Lakin giriş kodlu serverda botların için bir except oluşturup botları sunucuya o porttan sokmanızı tavsiye ederim.

 

Çevrimdışı

Noticeler görünmüyor sock oldugundan, bu yüzden bu koda gerek duyuyorum görünse elle status'ten girebilirdim.

__________________

 

Çevrimdışı

Insomnia Nickli Üyeden Alıntı Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Noticeler görünmüyor sock oldugundan, bu yüzden bu koda gerek duyuyorum görünse elle status'ten girebilirdim.

Sock bota vahiymi geliyor parametreler? Onada Notice şeklinde geliyor ama onu event olarak değil kelime yakalayarak düzenlersin.

Ha yok sen ben noticeleri görüyorum ama giriş kodu gelmiyor diyorsan o ayrı. o zaman

Alıntı:

if ($2 == 006) || ($3 == 006) { echo @giris $1- }

satırınıda eklemen gerekiyor.

 

Çevrimdışı

Insomnia Nickli Üyeden Alıntı Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Merhaba. Elimde ki sock botu giriş kodlu bir server'e koymak istiyorum fakat sock oldugu icin giriş yapamıyor. Bu bota nasıl bir kod koyabiliriz ki @Bot penceresinden giris kodunu kendimiz girip sunucuya botu atalım. yardımcı olursanız sevinirim. Şimdiden teşekkürler.

Botunun gireceği serverin port şifresini biliyorsan


bölümüne




ekle. giricektir.