Kahkaha

Bayıldım

Cool

Kızgın

Mahcup

Öğretici

Şaşkın

Suskun

Tatlı

Üzgün

Süper

Tarihte Bugün

Ana Sayfa » internet » IRC » Tarihte Bugün
Tarihte Bugün

; Tarihte Bugün Gösterici By SCouNDReL
; www.bianet.org a teşekkürler

alias -l htmlfree { var %x, %i = $regsub($1-,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x,&nbsp;) | return %x } }
alias -l tarih { return $+($replace($gettok($date,2,$asc(/)),01,ocak,02,subat,03,mart,04,nisan,05,mayis,06,haziran,07,temmuz,08,agustos,09,eylul,10,ekim,11,kasim,12,aralik),_,$gettok($date,1,$asc(/)),.htm) }
alias tbugun { dialog -m tarih tarih  }
on *:SockOpen:tarih*:{
  sockwrite -n $sockname GET $+(/tarih_arsiv/,$tarih) HTTP/1.0
  sockwrite -n $sockname host: www.bianet.org $+ $crlf $+ $crlf
}
on *:SockRead:tarih*:{
  var %a
  sockread %a
  if ($sockerr) { did -ra tarih 1 Bağlantı Hatası Lütfen Daha Sonra Tekrar Deneyin | return }
  if (%sjn == Ok!) && (sayfa başına !isin %a) && (dön</FONT> !isin %a) { did -a tarih 1 $htmlfree($replace($+(%a,$chr(160)),<BR>,$crlf)) }
  if (Tarihte bugün isin %a) { set %sjn Ok! | did -ra tarih 1 Tarihte Bugün $+ $crlf }
}
dialog tarih {
  title “Tarihte Bugün Gösterici”
  size -1 -1 133 169
  option dbu
  edit “Yükleniyor..”, 1, 4 2 124 144, read multi return autovs vsbar
  button “Çıkış”, 2, 47 151 37 12, ok
}
on *:dialog:tarih:init:*:{
  unset %sjn
  sockclose tarih*
  sockopen $+(tarih,$r(1,999)) www.bianet.org 80
}

 

Tarihte Bugün Neler Olmuş, Kimler Ölmüş, Kimler Doğmuş.. bunları gösteren bi addon /tbugun komutuyla çalıştırın

Güncelleme ;

Site Değişiklğinden Kaynaklana hata Düzeltilmiştir
Dialog Eklenmiştir.

Tarihte Bugün - Yorumlar

YORUMLARINIZI PAYLAŞIN

 

Yapılan Yorumlar

BENZER İÇERİKLERİlginizi çekebilecek diğer içerikler

kelebek

kelebek 09 Kasım 2020

irc invex komutu

irc invex komutu 17 Ocak 2011

SOSYAL MEDYADA BİZSitemizin sosyal medya hesapları

ÖNE ÇIKAN KATEGORİLER

RASTGELE İÇERİKLER

Max payne 3 sahneye çıkıyor Php İle Arama Motoru Hazirlamak Facebook’un fotoğraf görüntüsünü değiştirme GEÇEN ZAMAN temel ingilterede Kilolu bebek doğuran anneler dikkat

FACEBOOK'TA BİZ

Hoşgeldiniz Kelebek IRCd ve Kelebek Script ile ilgili her türlü yardımı HELPDESK alanından alabilrsiniz.

Kelebek mIRC Script Sohbet Sitesi - Tüm Hakları Saklıdır