Moderatör Olmak İçin Tıklayın Editör Olmak İçin Tıklayın Forum Kuralları IF Görüntülü Röportajlar IF Helper Grubu
IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası
  odeaweb

>
+
 Kayıt ol
Etiketlenen Kullanıcılar

32Beğeni(ler)

Yeni Konu aç Cevapla
Sayfa 2 Toplam 3 Sayfadan 1 2 3
 
LinkBack Seçenekler Stil
Alt 13 Ekim 2019, 12:09   #11
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: [!.]doğumgünü TARIH



BLackDewiL Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Eline Sağlık Üstad. bunu kendi mircime eklemek istiyorum, mümkünmü?

bu kanalda yazsa hepsi olur mu

--IRCForumlari.NET ; Flood Engellendi -->-> Yeni yazılan mesaj 12:09 -->-> Daha önceki mesaj 12:08 --
Toprak Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Merhaba,
Sercanla otururken neler yapayım diye konuşurken kendisi daha önce botta ekleme yapmış bende forum için yazıp paylaşmak istedim kendisi de izin verdi sağolsun..


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 *:snotice:*:{
  if $regex($1-,/Client connecting (on port|at) (.+)\: (.+) \((.+)@(.+)\)/Si) {
    var %_port = $regml(2), %_nick $regml(3), %_ident $regml(4), %_ip $regml(5)
    msg %_nick Merhaba, %_nick
    msg %_nick Doğum tarihini sisteme kayıt ettirebilirsiniz.
    msg %_nick Doğum gününüz geldiğinde, kanallar genelinde voice(+) 'e sahip olabilirsiniz..
    msg %_nick Doğum tarihinizi eklemek için 4!dogumgunu Tarih yazabilirsiniz.
  }
}
on *:text:*:?:{
  if $regex($1,/^[!.]do[gğĞ]umg[uüÜ]n[uüÜ]$/Si) {
    if !$regex($2,/^(\d{2}\/\d{2}\/\d{4})$/S) { msg $nick Lütfen 4!dogumgunu Tarih olarak belirtiniz. 4ÖRN: !dogumgunu 09/09/1991 }
    else { .hadd -ms Trh $nick $regml(1) | who $nick }
  }
}
raw 352:*:{
  if $hget(Trh,$6) {
    if !$regex($7,/r/) { msg $6 Nickiniz kayıtsız olduğundan dolayı sisteme eklenemedi, lütfen nickinizi kayıt ediniz... | .hdel -ms Trh $6 }
    else {
      sockopen $+(tarih,$6) yas.hesaplama.in 80 | sockmark $+(tarih,$6) $+($6,¿,$hget(Trh,$6))
      .hadd -ms Tarih $6 $hget(Trh,$6) | .hsave -o Tarih Tarih.tprk | .hdel -ms Trh $6
    }
  }
}
on ^*:join:#Sohbet,#Radyo,#Oyun:{
  if $token($hget(Tarih,$nick),1-2,47) == $token($date,1-2,47) {
    mode # +v $nick
    msg # Doğum gününüz kutlu olsun,4 $nick
  }
}
on *:start:if $isfile(Tarih.tprk) { .hmake Tarih | .hload Tarih Tarih.tprk }
alias _tr return $replace($1-,Ç,Ç,Ä°,İ,ü,ü,ÅŸ,ş,ÄŸ,ğ,ç,ç,ı,ı,ö,ö,Å,Ş,Ä,Ğ,Ãœ,Ü,Ö,Ö)
on *:sockopen:tarih*:{ 
  if ($sockerr) { .sockclose $sockname | return }
  var %:sockmark $token($sock($sockname).mark,2,191), %:hesap $+(gun=,$token(%:sockmark,1,47),&ay=,$token(%:sockmark,2,47),&yil=,$token(%:sockmark,3,47))
  sockwrite -nt $sockname POST /yas-hesaplama-dogum-gunu-hesaplama-burc-hesaplama/ HTTP/1.1 
  sockwrite -nt $sockname Host: $sock($sockname).addr
  sockwrite -nt $sockname Connection: keep-alive
  sockwrite -nt $sockname Content-length: $len(%:hesap)
  sockwrite -nt $sockname Accept: text/html, application/xhtml+xml
  sockwrite -nt $sockname User-Agent: Mozilla/4.0 (compatible; MSIE 8.0; Windows NT 6.1; Trident/4.0; SLCC2; .NET CLR 2.0.50727; .NET CLR 3.5.30729; .NET CLR 3.0.30729)
  sockwrite -nt $sockname Content-Type: application/x-
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
sockwrite -nt $sockname
  sockwrite -nt $sockname %:hesap
}
on *:sockread:tarih*:{ 
  var %:tarih | sockread %:tarih | tokenize 32 $_tr(%:tarih)
  if $regex($1-,/<b>(.+?) günü <\/b>doğdunuz/i) { msg $token($sock($sockname).mark,1,191) $+(4,$regml(1),) günü doğdunuz }
  if $regex($1-,/tam olarak (.+?) yaşındasınız/i) { msg $token($sock($sockname).mark,1,191) $+(4,$regml(1),) yaşındasınız }
  if $regex($1-,/Yaşanılan Toplam Süre<\/b>\=(.+?)<br> <b>/i) { msg $token($sock($sockname).mark,1,191) Yaşanılan Toplam Süre =4 $regml(1) }
  if $regex($1-,/<b>Yaşadığın Ay Sayısı\:<\/b>(.+?)<br>/i) { msg $token($sock($sockname).mark,1,191) Yaşadığın Ay Sayısı =4 $regml(1) }
  if $regex($1-,/<b>Yaşadığın Gün Sayısı\:<\/b>(.+?)<br>/i) { msg $token($sock($sockname).mark,1,191) Yaşadığın Gün Sayısı =4 $regml(1) }
  if $regex($1-,/<b>Yaşadığın Saat Sayısı\:<\/b>(.+?)<br>/i) { msg $token($sock($sockname).mark,1,191) Yaşadığın Saat Sayısı =4 $regml(1) }
  if $regex($1-,/<b>Yaşadığın Dakika Sayısı\:<\/b>(.+?)<br>/i) { msg $token($sock($sockname).mark,1,191) Yaşadığın Dakika Sayısı =4 $regml(1) }
  if $regex($1-,/Doğum gününüze kalan süre<\/b>\:(.+?)<br>/i) { msg $token($sock($sockname).mark,1,191) Doğum gününüze kalan süre =4 $regml(1) }
  if $regex($1-,/Burcunuz\:<\/b>(.+?)<br>/i) { msg $token($sock($sockname).mark,1,191) Burcunuz =2 $regml(1) | sockclose $sockname }
}

