IRC ve mIRC Kullanıcılarının Buluşma Noktası
  okey oyna




14Beğeni(ler)
  • 12 Post By Toprak
  • 1 Post By Toprak
  • 1 Post By vioLeta

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 10 Haziran 2019, 17:56   #1
Çevrimdışı
[!.]doğumgünü TARIH


-- Sponsor Baglantı --


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..
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..
__________________
Ölmek için doğmuştur ya insan; O yüzden her yağmur sonrası Toprak kokusunu sever.

Konu Toprak tarafından (11 Haziran 2019 Saat 09:58 ) değiştirilmiştir.
  Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
Alt 10 Haziran 2019, 18:12   #2
Çevrimiçi
Cevap: [!.]doğumgünü TARIH




eline saglık

__________________
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 11 Haziran 2019, 20:50   #3
Çevrimdışı
Cevap: [!.]doğumgünü TARIH




maşallah beraber geçirdiğiniz süreyi hiç boşa harcamıyorsunuz
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

  Alıntı ile Cevapla

Alt 12 Haziran 2019, 16:23   #4
Çevrimiçi
Cevap: [!.]doğumgünü TARIH




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..

Eline Sağlık Üstad. bunu kendi mircime eklemek istiyorum, mümkünmü?

  Alıntı ile Cevapla

Alt 12 Haziran 2019, 17:01   #5
Çevrimdışı
Cevap: [!.]doğumgünü TARIH




FuaT 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ü?

Evet kendiniz kullanabilirsiniz;

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:text:*:?:{

Böyle değiştirin;

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:input:?:{


__________________
Ölmek için doğmuştur ya insan; O yüzden her yağmur sonrası Toprak kokusunu sever.
  Alıntı ile Cevapla

Alt 12 Haziran 2019, 17:04   #6
Çevrimiçi
Cevap: [!.]doğumgünü TARIH




Doğum günümü takip etmek istersen bilgileri yollim @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] cım !

Elinize sağlık Sercan beye saygılar.

__________________
Durmak ölüm, taklit uşaklıktır, çalışmak ve yetişmek ise hayat ve hürriyettir.



Kullanıcı imzalarındaki bağlantı ve resimleri görebilmek için en az 20 mesaja sahip olmanız gerekir ya da üye girişi yapmanız gerekir.
  Alıntı ile Cevapla

Cevapla

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

Seçenekler
Stil

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



betcup giriş artemisbet giriş

canlı bahis bahis siteleri canli bahis siteleri betebet güncel betvole betebet tipobet