Çevrimdışı

on *:Text:*:#KANAL: {
if $1 == !iptal && %rcsil { msg $chan İşlem iptal edildi. | unset %rcsil | return }
if $1 == !devam && %rcsil { msg $chan [RCDepo/ $+ %rcsil $+ / $+ $nick $+ ] $2 nickine ait RC girdileri silinmiştir. | .remove RC/ $+ %rcsil $+ .txt | unset %rcsil }
if $1 == !bilgi {
if !$2 {
.msg $chan Kullanım şekli:
.msg $chan !bilgi list (RC bilgilerini Listeler)
.msg $chan !bilgi ekle Nick mesajınız (Nick'e RC bilgisi ekler)
.msg $chan !bilgi oku Nick (Nick'in RC bilgisini okur)
.msg $chan !bilgi sil Nick (Nick'e ait RC dosyasını siler)
return
}
4if $2 == list) && ($2 == list) {
4if (Csop_ isin $nick) || (Admin_ isin $nick) vs vs böle böel takılar devam ediyor {
if $findfile($mircdirrc,*.txt,0) == 0 {
.msg $chan Hata! RC Deposu boş.
}
else {
.msg $chan [RCDepo/ $+ $nick $+ ] - RC Deposu kontrol ediliyor..
var %a = 1
while $findfile($mircdirrc,*.txt,%a) {
msg $chan  $+ $gettok($nopath($v1),1,46) $+  kayıtlı RC dosyası
inc %a
}
}
}
4if $2 == ekle) && ($2 == list) {
4if (Csop_ isin $nick) || (Admin_ isin $nick) vs vs takılar devam ediyor {
if !$exists(RC) { mkdir RC }
.write RC/ $+ $3 $+ .txt [ $+ $date $+ - $+ $time $+ - $+ $3 $+ ] : $4- [Ekleyen: $nick ]
.write RC/ $+ $3 $+ .txt -
.msg $chan [RCDepo/ $+ $3 $+ / $+ $nick $+ ] $3 nickine RC geçilmiştir.
}
4if $2 == oku) && ($2 == oku) {
4if (Csop_ isin $nick) || (Admin_ isin $nick) vs vs takılar devam ediyor {
if !$file(RC/ $+ $3- $+ .txt) {
.msg $chan  $+ $3 $+  kayıtlı bilgi girdisi bulunamadı.
}
else {
.msg $chan [RCDepo/ $+ $nick $+ ] - $3- kayıtlı RC dosyası kontrol ediliyor..
saydır $2-
}
}
4if $2 == sil) && ($2 == sil) {
4if (Csop_ isin $nick) || (Admin_ isin $nick) vs vs takılar devam ediyor {
if !$isfile(RC/ $+ $3- $+ .txt) {
.msg $chan Hata! $2 kayıtlı RC dosyası bulunamadı.
}
else {
.msg $chan UYARI! Bu komut ile $2 kaydına ait bütün girdileri silersiniz.
.msg $chan Uygulamaya devam etmek istiyorsanız ; !Devam ,
.msg $chan Uygulamayı iptal etmek istiyorsanız ; !iptal yazınız.
.set -e %rcsil $3
}
}
}
}

alias saydır {
.timersaydır.* off
var %s 1
var %a 1
while %s <= $lines(RC/ $+ $2- $+ .txt) {
.timersaydır. $+ %s 1 %a msg $chan $read(RC/ $+ $2- $+ .txt,%s)
inc %s
inc %a 2
}
}

Burada Kırmızı olarak belirlediğim fakat renklerin cıkmadığı if bölümlerini belirli takıların kullanmasını istiyorum ve kendim o yolla coğaltmak oluyorda fakat Kayma Yaşanıyor ve kullanılmıyor acaba yardım edebilirmisiniz kaymaması için ve tam olarak kullanılması için