Normalde $ctime ile daha basit yazılıyor hatta yazmıştım ama 1970 öncesini göstermiyor(/echo -a $asctime(0)) ondan dolayı siteden çektiriyorum..


kanalda çıksa hepsi olurmu üstad

 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları sohbet bizimmekan reklamver
Alt 13 Ekim 2019, 18:08   #12
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: [!.]doğumgünü TARIH



off Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
bu kanalda yazsa hepsi olur mu





kanalda çıksa hepsi olurmu üstad

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:snotice:*:{
  if $regex($1-,/Client connecting (on port|at) (.+)\: (.+) \((.+)@(.+)\)/Si) {
    var %_port = $regml(2), %_nick $regml(3), %_ident $regml(4), %_ip $regml(5)
    msg %_nick Merhaba, %_nick
    msg %_nick Doğum tarihini sisteme kayıt ettirebilirsiniz.
    msg %_nick Doğum gününüz geldiğinde, kanallar genelinde voice(+) 'e sahip olabilirsiniz..
    msg %_nick Doğum tarihinizi eklemek için 4!dogumgunu Tarih yazabilirsiniz.
  }
}
on *:text:*:?:{
  if $regex($1,/^[!.]do[gğĞ]umg[uüÜ]n[uüÜ]$/Si) {
    if !$regex($2,/^(\d{2}\/\d{2}\/\d{4})$/S) { msg $nick Lütfen 4!dogumgunu Tarih olarak belirtiniz. 4ÖRN: !dogumgunu 09/09/1991 }
    else { .hadd -ms Trh $nick $regml(1) | who $nick }
  }
}
raw 352:*:{
  if $hget(Trh,$6) {
    if !$regex($7,/r/) { msg $6 Nickiniz kayıtsız olduğundan dolayı sisteme eklenemedi, lütfen nickinizi kayıt ediniz... | .hdel -ms Trh $6 }
    else {
      sockopen $+(tarih,$6) yas.hesaplama.in 80 | sockmark $+(tarih,$6) $+($6,¿,$hget(Trh,$6))
      .hadd -ms Tarih $6 $hget(Trh,$6) | .hsave -o Tarih Tarih.tprk | .hdel -ms Trh $6
    }
  }
}
on ^*:join:#Sohbet,#Radyo,#Oyun:{
  if $token($hget(Tarih,$nick),1-2,47) == $token($date,1-2,47) {
    mode # +v $nick
    msg # Doğum gününüz kutlu olsun,4 $nick
  }
}
on *:start:if $isfile(Tarih.tprk) { .hmake Tarih | .hload Tarih Tarih.tprk }
alias _tr return $replace($1-,Ç,Ç,Ä°,İ,ü,ü,ÅŸ,ş,ÄŸ,ğ,ç,ç,ı,ı,ö,ö,Å,Ş,Ä,Ğ,Ãœ,Ü,Ö,Ö)
on *:sockopen:tarih*:{ 
  if ($sockerr) { .sockclose $sockname | return }
  var %:sockmark $token($sock($sockname).mark,2,191), %:hesap $+(gun=,$token(%:sockmark,1,47),&ay=,$token(%:sockmark,2,47),&yil=,$token(%:sockmark,3,47))
  sockwrite -nt $sockname POST /yas-hesaplama-dogum-gunu-hesaplama-burc-hesaplama/ HTTP/1.1 
  sockwrite -nt $sockname Host: $sock($sockname).addr
  sockwrite -nt $sockname Connection: keep-alive
  sockwrite -nt $sockname Content-length: $len(%:hesap)
  sockwrite -nt $sockname Accept: text/html, application/xhtml+xml
  sockwrite -nt $sockname User-Agent: Mozilla/4.0 (compatible; MSIE 8.0; Windows NT 6.1; Trident/4.0; SLCC2; .NET CLR 2.0.50727; .NET CLR 3.5.30729; .NET CLR 3.0.30729)
  sockwrite -nt $sockname Content-Type: application/x-
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
sockwrite -nt $sockname
  sockwrite -nt $sockname %:hesap
}
on *:sockread:tarih*:{ 
  var %:tarih | sockread %:tarih | tokenize 32 $_tr(%:tarih)
  if $regex($1-,/<b>(.+?) günü <\/b>doğdunuz/i) { msg #Sohbet,#Radyo,#Oyun $token($sock($sockname).mark,1,191) $+(4,$regml(1),) günü doğdunuz }
  if $regex($1-,/tam olarak (.+?) yaşındasınız/i) { msg #Sohbet,#Radyo,#Oyun $token($sock($sockname).mark,1,191) $+(4,$regml(1),) yaşındasınız }
  if $regex($1-,/Yaşanılan Toplam Süre<\/b>\=(.+?)<br> <b>/i) { msg #Sohbet,#Radyo,#Oyun $token($sock($sockname).mark,1,191) Yaşanılan Toplam Süre =4 $regml(1) }
  if $regex($1-,/<b>Yaşadığın Ay Sayısı\:<\/b>(.+?)<br>/i) { msg #Sohbet,#Radyo,#Oyun $token($sock($sockname).mark,1,191) Yaşadığın Ay Sayısı =4 $regml(1) }
  if $regex($1-,/<b>Yaşadığın Gün Sayısı\:<\/b>(.+?)<br>/i) { msg #Sohbet,#Radyo,#Oyun $token($sock($sockname).mark,1,191) Yaşadığın Gün Sayısı =4 $regml(1) }
  if $regex($1-,/<b>Yaşadığın Saat Sayısı\:<\/b>(.+?)<br>/i) { msg #Sohbet,#Radyo,#Oyun $token($sock($sockname).mark,1,191) Yaşadığın Saat Sayısı =4 $regml(1) }
  if $regex($1-,/<b>Yaşadığın Dakika Sayısı\:<\/b>(.+?)<br>/i) { msg #Sohbet,#Radyo,#Oyun $token($sock($sockname).mark,1,191) Yaşadığın Dakika Sayısı =4 $regml(1) }
  if $regex($1-,/Doğum gününüze kalan süre<\/b>\:(.+?)<br>/i) { msg #Sohbet,#Radyo,#Oyun $token($sock($sockname).mark,1,191) Doğum gününüze kalan süre =4 $regml(1) }
  if $regex($1-,/Burcunuz\:<\/b>(.+?)<br>/i) { msg #Sohbet,#Radyo,#Oyun $token($sock($sockname).mark,1,191) Burcunuz =2 $regml(1) | sockclose $sockname }
}


@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] Kanalda Gozukur ama ozelde yazman gerek iyi forumlar

Konu Che tarafından (13 Ekim 2019 Saat 18:14 ) değiştirilmiştir. Sebep: Code tag içine alındı.
 
Alıntı ile Cevapla

Alt 13 Ekim 2019, 21:24   #13
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: [!.]doğumgünü TARIH



off Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
kanalda çıksa hepsi olurmu üstad

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:snotice:*:{
  if $regex($1-,/Client connecting (on port|at) (.+)\: (.+) \((.+)@(.+)\)/Si) {
    var %_port = $regml(2), %_nick $regml(3), %_ident $regml(4), %_ip $regml(5)
    msg %_nick Merhaba, %_nick
    msg %_nick Doğum tarihini sisteme kayıt ettirebilirsiniz.
    msg %_nick Doğum gününüz geldiğinde, kanallar genelinde voice(+) 'e sahip olabilirsiniz..
    msg %_nick Doğum tarihinizi eklemek için 4!dogumgunu Tarih yazabilirsiniz.
  }
}
on *:text:*:?:{
  if $regex($1,/^[!.]do[qgğĞ]um[qg][uüÜ]n[uüÜ]$/Si) {
    if !$regex($2,/^(\d{2}\/\d{2}\/\d{4})$/S) { msg $nick Lütfen 4!dogumgunu Tarih olarak belirtiniz. 4ÖRN: !dogumgunu 09/09/1991 }
    else { .hadd -ms Trh $nick $regml(1) | who $nick }
  }
}
on *:text:*:#:{
  if $regex($1,/^[!.]do[qgğĞ]um[qg][uüÜ]n[uüÜ]$/Si) {
    if !$regex($2,/^(\d{2}\/\d{2}\/\d{4})$/S) { msg $chan Lütfen 4!dogumgunu Tarih olarak belirtiniz. 4ÖRN: !dogumgunu 09/09/1991 }
    else { .hadd -ms TrhKanal $nick $regml(1) $chan | who $nick }
  }
}
raw 352:*:{
  if !$regex($7,/r/) { msg $6 Nickiniz kayıtsız olduğundan dolayı sisteme eklenemedi, lütfen nickinizi kayıt ediniz... | $iif($hget(Trh,$6),.hdel -ms Trh $6,$iif($hget(TrhKanal,$6),.hdel -ms TrhKanal $6)) }
  elseif $hget(TrhKanal,$6) {
    sockopen $+(tarih,$6) yas.hesaplama.in 80 | sockmark $+(tarih,$6) $+($token($hget(TrhKanal,$6),2,32),¿,$token($hget(TrhKanal,$6),1,32))
    .hadd -ms Tarih $6 $token($hget(TrhKanal,$6),1,32) | .hsave -o Tarih Tarih.tprk | .hdel -ms TrhKanal $6
  }
  else {
    sockopen $+(tarih,$6) yas.hesaplama.in 80 | sockmark $+(tarih,$6) $+($6,¿,$hget(Trh,$6))
    .hadd -ms Tarih $6 $hget(Trh,$6) | .hsave -o Tarih Tarih.tprk | .hdel -ms Trh $6
  }
}
on ^*:join:#Sohbet,#Radyo,#Oyun:{
  if $token($hget(Tarih,$nick),1-2,47) == $token($date,1-2,47) {
    mode # +v $nick
    msg # Doğum gününüz kutlu olsun,4 $nick
  }
}
alias _tr return $replace($1-,Ç,Ç,Ä°,İ,ü,ü,ÅŸ,ş,ÄŸ,ğ,ç,ç,ı,ı,ö,ö,Å,Ş,Ä,Ğ,Ãœ,Ü,Ö,Ö)
on *:sockopen:tarih*:{ 
  if ($sockerr) { .sockclose $sockname | return }
  var %:sockmark $token($sock($sockname).mark,2,191), %:hesap $+(gun=,$token(%:sockmark,1,47),&ay=,$token(%:sockmark,2,47),&yil=,$token(%:sockmark,3,47))
  sockwrite -nt $sockname POST /yas-hesaplama-dogum-gunu-hesaplama-burc-hesaplama/ HTTP/1.1 
  sockwrite -nt $sockname Host: $sock($sockname).addr
  sockwrite -nt $sockname Connection: keep-alive
  sockwrite -nt $sockname Content-length: $len(%:hesap)
  sockwrite -nt $sockname Accept: text/html, application/xhtml+xml
  sockwrite -nt $sockname User-Agent: Mozilla/4.0 (compatible; MSIE 8.0; Windows NT 6.1; Trident/4.0; SLCC2; .NET CLR 2.0.50727; .NET CLR 3.5.30729; .NET CLR 3.0.30729)
  sockwrite -nt $sockname Content-Type: application/x-
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
sockwrite -nt $sockname
  sockwrite -nt $sockname %:hesap
}
on *:sockread:tarih*:{ 
  var %:tarih | sockread %:tarih | tokenize 32 $_tr(%:tarih)
  if $regex($1-,/<b>(.+?) günü <\/b>doğdunuz/i) { msg $token($sock($sockname).mark,1,191) $+(4,$regml(1),) günü doğdunuz }
  if $regex($1-,/tam olarak (.+?) yaşındasınız/i) { msg $token($sock($sockname).mark,1,191) $+(4,$regml(1),) yaşındasınız }
  if $regex($1-,/Yaşanılan Toplam Süre<\/b>\=(.+?)<br> <b>/i) { msg $token($sock($sockname).mark,1,191) Yaşanılan Toplam Süre =4 $regml(1) }
  if $regex($1-,/<b>Yaşadığın Ay Sayısı\:<\/b>(.+?)<br>/i) { msg $token($sock($sockname).mark,1,191) Yaşadığın Ay Sayısı =4 $regml(1) }
  if $regex($1-,/<b>Yaşadığın Gün Sayısı\:<\/b>(.+?)<br>/i) { msg $token($sock($sockname).mark,1,191) Yaşadığın Gün Sayısı =4 $regml(1) }
  if $regex($1-,/<b>Yaşadığın Saat Sayısı\:<\/b>(.+?)<br>/i) { msg $token($sock($sockname).mark,1,191) Yaşadığın Saat Sayısı =4 $regml(1) }
  if $regex($1-,/<b>Yaşadığın Dakika Sayısı\:<\/b>(.+?)<br>/i) { msg $token($sock($sockname).mark,1,191) Yaşadığın Dakika Sayısı =4 $regml(1) }
  if $regex($1-,/Doğum gününüze kalan süre<\/b>\:(.+?)<br>/i) { msg $token($sock($sockname).mark,1,191) Doğum gününüze kalan süre =4 $regml(1) }
  if $regex($1-,/Burcunuz\:<\/b>(.+?)<br>/i) { msg $token($sock($sockname).mark,1,191) Burcunuz =2 $regml(1) | sockclose $sockname }
}


Konu Emrehan tarafından (13 Ekim 2019 Saat 21:28 ) değiştirilmiştir.
 
Alıntı ile Cevapla

Alt 13 Ekim 2019, 23:25   #14
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: [!.]doğumgünü TARIH



peki bu kod eggdropa uyarlanabilirmi acaba ?

__________________
Bayrakları Bayrak Yapan Üstündeki Kandır, Vatan Eğer Uğrunda Ölen Varsa Vatandır...
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
 
Alıntı ile Cevapla

Alt 14 Ekim 2019, 08:49   #15
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: [!.]doğumgünü TARIH



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

@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] Kanalda Gozukur ama ozelde yazman gerek iyi forumlar

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
msg #Sohbet,#Radyo,#Oyun $token($sock($sockname).mark,1,191)

böyle bir kullanım sözkonusu degildir. msg komutu hakkında araştırma yap.
AkMaN Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
peki bu kod eggdropa uyarlanabilirmi acaba ?

güzel bir eggdropcu bulursan çevirebilir. şu zamanda pekde bulabileceğini sanmıyorum. eggdrop öldü

__________________
Güneşin ilk ışıklarına vererek umutlarımı
Masal Dünyamın açıp kapılarını
Girdim insan Kalabalığına
 
Alıntı ile Cevapla

Alt 30 Kasım 2019, 10:56   #16
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: [!.]doğumgünü TARIH



Kanal Genelinde nasıl yapabiliriz bunu. Başka kullanıcı üzerimizden doğumgününü kanal genelinde yapmaları ve kanalda gözükmesi için ne yapmamız gerekir.

 
Alıntı ile Cevapla

Alt 30 Kasım 2019, 14:43   #17
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: [!.]doğumgünü TARIH



ByaSiL Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Kanal Genelinde nasıl yapabiliriz bunu. Başka kullanıcı üzerimizden doğumgününü kanal genelinde yapmaları ve kanalda gözükmesi için ne yapmamız gerekir.

Bir önceki postumda hem kanal hem özel kullanımı şeklinde verdim kodu. İnceleyin.

 
Alıntı ile Cevapla

Alt 30 Kasım 2019, 22:52   #18
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: [!.]doğumgünü TARIH



AkMaN Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
peki bu kod eggdropa uyarlanabilirmi acaba ?

Eggdrop istiyorsan @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] ile bir konuş. Yapılabilitesi olan her şeyi yapabilir. Tabi yapar mı bilmem, belki sadece yol gösterir
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

__________________
The Ghost of Christmas Past...

mircscripting.net
 
Alıntı ile Cevapla

Alt 15 Nisan 2020, 00:53   #19
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: [!.]doğumgünü TARIH



Emrehan 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 *:snotice:*:{
  if $regex($1-,/Client connecting (on port|at) (.+)\: (.+) \((.+)@(.+)\)/Si) {
    var %_port = $regml(2), %_nick $regml(3), %_ident $regml(4), %_ip $regml(5)
    msg %_nick Merhaba, %_nick
    msg %_nick Doğum tarihini sisteme kayıt ettirebilirsiniz.
    msg %_nick Doğum gününüz geldiğinde, kanallar genelinde voice(+) 'e sahip olabilirsiniz..
    msg %_nick Doğum tarihinizi eklemek için 4!dogumgunu Tarih yazabilirsiniz.
  }
}
on *:text:*:?:{
  if $regex($1,/^[!.]do[qgğĞ]um[qg][uüÜ]n[uüÜ]$/Si) {
    if !$regex($2,/^(\d{2}\/\d{2}\/\d{4})$/S) { msg $nick Lütfen 4!dogumgunu Tarih olarak belirtiniz. 4ÖRN: !dogumgunu 09/09/1991 }
    else { .hadd -ms Trh $nick $regml(1) | who $nick }
  }
}
on *:text:*:#:{
  if $regex($1,/^[!.]do[qgğĞ]um[qg][uüÜ]n[uüÜ]$/Si) {
    if !$regex($2,/^(\d{2}\/\d{2}\/\d{4})$/S) { msg $chan Lütfen 4!dogumgunu Tarih olarak belirtiniz. 4ÖRN: !dogumgunu 09/09/1991 }
    else { .hadd -ms TrhKanal $nick $regml(1) $chan | who $nick }
  }
}
raw 352:*:{
  if !$regex($7,/r/) { msg $6 Nickiniz kayıtsız olduğundan dolayı sisteme eklenemedi, lütfen nickinizi kayıt ediniz... | $iif($hget(Trh,$6),.hdel -ms Trh $6,$iif($hget(TrhKanal,$6),.hdel -ms TrhKanal $6)) }
  elseif $hget(TrhKanal,$6) {
    sockopen $+(tarih,$6) yas.hesaplama.in 80 | sockmark $+(tarih,$6) $+($token($hget(TrhKanal,$6),2,32),¿,$token($hget(TrhKanal,$6),1,32))
    .hadd -ms Tarih $6 $token($hget(TrhKanal,$6),1,32) | .hsave -o Tarih Tarih.tprk | .hdel -ms TrhKanal $6
  }
  else {
    sockopen $+(tarih,$6) yas.hesaplama.in 80 | sockmark $+(tarih,$6) $+($6,¿,$hget(Trh,$6))
    .hadd -ms Tarih $6 $hget(Trh,$6) | .hsave -o Tarih Tarih.tprk | .hdel -ms Trh $6
  }
}
on ^*:join:#Sohbet,#Radyo,#Oyun:{
  if $token($hget(Tarih,$nick),1-2,47) == $token($date,1-2,47) {
    mode # +v $nick
    msg # Doğum gününüz kutlu olsun,4 $nick
  }
}
alias _tr return $replace($1-,Ç,Ç,Ä°,İ,ü,ü,ÅŸ,ş,ÄŸ,ğ,ç,ç,ı,ı,ö,ö,Å,Ş,Ä,Ğ,Ãœ,Ü,Ö,Ö)
on *:sockopen:tarih*:{ 
  if ($sockerr) { .sockclose $sockname | return }
  var %:sockmark $token($sock($sockname).mark,2,191), %:hesap $+(gun=,$token(%:sockmark,1,47),&ay=,$token(%:sockmark,2,47),&yil=,$token(%:sockmark,3,47))
  sockwrite -nt $sockname POST /yas-hesaplama-dogum-gunu-hesaplama-burc-hesaplama/ HTTP/1.1 
  sockwrite -nt $sockname Host: $sock($sockname).addr
  sockwrite -nt $sockname Connection: keep-alive
  sockwrite -nt $sockname Content-length: $len(%:hesap)
  sockwrite -nt $sockname Accept: text/html, application/xhtml+xml
  sockwrite -nt $sockname User-Agent: Mozilla/4.0 (compatible; MSIE 8.0; Windows NT 6.1; Trident/4.0; SLCC2; .NET CLR 2.0.50727; .NET CLR 3.5.30729; .NET CLR 3.0.30729)
  sockwrite -nt $sockname Content-Type: application/x-
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
sockwrite -nt $sockname
  sockwrite -nt $sockname %:hesap
}
on *:sockread:tarih*:{ 
  var %:tarih | sockread %:tarih | tokenize 32 $_tr(%:tarih)
  if $regex($1-,/<b>(.+?) günü <\/b>doğdunuz/i) { msg $token($sock($sockname).mark,1,191) $+(4,$regml(1),) günü doğdunuz }
  if $regex($1-,/tam olarak (.+?) yaşındasınız/i) { msg $token($sock($sockname).mark,1,191) $+(4,$regml(1),) yaşındasınız }
  if $regex($1-,/Yaşanılan Toplam Süre<\/b>\=(.+?)<br> <b>/i) { msg $token($sock($sockname).mark,1,191) Yaşanılan Toplam Süre =4 $regml(1) }
  if $regex($1-,/<b>Yaşadığın Ay Sayısı\:<\/b>(.+?)<br>/i) { msg $token($sock($sockname).mark,1,191) Yaşadığın Ay Sayısı =4 $regml(1) }
  if $regex($1-,/<b>Yaşadığın Gün Sayısı\:<\/b>(.+?)<br>/i) { msg $token($sock($sockname).mark,1,191) Yaşadığın Gün Sayısı =4 $regml(1) }
  if $regex($1-,/<b>Yaşadığın Saat Sayısı\:<\/b>(.+?)<br>/i) { msg $token($sock($sockname).mark,1,191) Yaşadığın Saat Sayısı =4 $regml(1) }
  if $regex($1-,/<b>Yaşadığın Dakika Sayısı\:<\/b>(.+?)<br>/i) { msg $token($sock($sockname).mark,1,191) Yaşadığın Dakika Sayısı =4 $regml(1) }
  if $regex($1-,/Doğum gününüze kalan süre<\/b>\:(.+?)<br>/i) { msg $token($sock($sockname).mark,1,191) Doğum gününüze kalan süre =4 $regml(1) }
  if $regex($1-,/Burcunuz\:<\/b>(.+?)<br>/i) { msg $token($sock($sockname).mark,1,191) Burcunuz =2 $regml(1) | sockclose $sockname }
}



@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] Usta Acaba Kodda Sıkıntımı Var Bir Gün Önce Çalışıyordu Şimdi Çalıştıramadım

 
Alıntı ile Cevapla

Alt 15 Nisan 2020, 01:11   #20
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (1)
IF Ticaret Yüzdesi:(%)
Cevap: [!.]doğumgünü TARIH



Sorgu yapılan site kapanmış, düzeltiriz.

 
Alıntı ile Cevapla

Cevapla
Sayfa 2 Toplam 3 Sayfadan 1 2 3

Etiketler
doğum günü sistemi, doğumgünü tarih, ircbastard fikir

« önceki Konu | sonraki Konu »

Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)
 

Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajınızı Değiştirme Yetkiniz Yok
BB code is Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodu Kapalı
Trackbacks are Kapalı
Pingbacks are Açık
Refbacks are Açık

