Türkiye’nin En İyi mIRC Script Addonları — YazKonus Sohbet

⭐ YazKonus Özel Koleksiyonu

mIRC Script Addonları

Kendi mIRC scriptinizi kişiselleştirin ve zenginleştirin! YazKonus.com ekibi tarafından geliştirilen bu 7 adet mIRC script addon koleksiyonunu mevcut scriptinize kolayca ekleyebilirsiniz. IRC deneyiminizi geliştiren profesyonel addon’lar.

🔍 Addon Arama

🔍

💡 Hızlı Başlangıç:

Herhangi bir addon seçin → Kodu kopyalayın → mIRC Script Editor’e yapıştırın → Kaydedin!

👥 Geliştirici Ekip

YazKonus.com ekibi tarafından geliştirilmiş bu mIRC script addonları, tüm IRC kullanıcılarının scriptlerini geliştirmesi için tasarlanmıştır. Proje lideri ExCaLuBuR tarafından kodlanan bu addon’ları mevcut mIRC scriptinize ekleyerek IRC deneyiminizi kişiselleştirebilirsiniz.

Ücretsiz olarak sunulan tüm addon’lar her IRC sunucusunda çalışacak şekilde geliştirilmiştir.

💬 Kullanıcı Deneyimleri

⚠️ Önemli Uyarı

Bu mIRC script addonları‘nı kullanmadan önce kendi IRC ortamınızda test etmenizi öneririz. Herhangi bir sorun yaşamanız durumunda YazKonus İletişim sayfasından bize ulaşabilirsiniz.

📖 Detayları Gör & Kodu Al

📖 Detayları Gör & Kodu Al

WHOIS Uyarı Sistemi

IRC’de en hassas konu olan WHOIS sorgularını anlık tespit eden ve her iki tarafı da eğlenceli şekilde bilgilendiren gelişmiş güvenlik aracı.

⚙️ Akıllı Filtreleme

Whitelist sistemi sayesinde güvenilir kişilerden uyarı almayız:

• Güvenilir kişiler listesi (whitelist)
• Son 10 WHOIS yapan kişi otomatik muafiyet
• Spam engelleyici algoritma

📋 Komut Referansı

🔍 WHOIS Uyarı Sistemi – Tam Kod

; ====================================
; WHOIS Uyarı Sistemi - YazKonus mIRC Addon
; Sürüm: 2.1 | Tarih: 2025
; Geliştirici: YazKonus Ekibi
; Uyumluluk: mIRC 7.x, UnrealIRCd, IRCServices
; ====================================

; Sistem durumu kontrolü
on *:TEXT:!whois-uyari*:#: {
  if ($nick != $me) { return }
  if ($2 == on) {
    set %whois.uyari.aktif 1
    msg $chan WHOIS uyarı sistemi aktif edildi!
    writeini whois_settings.ini sistem aktif 1
  }
  elseif ($2 == off) {
    unset %whois.uyari.aktif
    msg $chan WHOIS uyarı sistemi devre dışı bırakıldı.
    writeini whois_settings.ini sistem aktif 0
  }
  else {
    msg $chan Kullanım: !whois-uyari on/off
  }
}

; Whitelist ekleme
on *:TEXT:!whois-ekle*:#: {
  if ($nick != $me) { return }
  if (!$2) { msg $chan Kullanım: !whois-ekle nick | return }
  set %whois.whitelist. [ $+ [ $2 ] ] 1
  msg $chan $2 whitelist'e eklendi.
  writeini whois_settings.ini whitelist $2 1
}

; Whitelist silme
on *:TEXT:!whois-sil*:#: {
  if ($nick != $me) { return }
  if (!$2) { msg $chan Kullanım: !whois-sil nick | return }
  unset %whois.whitelist. [ $+ [ $2 ] ]
  msg $chan $2 whitelist'ten çıkarıldı.
  remini whois_settings.ini whitelist $2
}

; Son 10 sorguyu göster
on *:TEXT:!whois-son10:#: {
  if ($nick != $me) { return }
  msg $chan Son WHOIS sorguları:
  var %i = 1
  while (%i <= 10) {
    if ($readini(whois_log.ini, son10, %i)) {
      msg $chan  %i $+ . $v1
    }
    inc %i
  }
}

; Yardım bilgisi
on *:TEXT:!whois-bilgi:#: {
  if ($nick != $me) { return }
  msg $chan WHOIS Uyarı Sistemi Komutları:
  msg $chan !whois-uyari on/off - Sistemi aç/kapat
  msg $chan !whois-ekle nick - Whitelist'e ekle
  msg $chan !whois-sil nick - Whitelist'ten çıkar
  msg $chan !whois-son10 - Son sorguları listele
  msg $chan !whois-bilgi - Bu yardım mesajı
}

; WHOIS sorgusu tespiti
raw 311:*: {
  if (!%whois.uyari.aktif) { return }
  var %sorgulanan = $2
  var %sorgulayan = $me
  
  ; Whitelist kontrolü
  if (%whois.whitelist. [ $+ [ %sorgulayan ] ]) { return }
  
  ; Son 10 kontrolü
  var %i = 1
  while (%i <= 10) {
    if ($readini(whois_log.ini, son10, %i) == %sorgulayan) { return }
    inc %i
  }
  
  ; Sorgulanan kişiye bilgi
  msg %sorgulanan [BILGI] Birisi size WHOIS sorgusu yaptı: %sorgulayan
  
  ; Sorgulayan kişiye eğlenceli mesaj
  msg %sorgulayan WHOIS dedektifi yakalandı!
  msg %sorgulayan %sorgulanan adlı kişiyi araştırıyordun, değil mi?
  msg %sorgulayan Gizli kimliğin ifşa oldu! Daha dikkatli ol.
  msg %sorgulayan Bu mesaj otomatik WHOIS tespit sistemi tarafından gönderildi.
  
  ; Loglama
  var %i = 10
  while (%i >= 2) {
    var %prev = $calc(%i - 1)
    var %content = $readini(whois_log.ini, son10, %prev)
    if (%content) {
      writeini whois_log.ini son10 %i %content
    }
    dec %i
  }
  writeini whois_log.ini son10 1 %sorgulayan $+ ( $+ $date $+ / $+ $time $+ )
}

