Kod: Kodu kopyalamak için üzerine çift tıklayın!
on *:text:*:?: {
if $1 == !soz && $3 {
var %senyor2 $replace($2-,$chr(32),+) $+ $chr(0229) $+ $nick
var %senyor $rand(101,9999)
hadd -m soz %senyor %senyor2
msg #opers 4 $gettok($replace($hget(soz,%senyor),+,$chr(32)),1,$asc(å)) 1Sözü Onay Listesine Alindi. Bu Sözü Onaylamak İçin4 !onay %senyor 1Yaziniz. (Ekleyen Nick:13 $gettok($replace($hget(soz,%senyor),+,$chr(32)),2,$asc(å)) )
msg $nick Talebiniz İlgililere İletilmiştir, Sözünüz Onaylandiğinda Veya Reddedildiğinde Size Memo Yoluyla Bilgi Verilecektir. Haberdar Olabilmek İçin Nickinizin Kayitli Oldugundan Emin Olunuz.
}
}
on *:text:*:#: {
if $chan == #opers {
if $1 == !silsoz && $2 {
if $hget(soz,$2) {
msg #opers 4 $2 1Kod Numaralı4 $gettok($replace($hget(soz,$2),+,$chr(32)),1,$asc(å)) 1Sözü İsteğiniz Üzere 4Silinmiştir
msg memoserv send $gettok($hget(soz,$2),2,$asc(å)) Sayin $gettok($hget(soz,$2),2,$asc(å)) Gönderdiğiniz $2 Onay Numarali Söz Uygun Bulunmamiştir.. İlginize Teşekkür Ederim.
hdel -s soz $2
}
}
if $1 == !listeleonayli && !$2 {
var %i 1
while %i <= $lines(onaylisoz.txt) {
msg # $read(onaylisoz.txt,%i)
inc %i
}
}
if $1 == !listelesoz && !$2 {
var %i 1
while %i <= $hmatch(soz,*,*) {
msg #opers 4Söz:10 $gettok($replace($hget(soz,$hmatch(soz,*,%i)),+,$chr(32)),1,$asc(å)) 7Onay Kodu:12 $hmatch(soz,*,%i)
inc %i
}
}
if $1 == !onay && $2 {
if $hget(soz,$2) {
write onaylisoz.txt $gettok($replace($hget(soz,$2),+,$chr(32)),1,$asc(å)) Onay Numarasi:4 $2 1Gönderen Nick:4 $gettok($hget(soz,$2),2,$asc(å)) | msg #ufuk 4 $gettok($replace($hget(soz,$2),+,$chr(32)),1,$asc(å)) 1Sözü Onaylanmiştir.
msg memoserv send $gettok($hget(soz,$2),2,$asc(å)) Sayin $gettok($hget(soz,$2),2,$asc(å)) Gönderdiğiniz $2 Onay Numarali Söz Onaylanmiştir. İlginize Teşekkür Ederim.
hdel soz $2
}
}
}
if $1 == !soz && $2 {
msg # 4 $2 -->12 $read(onaylisoz.txt)
}
}
şeklinde yazilir.
Onay Bekleyen Fakat Onaylanmasi İstenmeyen Sözü Onay Listesinden Kaldirmak İçin:
Resimden Komutlari Daha Net Anlayabilirsiniz.
Dipnot: 3 Kelimeden Daha Az Kelime Sayisina Sahip Sözler Eklenemez. !soz Naber Nasilsin Eklenmez. !soz Naber Nasilsin İyiyim Eklenir.
'dir koddan kendinize göre değiştirebilirsin.
Kod Dahada Geliştirilebilir Mesela !söz Ekleyen Kişilerin Ekledikleri Sözün Onaylanip Onaylanmadiği Memo Yoluyla Karşi Tarafa İletilebilir.
Bunun Gibi Başka Eklemelerde Aklınıza Gelirse Üzerine Koyarim.