| Lociz | 12 Mayıs 2014 23:26 |
Komut Sistemi
Can sıkıntısından değişik bir kod yaptım :)
Bota artık istediğiniz komutu verebileceksiniz. Özelleştirebilirsiniz de, her türlü yardım edebilirim. Kod:
on *:TEXT:*:#: {
if $nick isop $chan {
if $1 == &on { if !$ulist(#,lcz) { auser lcz # | msg # 2Komutlar # kanalı için aktif hale getirildi. } | else { msg # 2Komutlar # kanalında zaten aktif durumda. } }
if $1 == &off { if $ulist(#,lcz) { ruser lcz # | msg # 2Komutlar # kanalı için pasif hale getirildi. } | else { msg # 2Komutlar # kanalında zaten pasif durumda. } }
if $1 == &yardım { msg # 2Komut Sistemi için Kullanabileceğin Komutlar | msg # 0MADE BY LOCIZ | msg # 2&on Komut Sistemini # kanalı için aktif hale getirir. (Yalnız oplar) | msg # 2&off Komut Sistemini # kanalı için pasif hale getirir. (Yalnız oplar) | msg # 2&komut ekle KOMUT CEVAP # kanalı için komut eklenir. (Yalnız oplar) | msg # 2&komut sil KOMUT # kanalında bulunan komut silinir. (Yalnız oplar) | msg # 2&komutlar # kanalı için kullanılabilir komutları listeler. (Yalnız oplar) | msg # 0MADE BY LOCIZ | msg # 2Komut Sistemi için Kullanabileceğin Komutlar listelendi. }
if $1 == &komutlar { if !$ulist(#,lcz,0) { msg # 2Komutlar # kanalında pasif durumda, komutları listelemek için komut sistemini açın. | halt } | var %lcz $ini(lociz.ini,#,0) | if %lcz { msg # 2 # Kanalı için Kullanabileceğin Komutlar | msg # 0MADE BY LOCIZ | while %lcz { msg # 2 $ini(lociz.ini,#,%lcz) > $readini(lociz.ini,#,$ini(lociz.ini,#,%lcz)) | dec %lcz } | msg # 0MADE BY LOCIZ | msg # 2 # Kanalı için Kullanabileceğin Komutlar listelendi. } | else { msg # 2 # kanalı için kullanılabilir komut bulunmuyor. } }
if $1 == &komut { if !$ulist(#,lcz,0) { msg # 2Komutlar # kanalında pasif durumda, komutları listelemek için komut sistemini açın. | halt } | if $2 == ekle && $3 && $4 { writeini lociz.ini # $3 $4- | msg # 2 # kanalında kullanılması için $3 komutu eklendi. } | if $2 == sil && $3 { if !$ini(lociz.ini,#,$3) { msg # 2 # kanalında $3 komutu bulunmuyor, komutları listelemek için &komutlar yazınız. | halt } | remini lociz.ini # $3 | msg # 2 # kanalında bulunan $3 komutu silindi. } }
if $ulist(#,lcz,0) && $nick isop # { var %t $readini(lociz.ini,#,$1) | if $len(%t) { $+(.timer,$1) 1 0 %t } }
}
}
Resim: http://i.hizliresim.com/7mNRP5.png
Resimde görüldüğü gibi $2, $3, $chan, $nick gibi identifierlerle özelleştirilebilir. | 