; Script yüklendiğinde ayarları oku
on *:START: {
  if ($readini(whois_settings.ini, sistem, aktif) == 1) {
    set %whois.uyari.aktif 1
  }
  echo -a WHOIS Uyarı Sistemi yüklendi. Komutlar: !whois-bilgi
}: {
  if ($nick != $me) { return }
  msg $chan 4📊 Son WHOIS sorguları:
  var %i = 1
  while (%i <= 10) {
    if ($readini(whois_log.ini, son10, %i)) {
      msg $chan 4 %i $+ . $v1
    }
    inc %i
  }
}

; Yardım bilgisi
on *:TEXT:!whois-bilgi:#: {
  if ($nick != $me) { return }
  msg $chan WHOIS Uyarı Sistemi Komutları:
  msg $chan !whois-uyari on/off - Sistemi aç/kapat
  msg $chan !whois-ekle nick - Whitelist'e ekle
  msg $chan !whois-sil nick - Whitelist'ten çıkar
  msg $chan !whois-son10 - Son sorguları listele
  msg $chan !whois-bilgi - Bu yardım mesajı
}

; WHOIS sorgusu tespiti
raw 311:*: {
  if (!%whois.uyari.aktif) { return }
  var %sorgulanan = $2
  var %sorgulayan = $me
  
  ; Whitelist kontrolü
  if (%whois.whitelist. [ $+ [ %sorgulayan ] ]) { return }
  
  ; Son 10 kontrolü
  var %i = 1
  while (%i <= 10) {
    if ($readini(whois_log.ini, son10, %i) == %sorgulayan) { return }
    inc %i
  }
  
  ; Sorgulanan kişiye bilgi
  msg %sorgulanan 1[4BILGI1] Birisi size WHOIS sorgusu yaptı: %sorgulayan
  
  ; Sorgulayan kişiye eğlenceli mesaj
  msg %sorgulayan  WHOIS dedektifi yakalandı!
  msg %sorgulayan  %sorgulanan adlı kişiyi araştırıyordun, değil mi?
  msg %sorgulayan  Gizli kimliğin ifşa oldu! Daha dikkatli ol.
  msg %sorgulayan  Bu mesaj otomatik WHOIS tespit sistemi tarafından gönderildi.
  
  ; Loglama
  var %i = 10
  while (%i >= 2) {
    var %prev = $calc(%i - 1)
    var %content = $readini(whois_log.ini, son10, %prev)
    if (%content) {
      writeini whois_log.ini son10 %i %content
    }
    dec %i
  }
  writeini whois_log.ini son10 1 %sorgulayan $+ ( $+ $date $+ / $+ $time $+ )
}

; Script yüklendiğinde ayarları oku
on *:START: {
  if ($readini(whois_settings.ini, sistem, aktif) == 1) {
    set %whois.uyari.aktif 1
  }
  echo -a WHOIS Uyarı Sistemi yüklendi. Komutlar: !whois-bilgi
}

; ====================================
; Script Sonu
; ====================================

Nick Yönetim Sistemi

Nick kayıt, güvenlik ayarları ve away modu yönetimi tek sistemde birleşiyor. 4 güçlü araç ile IRC nick’inizi profesyonel şekilde yönetin.

⚙️ Sistem Özellikleri

🛠️ Nick Sistemi Kurulum Rehberi

🎯 Kullanım Senaryoları

📋 Komut Referansı (4 Alt Sistem)

👤 Nick Yönetim Sistemi – Tam Kod

; ====================================
; Nick Yönetim Sistemi - YazKonus mIRC Addon
; Sürüm: 2.1 | Tarih: 2025
; Geliştirici: YazKonus Ekibi - ExCaLuBuR
; 4 Alt Sistem: nkayit, nset, naway, nnick
; ====================================

; Varsayılan ayarlar (değiştirilebilir)
alias kayit_nick { return ExCaLuBuR }
alias kayit_sifre { return mypassword123 }
alias kayit_email { return [email protected] }

; 1. NICK KAYIT SİSTEMİ (!nkayit)
on *:TEXT:!nkayit*:#: {
  if ($nick != $me) { return }
  
  var %yeni_nick = $kayit_nick
  var %yeni_sifre = $iif($2, $2, $kayit_sifre)
  var %yeni_email = $iif($3, $3, $kayit_email)
  
  ; Nick değişimi
  nick %yeni_nick
  
  ; 3 saniye sonra kayıt komutu gönder
  .timer 1 3 nkayit_register %yeni_sifre %yeni_email
  
  msg $chan Nick kayıt işlemi başlatıldı: %yeni_nick
}

alias nkayit_register {
  msg NickServ REGISTER $1 $2
  echo -a Nick kayıt komutu gönderildi: REGISTER $1 $2
}

; 2. GÜVENLİK AYARLARI (!nset)
on *:TEXT:!nset:#: {
  if ($nick != $me) { return }
  
  msg $chan Güvenlik ayarları uygulanıyor...
  
  ; KILL ON - hemen
  msg NickServ SET KILL ON
  
  ; SECURE ON - 2 dakika sonra
  .timer 1 120 msg NickServ SET SECURE ON
  
  ; PRIVATE ON - 4 dakika sonra
  .timer 1 240 msg NickServ SET PRIVATE ON
  
  msg $chan Ayarlar sıralı şekilde uygulanacak (0dk, 2dk, 4dk)
}

; 3. AWAY SİSTEMİ (!naway)
on *:TEXT:!naway:#: {
  if ($nick != $me) { return }
  
  ; Mevcut nick'i kaydet
  set %original_nick $me
  
  ; Nick'e [away] ekle
  var %away_nick = $me $+ [away]
  nick %away_nick
  
  ; Away durumunu aktif et
  set %away_mode_active 1
  
  msg $chan Away modu aktif: %away_nick
}

