IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

- mIRC Scripting Hazır Kodlar (https://www.ircforumlari.net/mirc-scripting-hazir-kodlar/)

- - Deprem kodu. (https://www.ircforumlari.net/mirc-scripting-hazir-kodlar/1004104-deprem-kodu.html)

Merhaba,
Kendi sunucumuz için yapmıştım belki lazım olur kullanırsınız filan..

irc.trsohbet.net - #deprem kanalımızda kod aktif takip de edebilirsiniz.

Kod:

on *:sockopen:deprem:{ 

  if ($sockerr) { .sockclose $sockname } 

  else {

    sockwrite -nt $sockname GET /deprem.php HTTP/1.1

    sockwrite -nt $sockname Host: $sock($sockname).addr

    sockwrite -nt $sockname Connection: keep-alive

    sockwrite -nt $sockname User-Agent: Mozilla/5.0 (Windows NT 10.0; Win64; x64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/89.0.4389.114 Safari/537.36

    sockwrite -nt $sockname Accept: text/html,application/xhtml+xml,application/xml;q=0.9,image/avif,image/webp,image/apng,*/*;q=0.8,application/signed-exchange;v=b3;q=0.9

    sockwrite -nt $sockname Accept-Language: tr-TR,tr;q=0.9,en-US;q=0.8,en;q=0.7

    sockwrite -nt $sockname $crlf  

  }

} 

on *:sockread:deprem:{ 

  var %:_deprem | sockread %:_deprem | tokenize 32 %:_deprem

  if $regex($1-,/ID: (.+) Enlem: (.+) Boylam: (.+) Derinlik: (.+) Buyukluk: (.+) Yer: (.+) Tarih: (.+)<br \/>/Si) {

    var %:_id $regml(1), %:_enlem $regml(2), %:_boylam $regml(3), %:_derinlik $regml(4), %:_büyük $regml(5), %:_yer $regml(6), %:_tarih $regml(7)

    if !$hget(DpremID,%:_id) {

      .hadd -ms DpremID %:_id ok.

      .hsave -o DpremID DpremID.tprk

      msg #Deprem :

      msg #Deprem $+(:,%:_yer) Tarih: %:_tarih - Enlem: %:_enlem -Boylam: %:_boylam - Derinlik: %:_derinlik - Büyüklük: %:_büyük

      msg #Deprem :

    }

  }

}

alias _deprem { sockclose deprem | sockopen deprem igs.mirc.net.tr 80 }

Cevap: Deprem kodu.

D harfi her zaman buyuk xcvbcvbvnbv ((:

Cevap: Deprem kodu.

@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Fikrilere saygı duyan Adamsın :) Güzel çalışıyor. Ben gibi pc başında devamlı takip eden biri için güzel bir çalışma.

Cevap: Deprem kodu.

Güzel çalışma tebrikler @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Cevap: Deprem kodu.

Eline sağlık @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] harika düşünülmüş

Cevap: Deprem kodu.

İbo, can sıkıntısına yaptığı icaatlarına birini daha ekledi

Cevap: Deprem kodu.

Eline sağlık kardeşim şahsen gözüm hep o kanalda Rabbim tekrarını yaşatmasın ülkemize inşallah.

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

Cevap: Deprem kodu.

Emeğinize sağlık..

Ülkece sallanmayan
Şehir kalmıcak gibi..

Herkes haline şükretsin
Tevbe etsin..

Cevap: Deprem kodu.

Eline sağlık
Yerinde bir kod olmus

Cevap: Deprem kodu.

Eline sağlık kardeşim