ForumAilem.Com - Paylasimin Yeni Adresi

Kod:
on *:text:*:#IRCd,#Sinema:{

if $regex($1,/[!.]film/Si) {

if $2 == ekle && $3 {

write film.txt 4¨ »0,0. $+ $3- $+

msg # Film başarıyla eklendi4. 4!Film list yazarak filmleri listeleyebilirsiniz4.

}

if $2 == sil && $3 {

if !$3 {

msg # Film silmek için lütfen numara belirtiniz4.

halt

}

else {

write $+(,-dl,$3,) film.txt

msg # 4 $3 1Numaralı film listeden silindi4.

}

}

if $2 == list {

if $lines(film.txt) = 0 { msg # Film listede bulunamadı4. | halt }

msg # Listedeki filmler gösteriliyor4.

msg # 

var %massacre 1

while (%massacre <= $lines(film.txt)) {

msg # %massacre $read(film.txt,%massacre)

inc %massacre

}

}

}

Not: Kanalı kendinize göre ayarlayınız. Kendinize göre ayarlamak için On *:text: olan kısmı on *:input:*:#Kanal:{ yapınız. Diğer şekilde kodları sadece karşı taraf kullanabilir.

Örnek Komut kullanımı: .Film ekle King Arthur Kılıç Efsanesi. Kategori: Bilim Kurgu Link: Link: [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]