; Away otomatik cevap - kanal
on *:TEXT:*:#: {
  if (!%away_mode_active) { return }
  if ($nick == $me) { return }
  
  ; Eğer bize sesleniyorsa otomatik cevap ver
  if ($me isin $1-) {
    msg $chan $me şu anda müsait değil, bir süre yok. Size daha sonra dönüş yapacaktır.
  }
}

; Away otomatik cevap - özel mesaj
on *:TEXT:*:?: {
  if (!%away_mode_active) { return }
  
  msg $nick Merhaba, $me şu anda burada değil. Müsait olduğunda size ulaşacaktır.
}

; 4. AWAY ÇIKIŞ (!nnick)
on *:TEXT:!nnick:#: {
  if ($nick != $me) { return }
  if (!%away_mode_active) { 
    msg $chan Away modunda değilsiniz.
    return 
  }
  
  ; Eski nick'e dön
  nick %original_nick
  
  ; Away durumunu kapat
  unset %away_mode_active
  unset %original_nick
  
  msg $chan Normal moda dönüldü: $me
}

; 5. KOMUT LİSTESİ (!nkomutlar)
on *:TEXT:!nkomutlar:#: {
  if ($nick != $me) { return }
  
  msg $chan ====== NICK YÖNETİM SİSTEMİ ======
  msg $chan !nkayit [şifre] [email] - Nick kayıt sistemi
  msg $chan !nset - Güvenlik ayarlarını aktif et
  msg $chan !naway - Away moduna geç
  msg $chan !nnick - Away modundan çık
  msg $chan !nkomutlar - Bu yardım mesajı
  msg $chan ================================
}

; Script yüklendiğinde
on *:START: {
  echo -a Nick Yönetim Sistemi yüklendi. Komutlar: !nkomutlar
  echo -a Varsayılan ayarlar: Nick: $kayit_nick | Şifre: $kayit_sifre | Email: $kayit_email
}

; ====================================
; Script Sonu
; ====================================

Makro Sistemi mIRC Script Addon

IRC komut kısaltma ve otomasyon mIRC script addon ile uzun komutları tek tuşla çalıştırın. Bu gelişmiş mIRC script addon kişisel makro sisteminizi oluşturmanızı sağlar.

⚙️ mIRC Script Addon Özellikleri

🛠️ Makro mIRC Script Addon Kurulum Rehberi

🎯 mIRC Script Addon Kullanım Senaryoları

📋 Makro mIRC Script Addon Komut Referansı

⚡ Makro Sistemi mIRC Script Addon – Tam Kod

; ====================================
; Makro Sistemi mIRC Script Addon - YazKonus
; Sürüm: 2.1 | Tarih: 2025
; Geliştirici: YazKonus Ekibi - ExCaLuBuR
; IRC Komut Kısaltma ve Otomasyon Sistemi
; ====================================

; Makro ekleme komutu
on *:TEXT:!makro*:#: {
  if ($nick != $me) { return }
  
  if ($2 == ekle) {
    if (!$3 || !$4) {
      msg $chan Kullanım: !makro ekle "uzun komut" "kısa ad" [açıklama]
      return
    }
    
    var %uzun_komut = $3
    var %kisa_ad = $4
    var %aciklama = $iif($5-, $5-, Açıklama yok)
    
    ; Makroyu kaydet
    set %makro. [ $+ [ %kisa_ad ] ] %uzun_komut
    set %makro.aciklama. [ $+ [ %kisa_ad ] ] %aciklama
    
    ; INI dosyasına da kaydet
    writeini makrolar.ini makrolar %kisa_ad %uzun_komut
    writeini makrolar.ini aciklamalar %kisa_ad %aciklama
    
    msg $chan Makro kaydedildi: %kisa_ad -> %uzun_komut
  }
  
  elseif ($2 == listele) {
    msg $chan ===== KİŞİSEL MAKRO LİSTESİ =====
    
    var %sayac = 1
    var %toplam = 0
    
    ; INI dosyasından makroları oku
    while (%sayac <= 50) {
      var %item = $ini(makrolar.ini, makrolar, %sayac)
      if (!%item) { break }
      
      var %komut = $readini(makrolar.ini, makrolar, %item)
      var %aciklama = $readini(makrolar.ini, aciklamalar, %item)
      
      msg $chan %toplam $+ . %item -> %komut (%aciklama)
      
      inc %toplam
      inc %sayac
    }
    
    if (%toplam == 0) {
      msg $chan Henüz makro oluşturmadınız. !makro ekle ile başlayın.
    }
    else {
      msg $chan Toplam %toplam makro bulundu.
    }
  }
  
  elseif ($2 == sil) {
    if (!$3) {
      msg $chan Kullanım: !makro sil kısa_ad
      return
    }
    
    var %kisa_ad = $3
    
    ; Makro var mı kontrol et
    if (!$readini(makrolar.ini, makrolar, %kisa_ad)) {
      msg $chan Makro bulunamadı: %kisa_ad
      return
    }
    
    ; Makroyu sil
    unset %makro. [ $+ [ %kisa_ad ] ]
    unset %makro.aciklama. [ $+ [ %kisa_ad ] ]
    
    ; INI dosyasından da sil
    remini makrolar.ini makrolar %kisa_ad
    remini makrolar.ini aciklamalar %kisa_ad
    
    msg $chan Makro silindi: %kisa_ad
  }
  
  else {
    msg $chan Makro Sistemi Komutları:
    msg $chan !makro ekle "uzun komut" "kısa ad" [açıklama]
    msg $chan !makro listele - Makrolarınızı görün
    msg $chan !makro sil kısa_ad - Makro silin
  }
}

; Makro çalıştırma sistemi
on *:TEXT:*:#: {
  if ($nick != $me) { return }
  
  ; Eğer mesaj ! ile başlıyorsa ve makro varsa çalıştır
  if (! isin $1-) {
    var %makro_adi = $1
    var %komut = $readini(makrolar.ini, makrolar, %makro_adi)
    
    if (%komut) {
      ; Raw olarak IRC'ye gönder
      raw %komut
      echo -a Makro çalıştırıldı: %makro_adi -> %komut
    }
  }
}

