Tepe Menü
Ana Menü
Alt Menüler Kategoriler
İçerik
|
<< İlk << Geri [2] / [3] İleri >> Son >>
*Not: Kod "mIRCTurk" sunucusundan gelen raw değerlerine göre yazılmıştır. Raw değerlerinde gelen mesajlar sunucudan sunucuya değiştiği için kod bazı sunucularda calısmayabilir. Kullanmak isteyen arkadaslar benimle iletişime geçip herhangi bir sunucu için kodu yazdırabilirler.
Sunucuya bağlanınca otomatik olarak tüm kanallardan çıkıp, şifrenizi herhangi bir işlem yapmadan girmenize yarar.
Merhaba arkadaşlar tek bir kod yardımı ile sunucumuza ve oradan da dilediğimiz kanallara bağlanmak mümkün… Böylece hem bir çok şifreyi her seferinde yazmamış olacaksınız hem de zaman kaybetmeden server ve kanallara bir anda bağlanmış olacaksınız.
Öncelikle, Telnetimize Login oluyoruz.
Sonra;
Kod:
cd ircservices*Kod:
cd modulesKod:
cd nickservKod:
pico main.cctrl +W ile Su satırı Aratıyoruz;
Kod:
cd ircservices*/modules/chanservKod:
pico -w main.cKod:
module_log(”Channel %s registered by %s!%s@%s”,
chan, u->nick, u->username, u->host);
notice_lang(s_ChanServ, u, CHAN_REGISTERED, chan, u->nick);
if (CSShowPassword)
notice_lang(s_ChanServ, u, CHAN_PASSWORD_IS, pass);
memset(pass, 0, len);
uc = smalloc(sizeof(*uc));
LIST_INSERT(uc, u->id_chans);
strscpy(uc->chan, ci->name, CHANMAX);
on @*:mode:#xyz:{
if +R iswm $1 {
msg #xyzop $chan Kanalına sadece şifreli nickler girebilir...
}
if -R iswm $1 {
msg #xyzop $chan Kanalına sadece şifresiz nickler girebilir...
}
if +i iswm $1 {
msg #xyzop $chan Kanalına sadece davet edilenler girebilir...
}
Arkadaşlar bu kodu sunucunuzda NoMercy gibi bot varsa banlanmamanız için yaptım.Bu şekilde hem banlanmaz hemde kanalı temizlemiş olursunuz.. Kod tamamen bana aittir..
; Proxy Bulucu
; http://www.proxy4free.com a Tesekkurler
; /proxybulucu komutu ile Calistirin
; Iyi Sanslar (:
sunucuların derdidir Hemen hemen bütün şu sc5 illeti.Herkez kafasına göre çözümler üretmeye çalışmıştır.
Mirc.te yazdığınız her kelime harf renkli olacaktır. Aşağıda verdiğim kodu scriptinizin remote kısmına yapıştırdığınız zaman
Komut : /statuslist
alias statuslist {
.enable #statuss
$iif(!$window(@Bekleyenler),window -enz @Bekleyenler)
aline 4 @Bekleyenler ** Statüste Bekleme yapanların Listesi **
who *
.timer 1 10 .disable #statuss
}
#statuss off
raw 352:*:haltdef | if $2 == $chr(42) { aline 2 @Bekleyenler $+([,$time,]) $6 $+($chr(40),$3,@,$4,$chr(41)) Fullname: $9- }
raw 315:*:haltdef
#statuss end
Microsoft
Küfürleri eklersiniz , kanal icerisinde kullanılır ise kelimeler kullanan kişi atılır
On 1:input:*:{
if ($1- == hehe) { say HëHêHéHèyy :P | halt }
if ($1- == haha) { say HàHáHâHãHäHåy :P | halt }
if ($1- == zuha) { say ZuHàHáHâHãHäHåy :P | halt }
if ($1- == puhi) { say PuHiHiHiHiHiHiy :P | halt }
if ($1- == slm) { say seLam ~ | halt }
if ($1- == nbr) { say Naber ? | halt }
if ($1- == by) { say ßyee ~ | halt }
if ($1- == ok) { say Ok ~ | halt }
if ($1- == oke) { say « Okê » | halt }
if ($1- == oki) { say « Oki » | halt }
if ($1- == okey) { say « Okêy » | halt }
if ($1- == ist.) { say « iStanßuL » | halt }
if ($1- == istanbul) { say « iStanßuL » | halt }
if ($1- == ank.) { say « AnkaRa » | halt }
if ($1- == ankara) { say « AnkaRa » | halt }
if ($1- == izmir) { say « IzmiR » | halt }
if ($1- == Erzurum) { say « Erzurum » | halt }
on *:join:#kanal: {
.sajoin $nick $read(kanal.txt) }
Kanal.txt"ye # ekleyerek yazıp dene, her gireni farklı kanal"a sokar.
Yan Bloklar
