parça kodlar

  1. bLaCk`SouL

    Kısa yoldan ban temizleme

    on *:TEXT:!bansil:#?:{ var %ban 1 While ( %ban <= $ibl($chan,0) ) { mode $chan -b $ibl($chan,%ban) inc %ban } Kullanımı : !bansil Kısa yoldan banları temizleyebilrisiniz.
  2. bLaCk`SouL

    !duyuru bilgilendirme remotesi

    on *:text:*:#KANAL: { if ($1 == !duyuru) { if !$hget(duyuru,$nick) { .hadd -msu120 duyuru $nick 1 msg #Kanal MESAJINIZ msg #Kanal MESAJINIZ return } else { .notice $nick 2 dk içerisinde bir defa duyuru komutunu kullanabilirsiniz . } } }...
  3. bLaCk`SouL

    İp adresinin atılma sebebini kanala yansıtma

    on *:input:#opers:{ if $1 == !sebep && $2 { .enable #x set %ip $2 stats g } } #x off raw *:*:{ if $numeric = 223 { haltdef var %& = $remove($3,@,*) if %ip == %& { hadd -m g $replace($7-,$chr(32),$chr(61)) } } if $numeric = 219 { haltdef if...
  4. bLaCk`SouL

    Belirlediğiniz ident'e otomatik voice

    on *:join:#KANAL: { if $gettok($gettok($address($nick,5),1,64),2,33) == X { ym $nick } } alias ym { var %bakiyor = 1 while $nick(#z,%bakiyor) { if !$regex($nick(#z,$ifmatch).pnick,/^(@|&|~)/) { mode #z +v $1 msg $$1 #Z kanalında tarafımdan 013voice yapıldınız...
  5. bLaCk`SouL

    /exit yazdığınızda çıkmadan oto /ame göndermek

    alias exit { inc -e %e if (%e = 1 && $status = connected) { ame MESAJINIZI GİRİNİZ . } else exit -n }
  6. bLaCk`SouL

    Random olarak kullanıcıyı kanallara sajoinlemek.

    on !*:join:#Kanal:{ var %q = #kanal1 #kanal2 #kanal3 #kanal4 #kanal5,%t = $calc($numtok(%q,32)+1) inc -e %r $iif(%r != %t,sajoin $nick $gettok(%q,%r,32),unset %r) } Seçmiş olduğunuz kanala giriş yapan kullanıcıyı belirlediğiniz kanallara Random olarak sajoin edebilirsiniz .
  7. bLaCk`SouL

    +qaohve modelerini alma verme

    on *:input:#:{ if ($regex($1,^(!preferix|!deprefefrx)$)) { mode # $iif($left($1,3) = !de,-,+) $+ qaohve $str($+($me,$chr(32)),6) } } Kodun amacı bir kanalda !preferix yazdınığınızda size otomatik olarak bu modeleri verir. Veye !depreferix yazdığınızda sizden bu modeleri tekrar geri alır.
  8. bLaCk`SouL

    Tek Seferde Sqline Listesini Temizleme

    alias Sqlinedell { .set -u3 %:sqline on | echo -a Sqline listesi siliniyor. | os sqline list } on *:notice:*:?:{ if %:sqline == on { if ($nick == OperServ) && (SQLINE listesinden silindi !isin $strip($1-)) { if (Aktüel liste: isin $1-) { return } os sqline del $1 } } }...
  9. bLaCk`SouL

    Op veya Deop olduğunuzda haber almak

    on 1:op:#: { if ($opnick != $me) { halt } else { /echo -a 11,1 - 15,1 Dikkat! 11,1 - 11,1 - 0,1 # 15Kanalında $nick tarafından 0op 15oldunuz. 11,1 - | halt } } on 1:deop:#: { if ($opnick != $me) { halt } else { /echo -a 11,1 - 15,1 Dikkat! 11,1 - 11,1 - 0,1 # 15Kanalında $nick tarafından...
  10. bLaCk`SouL

    Özelde versiyon ve ping saldırısı önleme .

    ctcp 1:*:*:{ inc -u5 %ctcp.flood if (%ctcp.flood > 3) { if ($nick == $me) { halt } ignore -tu30 $nick .echo -a $nick Özelinize flood yaptı. Otomatik ignore ettiniz. .msg $nick Özelime flood'dan dolayı , ignore edildiniz. } }
  11. bLaCk`SouL

    Oper Pass giriş tespit

    on *^:snotice:*: { if (*is*now*an*operator* iswm $1-) && (@ isin $1-) { var %kimin_pass $gettok($left($4,$calc($pos($4,!) – 1 )),1,40) var %kim_bu $gettok($left($4,$calc($pos($4,!) – 1 )),2,40) .msg #yönetim 4 UYARI 4 %kim_bu 1 iRCOP Girisi Yapti.. .msg #yönetim 4 BiLGi : 1...
  12. bLaCk`SouL

    Nick Tablayana Notice ile Süre ve Mesaj Göndermek

    Merhaba 3 yıldır kullandıgım bir remoteyi sizlerle paylaşmak istedim. işinize yarıcaktır . Sunucu üzerinde size seslenen bir Nick olduğunda karşı tarafa Notice away mesajınızı ve ne kadar süredir away iseniz bildirim gönderen bir code. on *:text:*:*:{ if ($me isin $strip($1-)) &&...
  13. bLaCk`SouL

    Gençliğe hitabe remotesi

    Kulllanımı : Belirlediğiniz kanalda !hitabe yazmanız yeterli olucaktır. on *:text:*:#KANAL: { if !Hitabe isin : $1 { .timer 1 1 /msg # ATATÜRK'ÜN GENÇLİĞE HİTABESİ .timer 1 3 /msg # Ey Türk gençliği! Birinci vazifen, Türk istiklâlini, Türk Cumhuriyet'ini, ilelebet, muhafaza ve...
  14. bLaCk`SouL

    Bad ident koruması

    Belirlediğimiz ident 'leri kanaldan direk banlamaya yarayan bir remotedir. | (*!*Amcik*@* iswm $fulladdress) | kısmını dilediginizce cogaltabilirsiniz. on @*:JOIN:#:{ if (*!*sik*@* iswm $fulladdress) || (*!*fuck*@* iswm $fulladdress) || (*!*yarak*@* iswm $fulladdress) || (*!*Amcik*@*...
  15. bLaCk`SouL

    Botunuz icin Lag durumu ögrenme

    Sunucu üzerinde bazen Koruma Bot'ları Lag'da kalabiliyor. Bunun için geliştirilmiş güzel bir remoteyi sizlere paylaşmak istedim. on *:TEXT:!lag:#: { .set %lag $chan $ticks .raw ping 666 } on ^*:PONG:{ if (%lag) { .tokenize 32 %lag .msg $1 [Current Lag] $server $+ : $calc($ticks - $2 /...
  16. bLaCk`SouL

    Girişte HOST yerine İP adresi görmek

    Kanala giriş yapan kullanıcıların hostlarinin yerine direk ip adresini görmeye yarayan bir code'dir. İp adreslerini görmeniz için FLAG' larininiz olması gerekmektedir. on !^*:join:#KANAL:haltdef | inc $+(%,$nick,ip) 1 | hadd -m $nick # 1 | if ($regex($evalnext($+(%,$nick,ip)),^1$)) { userip...
  17. bLaCk`SouL

    Aynı anda tek komut ile msg ve notice gördemek.

    alias mesaj { if !$1 { echo -a Nick belirtiniz. | return } if !$2 { echo -a Mesaj giriniz. | return } msg $1 $2- notice $1 $2- } Kullanımı : /mesaj nick mesajınız .
  18. bLaCk`SouL

    Veriables Anlatımı

    Variables (var kısaltması) , türkçe olarak değişkenler anlamına gelmektedir. Variables , scriptinizde daha sonradan kullanabileceğiniz değerleri atayabileceğiniz geçici depolama alanlarıdır. Aşağıdaki komutlar değişken değerlerini oluşturmanızı ve ayarlamanızı sağlar. /set [-snzuN] <%var>...
  19. bLaCk`SouL

    Google Domain Sıra Bulucu

    Google 'de Aradıgınız domain adresinin hangi sırada ve yafada olduğunu gösteren bir Code 'dir. Kod sahibi - Set Kullanimi: /googlearama -Web- -Aranacak kelime- * Ornek: /googlearama www.ircforumlari.com.tr ircforumlari alias googlearama { var %rand $rand(0,99999) sockopen $+(google,%rand)...
  20. bLaCk`SouL

    Türkçe Karakter Çözümü

    Bazı Scriplerde bu sorunu oldukça yaşamaktayız . Yapmanız gereken Remote bölümüne yeni bir sayfa açıp kodu eklemenizdir. alias -l trl $iif($isid, return, echo -a) $utfdecode($utfencode($1-, 162)) on ^&*:text:*:*:{ var %text = $mid($rawbytes, $calc($pos($rawbytes, $chr(32), 3) + 2))...
Üst Alt