; Özel mesajda da makro çalıştırma
on *:TEXT:*:?: {
  if ($nick != $me) { return }
  
  if (! isin $1-) {
    var %makro_adi = $1
    var %komut = $readini(makrolar.ini, makrolar, %makro_adi)
    
    if (%komut) {
      raw %komut
      echo -a [PM] Makro çalıştırıldı: %makro_adi -> %komut
    }
  }
}

; Script yüklendiğinde
on *:START: {
  echo -a Makro Sistemi mIRC Script Addon yüklendi.
  echo -a Komutlar: !makro ekle/listele/sil
  echo -a Örnek: !makro ekle "/mode #test +k sifre" "!kilit"
}

; ====================================
; Script Sonu
; ====================================

Seslenme Uyarısı mIRC Script Addon

Kanalda olmadığınızda adınız geçerse anında bildirim alan bu gelişmiş mIRC script addon ile hiçbir seslenmeyı kaçırmayın. Arka planda çalışan akıllı takip sistemi.

⚙️ mIRC Script Addon Sistem Özellikleri

🛠️ Seslenme mIRC Script Addon Kurulum Rehberi

🎯 Kullanım Senaryoları

📋 Seslenme Uyarısı Komut Referansı

🔔 Seslenme Uyarısı mIRC Script Addon – Tam Kod

; ====================================
; Seslenme Uyarısı mIRC Script Addon - YazKonus
; Sürüm: 2.1 | Tarih: 2025
; Geliştirici: YazKonus Ekibi - ExCaLuBuR
; Kanalda olmadığınızda adınız geçerse bildirim
; ====================================

; Sistem değişkenleri
alias seslenme.aktif { return %seslenme_uyari_aktif }
alias seslenme.son.zaman { return %seslenme_son_zaman }

; Seslenme uyarı sistemi kontrolü
on *:TEXT:!seslenme*:#: {
  if ($nick != $me) { return }
  
  if ($2 == on) {
    set %seslenme_uyari_aktif 1
    msg $chan Seslenme uyarı sistemi aktif edildi!
    writeini seslenme_ayarlar.ini sistem aktif 1
  }
  elseif ($2 == off) {
    unset %seslenme_uyari_aktif
    msg $chan Seslenme uyarı sistemi devre dışı bırakıldı.
    writeini seslenme_ayarlar.ini sistem aktif 0
  }
  else {
    msg $chan Kullanım: !seslenme on/off
  }
}

; Ana seslenme tespit sistemi
on *:TEXT:*:#: {
  ; Sistem aktif değilse çık
  if (!%seslenme_uyari_aktif) { return }
  
  ; Eğer ben o kanalda değilsem ve adım geçiyorsa
  if (($me !ison $chan) && ($me isin $1-)) {
    
    ; Spam engelleme - son bildirimden 10 saniye geçmiş mi?
    var %simdi = $ticks
    var %son_bildirim = $readini(seslenme_ayarlar.ini, spam, $nick $+ _ $+ $chan)
    
    if (%son_bildirim && (%simdi - %son_bildirim < 10000)) {
      ; 10 saniye geçmemiş, spam engelle
      return
    }
    
    ; Bildirim zamanını kaydet
    writeini seslenme_ayarlar.ini spam $nick $+ _ $+ $chan %simdi
    
    ; BILGI nickiyle bildirim gönder
    msg $me [BILGI] * $+ $nick $+ * kanal $chan $+ 'da sana seslendi:
    msg $me [BILGI] $1-
    msg $me [BILGI] Zaman: $time ( $+ $date $+ )
    
    ; Sesli uyarı (isteğe bağlı)
    beep 2
    
    ; Log kaydet
    write seslenme_log.txt [ $+ $time $+ ] $nick @ $chan : $1-
  }
}

; Özel mesajda da çalış
on *:TEXT:*:?: {
  if (!%seslenme_uyari_aktif) { return }
  
  ; Eğer adım geçiyorsa bildir
  if ($me isin $1-) {
    var %simdi = $ticks
    var %son_bildirim = $readini(seslenme_ayarlar.ini, spam, $nick $+ _PM)
    
    if (%son_bildirim && (%simdi - %son_bildirim < 5000)) {
      return
    }
    
    writeini seslenme_ayarlar.ini spam $nick $+ _PM %simdi
    
    msg $me [BILGI] * $+ $nick $+ * özelden sana seslendi:
    msg $me [BILGI] $1-
    
    beep 1
  }
}

; Script yüklendiğinde ayarları oku
on *:START: {
  if ($readini(seslenme_ayarlar.ini, sistem, aktif) == 1) {
    set %seslenme_uyari_aktif 1
    echo -a Seslenme Uyarısı mIRC Script Addon yüklendi ve aktif.
  }
  else {
    echo -a Seslenme Uyarısı mIRC Script Addon yüklendi. Aktifleştirmek için: !seslenme on
  }
}

; ====================================
; Script Sonu
; ====================================

Özel Sohbet Loglayıcı mIRC Script Addon

Özel mesaj geçmişinizi otomatik kayıt altına alan bu profesyonel mIRC script addon ile sohbet tarihçenizi düzenli şekilde yönetin ve arayın.

⚙️ mIRC Script Addon Sistem Özellikleri

🛠️ Özel Sohbet Loglayıcı mIRC Script Addon Kurulum Rehberi

🎯 Kullanım Senaryoları

📋 Özel Sohbet Loglayıcı Komut Referansı

📝 Özel Sohbet Loglayıcı mIRC Script Addon - Tam Kod

; ====================================
; Özel Sohbet Loglayıcı mIRC Script Addon - YazKonus
; Sürüm: 2.1 | Tarih: 2025
; Geliştirici: YazKonus Ekibi - ExCaLuBuR
; Özel mesaj geçmişini otomatik kayıt ve arama sistemi
; ====================================

