Not alma kodu

Bozkurt

Misafir Editör
Katılım
23 Ara 2020
Mesajlar
432
Tepkime puanı
0
Puanları
16
Kod:
on *:open:?: { 
  if $ini(hafiza.ini,$nick,0) { 
    echo $nick 14>>>4 $nick 14nicki için alınan notlar gösteriliyor.
    .play -at $+ $nick for $nick hafiza.ini  
  }
} 
alias not { 
  if $1 = bak { 
    if $regex($active,/Status\sWindow|#/) { 
      echo -a 14>>>4 /not bak14 komutunu notlarına bakmak istediğin nickin özelindeyken kullanabilirsin.
      return 
    }
    if !$ini(hafiza.ini,$active,0) { 
      echo -a 14>>>4 $active 14nickine ait not bulunamadı. 
      return 
    }
    echo $active 14>>>4 $active 14nicki için alınan notlar gösteriliyor.
    .play -at $+ $active for $active hafiza.ini
  } 
  if $1 = ekle { 
    if $regex($active,/Status\sWindow|#/) {
      echo -a 14>>>4 /not ekle14 komutunu not eklemek istediğin nickin özelindeyken kullanabilirsin.
    return }
    if !$3 { 
      echo -a 14>>>5ÖRNEK: 4 /not ekle şehir istanbul
      echo -a 14>>>12 Lütfen örnekteki gibi ekleme yapınız. 
      return 
    } 
    writeini hafiza.ini $active $2-
    echo -a 14>>>4 $active 14nicki için12 $2- 14notu eklendi.
  }  
  if $1 = sil {  
    if !$ini(hafiza.ini,$active,0) { 
      echo -a 14>>>4 $active 14nickine ait not bulunamadı. 
      return 
    }
    remini hafiza.ini $active
    echo -a 14>>>4 $active 14nickine ait notlar silindi.
} }
alias q { 
  !query $1 
  if $ini(hafiza.ini,$1,0) { 
    echo $1 14>>>4 $1 14nicki için alınan notlar gösteriliyor.
    .play -at $+ $1 for $1 hafiza.ini 
  }
}
alias query  { 
  !query $1 
  if $ini(hafiza.ini,$1,0) { 
    echo $1 14>>>4 $1 14nicki için alınan notlar gösteriliyor.
    .play -at $+ $1 for $1 hafiza.ini
  }
}
alias -l for { 
  echo $1 14>>>12 $replace($2-,=,: 4		) 
}

Muhabbet ettiğiniz kişilere ait önemli bilgileri kaydetmek istiyorsanız işinize yarayacak bir kod.

Kullanımı:
/not ekle Nick notunuz
/not sil
/not bak

Bu komutlar sadece özel penceresi açıkken çalışır. Özelde muhabbet ettiğiniz kişinin bilgilerini kaydedebilir silebilir ya da okuyabilirsiniz.
 

Tupac

Forum Üyesi
Katılım
18 Mar 2019
Mesajlar
3,436
Tepkime puanı
0
Puanları
36
Paylaşım için teşekkür ederim
 
metal işleme
Üst