Kod : Kodu kopyalamak için üzerine çift tıklayın!

         on 5*:join:#help: { if $nick(#help,0,oh) > 3 { .timer 1 1 kontrolet $nick $chan } } alias kontrolet { if ($1 != $me) && ($1 !isop $2) && ($1 !ishop $2) && ($1 !ison #helpers) { if $1 isreg $2 { var %oper 1 :basla var %Hero = $nick(#help,$rand(1,$nick(#help,0,oh)),oh) var %Kod = $nick(#help,$rand(1,$nick(#help,0,oh)),oh) if $istok(Zadrich ,%Kod,32) { goto basla } if $istok(Zadrich %Kod ,%Hero,32) { goto basla } while %oper <= $lines(voicelist\operler.txt) { if $1 == $read(voicelist\operler.txt,%oper) { msg #helpers 2 $+ $1 2 4 Oper/Admin girişi yapıldı.! } inc %oper } .msg #helpers 0,4[USER-GİRİŞ-UYARISI]; 2 $+ $1 5 Rumuzu 4#Help 5Kanalına Girdi 4YARDIM5 Bekliyor } .msg #helpers 0,4[USER-GİRİŞ-UYARISI]:1 $regsubex($str(-,$nick(#help,0,oh)),/./g, $iif(!$read(muaf.txt,w,$nick(#help,\n)),$chr(32) $nick(#help,\n) $chr(45)))  :4 Online değilseniz #help kanalında DEOP olmalısınız. } } on *:text:*:#egitim:{ if $regex($1,/^[!.]muafekle$/Si) { if $read(muaf.txt,w,$2) { .msg # Muaf liste'de ekli | return } .write muaf.txt $2 .msg # [5 $2 ] 2#Help Giriş Seslenme Kodu'n dan Muaf Ekle'ndi, Artık BOT Tarafından Seslenilmiyecek; Muaf nick'ler:4 $regsubex($str(-,$lines(muaf.txt)),/./g, $read(muaf.txt,\n) $chr(45)) } if $regex($1,/^[!.]muafs[ıiİ]l$/Si) { if !$read(muaf.txt,w,$2) { .msg # Muaf liste'de ekli değil. | return } .write $+(-,ds,$2) muaf.txt .msg # [5 $2 ] 2 #Help Giriş Seslenme Kodu'n dan, Muafnick verisinden Sil'indi; Artık BOT Tarafından Seslenilecektir. } } alias nickler { var %i = 1, %t = $nick(#helpers,0) while (%i <= %t) { if !$regex($nick(#helpers,%i).pnick,~|+) && ($nick(#helpers,%i) !isreg #helpers) { var = %nickler $addtok(%nickler,$nick(#helpers,%i),32) } inc %i } return $remove(%nickler,$me,Zadrich) }