; Özel mesaj alma ve loglama
on *:TEXT:*:?: {
  var %log_entry = $time $+ : $nick $+ : $1-
  var %log_file = pm_logs.txt
  
  ; Log dosyasına yaz
  write %log_file %log_entry
  
  ; Son konuşan listesine ekle
  var %son_liste = $readini(pm_settings.ini, son_konusanlar, liste)
  
  ; Eğer nick listede yoksa başa ekle
  if ($nick !isin %son_liste) {
    set %yeni_liste $nick $+ , $+ %son_liste
    ; Sadece ilk 10 kişiyi tut
    var %sayac = 1
    var %final_liste
    while (%sayac <= 10) {
      var %kisi = $gettok(%yeni_liste, %sayac, 44)
      if (%kisi) {
        if (!%final_liste) { set %final_liste %kisi }
        else { set %final_liste %final_liste $+ , $+ %kisi }
      }
      inc %sayac
    }
    writeini pm_settings.ini son_konusanlar liste %final_liste
  }
}

; Özel mesaj gönderme ve loglama
on *:INPUT:?: {
  if ($left($1, 1) == /) { return }
  
  var %log_entry = $time $+ : $me $+ : $1-
  var %log_file = pm_logs.txt
  
  write %log_file %log_entry
  
  ; Gönderilen mesajı da son konuşan listesine ekle
  var %hedef_nick = $target
  var %son_liste = $readini(pm_settings.ini, son_konusanlar, liste)
  
  if (%hedef_nick !isin %son_liste) {
    set %yeni_liste %hedef_nick $+ , $+ %son_liste
    var %sayac = 1
    var %final_liste
    while (%sayac <= 10) {
      var %kisi = $gettok(%yeni_liste, %sayac, 44)
      if (%kisi) {
        if (!%final_liste) { set %final_liste %kisi }
        else { set %final_liste %final_liste $+ , $+ %kisi }
      }
      inc %sayac
    }
    writeini pm_settings.ini son_konusanlar liste %final_liste
  }
}

; Son konuşulan kişileri listele
on *:TEXT:!logkisiler:#: {
  if ($nick != $me) { return }
  
  var %son_liste = $readini(pm_settings.ini, son_konusanlar, liste)
  
  if (!%son_liste) {
    msg $chan Henüz kimseyle özel mesaj konuşmadınız.
    return
  }
  
  msg $chan Son konuşulan 10 kişi:
  var %sayac = 1
  while (%sayac <= 10) {
    var %kisi = $gettok(%son_liste, %sayac, 44)
    if (%kisi) {
      msg $chan %sayac $+ . %kisi
    }
    inc %sayac
  }
}

; Belirli nick ile geçmiş mesajları göster
on *:TEXT:!log*:#: {
  if ($nick != $me) { return }
  if (!$2) {
    msg $chan Kullanım: !log nick
    return
  }
  
  var %aranan_nick = $2
  var %log_file = pm_logs.txt
  var %bulunan_sayac = 0
  var %toplam_satir = $lines(%log_file)
  var %satir = %toplam_satir
  
  msg $chan %aranan_nick ile son 20 özel mesaj:
  msg $chan ================================
  
  ; Dosyayı sondan başa doğru oku
  while (%satir >= 1 && %bulunan_sayac < 20) {
    var %satir_icerik = $read(%log_file, %satir)
    
    ; Nick ismini kontrol et
    if ($gettok(%satir_icerik, 2, 58) == %aranan_nick || $gettok(%satir_icerik, 2, 58) == $me) {
      ; Eğer mesaj aranan nick'le ilgiliyse
      var %zaman = $gettok(%satir_icerik, 1, 58)
      var %gonderen = $gettok(%satir_icerik, 2, 58)
      var %mesaj = $gettok(%satir_icerik, 3-, 58)
      
      if (%gonderen == %aranan_nick || (%gonderen == $me && %aranan_nick isin %satir_icerik)) {
        msg $chan [ $+ %zaman $+ ] %gonderen $+ : %mesaj
        inc %bulunan_sayac
      }
    }
    
    dec %satir
  }
  
  if (%bulunan_sayac == 0) {
    msg $chan Kayıt bulunamadı: %aranan_nick
  }
  else {
    msg $chan ================================
    msg $chan Toplam %bulunan_sayac mesaj gösterildi.
  }
}

; Belirli nick'in geçmişini sil
on *:TEXT:!logsil*:#: {
  if ($nick != $me) { return }
  if (!$2) {
    msg $chan Kullanım: !logsil nick
    return
  }
  
  var %silinecek_nick = $2
  var %log_file = pm_logs.txt
  var %temp_file = pm_logs_temp.txt
  var %silinen_sayac = 0
  var %toplam_satir = $lines(%log_file)
  var %satir = 1
  
  ; Geçici dosya oluştur
  while (%satir <= %toplam_satir) {
    var %satir_icerik = $read(%log_file, %satir)
    var %gonderen = $gettok(%satir_icerik, 2, 58)
    
    ; Eğer silinecek nick değilse geçici dosyaya yaz
    if (%gonderen != %silinecek_nick) {
      write %temp_file %satir_icerik
    }
    else {
      inc %silinen_sayac
    }
    
    inc %satir
  }
  
  ; Eski dosyayı sil, yenisini adlandır
  .remove %log_file
  .rename %temp_file %log_file
  
  ; Son konuşanlar listesinden de çıkar
  var %son_liste = $readini(pm_settings.ini, son_konusanlar, liste)
  var %yeni_liste = $replace(%son_liste, %silinecek_nick $+ $chr(44), $null)
  set %yeni_liste = $replace(%yeni_liste, %silinecek_nick, $null)
  writeini pm_settings.ini son_konusanlar liste %yeni_liste
  
  msg $chan %silinecek_nick nick'inin %silinen_sayac mesajı silindi.
}

