|
|
 |
| mIRC Scripting Hazır Kodlar mIRC Scriptinglerinizde kullanabileceğiniz hazır kodlara bu başlık altından ulaşabilirsiniz. |
| | Seçenekler | Stil |
25 Eylül 2025, 22:54
| #1 |
     |  Güncel Deprem Kodu Socket ;-------------------------------------------------------------- ; Deprem Bildirim Socket Kodu ; Bu kod Kandilli Rasathanesi (KOERI) web sitesinden ; deprem verilerini belirli aralıklarla kontrol eder. ; ; Önemli Not: ; Veriler ANLIK değildir. KOERI sayfasında yayınlandığı ; zaman gelir. Dolayısıyla bildirimler gecikmeli olabilir. ; ; Kullanım: ; 1) Deprem mesajının gönderileceği kanalı "depremkanal" aliasında değiştirin. ; 2) Scripti başlatmak için komut yazın. ; /timer 0 30 deprem ; (30 saniyede bir deprem kontrolü yapar) ; ; Yeni bir deprem bulunduğunda: ; - deprem.txt dosyasına kaydedilir. ; - Belirtilen kanala bildirilir. ;-------------------------------------------------------------- [Üye Olmadan Linkleri Göremezsiniz. Lütfen Üye Olmak için TIKLAYIN...] Kodalias depremkanal return #Sohbet
alias depremler { .sockclose deprem | .sockopen deprem www.koeri.boun.edu.tr 80 }
alias deprem { depremler }
on *:sockopen:deprem:{ var %j = sockwrite -n $sockname | %j GET /scripts/lst9.asp HTTP/1.1 | %j Host: www.koeri.boun.edu.tr | %j $crlf }
on *:sockread:deprem:{
var %deprem
sockread %deprem
if ($+(*,$time(yyyy.mm.dd),*) iswm %deprem) {
tokenize 32 %deprem
set %depremdetay Tarih: $1 Saat: $2 Derinlik: $5 km Siddet: $7 Yer: $9-
if !$read(deprem.txt,w,%depremdetay) { write deprem.txt %depremdetay | msg $depremkanal 0,1[DEPREM] %depremdetay | .sockclose deprem }
if $read(deprem.txt,w,%depremdetay) { .sockclose deprem }
}
} 👍 7 |
| |
|
25 Eylül 2025, 23:10
| #2 |
   | Emeğinize sağlık 👍 1 |
| |
|
25 Eylül 2025, 23:12
| #3 |
 | Emegine saglik paylaşım icin tesekkür ederim 👍 1
________________  |
| |
|
25 Eylül 2025, 23:47
| #4 |
| Emeğine sağlık @[Üye Olmadan Linkleri Göremezsiniz. Lütfen Üye Olmak için TIKLAYIN...]
, bu faydalı paylaşım için teşekkürler  👍 1 | |
| |
|
25 Eylül 2025, 23:49
| #5 |
  | Emegine Saglık @[Üye Olmadan Linkleri Göremezsiniz. Lütfen Üye Olmak için TIKLAYIN...] 👍 1
________________  |
| |
|
26 Eylül 2025, 16:16
| #6 |
   | Emeğine sağlık 👍 1
________________ Gönül nasıl derin bir kederde...   |
| |
|
27 Eylül 2025, 01:35
| #7 |
 | Güzel çalışma kardeşim. Eline sağlık 👍 1
________________ Seven, |
| |
|
29 Eylül 2025, 12:40
| #8 |
  | emeğinize sağlık 👍 1
________________  |
| |
|
29 Eylül 2025, 12:46
| #9 |
 | Emeğine sağlık 👍 1
________________ Kaliteli insan işiyle , boş insan kişiyle uğraşır !!! |
| |
| Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir) | |
| Seçenekler | |
| Stil | |
| |
Normal
