IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)
-   mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)
-   -   Karşılama mesajı (https://www.ircforumlari.net/mirc-scripting-sorunlari/11518-karsilama-mesaji.html)

NeLix 31 Ocak 2006 16:49

Karşılama mesajı
 
on *:join:#izmir:{ set %loginnick $nick | set %loginchan $chan | checklogin %loginnick }
alias checklogin {
if ($read(registered1.txt,s,%loginnick) = EVET) {
msg #izmir %loginnick [Welcome Messages]: %loginnick izmir kanalına hosgeldiniz.
msg #izmir %loginnick Siz kayıtlı kullanıcımız izmir kanalında farkı ßir sohbeti bizimle yaşayın. | msg %loginnick Lütfen !login olunuz. }
else { whois %loginnick | .enable #catchraw | unset %loginnick | %loginchan }
}
#catchraw on
raw 307:*:{
if (%sifregonder != true) {
msg #izmir [Welcome Messages]: $2 izmir kanalına hosgeldiniz.
msg #izmir [ $2 ]: Lütfen özelime gelerek nickinizi kayıtlayınız.
checkreg $2
}
elseif (%sifregonder = true) { msg $2 Şifreniz: $read(bot-registered.txt,s,$2) }
if (!$read(registered.txt,s,$2)) { write registered.txt $2 EVET }
}
raw 318:*:{
if (%sifregonder != true) {
}
elseif (%sifregonder = true) { unset %sifregonder }
}
#catchraw end
alias checkreg {
if ($read(bot-registered.txt,s,$2)) { msg $1 Bu nick sisteme kayıtlı bir nicktir, lütfen !login olunuz. }
else {
msg $1 Kayıt olmak icin lutfen özelime !Register Şifre Yazınız.
msg $1 Önemli Not; Kendi kayıtlı nickinizin sifresini yazmayın!
msg $1 Örnektir. !register 12345
}
}
on *:text:*:?:{
if ($1 = !register) {
if ($read(registered.txt,s,$nick) = EVET) {
if ($read(bot-registered.txt,s,$nick)) { msg $nick Bu nick zaten kayıtlı! }
else { if $2 { write bot-registered.txt $nick $2 | write registered1.txt $nick EVET | msg $nick Sisteme kayıt oldunuz. Şifreniz: $2  } | elseif !$2 { msg $nick Lütfen Şifrenizide Giriniz. } }
}
elseif ($read(registered.txt,s,$nick) != EVET) { msg $nick Nickinizin nickserv'de kayıtlı olması gerekmektedir, bot nickinizin kayıtlı olmadığını tespit etti, eğer kayıtlıysa lütfen kanaldan çıkıp, tekrar giriniz. }
}
if ($1 = !login) {
if ($read(registered.txt,s,$nick) = EVET) {
if ($read(bot-registered.txt,s,$nick)) {
if !$2 { msg $nick Lütfen Şifrenizide Giriniz. } | elseif $2 { if ($read(bot-registered.txt,s,$nick) = $2) { msg #izmir ( $nick ): Login Oldunuz. Aramıza Hoş Geldin. | mode #izmir +v $nick } | elseif ($read(bot-registered.txt,s,$nick) != $2) { msg $nick Yanlış Şifre!! } }
}
elseif !$read(bot-registered.txt,s,$nick) { msg $nick Nickiniz kayıtlı değil, kaydetmek için !register Şifre yazınız. }
}
elseif ($read(registered.txt,s,$nick) != EVET) { msg $nick Nickinizin nickserv'de kayıtlı olması gerekmektedir, eğer kayıtlı ise lütfen kanaldan çıkıp tekrar girin. }
}
if ($1 = !unregister) {
if ($read(registered1.txt,s,$nick) = EVET) {
if ($read(bot-registered.txt,s,$nick)) {
write $+(-ds,$nick) registered.txt $nick
write $+(-ds,$nick) registered1.txt $nick
write $+(-ds,$nick) bot-registered.txt $nick
msg $nick Nickiniz kaydı başarı ile silinmiştir.
}
else { if $2 { msg $nick Sisteme kayıtlı Değil. } }
}
elseif ($read(registered.txt,s,$nick) != EVET) { msg $nick Nickinizin nickserv'de kayıtlı olması gerekmektedir, bot nickinizin kayıtlı olmadığını tespit etti, eğer kayıtlıysa lütfen kanaldan çıkıp, tekrar giriniz. } }
}
on *:text:!şifre:#:{
if ($read(registered1.txt,s,$nick) = EVET) {
if (!$read(bot-registered.txt,s,$nick)) { msg $nick Bu nickin sisteme kayıtlı olmadığı tespit edildi! }
else {
whois $nick | set %sifregonder true | .enable #catchraw }
}
else { msg $nick Nickinizin nickserv'de kayıtlı olmadığı tespit edildi, eğer kayıtlı ise lütfen kanaldan çıkıp tekrar giriniz. }
}
alias gvoice { if $1 { var %a = $comchan($1,0) | while %a { if ($me isop $comchan($1,%a)) { dec %a } } }


Arkadaşlar bende bu code var Kanala Nicki registerli ve küfürlü biri girdiğinde kill yiyorum. Bu code'yi ona göre ayarlayaßilir miyiz ? yani öle biri geldiğinde mesaj yollamicek ?

CipriX 01 Şubat 2006 15:12

sana kim kill atıyor onu söyle yardımcı olalım...

NeLix 01 Şubat 2006 18:04

e-kolay adminleri kill atıyor işde kanala bot küfürlü nicke mesaj atınca otomatik kill yiyor..

diEfoRyoU 01 Şubat 2006 21:20

kill nedeni nedir acaba flood mu deildir ama reklam içerikli bir kelime olabilir kill nedenini yazarsan bişiler yapılabilir

djiNn 01 Şubat 2006 23:36

INSANIYET NAMINA

Kod:

on *:join:#izmir:{ set %loginnick $nick | set %loginchan $chan | checklogin %loginnick } 
 
Kırmızı Yazili Yeri Bulup Aşşadaki Mavi Yaziliyi Ekle
 
on *:join:#izmir:{ if (!$read(haricinickler.txt,w,$nick)) { set %loginnick $nick | set %loginchan $chan | checklogin %loginnick }  }
 
haricinickler Diye Bir Text Dosyası Oluşturduktan Sonra Içine Istemediğin Nickleri Alt ALta Yazarsin.

;bunalim

kayakaya 12 Mart 2006 05:30

Arkada$lar ßu Cod'u Kim yazmı$sa Emeğine Sağlık Sizlerede çok tesekkür Ederim

Amigo 31 Mart 2006 22:44

Re: Karşılama mesajı
 
arkadaslar bu codu remoteye ekledim pc yi kasti mirc dondu napmam gerek yardim edermisiniz . ?

el33t 01 Nisan 2006 14:13

Re: Karşılama mesajı
 
Şu an kullandığın bilgisayarı çöpe at ya da server olarak kullan, kendine yeni ve daha hızlı işlemcili bir bilgisayar al? Ya da bu önerilerimi dinlemeyip yukardaki kodu kullanma, kendine baştan istediğin şekilde bir kod yaz.

djiNn 01 Nisan 2006 23:59

Re: Karşılama mesajı
 
Doğru fAkat Ihtimal Olarak Eger Cok Yüksek Giriş CıkışLı KanaLda Denediysende Olabilir..

else { whois %loginnick | .enable #catchraw | unset %loginnick | %loginchan }
}
#catchraw on
raw 307:*:{
if (%sifregonder != true) {
msg #izmir [Welcome Messages]: $2 izmir kanalına hosgeldiniz.
msg #izmir [ $2 ]: Lütfen özelime gelerek nickinizi kayıtlayınız.
checkreg $2
}
elseif (%sifregonder = true) { msg $2 Şifreniz: $read(bot-registered.txt,s,$2) }
if (!$read(registered.txt,s,$2)) { write registered.txt $2 EVET }
}
raw 318:*:{
if (%sifregonder != true) {
}
elseif (%sifregonder = true) { unset %sifregonder }
}
#catchraw end


Burası Kastırabilir Cok giriş Cıkış Varsa Cunku Whois Cekiliyor Who Cektirerek Dene..

Sitemdir 31 Ağustos 2009 06:03

Cevap: Karşılama mesajı
 
Ne işe Yarıyor bu Kod. biLen Arkadaş Varsa Paylaşırsa Memnum Olurum


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 16:48.

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2025 IRCForumlari.Net Sparhawk