; Komut listesi
on *:TEXT:!logkomutları:#: {
  if ($nick != $me) { return }
  
  msg $chan ==== ÖZEL SOHBET LOGLAYICI ====
  msg $chan !logkisiler - Son konuşulan 10 kişiyi listele
  msg $chan !log nick - Belirtilen nick ile son 20 mesajı göster
  msg $chan !logsil nick - Belirtilen nick'in geçmişini sil
  msg $chan !logkomutları - Bu yardım mesajı
  msg $chan ===============================
}

; Script yüklendiğinde
on *:START: {
  echo -a Özel Sohbet Loglayıcı mIRC Script Addon yüklendi.
  echo -a Komutlar: !logkomutları
  echo -a Otomatik özel mesaj kaydı aktif.
}

; ====================================
; Script Sonu
; ====================================

Auto Greeter mIRC Script Addon

Kanala gelen kullanıcıları otomatik ve sıcak mesajlarla karşılayan bu profesyonel mIRC script addon ile dostane bir ortam yaratın. Kişiye özel karşılama sistemi.

⚙️ mIRC Script Addon Sistem Özellikleri

🛠️ Auto Greeter mIRC Script Addon Kurulum Rehberi

🎯 Kullanım Senaryoları

📋 Auto Greeter Komut Referansı

👋 Auto Greeter mIRC Script Addon - Tam Kod

; ====================================
; Auto Greeter mIRC Script Addon - YazKonus
; Sürüm: 2.1 | Tarih: 2025
; Geliştirici: YazKonus Ekibi - ExCaLuBuR
; Kanala gelen kullanıcıları otomatik karşılama sistemi
; ====================================

; Sistem değişkenleri
alias greeter.aktif { return %greeter_aktif }

; Greeter sistem kontrolü
on *:TEXT:!greeter*:#: {
  if ($nick != $me) { return }
  
  if ($2 == on) {
    set %greeter_aktif 1
    msg $chan Auto Greeter sistemi aktif edildi!
    writeini greeter_ayarlar.ini sistem aktif 1
  }
  elseif ($2 == off) {
    unset %greeter_aktif
    msg $chan Auto Greeter sistemi devre dışı bırakıldı.
    writeini greeter_ayarlar.ini sistem aktif 0
  }
  else {
    msg $chan Kullanım: !greeter on/off
  }
}

; Genel karşılama mesajı ekleme
on *:TEXT:!greatekle*:#: {
  if ($nick != $me) { return }
  if (!$2-) {
    msg $chan Kullanım: !greatekle mesaj
    return
  }
  
  var %yeni_mesaj = $2-
  var %mevcut_sayac = $readini(greeter_ayarlar.ini, genel_mesajlar, toplam)
  if (!%mevcut_sayac) { set %mevcut_sayac 0 }
  
  inc %mevcut_sayac
  writeini greeter_ayarlar.ini genel_mesajlar %mevcut_sayac %yeni_mesaj
  writeini greeter_ayarlar.ini genel_mesajlar toplam %mevcut_sayac
  
  msg $chan Genel karşılama mesajı eklendi (Toplam: %mevcut_sayac)
}

; Genel mesajları listeleme
on *:TEXT:!greetlist:#: {
  if ($nick != $me) { return }
  
  var %toplam = $readini(greeter_ayarlar.ini, genel_mesajlar, toplam)
  if (!%toplam || %toplam == 0) {
    msg $chan Henüz genel karşılama mesajı eklenmedi.
    return
  }
  
  msg $chan Genel Karşılama Mesajları:
  msg $chan ==============================
  
  var %sayac = 1
  while (%sayac <= %toplam) {
    var %mesaj = $readini(greeter_ayarlar.ini, genel_mesajlar, %sayac)
    if (%mesaj) {
      msg $chan %sayac $+ . %mesaj
    }
    inc %sayac
  }
  
  msg $chan Toplam %toplam mesaj mevcut.
}

; Genel mesaj silme
on *:TEXT:!greetsil*:#: {
  if ($nick != $me) { return }
  if (!$2 || !$2.isnum) {
    msg $chan Kullanım: !greetsil numara
    return
  }
  
  var %silinecek_no = $2
  var %toplam = $readini(greeter_ayarlar.ini, genel_mesajlar, toplam)
  
  if (!%toplam || %silinecek_no > %toplam || %silinecek_no < 1) {
    msg $chan Geçersiz mesaj numarası.
    return
  }
  
  ; Mesajı sil ve sonrakini kaydır
  var %sayac = %silinecek_no
  while (%sayac < %toplam) {
    var %sonraki_no = $calc(%sayac + 1)
    var %sonraki_mesaj = $readini(greeter_ayarlar.ini, genel_mesajlar, %sonraki_no)
    writeini greeter_ayarlar.ini genel_mesajlar %sayac %sonraki_mesaj
    inc %sayac
  }
  
  ; Son mesajı sil
  remini greeter_ayarlar.ini genel_mesajlar %toplam
  
  ; Toplam sayacı güncelle
  dec %toplam
  writeini greeter_ayarlar.ini genel_mesajlar toplam %toplam
  
  msg $chan Mesaj silindi. Kalan mesaj sayısı: %toplam
}

; Kişiye özel karşılama tanımlama
on *:TEXT:!greetnick*:#: {
  if ($nick != $me) { return }
  if (!$2 || !$3-) {
    msg $chan Kullanım: !greetnick nick mesaj
    return
  }
  
  var %hedef_nick = $2
  var %ozel_mesaj = $3-
  
  writeini greeter_ayarlar.ini ozel_mesajlar %hedef_nick %ozel_mesaj
  msg $chan %hedef_nick için özel karşılama mesajı tanımlandı.
}

