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)),+,$c hr(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)
 }
 }