Etiketler
|
|
|
Yazar: Aytac - Cevaplar: 0 - Görünümler: 425
Event'sız Oto Selam Alma
|
-Kullanımı-
-
-Açmak için: /s_ aç
-Kapatmak için: /s_ kapat
Alt + R (Remote) bölümüne ekleyin.
alias s_ {
if ($1 = aç) debug -i on s_
if ($1 = kapat) debug off
tokenize 32 $1-
if $1 = <- && $3 = privmsg {
if $4 ischan {
if $regex($5-,/^[:]s(\.a(\.|leyk[uüÜ]m)?|lm|elam(s|lar|[uÜü]n\saleyk[uÜü]m)?)$/Si) {
msg $4 a.selam $regsubex($2,^[:]([^!]+)![^@][email protected]+,\1) Hoş Geldin.
}
}
}
}
[b]Kodun cev
|
Yazar: Aytac - Cevaplar: 0 - Görünümler: 428
Oto Sifre Giris (Snippets Code)
|
Merhaba, nick sifre oto giris codlamasidir.
Calisma mantıgı:- /identify sifre seklinde girilen her sifre'yi kabul eder
- Her nick icin o sunucu sifre'sini kayıt eder, kısaca her sunucuda istedigin nicki istedigin sifreyle oto islem uygular.
- bir nickin o kanaldaki sifresini gormek icin /sifre nick yapabilirsiniz.
Deneme mIRC Version: 6.35
[code]on *:notice:*:?: {
if $nick == nickserv {
if IDENTIFY sifreniz isin $strip($1-) && $readini(otos
|
Yazar: Aytac - Cevaplar: 0 - Görünümler: 1058
qwebIRC Oto Kurulum Script
|
qwebirc adı altında bir dosya açıp aşşağıda ki kodları içerisine kopyalayın.
[code]#!/bin/bash
rumuz="BehroozWolf"
mename="behroozwolf.net"
ip="127.0.0.1"
sari="\033[1;33m"
kirmizi="\033[0;31m"
beyaz="\e[1;37m"
yesil="\e[0;32m"
ayesil="\e[1;32m"
renksonu="\033[0m"
function guncelle {
yum -y update
echo "Sistem guncellendi."
sleep 1
bagimlilik
}
function bagimlilik {
yum -y install epel-release
yum -y groupinstall 'Development Tools'
yum -
|
Yazar: Aytac - Cevaplar: 0 - Görünümler: 492
Unreal Kick komutundan sonra oto kanal temizleme
|
Klasör: Unreal3.2*/src/modules/
Dosya: (m_kick.c)
Bu düzenleme ile sunucunuzda herhangi bir oda içerisinde /kick #kanal rumuz sebep komutunu kullandığınız taktirde, UnrealIRCd tarafından komutun uygulandığı kanal otomatik olarak temizlenecektir.
BULUN,
[CODE]} else {
/* NORMAL */
sendto_channel_butserv(chptr,
sptr, ":%s KICK %s %s :%s",
parv[0], c
|
Yazar: Aytac - Cevaplar: 0 - Görünümler: 478
UnreaIRCd 4 Oto Kurulumu
|
Bir çok kişi Unreal4 kurarken bazı sorunlar ile karşılaşmakta ve kuramamakta. Oturup tek tek kurulumu anlatmak yerine bir betik hazırladım. 4 adet soru sormakta. Bu sorular, sunucu adı, root nick ve şifresi ve sunucunun calisacagi ip adresi. Diğerlerini otomatik olarak ayarlamaktadır.
Unreal4 ile uyumlu nocaps, noamsg, hideserver, m_ircops, antirandom, nocodes, privdeaf, textban mödülleri de kurulum ile birlikte aktif olarak gelmektedir.
Unreal4'ü kurmak için yapmanız gereken tek şey aşşağ
|
Yazar: Aytac - Cevaplar: 0 - Görünümler: 1108
InspIRCd-2.0.25 Oto Kurulumu
|
Kuruluma başlamadan önce herhangi bir hata alınmaması için aşşağı da ki paketlerin yüklenmesi gerekmektedir.
yum install epel-release
yum install perl-libwww-perl perl-crypt-ssleay perl-io-socket-ssl perl-Crypt-SSLeay perl-IO-Socket-SSL GeoIP GeoIP-devel
InspIRCd Oto kurulum kodu;
[code]#!/bin/bash
# Lethe v3 Kurulum
baslangic=$(date +%s)
baslangic1=`date +%R`
DIZIN=`pwd`
rumuz="BehroozWolf"
rootsifre="123456"
mename="behroozwolf.net"
ip="127.0.0.1"
|
Yazar: Aytac - Cevaplar: 0 - Görünümler: 415
Nickimi Yazana Oto Mesaj
|
Nickimi yazana oto mesaj atma kodu;
on *:text:*Aytac*:#: {
.inc $+(%,csr,$nick)
if $($+(%,csr,$nick),2) >= 3 {
.inc -u300 $+(%,csr,$nick)
}
else {
/msg # $nick 2Şuanda 4Bilgisayar 2Başında Yokum 4Awayım..
}
}
|
Yazar: Aytac - Cevaplar: 0 - Görünümler: 446
Oto Selam Alma Kodu Süreli
|
On *:Text:*:#:{
if $regex($1-,/(slm|selam|s\.a|s\.a\.)/ASi) && !$var($+(%,cesur,$nick)) {
msg $chan Aleykum Selam $nick
.set -u300 $+(%,cesur,$nick)
}
Kodun işlevi:
1 Kişiye 300 saniyede selam verdiği taktirde 1 kere cevap verecektir. aynı kişi 300 saniye yani 5 dakika dolmadan selam yazsa dahi cevap vermeyecek ancak o süre bittikten sonra selam yazarsa karşılık yazacaksınız.
Not:
slm|selam|s\.a|s\.l\.m|sa\.
vs şeklinde selam türlerini çoğaltırsınız
|
Yazar: Aytac - Cevaplar: 0 - Görünümler: 562
mIRC Oto kanal karşılama mesajı
|
mIRC Oto kanal karşılama
on !*:join:#:{
if $regex($site,/(admin|oper|root|vs)/i) { return }
if !$read(muafnick.txt,w,$nick) { msg $chan $nick Kanala hoşgeldiniz. }
}
|
Yazar: Aytac - Cevaplar: 0 - Görünümler: 694
Belirlediğim Nickler Özelden Yazınca Oto Cevap verme
|
on *:text:*:?: { if $read(otonickler.txt,w,$nick) { msg $nick YazilacakMesaj } }
Nick eklemek için;
/write otonickler.txt nick
Nick silmek için;
/write -dsnick otonickler.txt
|