; Özel karşılama listesi
on *:TEXT:!greetnickliste:#: {
  if ($nick != $me) { return }
  
  var %dosya = greeter_ayarlar.ini
  var %sayac = 1
  var %bulunan = 0
  
  msg $chan Özel Karşılama Atanmış Nick'ler:
  msg $chan =================================
  
  ; INI dosyasından özel mesajları oku
  while (%sayac <= 50) {
    var %nick_item = $ini(%dosya, ozel_mesajlar, %sayac)
    if (!%nick_item) { break }
    
    var %mesaj = $readini(%dosya, ozel_mesajlar, %nick_item)
    msg $chan %nick_item $+ : %mesaj
    inc %bulunan
    inc %sayac
  }
  
  if (%bulunan == 0) {
    msg $chan Henüz özel karşılama tanımlanmadı.
  }
  else {
    msg $chan Toplam %bulunan kişi için özel mesaj mevcut.
  }
}

; Özel karşılama silme
on *:TEXT:!greetnicksil*:#: {
  if ($nick != $me) { return }
  if (!$2) {
    msg $chan Kullanım: !greetnicksil nick
    return
  }
  
  var %hedef_nick = $2
  
  if (!$readini(greeter_ayarlar.ini, ozel_mesajlar, %hedef_nick)) {
    msg $chan %hedef_nick için özel mesaj bulunamadı.
    return
  }
  
  remini greeter_ayarlar.ini ozel_mesajlar %hedef_nick
  msg $chan %hedef_nick nick'inin özel karşılama mesajı silindi.
}

; Komut listesi
on *:TEXT:!greeterkomutları:#: {
  if ($nick != $me) { return }
  
  msg $chan ====== AUTO GREETER SİSTEMİ ======
  msg $chan !greeter on/off - Sistemi aç/kapat
  msg $chan !greatekle mesaj - Genel karşılamaya mesaj ekle
  msg $chan !greetlist - Genel mesajları listele
  msg $chan !greetsil numara - Genel mesaj sil
  msg $chan !greetnick nick mesaj - Özel karşılama tanımla
  msg $chan !greetnickliste - Özel karşılamaları listele
  msg $chan !greetnicksil nick - Özel karşılama sil
  msg $chan !greeterkomutları - Bu yardım mesajı
  msg $chan ===================================
}

; Ana karşılama sistemi - kanala giriş
on *:JOIN:#: {
  if (!%greeter_aktif) { return }
  if ($nick == $me) { return }
  
  ; Günlük karşılama kontrolü
  var %bugun = $date(dd/mm/yyyy)
  var %son_karsilama = $readini(greeter_ayarlar.ini, gunluk_log, $nick $+ _ $+ $chan)
  
  if (%son_karsilama == %bugun) {
    ; Bugün zaten karşılandı
    return
  }
  
  ; Günlük log güncelle
  writeini greeter_ayarlar.ini gunluk_log $nick $+ _ $+ $chan %bugun
  
  ; 3 saniye bekle (kanala tam giriş için)
  .timer 1 3 greeter_karsilama $nick $chan
}

; Karşılama fonksiyonu
alias greeter_karsilama {
  var %nick = $1
  var %kanal = $2
  
  ; Önce özel mesaj kontrol et
  var %ozel_mesaj = $readini(greeter_ayarlar.ini, ozel_mesajlar, %nick)
  
  if (%ozel_mesaj) {
    msg %kanal %ozel_mesaj
    return
  }
  
  ; Genel mesajlardan rastgele seç
  var %toplam_genel = $readini(greeter_ayarlar.ini, genel_mesajlar, toplam)
  
  if (!%toplam_genel || %toplam_genel == 0) {
    ; Varsayılan mesaj
    msg %kanal Hoş geldin %nick $+ ! Kanalımıza katıldığın için teşekkürler.
    return
  }
  
  ; Rastgele mesaj seç
  var %rastgele_no = $rand(1, %toplam_genel)
  var %secilen_mesaj = $readini(greeter_ayarlar.ini, genel_mesajlar, %rastgele_no)
  
  if (%secilen_mesaj) {
    ; Nick'i mesaja dahil et
    set %final_mesaj = $replace(%secilen_mesaj, $chr(37) $+ nick, %nick)
    msg %kanal %final_mesaj
  }
  else {
    msg %kanal Hoş geldin %nick $+ ! Güzel sohbetler!
  }
}

; Script yüklendiğinde
on *:START: {
  if ($readini(greeter_ayarlar.ini, sistem, aktif) == 1) {
    set %greeter_aktif 1
    echo -a Auto Greeter mIRC Script Addon yüklendi ve aktif.
  }
  else {
    echo -a Auto Greeter mIRC Script Addon yüklendi. Aktifleştirmek için: !greeter on
  }
  
  echo -a Komutlar: !greeterkomutları
  echo -a Mesajlarda %nick yazarak nick'i dahil edebilirsiniz.
}

; ====================================
; Script Sonu
; ====================================

Nick Takipçisi mIRC Script Addon

Kanalda nick değiştirildiğinde eğlenceli duyuru mesajları gönderen bu akıllı mIRC script addon ile kim hangi nick'e geçti hiçbir şey kaçırmayın.

⚙️ mIRC Script Addon Sistem Özellikleri

🛠️ Nick Takipçisi mIRC Script Addon Kurulum Rehberi

🎯 Kullanım Senaryoları

📋 Nick Takipçisi Komut Referansı

👀 Nick Takipçisi mIRC Script Addon - Tam Kod

; ====================================
; Nick Takipçisi mIRC Script Addon - YazKonus
; Sürüm: 2.1 | Tarih: 2025
; Geliştirici: YazKonus Ekibi - ExCaLuBuR
; Kanalda nick değişim tespiti ve eğlenceli duyuru sistemi
; ====================================

; Sistem değişkenleri
alias nicktakip.aktif { return %nicktakip_aktif }

; Nick takip sistem kontrolü
on *:TEXT:!nicktakip*:#: {
  if ($nick != $me) { return }
  
  if ($2 == on) {
    set %nicktakip_aktif 1
    msg $chan Nick Takipçisi sistemi aktif edildi!
    writeini nicktakip_ayarlar.ini sistem aktif 1
  }
  elseif ($2 == off) {
    unset %nicktakip_aktif
    msg $chan Nick Takipçisi sistemi devre dışı bırakıldı.
    writeini nicktakip_ayarlar.ini sistem aktif 0
  }
  else {
    msg $chan Kullanım: !nicktakip on/off
  }
}