Benzer Konular
Konu Konuyu Başlatan Forum Cevaplar Son Mesaj
Rembrandt van Rijn doğumgünü ve Google'dan, Yeni Doodle. Sevda Arama Motorları Haberleri 1 15 Temmuz 2013 16:24
Yokluğunun Doğumgünü Liaaa Şiir, Hikaye ve Güzel Sözler 0 25 Şubat 2012 02:01
Doğumgünü belli ama yaşı bilinmiyor Rüzgar Haber Arşivi 0 08 Ocak 2012 15:41
Doğumgünü ve sünnet camide yapılsın Feronia Haber Arşivi 0 16 Ekim 2011 12:16

×



Sitemiz bir " paylaşım " sitesidir. Bu yüzden sitemize kayıt olan herkes kontrol edilmeksizin mesaj/konu/resim paylaşabilmektedir.
Bu sebepten ötürü, sitemiz üzerinden paylaşılan mesajlar, konular ve resimlerden doğabilecek olan yasal sorumluluklar paylaşan kullanıcıya aittir. IRCForumlari.Net hiçbir yasal sorumluluk kabul etmemektedir. İllegal herhangi bir faaliyet görülmesi durumunda İletişim sayfası üzerinden ulaşıldığı taktirde mesaj, konu ya da resim en fazla 24 saat içerisinde silinecektir.
5846 sayılı Fikir ve Sanat Eserleri Kanunu gereğince sitemizde telif hakkı bulunan mp3,video v.b. eserlerin paylaşımı yasaktır. Yasal işlem olması halinde paylaşan kişi yada kişilerin bilgileri gerekli kuruma verilecektir.
İletişim Arşiv Gizlilik Sözleşmesi Yukarı git
ferizli haber kaynarca haber sohbet teması takipçi satın al anime izle tiktok takipçi satın al instagram beğeni satın al takipçi satın al takipçi satın al Buy Instagram Followers sohbet siteleri sohbet odaları sohbet odaları sohbet Akyazı Haber Sitesi Ankara Haber
Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2026, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2025 IRCForumlari.Net Sparhawk