IRCForumu.Net - Türkiye'nin IRC ve mIRC Kullanıcılarının Buluştuğu Forum

IRCForumu.Net - Türkiye'nin IRC ve mIRC Kullanıcılarının Buluştuğu Forum (https://www.ircforumu.net/)
-   Hazır Kodlar (https://www.ircforumu.net/hazir-kodlar/)
-   -   .Sozekle .sozsil .okusoz (https://www.ircforumu.net/hazir-kodlar/5700-sozekle-sozsil-okusoz.html)

immortaL 28 Mayıs 2017 01:46

.Sozekle .sozsil .okusoz
 
Kod:

on 5*:text:*:#: {
  if ($1 == .oku && !$2) { msg $chan  hatalı kullanım | return }
  elseif $regex($1,/[.]oku/Si) && $2 && !$read(sozlerrr.txt,$readn) {
  msg $chan  Tanıma uygun soz bulunamadı. }
  elseif ($1 == .oku && $2) {
    msg $chan  Kelime algılandı kayıtlara bakılıyor. ( $2 )
    $read(sozlerrr.txt,w,$+(*,$2,*))
  msg $chan $read(sozlerrr.txt,$readn) }
  if ($1 == .eklesoz && !$2) { msg $chan 4Hatalı kullanım; .eklesoz (eklemek istediğiniz soz) | return }
  elseif ($1 == .eklesoz && $2)  {
    write sozlerrr.txt $2-
    msg $chan  $nick ,  sözünüz sisteme eklendi teşekkür ederiz.
  }
  if ($1 == .sozsil) {
    if ($2 == $null) { msg $chan 4Hatalı kullanım;  .sozsil (silenecekkısım) }
    elseif ($regex($1,/^[.]s.zs[iı]l/Si) && $2) && ($nick != Kod) { msg $chan Yetkili değilsiniz. }
    elseif ($regex($1,/^[.]s.zs[iı]l/Si) && $2) && (!$read(sozlerrr.txt,$readn)) {
    msg $chan  Herhangi bir soz bulunmuyor. }
    else {
      write $+(-dl,$readn) sozlerrr.txt
    msg $chan işlem başarı ile gercekleştirildi. }
  }
}


[00:59:11] .eklesoz sanane ne yaparsam yaparım
[00:59:11] Kod , sözünüz sisteme eklendi teşekkür ederiz.
[00:59:17] .eklesoz
[00:59:24] Kelime algılandı kayıtlara bakılıyor. ( sanane )
[00:59:24] sanane ne yaparsam yaparım
[00:59:36] .oku yaparım
[00:59:36] Kelime algılandı kayıtlara bakılıyor. ( yaparım )
[00:59:36] sanane ne yaparsam yaparım
[00:59:43] .oku deneme
[00:59:43] Kelime algılandı kayıtlara bakılıyor. ( deneme )
[00:59:43] deneme yapıyorum ama olsun
[00:59:53] .sozsil
[00:59:53] Hatalı kullanım; .sozsil (silenecekkısım)
[01:00:05] .sozsil yapıyorum
[01:00:05] işlem başarı ile gercekleştirildi.
[01:00:16] .sozsil deneme
[01:00:17] işlem başarı ile gercekleştirildi.
[01:00:23] .sozsil gercekten
[01:00:23] Herhangi bir soz bulunmuyor.
[01:01:14] .oku gercekten
[01:01:14] Tanıma uygun soz bulunamadı.
[01:02:10] .sozsil deniyorum
[01:02:10] Yetkili değilsiniz.

Kullanım;
Soz eklemek için; .eklesoz sozunuz
Kayıtlı olan kelimeye ait bir sözü okumak için; .oku kelime
Soz silmek için; .sozsil kelime (yukarıda kırmızı olan yere kendi nick inizi yazmalısınız.)

Kod Sahibi: Kod


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 14:06.

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Search Engine Friendly URLs by vBSEO 3.6.0
Copyright ©2005 - 2023 IRCForumu.Net - Tüm Hakları Saklıdır.