ForumAilem
  SohbetYaz
 Resim Yükle SohbetYaz.Com Sohbet Bağlan MasalFM MasalFM  Sunucular  Kurallar
>
+
Kayıt ol  Bugünkü Mesajlar

Kayıt Ol Sevgili Ziyaretçi!
Kayıt olmak için bir dakikanızı ayırın, Daha ne bekliyorsunuz?
Kurallar & İletişim 		Kayıt Ol
Toplam 2 Sayfadan 1. Sayfa 1 2
Toplam 42 sonuçtan 1 ile 25 arasındakiler gösteriliyor.
Arama işlemi 0,01 saniye sürmüştür. Arama: Mesajları bulunan üye: TÜRK
Forum: mIRC Scrpit Ve Hazır Kodlar 01-05-22, 22:54
Cevaplar: 0
Görüntüleme: 967
Konuyu Başlatan TÜRK
Girişte Bad Tara

on @BAD:JOIN:*:{
if ($ulist($nick,koruma,0) >= 1) { return }
elseif !$istok(#türkiye #türkiyehelp ,$chan,32) {
mode $chan +b $nick
kick $chan $nick 4 $nick 14 # 15,12 Kanalında Bad Nick YASAKTIR!...
Forum: mIRC Scrpit Ve Hazır Kodlar 01-05-22, 22:53
Cevaplar: 0
Görüntüleme: 747
Konuyu Başlatan TÜRK
Giriş/Çıkış İp Göster

#IPGoster on
on *:snotice:*: {
if (Client connecting isin $1-) {
if (!$hget(Giris)) { hmake giris 100 }
hadd Giris $9 $10
}
if (Client exiting isin $1-) {
if !$hget(Giris,$6) { hadd Giris $6...
Forum: mIRC Scrpit Ve Hazır Kodlar 01-05-22, 22:53
Cevaplar: 0
Görüntüleme: 1.269
Konuyu Başlatan TÜRK
FullName Takip

*\Bu kod ile sunucuya giriş yapanlara whois çeker ve fullname kısmında reklam bulunan kişileri size bildirir*\
Raw 352:*: {
if $regex($upper($strip($9-)),İRCDE|.COM|[Only Registered Users Can See Links] &&...
Forum: mIRC Scrpit Ve Hazır Kodlar 01-05-22, 22:52
Cevaplar: 0
Görüntüleme: 638
Konuyu Başlatan TÜRK
Flood Koruması

Saldırı sırasında kanalınızı +mM moduna alıp saldırı yapanları banlayan flood Koruması.

on @*:text:*:#:{ if ($nick isreg #) { inc -u2 $+(%,fld.,$chan,.,$nick) | if ($($+(%,fld.,$chan,.,$nick),2)...
Forum: mIRC Scrpit Ve Hazır Kodlar 01-05-22, 22:52
Cevaplar: 0
Görüntüleme: 2.190
Konuyu Başlatan TÜRK
Flood

on *:text:*:#:{
if ($nick isreg #) {
.hinc -mu10 # $+(#,$nick,$encode($1-)) 1
if ($hget(#,$+(#,$nick,$encode($1-))) == 3) { msg # $nick saldırı/flood girişiminde bulunmayınız ! avdet system! }
if...
Forum: mIRC Scrpit Ve Hazır Kodlar 01-05-22, 22:51
Cevaplar: 0
Görüntüleme: 2.140
Konuyu Başlatan TÜRK
Film Remotesi

on *:text:*:#IRCd,#Sinema:{
if $regex($1,/[!.]film/Si) {
if $2 == ekle && $3 {
write film.txt 4¨ »0,0. $+ $3- $+
msg # Film başarıyla eklendi4. 4!Film list yazarak filmleri listeleyebilirsiniz4....
Forum: mIRC Scrpit Ve Hazır Kodlar 01-05-22, 22:51
Cevaplar: 0
Görüntüleme: 472
Konuyu Başlatan TÜRK
F1 Help

; Kodu eklemeden önce, ALT+D de bulunan F1 aliasını silmeniz gerekiyor.
; Bu kodu ALT+R yani Remote bölümüne eklemelisiniz.
;
alias ss {
if $1 && !$2 { return $chr(3) $+ $chr(3) $+ $1 $+ }...
Forum: mIRC Scrpit Ve Hazır Kodlar 01-05-22, 22:50
Cevaplar: 0
Görüntüleme: 2.041
Konuyu Başlatan TÜRK
Dosyadaki Kanallara İnfo

alias alist (
var% i 1
var% toplam $ hatları ($ mircdirchannel.txt)
(% I <= toplam%) (süre
($) Mircdirchannel.txt, n,% i okumak ($ eğer! = $ Null) (/ cs $ v1 bilgisi)
inc% i 1
)
)
Forum: mIRC Scrpit Ve Hazır Kodlar 01-05-22, 22:50
Cevaplar: 0
Dns
Görüntüleme: 599
Konuyu Başlatan TÜRK
Dns

on *:sockopen:avdet:{
sockwrite -n $sockname GET /ip_locator.php?ip= $+ %ipi [Only Registered Users Can See Links]
sockwrite -n $sockname Host: ipinfodb.com $+ $crlf $+ $crlf
}
on *:sockread:avdet:{
if ($sockerr) {
msg...
Forum: mIRC Scrpit Ve Hazır Kodlar 01-05-22, 22:49
Cevaplar: 0
Görüntüleme: 1.750
Konuyu Başlatan TÜRK
Çift Renkli Yazı

menu menubar,channel,query {
$iif($group(#DuaL_CoLoR.Text) == Off,DuaL_CoLoR Text [Off],DuaL_CoLoR Text [On]):{
$iif($group(#DuaL_CoLoR.Text) == Off,.enable #DuaL_CoLoR.Text,.disable...
Forum: mIRC Scrpit Ve Hazır Kodlar 01-05-22, 22:48
Cevaplar: 0
Görüntüleme: 981
Konuyu Başlatan TÜRK
Clone Uyarici

on *:join:*: {
%clones = $ialchan($wildsite,#,0)
if ( %clones > 1 ) {
var %count = 1
set %clone.nicks -->
while (%count <= %clones) {
%clone.nicks = %clone.nicks $ial($wildsite,%count).nick...
Forum: mIRC Scrpit Ve Hazır Kodlar 01-05-22, 22:48
Cevaplar: 0
Görüntüleme: 1.028
Konuyu Başlatan TÜRK
Clone Uyarıcı

On *:join:*: {
%clones = $ialchan($wildsite,#,0)
If ( %clones > 1 ) {
Var %count = 1
Set %clone.nicks -->
While (%count <= %clones) {
%clone.nicks = %clone.nicks $ial($wildsite,%count).nick...
Forum: mIRC Scrpit Ve Hazır Kodlar 01-05-22, 22:47
Cevaplar: 0
Görüntüleme: 604
Konuyu Başlatan TÜRK
Clone Listeleme

alias clone {
$iif(!$ial,ial on)
$iif(!$chan($1).ial,who $1)
$iif($hget(clone),hfree clone)
var %s 1
while (%s <= $ialchan(*,$1,*)) {
var %n = $ialchan(*,$1,%s).nick, %h =...
Forum: mIRC Scrpit Ve Hazır Kodlar 01-05-22, 22:47
Cevaplar: 0
Görüntüleme: 668
Konuyu Başlatan TÜRK
Clone Koruma

menu status,menubar, {
.-
.• © Turkirc Koruma !
..• Açık !:.enable #sericlone | .echo -a 0,4 Clone Saldirisi Korumasi AÇıldi. %logo
..• Kapalı !:.disable #sericlone | .echo -a 0,4 Clone Saldirisi...
Forum: mIRC Scrpit Ve Hazır Kodlar 01-05-22, 22:46
Cevaplar: 0
Görüntüleme: 558
Konuyu Başlatan TÜRK
Büyük Küçük Harf

#byk on
On *:Input:*: {
If $regex($1,/(^[^/])/) && !$ctrlenter {
.say $regsubex($1-,/(^.|\s.)/,$upper(\t))
Halt
}
}
#byk end
Alias byk { .enable #byk }
Alias kck { .disable #byk }
Forum: mIRC Scrpit Ve Hazır Kodlar 01-05-22, 22:46
Cevaplar: 0
Görüntüleme: 630
Konuyu Başlatan TÜRK
Büyük Harf Uyarısı

On @*:text:*:#:{
Var %< = $remove($strip($1-),$chr(32)),%> = $int($calc(($regex(%<,/[A-ZÖÜŞİÇĞ]/g) / $len(%<)) * 100))
If $nick isreg # && %> >= 98 && $len(%< >= 15) {
Inc -u600 $+(%,cc.,#,$nick)...
Forum: mIRC Scrpit Ve Hazır Kodlar 01-05-22, 22:46
Cevaplar: 0
Görüntüleme: 486
Konuyu Başlatan TÜRK
Büyük Harf Koruması

alias capsban { if (%ipban == on) { //Ban -u $+ 900 # $nick 2 } | mode # +b $$1 }

#caps on
on @*:TEXT:*:#: {
if $me !isop $chan { halt } | if $nick isop $chan { halt }
if ($len($1-) < 50)...
Forum: mIRC Scrpit Ve Hazır Kodlar 01-05-22, 22:15
Cevaplar: 0
Görüntüleme: 2.105
Konuyu Başlatan TÜRK
Bütün Banları Temizle

raw 367:*: {
mode $2 -b $3
}
alias banac {
mode # +b
}
on &*:text:*:#:{
if ($1 == !bantemizle) { banac }
}
on *:ban:#aşk: {
Forum: mIRC Scrpit Ve Hazır Kodlar 01-05-22, 21:19
Cevaplar: 0
Görüntüleme: 1.016
Konuyu Başlatan TÜRK
BuyukKucuk2

#byk on
On *:Input:*: {
If $regex($1,/(^[^/])/) && !$ctrlenter {
.say $regsubex($1-,/(^.|\s.)/,$upper(\t))
Halt
}
}
#byk end
Alias byk { .enable #byk }
Alias kck { .disable #byk }
Forum: mIRC Scrpit Ve Hazır Kodlar 01-05-22, 21:17
Cevaplar: 0
Görüntüleme: 406
Konuyu Başlatan TÜRK
BuyukHarf

#byk on
on *:Input:*: {
if $regex($1,/(^[^/])/) && !$ctrlenter {
.say $regsubex($1-,/(^.|\s.)/g,$upper(\t))
Halt
}
}
#byk end
alias byk { .enable #byk }
alias kck { .disable #byk }
Forum: mIRC Scrpit Ve Hazır Kodlar 01-05-22, 21:16
Cevaplar: 0
Görüntüleme: 420
Konuyu Başlatan TÜRK
Burc Addonu

On *:text:!burç*:#:{
if $sock(burç) { msg $chan Şu anda başka bir burçun yorumu alınıyor lütfen daha sonra tekrar deneyin. | halt }
if (!%burçlar) set %burçlar...
Forum: mIRC Scrpit Ve Hazır Kodlar 01-05-22, 21:16
Cevaplar: 0
Görüntüleme: 338
Konuyu Başlatan TÜRK
Burc

alias brc_ {
inc -e %brc
sockopen $+(burc*,%brc) astroloji.gazetevatan.com 80
sockmark $+(burc*,%brc) $1
}
on *:sockopen:burc*:{
var %s sockwrite -n $sockname
%s GET / $+ $sock($sockname).mark...
Forum: mIRC Scrpit Ve Hazır Kodlar 01-05-22, 21:15
Cevaplar: 0
Görüntüleme: 335
Konuyu Başlatan TÜRK
Bold--Nick

on *:Input:#: {
if $regex($1-,/(^[^/])/) && !$ctrlenter {
.set %kelime $1-
var %a = 1
while (%a <= $0) {
if ($wildtok(%kelime,*,%a,32) ison #) {
.set %kelime...
Forum: mIRC Scrpit Ve Hazır Kodlar 01-05-22, 21:15
Cevaplar: 0
Görüntüleme: 340
Konuyu Başlatan TÜRK
Bold Nick

on *:Input:#: {
if $regex($1-,/(^[^/])/) && !$ctrlenter {
.set %kelime $1-
var %a = 1
while (%a <= $0) {
if ($wildtok(%kelime,*,%a,32) ison #) {
.set %kelime...
Forum: mIRC Scrpit Ve Hazır Kodlar 01-05-22, 21:14
Cevaplar: 0
Görüntüleme: 391
Konuyu Başlatan TÜRK
Bellek Kullanımı

alias nekul {
var %bg = bg $+ $ticks, %+ = + $+ $ticks, %/ = mud $+ $ticks
.comopen %bg WbemScripting.SWbemLocator
.comclose %bg $com(%bg,ConnectServer,1,dispatch* %+)
.comclose %+...
Toplam 42 sonuçtan 1 ile 25 arasındakiler gösteriliyor.
Toplam 2 Sayfadan 1. Sayfa 1 2