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 Hazır Kodlar (https://www.ircforumlari.net/mirc-scripting-hazir-kodlar/)
-   -   Özele kodla girmek [ Kodlar Tamamen Bana Aittir... ] (https://www.ircforumlari.net/mirc-scripting-hazir-kodlar/116670-ozele-kodla-girmek-kodlar-tamamen-bana-aittir.html)

Heavenly 11 Ekim 2008 21:34

Cevap: Özele kodla girmek [ Kodlar Tamamen Bana Aittir... ]
 
bu koda muaf nıck eklemek mumkun mu acaba sunucuya qırdıqımde Jeanx botumuz serıye baqlıyo ve dusuyorum

LyXiRd 11 Ekim 2008 22:28

Cevap: Özele kodla girmek [ Kodlar Tamamen Bana Aittir... ]
 
PHP- Kodu:

Bu yazıyı değiştirmek kodun çalışmamasına sebep olabilir... 
Bu kod PysCoPaT tarafından yazılmıştır...
on *:open:?:*:{  
  if ( 
$nick != %ozelson ) || ($nick != Jeanx){
    unset %
ozelkod
    set 
%ozelyazi $1
    
set %gerekli  (ßy PysCoPaT
    
set %ozelkod $rand(a,z) $+ $rand(1,9) $+ $rand(a,z
    .
privmsg $nick 4 Kontrol ediliyorsunuz... 15 %gerekli
    
.timer 1 4 .msg $nick 2Selam4 $nick 
    
.timer 1 4 .msg $nick 2Bot olmadığınız kanıtlamak için özelime 4 !kod %ozelkod 2 yazınız.. 15 %gerekli
    
.timer 1 4 .msg $nick 2Kodu 30 saniye içinde girmediğiniz zaman mesajlarınızı göremiyeceğim15 %gerekli
    window 
-@Özel 
    
echo @Özel 1,4 $time(HH:nn.ss2 Özel isteği Nick4 $nick 
    set 
%ozelson $nick
    
.timer 1 30 unset %ozelson
  
}
  
closemsg $nick
}
on *:text:!kod *:?:{
  if ( $
2  ==  %ozelkod ) {
    
clear $nick
    
.window -@Özel
    
.echo @Özel 1,4 $time(HH:nn.ss2 $nick şifreyi doğru girdiği için özelinize kabul edilmiştir... 
    .
timers off
    
.q $nick
    set 
%gerekli  (ßy PysCoPaT)
    .
msg $nick 2Şifreniz DoğruGörüşme talebiniz 4kabul edilmiştir... Not Sadece İlk Yazdığınız $me Nickine ulaşacaktır... 15 %gerekli
    
.echo $nick $timestamp < $+ $nick $+ > %ozelyazi
  
}
  else {
    
set %gerekli  (ßy PysCoPaT)
    .
privmsg $nick 2Girdiğiniz kod 4yanlıştır2 30 saniyeliğine bana yazmanız engellenmiştir...15 %gerekli
    
.timers off
    
.ignore $nick
    
.timer 1 30 ignore -r $nick
    
.closemsg $nick
    
unset %ozelson
    
.window -@Özel
    
.echo @Özel 1,4 $time(HH:nn.ss2 $nick ile özel görüşme reddedilmiştir... Çünkü kodu yanlış girmiştirGirmesi gereken kod:%ozelkod 2Kod olarak gösterilen yazı:$
  
}
}


Bu kodu kullanırsan olur

Heavenly 12 Ekim 2008 01:44

Cevap: Özele kodla girmek [ Kodlar Tamamen Bana Aittir... ]
 
kodda sorun var tmm jeanx qeldıqınde sorun cıkmıyoda her nıck bana yazabılıyo bu seferde

Editor 14 Ekim 2008 18:51

Cevap: Özele kodla girmek [ Kodlar Tamamen Bana Aittir... ]
 
Kod:

on *:open:?:*:{ 
  if ( $nick != %ozelson ) && ($nick != Jeanx){
  unset %ozelkod
  set %ozelyazi $1-
  set %gerekli  (ßy PysCoPaT)
  set %ozelkod $rand(a,z) $+ $rand(1,9) $+ $rand(a,z)
  .privmsg $nick 4 Kontrol ediliyorsunuz... 15 %gerekli
  .timer 1 4 .msg $nick 2Selam4 $nick
  .timer 1 4 .msg $nick 2Bot olmad11n1z kan1tlamak için özelime 4 !kod %ozelkod 2 yaz1n1z.. 15 %gerekli
  .timer 1 4 .msg $nick 2Kodu 30 saniye içinde girmediiniz zaman mesajlar1n1z1 göremiyeceim. 15 %gerekli
  window -m @Özel
  echo @Özel 1,4 $time(HH:nn.ss) 2 Özel istei Nick: 4 $nick
  set %ozelson $nick
  .timer 1 30 unset %ozelson
}
closemsg $nick
on *:text:!kod *:?:{
  if ( $2  ==  %ozelkod ) {
    if ($istok(Jeanx,$nick,32)) { halt }
    clear $nick
    .window -m @Özel
    .echo @Özel 1,4 $time(HH:nn.ss) 2 $nick _ifreyi doru girdii için özelinize kabul edilmi_tir...
    .timers off
    .q $nick
    set %gerekli  (ßy PysCoPaT)
    .msg $nick 2^ifreniz Doru. Görü_me talebiniz 4kabul edilmi_tir... Not Sadece 0lk Yazd11n1z $me Nickine ula_acakt1r... 15 %gerekli
    .echo $nick $timestamp < $+ $nick $+ > %ozelyazi
  }
  else {
    set %gerekli  (ßy PysCoPaT)
    .privmsg $nick 2Girdiiniz kod 4yanl1_t1r2 30 saniyeliine bana yazman1z engellenmi_tir...15 %gerekli
    .timers off
    .ignore $nick
    .timer 1 30 ignore -r $nick
    .closemsg $nick
    unset %ozelson
    .window -m @Özel
    .echo @Özel 1,4 $time(HH:nn.ss) 2 $nick ile özel görü_me reddedilmi_tir... Çünkü kodu yanl1_ girmi_tir. Girmesi gereken kod:7 %ozelkod 2Kod olarak gösterilen yaz1:4 $2
  }
}


Heavenly 14 Ekim 2008 20:19

Cevap: Özele kodla girmek [ Kodlar Tamamen Bana Aittir... ]
 
rapList
* /if: parametreler geçersiz (line 178, defter.sys)
-rapList
* /msg: insufficient parameters
-rapList


ßu cıkıyo yıne oLmadı yaffff

Heavenly 16 Ekim 2008 22:15

Cevap: Özele kodla girmek [ Kodlar Tamamen Bana Aittir... ]
 
yardımcı olucak kımse yok muu ?

LyXiRd 23 Temmuz 2009 23:05

Cevap: Özele kodla girmek [ Kodlar Tamamen Bana Aittir... ]
 
Kod:

; Bu yazıyı değiştirmek kodun çalışmamasına sebep olabilir...
;
Bu kod PysCoPaT tarafından yazılmıştır...
on *:open:?:*:{ 
  if (
$nick != %ozelson ) || ($nick != Jeanx){
    unset %
ozelkod
    set
%ozelyazi $1-
   
set %gerekli  (ßy PysCoPaT)
   
set %ozelkod $rand(a,z) $+ $rand(1,9) $+ $rand(a,z)
    .
privmsg $nick 4 Kontrol ediliyorsunuz... 15 %gerekli
   
.timer 1 4 .msg $nick 2Selam4 $nick
   
.timer 1 4 .msg $nick 2Bot olmadığınız kanıtlamak için özelime 4 !kod %ozelkod 2 yazınız.. 15 %gerekli
   
.timer 1 4 .msg $nick 2Kodu 30 saniye içinde girmediğiniz zaman mesajlarınızı göremiyeceğim. 15 %gerekli
    window
-m @Özel
   
echo @Özel 1,4 $time(HH:nn.ss) 2 Özel isteği Nick: 4 $nick
    set
%ozelson $nick
   
.timer 1 30 unset %ozelson
 
}
 
closemsg $nick
}
on *:text:!kod *:?:{
  if ( $
==  %ozelkod ) {
   
clear $nick
   
.window -m @Özel
   
.echo @Özel 1,4 $time(HH:nn.ss) 2 $nick şifreyi doğru girdiği için özelinize kabul edilmiştir...
    .
timers off
   
.q $nick
    set
%gerekli  (ßy PysCoPaT)
    .
msg $nick 2Şifreniz Doğru. Görüşme talebiniz 4kabul edilmiştir... Not Sadece İlk Yazdığınız $me Nickine ulaşacaktır... 15 %gerekli
   
.echo $nick $timestamp < $+ $nick $+ > %ozelyazi
 
}
  else {
   
set %gerekli  (ßy PysCoPaT)
    .
privmsg $nick 2Girdiğiniz kod 4yanlıştır2 30 saniyeliğine bana yazmanız engellenmiştir...15 %gerekli
   
.timers off
   
.ignore $nick
   
.timer 1 30 ignore -r $nick
   
.closemsg $nick
   
unset %ozelson
   
.window -m @Özel
   
.echo @Özel 1,4 $time(HH:nn.ss) 2 $nick ile özel görüşme reddedilmiştir... Çünkü kodu yanlış girmiştir. Girmesi gereken kod:7 %ozelkod 2Kod olarak gösterilen yazı:4 $2
 
}
}



Bunu bi dene [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Southwind 31 Ağustos 2009 01:22

Cevap: Özele kodla girmek [ Kodlar Tamamen Bana Aittir... ]
 
Eline sağlık güzel kodlama ama mesela büyük sunucuda özelime başka biri geldiğinde öncekinin gireceği kod yanlış olarak gözüküyor.

LyXiRd 28 Ekim 2009 13:45

Cevap: Özele kodla girmek [ Kodlar Tamamen Bana Aittir... ]
 
Alıntı:

Southwind Nickli Üyeden Alıntı (Mesaj 791702)
Eline sağlık güzel kodlama ama mesela büyük sunucuda özelime başka biri geldiğinde öncekinin gireceği kod yanlış olarak gözüküyor.

üzerinde fazla uğraşmadm ama version 2 de bütün hatalar giderilcek .)

JaMMaH 08 Eylül 2010 07:16

Cevap: Özele kodla girmek [ Kodlar Tamamen Bana Aittir... ]
 
Ellerine sağlık. Fakat şöyle bi durum var diyelim 2 kişi birden geldi özeline. O zaman ilk kodun üstüne eklicek variables'e . ilk gelenin şifresine yanlış girdiniz diye bi uyarı gidicek.


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

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2025 IRCForumlari.Net Sparhawk