; Ana nick değişim tespit sistemi
on *:NICK: {
  if (!%nicktakip_aktif) { return }
  
  ; Nick değişimi yapan kişi hangi kanallarda?
  var %sayac = 1
  while (%sayac <= $comchan($newnick, 0)) {
    var %kanal = $comchan($newnick, %sayac)
    
    ; Ben o kanalda mıyım?
    if ($me ison %kanal) {
      
      ; Flood kontrolü - aynı kişi 10 saniye içinde tekrar değiştirmiş mi?
      var %simdi = $ticks
      var %son_degisim = $readini(nicktakip_ayarlar.ini, flood_kontrol, $newnick)
      
      if (%son_degisim && (%simdi - %son_degisim < 10000)) {
        ; 10 saniye geçmemiş, spam engelle
        inc %sayac
        continue
      }
      
      ; Flood zamanını kaydet
      writeini nicktakip_ayarlar.ini flood_kontrol $newnick %simdi
      
      ; Eğlenceli duyuru mesajları listesi
      var %mesajlar = Hey! $nick → $newnick oldu! Hemen fark ettim seni|Oha! $nick artık $newnick oldu! Gizli kimlik değişimi|$nick nick'ini $newnick yaptı! Dedektif modu aktif|Dikkat! $nick → $newnick dönüşümü gerçekleşti|$nick adını $newnick olarak değiştirdi! Hiçbir şey gözümden kaçmaz|$nick şimdi $newnick! Kim bu gizemli kişi|Nick değişimi tespit edildi: $nick → $newnick|$nick kimliğini $newnick olarak güncelledi!
      
      ; Rastgele mesaj seç
      var %toplam_mesaj = $numtok(%mesajlar, 124)
      var %rastgele_no = $rand(1, %toplam_mesaj)
      var %secilen_mesaj = $gettok(%mesajlar, %rastgele_no, 124)
      
      ; Emojiler ekle
      var %emojiler = 😎|🕵️|👀|🎭|🔍|😄|🎯|⚡|🚨|📢
      var %emoji_no = $rand(1, $numtok(%emojiler, 124))
      var %secilen_emoji = $gettok(%emojilers, %emoji_no, 124)
      
      ; Final mesajı oluştur
      set %final_mesaj = %secilen_mesaj %secilen_emoji
      
      ; 2 saniye gecikme ile mesaj gönder
      .timer 1 2 msg %kanal %final_mesaj
      
      ; Log kaydet
      write nicktakip_log.txt [ $+ $time $+ ] $nick -> $newnick @ %kanal
    }
    
    inc %sayac
  }
}

; İstatistik komutu (bonus özellik)
on *:TEXT:!nickstats:#: {
  if ($nick != $me) { return }
  if (!%nicktakip_aktif) {
    msg $chan Nick Takipçisi sistemi aktif değil.
    return
  }
  
  var %log_dosya = nicktakip_log.txt
  var %toplam_satir = $lines(%log_dosya)
  
  if (!%toplam_satir || %toplam_satir == 0) {
    msg $chan Henüz nick değişimi kaydı bulunmuyor.
    return
  }
  
  msg $chan Nick Değişim İstatistikleri:
  msg $chan Toplam %toplam_satir nick değişimi tespit edildi.
  
  ; Son 5 değişimi göster
  var %sayac = %toplam_satir
  var %gosterilen = 0
  
  msg $chan Son 5 Nick Değişimi:
  while (%sayac >= 1 && %gosterilen < 5) {
    var %satir = $read(%log_dosya, %sayac)
    if (%satir) {
      msg $chan %gosterilen $+ . %satir
      inc %gosterilen
    }
    dec %sayac
  }
}

; Mesaj özelleştirme komutu
on *:TEXT:!nickmesaj*:#: {
  if ($nick != $me) { return }
  if (!$2-) {
    msg $chan Kullanım: !nickmesaj yeni mesaj formatı
    msg $chan Özel değişkenler: $nick (eski nick), $newnick (yeni nick)
    return
  }
  
  var %yeni_format = $2-
  writeini nicktakip_ayarlar.ini ozel_mesaj format %yeni_format
  msg $chan Özel nick değişim mesajı kaydedildi.
  msg $chan Format: %yeni_format
}

; Temizlik komutu
on *:TEXT:!nicktemizle:#: {
  if ($nick != $me) { return }
  
  ; Log dosyasını temizle
  .remove nicktakip_log.txt
  
  ; Flood kontrolünü temizle
  remini nicktakip_ayarlar.ini flood_kontrol
  
  msg $chan Nick Takipçisi geçmişi temizlendi.
}

; Yardım komutu
on *:TEXT:!nickhelp:#: {
  if ($nick != $me) { return }
  
  msg $chan ===== NICK TAKİPÇİSİ SİSTEMİ =====
  msg $chan !nicktakip on/off - Sistemi aç/kapat
  msg $chan !nickstats - Nick değişim istatistikleri
  msg $chan !nickmesaj format - Özel mesaj formatı
  msg $chan !nicktemizle - Geçmişi temizle
  msg $chan !nickhelp - Bu yardım mesajı
  msg $chan ================================
}

; Script yüklendiğinde
on *:START: {
  if ($readini(nicktakip_ayarlar.ini, sistem, aktif) == 1) {
    set %nicktakip_aktif 1
    echo -a Nick Takipçisi mIRC Script Addon yüklendi ve aktif.
  }
  else {
    echo -a Nick Takipçisi mIRC Script Addon yüklendi. Aktifleştirmek için: !nicktakip on
  }
  
  echo -a Komutlar: !nickhelp
  echo -a Eğlenceli nick değişim duyuruları hazır!
}

; ====================================
; Script Sonu
; ====================================

Başka Sorunuz mu Var?

Yukarıdaki sorularda cevabını bulamadığınız konular için bize ulaşabilirsiniz.

📧 YazKonus İletişim