mIRC Scripting - Tarihte Bugün

mIRC Scripting (https://www.mircscripting.net/)

- Showcase - Hazır kodlar (https://www.mircscripting.net/showcase-hazyr-kodlar/)

- - Tarihte Bugün (https://www.mircscripting.net/showcase-hazyr-kodlar/505-tarihte-buguen.html)

--------------------------
Tarih: 25 Kasım 2010
Yazar: CesuryureK
Bilgi: Emeğe Saygı

---------------------------

Merhaba, herkese iyi forumlar..

Alanım gereği olsa gerek "Tarihte Bugün" adı altında bir çalışma yaptım. Bu çalışma sayesinde tarihte o günde neler olmuşsa haberdar olmamızı sağlar. Aynı zamanda bilgilerimize bilgi katmış olacağız.

Kod ALT+R yapılıp Remote kısmına eklenecektir.
Kod remote kısmına eklendikten sonra herhangi bir kanalda !tarih veya .tarih denilmesi taktirde Tarihte bugün manşetleri aynı zamanda o gün doğan ve Ölen ünlü kişilerin bilgilerini de kanala yansıtılacaktır. Kod bir bota entegre edilip, #Tarih kanalı daha aktif bir kullanıma sahip olabilir.

Kod:

 

alias htmlfree {  

  var %x, %i = $regsub($1-,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x,&nbsp;,HTTP/1.1 200 OK,Server: Microsoft-IIS/6.0)

  return %x  

} 

alias history { sockopen Tarih www.yehhu.com 80  }  

on *:SockOpen:Tarih:{  

  sockwrite -n $sockname GET /tarihte_bugun/ HTTP/1.1

  sockwrite -n $sockname host: yehhu.com  

  sockwrite -n $sockname $crlf  

}  

on *:SockRead:Tarih:{  

  var %bilgi

  sockread %bilgi

  if $regex($htmlfree(%bilgi),\d\.) || $regex($htmlfree(%bilgi),/(Ölen|doğan)/i)  { msg %tarihchan $+($gettok($date,1-2,47),/) $+ $replace($htmlfree(%bilgi),Ölen,$+($chr(3),4Ölen),Doğan,$+($chr(3),4Doğan))) | .timer 1 4 sockclose tarih }

} 

on *:Text:*:#: {

  if ($regex($1,/(!Tarih|.Tarih)/i)) {

    set %tarihchan $chan

    .history

  }

}

Screen:

http://i1011.hizliresim.com/2010/11/25/3798.jpg

Umarım tarihe bir katkımız olur.
Saygı ve sevgilerimle..

25/11/2010 Difuzyon , CesuryureK'i tebrik etti...

;)

++ mIRCScripting.net hakkında kısaca:

mS; "Gayri resmi mIRC" kullanıcı ve tasarımcı topluluğudur.
2009 yılında kurulan mS; tasarımcı ve geliştiricileri bir araya getiren etkileşim ve iletişim sağlayan bir platformdur.
mS; tasarım, programlama, geliştirme, düzenleme vb. pek çok konu etrafında bir araya gelmiş "mIRC" meraklısı bir çok insan tarafından yaratılan içeriğiyle; kullanıcı dostu, özgün elit, nitelikli kişi ve konularla hizmet sunan mIRC Scripting platformudur.

Özgün içerikten onay almaksızın içeriği yaratan kullanıcılarımız tamamen yada kısmen sorumludur, aynı zamanda söz konusu içerik mS yetkilileri izni olmaksızın, kaynak gösterilse dahi(!) kopyalanamaz ve/ya paylaşılamaz. Site/içerik hakkında görüş, öneri ve şikayetleriniz için sikayet[at]mircscripting[dot]net e-posta ve ya İletişim adresinden bizlere ulaştırabilirsiniz.

FLINK: mIRC Offical - Hasan AYDENİZ - Koli - KARMA - Karma Aydınlatma

mIRC mIRC Orjinal mIRC İndir mIRC Download mIRC Tutorials mIRC Socket mIRC Commands mIRC Komutlar mIRC Yükle mIRC Dersler mIRC Hazır Kodlar mIRC Classentifier mIRC DLL mIRC Dialog mIRC IRC mIRC FTP mIRC Telnet mIRC Help
mIRC Yardım mIRC Iconlar mIRC Com Object mIRC Binary Files mIRC Picture Windows mIRC Unicode mIRC Forum mIRC Hazır Kodlar mIRC Kod mIRC Script mIRC File Handling mIRC Scripting Language mIRC Scripting Dili mIRC Scripting Info
mIRC Scripting Tutorials