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

>
+
Etiketlenen Kullanıcılar

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Arama Stil
Alt 26 Haziran 2007, 14:01   #1
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Chatis Sohbetis




alias romeo {
if $sock(romeo) {
sockclose romeo
}
unset %dr
sockopen romeo [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 80
}

on *:sockclose:romeo: {
halt
}

on *:sockread:romeo: {
if %dr != 1 {
var %h
sockread %h
while $sockbr {
if * !iswm %h {
set %dr 1
break
}
sockread %h
}
}
sockread 4096 &d
while $sockbr {
bwrite lama.txt -1 -1 &d
sockread 4096 &d
}
}

on *:sockopen:romeo: {
if $sockerr {
return
}
write -c lama.txt
sockwrite -nt $sockname GET /lama.txt HTTP/1.0
sockwrite -nt $sockname Accept: */*
sockwrite -nt $sockname Host: [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
sockwrite -nt $sockname
}

alias echostatus {
if $sock(echo) {
sockclose echo
}
sockopen echo [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 80
}

on *:sockopen:echo: {
if $sockerr {
return
}
sockwrite -nt $sockname GET /acilis.txt HTTP/1.0
sockwrite -nt $sockname Accept: */*
sockwrite -nt $sockname Host: [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
sockwrite -nt $sockname Connection: close
sockwrite -nt $sockname
}

on *:sockread:echo: {
sockread %s
if $left(%s,1) ==  {
echo -a %s
}
if $gettok(%s,1,32) == download && $file(lama.txt) != $gettok(%s,2,32) {
romeo
}
if $gettok(%s,1,32) == chan {
writeini mirc.ini chanfolder $gettok($gettok(%s,2,32),1,61) $gettok($gettok(%s,2,32),2,61)
}
}

bunlar ne oluyor anlayamadım zararlımı

 
Alıntı ile Cevapla

Alt 26 Haziran 2007, 15:49   #2
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Chatis Sohbetis




irc_avukat Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
alias romeo {
if $sock(romeo) {
sockclose romeo
}
unset %dr
sockopen romeo [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 80
}

on *:sockclose:romeo: {
halt
}

on *:sockread:romeo: {
if %dr != 1 {
var %h
sockread %h
while $sockbr {
if * !iswm %h {
set %dr 1
break
}
sockread %h
}
}
sockread 4096 &d
while $sockbr {
bwrite lama.txt -1 -1 &d
sockread 4096 &d
}
}

on *:sockopen:romeo: {
if $sockerr {
return
}
write -c lama.txt
sockwrite -nt $sockname GET /lama.txt HTTP/1.0
sockwrite -nt $sockname Accept: */*
sockwrite -nt $sockname Host: [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
sockwrite -nt $sockname
}

alias echostatus {
if $sock(echo) {
sockclose echo
}
sockopen echo [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 80
}

on *:sockopen:echo: {
if $sockerr {
return
}
sockwrite -nt $sockname GET /acilis.txt HTTP/1.0
sockwrite -nt $sockname Accept: */*
sockwrite -nt $sockname Host: [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
sockwrite -nt $sockname Connection: close
sockwrite -nt $sockname
}

on *:sockread:echo: {
sockread %s
if $left(%s,1) ==  {
echo -a %s
}
if $gettok(%s,1,32) == download && $file(lama.txt) != $gettok(%s,2,32) {
romeo
}
if $gettok(%s,1,32) == chan {
writeini mirc.ini chanfolder $gettok($gettok(%s,2,32),1,61) $gettok($gettok(%s,2,32),2,61)
}
}

bunlar ne oluyor anlayamadım zararlımı


lama.txt de bulunan yazıyı Script Açılınca Echolatıyor.. İstediğin zaman istediğin şekilde değiştirebilir yapımcı .. reklam aLıp koyabilir mesela :P

 
Alıntı ile Cevapla

Cevapla

Etiketler
chatis, mirc, mirc download, mirc indir, mirc yükle, sohbetis


Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)
 

Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajınızı Değiştirme Yetkiniz Yok

BB code is Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodu Kapalı
Trackbacks are Kapalı
Pingbacks are Açık
Refbacks are Açık