@
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] ufak tefek hatalar mevcut. Keşke deneyerek verseydin kardeşim, teşekkür emeğine. En azından uğraşmışsın. Ben kodu vereyim, siz sıradaki soru ile devam edin. Başlığı teslim almanın bir manası yok.
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Kodda kullanabileceğiniz kullanımlar için örnekler:
|
| Alıntı: |
[16:25:22] <Fromhell> *uygula /nickserv info Fromhell
[16:25:22] <HelpCheck> Komut uygulandı ve arşivlendi.
[16:25:50] <Fromhell> *uygula /msg Fromhell selam
[16:25:51] <HelpCheck> Komut uygulandı ve arşivlendi.
|
|
| Alıntı: |
[16:26:09] <Fromhell> *arşiv
[16:26:10] <HelpCheck> Arşiv listeleniyor..
[16:26:10] <HelpCheck> 15/11/2011 16:25:22 - Komutu uygulatan nick: Fromhell - Uygulanan komut: /nickserv info Fromhell
[16:26:10] <HelpCheck> 15/11/2011 16:25:50 - Komutu uygulatan nick: Fromhell - Uygulanan komut: /msg Fromhell selam
[16:26:10] <HelpCheck> Listeleme tamamlandı.
|
|
| Alıntı: |
[16:26:22] <Fromhell> *arşiv 15/11/2011
[16:26:23] <HelpCheck> 15/11/2011 tarihine ait arşiv kayıtları listeleniyor..
[16:26:23] <HelpCheck> 15/11/2011 16:25:22 - Komutu uygulatan nick: Fromhell - Uygulanan komut: /nickserv info Fromhell
[16:26:23] <HelpCheck> 15/11/2011 16:25:50 - Komutu uygulatan nick: Fromhell - Uygulanan komut: /msg Fromhell selam
[16:26:23] <HelpCheck> Listeleme tamamlandı.
|
|
| Alıntı: |
[16:30:01] <Fromhell> *arşiv 14/11/2011
[16:30:02] <HelpCheck> 14/11/2011 tarihine ait arşiv kayıtları listeleniyor..
[16:30:02] <HelpCheck> Belirtilen tarihe ait arşiv kaydı bulunmamaktadır.
|
Kod: Kodu kopyalamak için üzerine çift tıklayın!
on hellmaster:text:*:#ctrl: {
if $1 == *uygula {
if !$2 { msg # Hata! Uygulanacak komutu girmediniz. Doğru kullanım: *uygula /komut }
else {
$2-
msg # Komut uygulandı ve arşivlendi.
write arşiv/arşiv.txt $date $time - Komutu uygulatan nick: $nick - Uygulanan komut: $2-
}
}
if $1 == *arşiv {
if !$2 {
msg # Arşiv listeleniyor..
var %d 1
while %d <= $lines(arşiv/arşiv.txt) {
msg # $read(arşiv/arşiv.txt,%d)
inc %d
}
msg # Listeleme tamamlandı.
}
if $2 {
msg # $2 tarihine ait arşiv kayıtları listeleniyor..
var %f 1
while %f <= $lines(arşiv/arşiv.txt) {
if $token($read(arşiv/arşiv.txt,%f),1,32) == $2 {
msg # $read(arşiv/arşiv.txt,%f)
}
else { msg # Belirtilen tarihe ait arşiv kaydı bulunmamaktadır. | halt }
inc %f
}
msg # Listeleme tamamlandı.
}
}
}
Bol paylaşımlı IF'ler dilerim.