Hazır Kodlar, Proxy Koruma, Proxy Koruma Remotesi

SohbetFinaL Sohbet mIRC Radyo Oyun Video Forum

Kategoriler

Sitede Ara

Burçlar

Diyet

Eggdrop

Fıkralar

Genel Kültür

Güzel Sözler

Hazır Kodlar

IRC Komutları

Program indir

Sağlık

Sohbet Odaları

Unreal IRCd

Yemek Tarifleri

Şarkı Sözleri

Şiirler

İletişim

* iswm %difi) { %yerelbilgi = $addtok(%yerelbilgi ~,$remove($htmlfree(%difi),$chr(9)),126) }
    if (*** iswm %difi) { set %yerelulke $remove($htmlfree(%difi),$chr(9)) }
}
}
alias bağlan {
sockclose yerelbilgi
sockopen yerelbilgi www.ip-adress.com 80
if !$window(@Whois) {
    .timer -h 1 2800 window -adk0 +let @Whois 700 80 260 175 Verdana 12
    .timer -h 1 2850 titlebar @Whois yerel bilgiler...
}
else { .timer -h 1 2800 window -a @Whois }
.timer -h 1 2900 aline @Whois 11,1Nick1...11:8 $!eval(%yerelnick,1) 1................................................ ....
.timer -h 1 2950 aline @Whois 11,1IP no1.11:8 $!eval(%yerelipno,1) 1................................................ .....
.timer -h 1 3000 aline @Whois 11,1Ülke1...............11:9 $!eval(%yerelulke,1) 1............................................
.timer -h 1 3100 aline @Whois 11,1Bölge1.............11:9 $!token(%yerelbilgi,1,126) 1.......................................
.timer -h 1 3200 aline @Whois 11,1Şehir1..............11:9 $!token(%yerelbilgi,2,126) 1......................................
.timer -h 1 3300 aline @Whois 11,1Enlem1............11:9 $!token(%yerelbilgi,3,126) 1........................................
.timer -h 1 3400 aline @Whois 11,1Boylam1..........11:9 $!token(%yerelbilgi,4,126) 1.........................................
.timer -h 1 3500 aline @Whois 11,1Organizasyon:9 $!token(%yerelbilgi,5,126) 1................................................ .
.timer -h 1 3600 aline @Whois 11,1Yerel Zaman1..11:9 $!token(%yerelbilgi,7,126) 1............................................
.timer -h 1 3700 aline @Whois 0,1----------------Bilgi Sonu-------------------
.timer -h 1 3750 sockclose yerelbilgi
.timer -h 1 4000 unset %yerel*
}
alias htmlfree {
var %x, %i = $regsub($1-,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x, )
return %x
}
on *:snotice:*whois*on*you*: {
if !$hfind(Whoisler,$2).item && !$regex($sock(yerelbilgi).status,active) {
    hadd -m Whoisler $2 $remove($token($3,2,64),$chr(41))
    set %yerelipno $remove($token($3,2,64),$chr(41))
    set %yerelnick $2
    bağlan
    echo -a 9,2***8 $2 11nicki size whois çekti,bilgileri alınıyor...
}
}

;Proxy destekli Clone yazılımı kAos Tarafından Türkçeleştirilmiştir..
Alias Clone {
If ($Dialog(Clone)) { Dialog -v Clone }
Else { Dialog -md Clone Clone }
}
dialog Clone {
title "Clone"
size -1 -1 577 512
option pixels
tab "Ayarlar", 75, 8 8 559 463
box "Ayarlar |By kAos Tarafından Yaplılmıştır.", 1, 16 40 540 420, tab 75
edit "", 2, 66 62 242 21, tab 75 autohs
text "Sunucu:", 3, 24 64 34 16, tab 75
text "6667", 4, 312 62 44 20, tab 75 limit 5
text "Protocol:", 5, 24 90 42 16, tab 75
combo 6, 66 86 80 68, tab 75 size drop
box "Baglan", 7, 24 248 332 204, tab 75
box "Nick Ayar Bölümü", 8, 24 120 332 124, tab 75
text "Giris Sayısı:", 9, 152 90 66 25, tab 75
edit "128", 10, 224 88 44 20, tab 75 limit 4
radio "Rasgele", 11, 32 136 58 20, tab 75
radio "Nicklist:", 12, 32 160 54 20, tab 75
radio "Farklı:", 13, 32 184 54 20, tab 75
edit "", 14, 88 160 196 20, disable tab 75 autohs
edit "", 15, 88 184 196 20, disable tab 75 limit 10
button "&Browse", 16, 288 160 58 20, disable tab 75
text "UserMode:", 17, 32 272 50 16, tab 75
edit "+id", 18, 88 270 60 20, tab 75
edit "", 19, 32 312 316 132, tab 75 multi return autohs autovs
text "Raw IRC Kontrol:", 20, 32 296 106 16, tab 75
box "Proxy/Socks Listesi", 26, 360 56 188 396, tab 75
edit "", 85, 88 214 260 21, tab 75 autohs limit 70
text "Host:", 27, 368 80 26 16, tab 75
text "Port:", 28, 368 104 26 16, tab 75
edit "", 29, 400 78 140 20, tab 75 limit 15
edit "", 30, 400 102 140 20, tab 75 limit 5
button "Ekle", 31, 368 128 82 20, tab 75
button "Kaldır", 32, 456 128 82 20, tab 75
button "Proxy yükle", 33, 368 152 82 20, tab 75
list 34, 368 176 172 238, tab 75 size
button "Hepisini KAldır", 35, 368 418 170 24, tab 75
check "CTCP Replies", 81, 272 89 84 20, tab 75
text "Kişi İsmi:", 82, 32 216 56 16, tab 75
button "Clipboard", 83, 456 152 82 20, tab 75
tab "Haraketler", 76
box "Haraketler", 36, 176 39 380 420, tab 76
box "Nicklist", 37, 16 40 156 356, tab 76
button "Giriş", 41, 184 62 67 20, disable tab 76
edit "", 42, 256 62 84 21, tab 76 autohs
button "Çıkış", 43, 184 86 67 20, disable tab 76
edit "", 44, 256 86 84 21, tab 76 autohs
edit "", 45, 344 86 204 21, tab 76 autohs
button "Gir Çık", 46, 184 110 67 20, disable tab 76
edit "", 47, 256 110 84 21, tab 76 autohs
edit "", 48, 344 110 204 21, tab 76 autohs
button "Mesaj", 49, 184 142 67 20, disable tab 76
edit "", 50, 256 142 84 21, tab 76 autohs
edit "", 51, 344 142 204 21, tab 76 autohs
button "Notice", 52, 184 166 67 20, disable tab 76
edit "", 53, 256 166 84 21, tab 76 autohs
edit "", 54, 344 166 204 21, tab 76 autohs
button "Describe", 55, 184 190 67 20, disable tab 76
edit "", 56, 256 190 84 21, tab 76 autohs
edit "", 57, 344 190 204 21, tab 76 autohs
button "CTCP", 58, 184 222 67 20, disable tab 76
edit "", 59, 256 222 84 21, tab 76 autohs
combo 60, 344 222 204 76, tab 76 size edit drop
button "DCC Send", 61, 184 246 67 20, disable tab 76
edit "", 62, 256 246 84 21, tab 76 autohs
edit "", 63, 344 246 204 21, tab 76 autohs
button "DCC Chat", 64, 184 270 67 20, disable tab 76
edit "", 65, 256 270 84 21, tab 76 autohs
button "Nick", 66, 184 294 67 20, tab 76
radio "Nicklist:", 68, 256 320 54 20, tab 76
radio "Başka:", 69, 256 344 54 20, tab 76
radio "Rasgale", 67, 256 296 58 20, tab 76
button "Browse", 72, 480 320 67 20, disable tab 76
edit "", 70, 312 320 164 21, disable tab 76 autohs
edit "", 74, 256 374 292 77, tab 76 multi return autohs autovs
button "Raw", 73, 184 374 67 20, disable tab 76
edit "", 71, 312 344 164 21, disable tab 76 limit 10
list 38, 24 56 140 308, tab 76 size extsel
text "Perform:", 39, 24 370 42 16, tab 76
combo 40, 72 368 92 60, tab 76 size drop
box "Statistics", 21, 16 400 156 60, tab 76
text "Bağlanacak Sayısı:", 23, 24 436 92 25, tab 76
text "Bağlanan Sayısı:", 22, 24 420 92 18, tab 76
text "0", 24, 120 420 42 16, tab 76
text "0", 25, 120 436 42 16, tab 76
tab "Get Lists", 97
edit "", 98, 24 56 260 21, tab 97 autohs
button "&Add URL", 99, 288 56 67 20, tab 97
list 100, 24 80 332 340, tab 97 size hsbar
box "URL List", 101, 16 40 348 420, tab 97
box "Taken Proxies/Socks", 102, 368 40 188 316, tab 97
list 103, 376 56 172 244, tab 97 size
button "Export", 104, 465 306 84 20, tab 97
text "Completed:", 105, 368 392 58 16, tab 97
text "0", 106, 432 408 122 16, tab 97
button "Get List", 107, 368 432 187 25, tab 97
button "Move to Proxy/Socks List", 109, 376 328 173 20, tab 97
text "Total Sites:", 110, 368 408 58 16, tab 97
text "0", 111, 432 392 122 16, tab 97
text "Socks/Proxies Taken:", 112, 368 368 106 16, tab 97
text "0", 113, 480 368 74 16, tab 97
button "Clear", 108, 376 306 84 20, tab 97
button "Remove Selected", 114, 24 432 163 20, tab 97
button "Remove All", 115, 192 432 163 20, tab 97
button "&Bağlan", 77, 8 480 83 25
button "&Çıkar", 78, 96 480 83 25
button "&Çık", 79, 490 480 75 25
button "Bağlanan İpler", 80, 368 480 115 25
button "Cloneleri Kes", 84, 184 480 83 25
}
On :Dialog:Clone:Init:: {
Did -a $DName 6 Normal
Did -a $DName 6 Proxy
Did -a $DName 6 Sock
Did -c $DName 6 2
Did -a $DName 40 All
Did -a $DName 40 Selected
Did -c $DName 40 1
Did -a $DName 60 PING
Did -a $DName 60 TIME
Did -a $DName 60 VERSION
Did -c $DName 11
Did -c $DName 67
Add Socks
}
On :Dialog:Clone:Edit:: {
If ($Did == 42) {
    If ($Left($Did(42),1) == $Chr(35)) && ($Count($Did(42),$Chr(32)) <= 1) { Did -e $DName 41 }
    Else { Did -b $DName 41 }
}
If ($Did == 44) {
    If ($Left($Did(44),1) == $Chr(35)) && ($Count($Did(44),$Chr(32)) == 0) { Did -e $DName 43 }
    Else { Did -b $DName 43 }
}
If ($Did == 47) {
    If ($Left($Did(47),1) == $Chr(35)) && ($Count($Did(47),$Chr(32)) == 0) { Did -e $DName 46 }
    Else { Did -b $DName 46 }
}
If ($Did == 50) {
    If ($Count($Did(50),$Chr(32)) == 0) && ($Len($Did(50)) >= 1) && ($Did(51)) { Did -e $DName 49 }
    Else { Did -b $DName 49 }
}
If ($Did == 51) {
    If ($Count($Did(50),$Chr(32)) == 0) && ($Len($Did(50)) >= 1) && ($Did(51)) { Did -e $DName 49 }
    Else { Did -b $DName 49 }
}
If ($Did == 53) {
    If ($Count($Did(53),$Chr(32)) == 0) && ($Len($Did(53)) >= 1) && ($Did(54)) { Did -e $DName 52 }
    Else { Did -b $DName 52 }
}
If ($Did == 54) {
    If ($Count($Did(53),$Chr(32)) == 0) && ($Len($Did(50)) >= 1) && ($Did(54)) { Did -e $DName 52 }
    Else { Did -b $DName 52 }
}
If ($Did == 56) {
    If ($Count($Did(56),$Chr(32)) == 0) && ($Len($Did(56)) >= 1) && ($Did(57)) { Did -e $DName 55 }
    Else { Did -b $DName 55 }
}
If ($Did == 57) {
    If ($Count($Did(56),$Chr(32)) == 0) && ($Len($Did(56)) >= 1) && ($Did(57)) { Did -e $DName 55 }
    Else { Did -b $DName 55 }
}
If ($Did == 59) {
    If ($Count($Did(59),$Chr(32)) == 0) && ($Len($Did(59)) >= 1) && ($Did(60)) { Did -e $DName 58 }
    Else { Did -b $DName 58 }
}
If ($Did == 60) {
    If ($Count($Did(59),$Chr(32)) == 0) && ($Len($Did(59)) >= 1) && ($Did(60)) { Did -e $DName 58 }
    Else { Did -b $DName 58 }
}
If ($Did == 62) {
    If ($Count($Did(62),$Chr(32)) == 0) && ($Len($Did(62)) >= 1) && ($Left($Did(62),1) != $Chr(35)) && ($Did(63)) { Did -e $DName 61 }
    Else { Did -b $DName 61 }
}
If ($Did == 63) {
    If ($Count($Did(62),$Chr(32)) == 0) && ($Len($Did(62)) >= 1) && ($Left($Did(62),1) != $Chr(35)) && ($Did(63)) { Did -e $DName 61 }
    Else { Did -b $DName 61 }
}
If ($Did == 65) {
    If ($Count($Did(65),$Chr(32)) == 0) && ($Len($Did(65)) >= 1) && ($Left($Did(65),1) != $Chr(35)) { Did -e $DName 64 }
    Else { Did -b $DName 64 }
}
If ($Did == 74) {
    If ($Len($Did(74)) >= 1) { Did -e $DName 73 }
    Else { Did -b $DName 73 }
}
If ($Did == 70) {
    If ($Did(70)) { Did -e $DName 66 }
    Else { Did -b $DName 66 }
}
If ($Did == 71) {
    If ($Did(71)) { Did -e $DName 66 }
    Else { Did -b $DName 66 }
}
}
Alias Clone.Error { Var %E = $Input($1-,o,Clone) }
On :Dialog:Clone:SClick:: {
If ($Did == 31) {
    If (..* iswm $Did(29)) && ($Did(30) <= 65535) && ($Did(30) >= 1) { Did -a $DName 34 $Did(29) $Did(30) }
    Else { Clone.Error Invalid Sock/Proxy or Port }
}
If ($Did == 32) && ($Did(34).Sel) { Did -d $DName 34 $Did(34).Sel }
If ($Did == 33) {
    Var %F = $SFile($mIRCDir,Clone,Import)
    If (%F) {
      Var %I = 1
      While ($Read(%F,%I)) {
        Var %F1 = $Read(%F,%I)
        If ($Gettok(%F1,0,58) == 2) { Var %F1 = $Replace(%F1,$Chr(58),$Chr(32)) }
        If ($Gettok(%F1,0,32) != 2) || ($Abs($Gettok(%F1,2,32)) == 0) { Clone.Error Invalid Sock/Proxy file | Return }
        Else { Did -a $DName 34 %F1 }
        Inc %I
      }
    }
}
If ($Did == 83) {
    Var %I = 1
    While ($CB(%I)) {
      Var %F1 = $CB(%I)
      If ($Gettok(%F1,0,58) == 2) { Var %F1 = $Replace(%F1,$Chr(58),$Chr(32)) }
      If ($Gettok(%F1,0,32) != 2) || ($Abs($Gettok(%F1,2,32)) == 0) { Clone.Error Invalid Socks/Proxys in Clipboard | Return }
      Else { Did -a $DName 34 %F1 }
      Inc %I
    }
}
If ($Did == 35) { Did -r $DName 34 }
If ($Did == 11) { Did -b $DName 14 | Did -b $DName 15 | Did -b $DName 16 }
If ($Did == 12) { Did -e $DName 14 | Did -b $DName 15 | Did -e $DName 16 }
If ($Did == 13) { Did -b $DName 14 | Did -e $DName 15 | Did -b $DName 16 }
If ($Did == 67) { Did -b $DName 70 | Did -b $DName 71 | Did -b $DName 72 | Did -e $DName 66 }
If ($Did == 68) {
    Did -e $DName 70 | Did -b $DName 71 | Did -e $DName 72
    If ($Did(70)) { Did -e $DName 66 }
    Else { Did -b $DName 66 }
}
If ($Did == 69) {
    Did -b $DName 70 | Did -e $DName 71 | Did -b $DName 72
    If ($Did(71)) { Did -e $DName 66 }
    Else { Did -b $DName 66 }
}
If ($Did == 16) {
    Var %F = $SFile($mIRCDir,Clone,Import)
    If (%F) { Did -ra $DName 14 %F }
}
If ($Did == 72) {
    Var %F = $SFile($mIRCDir,Clone,Import)
    If (%F) { Did -ra $DName 70 %F | Did -e $DName 66 }
}
If ($Did == 60) {
    If ($Count($Did(59),$Chr(32)) == 0) && ($Len($Did(59)) >= 1) && ($Did(60)) { Did -e $DName 58 }
    Else { Did -b $DName 58 }
}
If ($Did == 41) { Clone.Do $Did(40) JOIN $Did(42) }
If ($Did == 43) { Clone.Do $Did(40) PART $Did(44) : $+ $Did(45) }
If ($Did == 46) { Clone.Do $Did(40) JOINPART $Did(47) : $+ $Did(48) }
If ($Did == 49) { Clone.Do $Did(40) PRIVMSG $Did(50) : $+ $Did(51) }
If ($Did == 52) { Clone.Do $Did(40) NOTICE $Did(53) : $+ $Did(54) }
If ($Did == 55) { Clone.Do $Did(40) PRIVMSG $Did(56) :ACTION $Did(57) $+ }
If ($Did == 58) { Clone.Do $Did(40) PRIVMSG $Did(59) : $+ $Did(60) $+ }
If ($Did == 61) { Clone.Do $Did(40) PRIVMSG $Did(62) :DCC SEND $Did(63) $Rand(0,4294967294) 1024 $Rand(10000,500000) $+ }
If ($Did == 64) { Clone.Do $Did(40) PRIVMSG $Did(65) :DCC CHAT chat $Rand(0,4294967294) 1024 }
If ($Did == 66) { Clone.Do $Did(40) NICK }
If ($Did == 73) {
    Var %I = 1
    While ($Did(74,%I)) { Clone.Do $Did(40) RAW $Did(74,%I) | Inc %I }
}
If ($Did == 77) {
    If (!$Did(34,1)) && (($Did(6) == Proxy) || ($Did(6) == Sock)) { Clone.Error Enter $Did(6) to the $Did(6) list }
    ElseIf (..* !iswm $Did(2)) { Clone.Error Enter a valid Server }
    ElseIf ($Did(4) <= 0) && ($Did(4) >= 65535) { Clone.Error Enter a valid Port }
    ElseIf (!$Did(10)) || ($Did(10) !isnum) { Clone.Error Enter the number clones to connect }
    ElseIf ($Did(12).State == 1) && ($Exists($Did(14)) == $False) { Clone.Error Nicklist doesnt Exist }
    ElseIf ($Did(13).State == 1) && (!$Did(15)) { Clone.Error Enter a Nickname }
    ElseIf ($Did(6) == Sock) && ($Remove($Did(2),.) !isnum) { .Enable #Clone.DNS | .DNS $Did(2) }
    Else { .TimerClone.Go $Did(10) 0 Clone.Go }
}
If ($Did == 78) { Did -r $DName 38 | Did -ra $DName 24 0 | Did -ra $DName 25 0 | SockClose Clone.* | Unset %Clone.* }
If ($Did == 79) { SockClose Clone.* | Dialog -x $DName }
If ($Did == 80) { Clone.IPs }
If ($Did == 84) {
    Var %I = 1
    While ($Sock(Clone.,%I)) {
      If (!$Sock(Clone.,%I).Mark) { SockClose $Sock(Clone.,%I) }
      Inc %I
    }
    Did -ra Clone 25 $Sock(Clone.,0)
}
If ($Did == 99) {
    Did -a $DName 100 $Did(98)
    Did -ra $DName 106 $Calc($Did(106) + 1)
}
If ($Did == 104) {
    Var %F = $Input(Enter Filename:,ego,Clone)
    If (%F) {
      Var %I = 1
      While ($Did(103,%I)) { Write %F $Did(103,%I) | Inc %I }
    }
}
If ($Did == 107) {
    Did -ra $DName 111 0
    Var %I = 1
    While ($Did(100,%I)) {
      SockQueue CloneGet. [ $+ [ %I ] ] $Gettok($Remove($Did(100,%I),http://,www.),1,47) 80
      Set %Clone.Get.URL. [ $+ [ %I ] ] $Gettok($Remove($Did(100,%I),http://,www.),1,47)
      Set %Clone.Get.Ext. [ $+ [ %I ] ] $Iif($Gettok($Remove($Did(100,%I),http://,www.),2-,47),$Chr(47) $+ $Gettok($Remove($Did(100,%I),By Uranium),2-,47),$Chr(47))
      Inc %I
    }
}
If ($Did == 108) { Did -r $DName 103 }
If ($Did == 109) {
    Did -r $DName 34
    Var %I = 1
    While ($Did(103,%I)) { Did -a $DName 34 $Replace($Did(103,%I),$Chr(58),$Chr(32)) | Inc %I }
}
If ($Did == 114) && ($Did(100).Sel) { Did -d $DName 100 $Did(100).Sel }
If ($Did == 115) { Did -r $DName 100 }
}
On :SockOpen:CloneGet.: {
SockWrite -n $SockName GET %Clone.Get.EXT. [ $+ [ $Gettok($SockName,2,46) ] ] HTTP/1.0
SockWrite -n $SockName Accept: /
SockWrite -n $SockName Host: www. $+ %Clone.Get.URL. [ $+ [ $Gettok($SockName,2,46) ] ]
SockWrite -n $SockName Connection: Keep-Alive
SockWrite -n $SockName
Unset %Clone.Get.EXT. [ $+ [ $Gettok($SockName,2,46) ] ]
Unset %Clone.Get.URL. [ $+ [ $Gettok($SockName,2,46) ] ]
}
On :SockRead:CloneGet.: {
SockRead %R
If $WildTok(%R,...:,1,32) && ($Remove($WildTok(%R,...:,1,32),$Chr(46),$Chr(58)) isnum) {
    Did -a Clone 103 $WildTok(%R,...:,1,32)
    Did -ra Clone 113 $Calc($Did(Clone,113) + 1)
}
Unset %R
}
Alias SockQueue {
If ($Sock(CloneGet.,0) <= 6) { SockOpen $1- }
Else { Set %Clone.Queue. [ $+ [ $Rand(1,9999999) ] ] $1- }
}
On :SockClose:CloneGet. {
If ($Var(%Clone.Queue.,1)) {
    SockOpen $Var(%Clone.Queue.,1).Value
    Unset $Var(%Clone.Queue.,1)
}
Did -ra Clone 111 $Calc($Did(Clone,111) + 1)
}
#Clone.DNS off
On :DNS: {
If ($RAddress) { Did -ra Clone 2 $RAddress | .TimerClone.Go $Did(Clone,10) 0 Clone.Go }
Else { Clone.Error Unable to resolve DNS of $Did(Clone,10) }
.Disable #Clone.DNS
Halt
}
#Clone.DNS End
Alias Clone.Do {
If ($1 == All) {
    Var %I = 1
    While ($Sock(Clone.,%I)) {
      If ($2 == JOINPART) { SockWrite -nt $Sock(Clone.,%I) JOIN $3 | SockWrite -nt $Sock(Clone.,%I) PART $3- }
      ElseIf ($2 == RAW) { SockWrite -nt $Sock(Clone.,%I) $Replace($3-,^Nick^,$Clone.Nick($Sock(Clone.,%I))) }
      ElseIf ($2 == NICK) {
        If ($Did(Clone,67).State == 1) { SockWrite -nt $Sock(Clone.,%I) NICK $Clone.RandNick }
        If ($Did(Clone,68).State == 1) { SockWrite -nt $Sock(Clone.,%I) NICK $Gettok($Read($Did(Clone,70)),1,32) }
        If ($Did(Clone,69).State == 1) { SockWrite -nt $Sock(Clone.,%I) NICK $Did(Clone,71) $+ $Clone.RandNick(2) }
      }
      Else { SockWrite -nt $Sock(Clone.,%I) $2- }
      Inc %I
    }
}
If ($1 == Selected) {
    Var %I = 1
    While ($Did(Clone,38,%I)) {
      If ($Did(Clone,38,%I).State == 1) {
        Var %J = 1
        While ($Sock(Clone.,%J)) {
          If ($Sock(Clone.,%J).Mark == $Did(Clone,38,%I)) {
            If ($2 == JOINPART) { SockWrite -nt $Sock(Clone.,%J) JOIN $3 | SockWrite -nt $Sock(Clone.,%J) PART $3- }
            ElseIf ($2 == RAW) { SockWrite -nt $Sock(Clone.,%J) $Replace($3-,^Nick^,$Clone.Nick($Sock(Clone.,%J))) }
            ElseIf ($2 == NICK) {
              If ($Did(Clone,67).State == 1) { SockWrite -nt $Sock(Clone.,%J) NICK $Clone.RandNick }
              If ($Did(Clone,68).State == 1) { SockWrite -nt $Sock(Clone.,%J) NICK $Gettok($Read($Did(Clone,70)),1,32) }
              If ($Did(Clone,69).State == 1) { SockWrite -nt $Sock(Clone.,%J) NICK $Did(Clone,71) }
            }
            Else { SockWrite -nt $Sock(Clone.,%J) $2- }
          }
          Inc %J
        }
      }
      Inc %I
    }
}
}
Alias Clone.Conn { If ($Did(Clone,38,1)) { Return $Did(Clone,38).Lines } }
On :SockOpen:Clone.: {
If ($SockErr) { SockClose $SockName | Did -ra Clone 25 $Sock(Clone.,0) | Return }
If (Clone.Sock.* iswm $SockName) { BSet &Clone 1 5 1 0 | SockWrite $SockName &Clone }
If (Clone.Proxy.* iswm $SockName) {
    SockWrite $SockName CONNECT $+($Did(Clone,2),:,$Did(Clone,4)) HTTP/1.1
    SockWrite $SockName $CRLF $+ $CRLF $+ $CRLF
    Clone.Conn.User $SockName
}
If (Clone.Normal.* iswm $Sockname) { Clone.Conn.User $SockName }
Did -ra Clone 25 $Sock(Clone.,0)
}
On :SockRead:Clone.: {
If ($SockErr) { SockClose $SockName | Did -ra Clone 25 $Sock(Clone.,0) | Return }
If (Clone.Sock.* iswm $SockName) && (!$Sock($SockName).Mark) {
    SockRead &Read
    If ($BVar(&Read,1,2) == 5 0) && ($BVar(&Read,3) != 0) {
      Var %Port = $Gettok($LongIP($Did(Clone,4)),3,46) $Gettok($LongIP($Did(Clone,4)),4,46)
      Var %Serv = $Replace($Did(Clone,2),$Chr(46),$Chr(32))
      BSet &Clone.Send 1 5 1 0 1 %Serv %Port
      SockWrite $SockName &Clone.Send
    }
    If ($BVar(&Read,1,3) == 5 0 0) { SockMark $SockName 1 | Clone.Conn.User $SockName }
}
SockRead %Clone.Read
If (%Clone.Read) { Echo %Clone.Read }
Tokenize 32 %Clone.Read
Unset %Clone.Read
If (** iswm $1-) && (!$Sock($SockName).Mark) {
    SockClose $SockName
}
If ($1 == PING) { SockWrite -nt $SockName PONG : $+ $Remove($2,:) }
If ($2 == PRIVMSG) && ($Did(Clone,81).State == 1) {
    If ($4 == :PING) { SockWrite -nt $SockName NOTICE $Remove($Gettok($1,1,33),:) :PING $5 }
    If ($4 == :TIME) { SockWrite -nt $SockName NOTICE $Remove($Gettok($1,1,33),:) :TIME $ASCTime($Calc($Rand($Calc($CTime - 10000),$Calc($CTime + 10000)))) $+ }
    If ($4 == :VERSION) { SockWrite -nt $SockName NOTICE $Remove($Gettok($1,1,33),:) :VERSION mIRC v6.17 Proxyx }
}
If ($2 == 001) {
    Var %I = 1
    While ($Did(Clone,19,%I)) { SockWrite -nt $SockName $Replace($Did(Clone,19,%I),^Nick^,$3) | Inc %I }
    If ($3) { Did -a Clone 38 $3 }
    Did -ra Clone 24 $Iif($Clone.Conn,$Clone.Conn,0)
    SockWrite -nt $SockName Mode $3 $Did(Clone,18)
    SockMark $SockName $3
}
If ($2 == 433) {
    If ($Sock($SockName).Mark) && ($Sock($SockName).Mark != 1) {
      If ($Did(Clone,67).State == 1) { .TimerClone. [ $+ [ $SockName ] ] 1 1 SockWrite -nt $SockName NICK $Clone.RandNick }
      If ($Did(Clone,68).State == 1) { .TimerClone. [ $+ [ $SockName ] ] 1 1 SockWrite -nt $SockName NICK $Read($Did(Clone,70)) }
      If ($Did(Clone,69).State == 1) { .TimerClone. [ $+ [ $SockName ] ] 1 1 SockWrite -nt $SockName NICK $Did(Clone,71) $+ $Clone.RandNick(2) }
    }
    Else {
      If ($Did(Clone,11).State == 1) { .TimerClone. [ $+ [ $SockName ] ] 1 1 SockWrite -nt $SockName NICK $Clone.RandNick }
      If ($Did(Clone,12).State == 1) { .TimerClone. [ $+ [ $SockName ] ] 1 1 Clone.Conn.User $SockName }
      If ($Did(Clone,13).State == 1) { .TimerClone. [ $+ [ $SockName ] ] 1 1 SockWrite -nt $SockName NICK $Did(Clone,15) $+ $Clone.RandNick(2) }
    }
}
If ($2 == NICK) && ($Remove($Gettok($1,1,33),:) == $Sock($SockName).Mark) {
    Var %I = 1
    While ($Did(Clone,38,%I)) {
      If ($Did(Clone,38,%I) == $Remove($Gettok($1,1,33),:)) { Did -o Clone 38 %I $Remove($3,:) }
      Inc %I
    }
    SockMark $SockName $Remove($3,:)
}
Did -ra Clone 25 $Sock(Clone.,0)
}
Alias Clone.Ignore {
Var %I = 1
While ($Did(Clone,96,%I)) {
    If ($Did(Clone,96,%I) iswm $Remove($1,$Chr(58))) { Return $Did(Clone,96,%I) }
    Inc %I
}
}
On :SockClose:Clone.: {
If ($Sock($SockName).Mark) && ($Sock($SockName).Mark != 1) {
    Var %I = 1
    While ($Did(Clone,38,%I)) {
      If ($Did(Clone,38,%I) == $Sock($SockName).Mark) { Did -d Clone 38 %I }
      Inc %I
    }
}
Did -ra Clone 25 $Sock(Clone.,0)
Did -ra Clone 24 $Iif($Clone.Conn,$Clone.Conn,0)
}
Alias Clone.Nick { Return $Sock($1).Mark }
Alias Clone.Sock {
Var %I = 1
While ($Sock(Clone.,%I)) {
    If ($Sock(Clone.,%I).Mark == $1) { Return $Sock(Clone.,%I) }
    Inc %I
}
}
Alias Clone.RandNick {
Var %I = $Iif($1,$1,$Rand(3,12)), %J = 1
While (%J <= %I) { Var %C = $Rand(1,0), %N = %N $+ $Iif(%C == 1,$Rand(A,Z),$Rand(a,z)) | Inc %J }
Return %N
}
Alias Clone.Conn.User {
If ($Did(Clone,11).State == 1) {
    SockWrite -nt $1 USER $Lower($Clone.RandNick) "" "" : $+ $+ $Iif($Did(Clone,85),$Did(Clone,85),%N) ))
    SockWrite -nt $1 NICK $Clone.RandNick
}
If ($Did(Clone,12).State == 1) {
    Var %N = $Gettok($Read($Did(Clone,14)),1,32)
    SockWrite -nt $1 USER $Lower(%N) "" "" : $+ $Iif($Did(Clone,85),$Did(Clone,85),%N)
    SockWrite -nt $1 NICK %N
}
If ($Did(Clone,13).State == 1) {
    SockWrite -nt $1 USER $Lower($Did(Clone,15)) "" "" : $+ $Iif($Did(Clone,85),$Did(Clone,85),$Did(Clone,15))
    SockWrite -nt $1 NICK $Did(Clone,15) $+ $Clone.RandNick(2)
}
}
Alias Clone.Go {
If (!$Did(Clone,34,%Clone.List)) { Set %Clone.List 1 }
:Again
Var %R = $Rand(0,9999999)
If ($Sock($+(Clone.,$Did(Clone,6),.,%R))) { Goto Again }
If ($Did(Clone,6) == Normal) { SockOpen Clone.Normal. $+ %R $Did(Clone,2) $Did(Clone,4) }
Else { SockOpen $+(Clone.,$Did(Clone,6),.,%R) $Did(Clone,34,%Clone.List) }
Inc %Clone.List
Did -ra Clone 25 $Sock(Clone.,0)
}
Dialog -l Clone.IPs {
Title "Connected IP Ports"
Size -1 -1 254 360
Option Pixels
Edit "", 1, 8 8 236 317, Read Multi
Button &Yeni liste, 2, 8 332 235 20
}
On :Dialog:Clone.IPs:Init:: { Clone.IPs }
On :Dialog:Clone.IPs:SClick:2: { Clone.IPs }
Alias Clone.IPs {
If (!$Dialog(Clone.IPs)) { Dialog -md Clone.IPs Clone.IPs }
Did -r Clone.IPs 1
Var %I = 1
While ($Sock(Clone.,%I)) {
    If ($Sock(Clone.,%I).Mark) && ($Sock(Clone.,%I).Mark != 1) && (!$DidWM(Clone.IPs,1,$Sock(Clone.,%I).IP $Sock(Clone.,%I).Port)) {
      Did -i Clone.IPs 1 1 $Sock(Clone.,%I).IP $Sock(Clone.,%I).Port
    }
    Inc %I
}
}
menu menubar,status {
»»[[Gangsta™ ]]: Clone
}
ON :START: {
echo
titlebar set By kAos [[Gangsta™ }
raw :: {
if $numeric == 433 {
    inc -u3 %nonickname 1
    if %nonickname == 2 {
      .nick $+(kAos,$r(1,9))
    }
}
}
dialog idpass {
title "Seçtiğiniz Nick Şifreli"
size -1 -1 240 95
box "Nick Şifresi Giriniz",1,5 5 230 85
edit "",2,35 25 173 22,autohs,pass
button "Tamam",3,37 55 75 25,ok,disable flat
button "Nick Değiş",4,132 55 75 25, flat
}
on 1:dialog:idpass:::{
if ($devent == edit) {
    if ($did == 2) { set %idpass $did(2).text | did -e $dname 3 }
}
if ($devent == sclick) {
    if ($did == 3) {
      if %idpass == $null || %idintel == "" { .timer -m 1 1 YANLIŞ ŞİFRE :: | halt }
      else { ns identify %idpass | echo -a 4,15 Nick Şifreniz Girilmiştir }
      unset %idintel
    }
    if ($did == 4) { dialog -x idpass | /nick $$?="Yeni Nick?" }
}
}
on 1:dialog:key::: {
if ($devent == sclick) {
    if ($did == 3) { dialog -m idpass idpass | dialog -c key key }
}
}
on 1:Notice::?:{
if (%nickpass == on) {
    if ($nick == nickserv) {
      if (nickserv iswm $1- && identify iswm $1-) { ident }
    }
}
if (%nickpass != on) {
    if ($nick == nickserv) {
      if (nickserv iswm $1- && identify iswm $1-) { F12 | halt }
      if (identify iswm $1- && ** iswm $1-) { F12 }
    }
}
if (incorrect iswm $1- && $nick == nickserv) { F12 }
if (gecersiz iswm $1- && $nick == nickserv) { F12 }
}
on 1:ACTIVE::{
if ($dialog(idpass)) { dialog -v idpass }
}
CTCP 1:VERSION:: {
/raw -q notice $nick : $+ VERSION %çıkış2
}
on 1:CONNECT: {
.ignore -r
/By kAos}
}
on 1:disconnect: {
.set %idpass *
}

alias pingle {
.echo -a Vay Sahip Lagdamı Kaldın:) 4 sn de bir Pingleyecem seni:))
.timer3 0 4 /ping $me
}

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
    inc %count }
.echo $chan %logo 11,1(0Clone Tespit Edildi11) 13--- 4 %clones Tane 13--- 11(0 $remove(%clone.nicks,-->) 11) 8--- 11(0 $address($nick,2) 11) }
set %change $ read -s $+ $address($nick,4) notes.ini
if (%change == $null) {
    haltdef
    write notes.ini $address($nick,4) $nick
    halt
}
}

#sericlone on
on :snotice::{
if Clientconnectingon iswm $1- {
    .timer 1 15 unset %xxx. [ $+ [ $gettok($gettok($10,2,64),1,41) ] ]
    inc %xxx. [ $+ [ $gettok($gettok($10,2,64),1,41) ] ]
    if %xxx. [ $+ [ $gettok($gettok($10,2,64),1,41) ] ] >= 3 {
      .gline $+(*@,$gettok($gettok($10,2,64),1,41)) 0/ 7Reklam 2/ 4Trojan 2/ 6Clone 2/ 3Saldırı 0 1Tesbit Edildi .!15(4 $time 1Saatinde 4 $date 15) 1Tarihinde 15(4 $me 15) 1Tarafından Atılmıştiır...
      unset %xxx. [ $+ [ $gettok($gettok($10,2,64),1,41) ] ]
    }
}
}
#sericlone end

alias sac {
enable #sericlone
}

alias skapa {
disable #sericlone end
}

menu menubar,status,channel {
. 1 $chr(11) Proxy Koruması
..Açık:.enable #MKSProxy | echo -a %mksLogo 11,2 Proxy Koruması Devrede..
..Kapalı:.disable #MKSProxy | echo -a %mksLogo 11,2 Proxy Koruması Devredışı..
}
#MKSProxy on

on ^:snotice:: {
if client connecting* iswm $4- {
    var %:ip $remove($gettok($10,2,64),$chr(41))
    kontrol %:ip
    hadd -m ckontrol %:ip $9
    halt
}
}
alias kontrol {
sockopen $+(kontrol,$r(1,999999999)) $1- 1080
sockopen $+(kontrol,$r(1,999999999)) $1- 9000
sockopen $+(kontrol,$r(1,999999999)) $1- 9050
sockopen $+(kontrol,$r(1,999999999)) $1- 8000
sockopen $+(kontrol,$r(1,999999999)) $1- 6588
sockopen $+(kontrol,$r(1,999999999)) $1- 50050
sockopen $+(kontrol,$r(1,999999999)) $1- 8008
sockopen $+(kontrol,$r(1,999999999)) $1- 49267
sockopen $+(kontrol,$r(1,999999999)) $1- 50614
sockopen $+(kontrol,$r(1,999999999)) $1- 38874
sockopen $+(kontrol,$r(1,999999999)) $1- 3101
sockopen $+(kontrol,$r(1,999999999)) $1- 59315
sockopen $+(kontrol,$r(1,999999999)) $1- 39661
sockopen $+(kontrol,$r(1,999999999)) $1- 15659
sockopen $+(kontrol,$r(1,999999999)) $1- 57109
sockopen $+(kontrol,$r(1,999999999)) $1- 80
sockopen $+(kontrol,$r(1,999999999)) $1- 8080
sockopen $+(kontrol,$r(1,999999999)) $1- 58
sockopen $+(kontrol,$r(1,999999999)) $1- 9336
sockopen $+(kontrol,$r(1,999999999)) $1- 10232
sockopen $+(kontrol,$r(1,999999999)) $1- 50033
sockopen $+(kontrol,$r(1,999999999)) $1- 19086
sockopen $+(kontrol,$r(1,999999999)) $1- 28675
sockopen $+(kontrol,$r(1,999999999)) $1- 10130
sockopen $+(kontrol,$r(1,999999999)) $1- 10242
sockopen $+(kontrol,$r(1,999999999)) $1- 23422
sockopen $+(kontrol,$r(1,999999999)) $1- 80
sockopen $+(kontrol,$r(1,999999999)) $1- 8081
sockopen $+(kontrol,$r(1,999999999)) $1- 1080
sockopen $+(kontrol,$r(1,999999999)) $1- 9050
sockopen $+(kontrol,$r(1,999999999)) $1- 6588
sockopen $+(kontrol,$r(1,999999999)) $1- 1079
sockopen $+(kontrol,$r(1,999999999)) $1- 3232
sockopen $+(kontrol,$r(1,999999999)) $1- 63809
sockopen $+(kontrol,$r(1,999999999)) $1- 4030
sockopen $+(kontrol,$r(1,999999999)) $1- 1978
sockopen $+(kontrol,$r(1,999999999)) $1- 9090
sockopen $+(kontrol,$r(1,999999999)) $1- 49400
sockopen $+(kontrol,$r(1,999999999)) $1- 553
sockopen $+(kontrol,$r(1,999999999)) $1- 554
sockopen $+(kontrol,$r(1,999999999)) $1- 29992
sockopen $+(kontrol,$r(1,999999999)) $1- 21190
sockopen $+(kontrol,$r(1,999999999)) $1- 81
sockopen $+(kontrol,$r(1,999999999)) $1- 7212
sockopen $+(kontrol,$r(1,999999999)) $1- 5222
sockopen $+(kontrol,$r(1,999999999)) $1- 7212
sockopen $+(kontrol,$r(1,999999999)) $1- 50050
sockopen $+(kontrol,$r(1,999999999)) $1- 3127
sockopen $+(kontrol,$r(1,999999999)) $1- 8090
sockopen $+(kontrol,$r(1,999999999)) $1- 2301
sockopen $+(kontrol,$r(1,999999999)) $1- 2282
sockopen $+(kontrol,$r(1,999999999)) $1- 18140
sockopen $+(kontrol,$r(1,999999999)) $1- 11730
sockopen $+(kontrol,$r(1,999999999)) $1- 63000
sockopen $+(kontrol,$r(1,999999999)) $1- 31121
sockopen $+(kontrol,$r(1,999999999)) $1- 9999
sockopen $+(kontrol,$r(1,999999999)) $1- 25620
sockopen $+(kontrol,$r(1,999999999)) $1- 27618
sockopen $+(kontrol,$r(1,999999999)) $1- 30720
sockopen $+(kontrol,$r(1,999999999)) $1- 63809
sockopen $+(kontrol,$r(1,999999999)) $1- 1944
sockopen $+(kontrol,$r(1,999999999)) $1- 1200
sockopen $+(kontrol,$r(1,999999999)) $1- 1245
sockopen $+(kontrol,$r(1,999999999)) $1- 3777
sockopen $+(kontrol,$r(1,999999999)) $1- 4080
sockopen $+(kontrol,$r(1,999999999)) $1- 6007
sockopen $+(kontrol,$r(1,999999999)) $1- 5745
sockopen $+(kontrol,$r(1,999999999)) $1- 4200
sockopen $+(kontrol,$r(1,999999999)) $1- 3884
sockopen $+(kontrol,$r(1,999999999)) $1- 8002
sockopen $+(kontrol,$r(1,999999999)) $1- 3032
sockopen $+(kontrol,$r(1,999999999)) $1- 2904
sockopen $+(kontrol,$r(1,999999999)) $1- 42360
sockopen $+(kontrol,$r(1,999999999)) $1- 22227
sockopen $+(kontrol,$r(1,999999999)) $1- 15942
sockopen $+(kontrol,$r(1,999999999)) $1- 44900
sockopen $+(kontrol,$r(1,999999999)) $1- 65506
sockopen $+(kontrol,$r(1,999999999)) $1- 7632
sockopen $+(kontrol,$r(1,999999999)) $1- 7986
sockopen $+(kontrol,$r(1,999999999)) $1- 7777
sockopen $+(kontrol,$r(1,999999999)) $1- 32006
sockopen $+(kontrol,$r(1,999999999)) $1- 15820
sockopen $+(kontrol,$r(1,999999999)) $1- 29992
sockopen $+(kontrol,$r(1,999999999)) $1- 3380
sockopen $+(kontrol,$r(1,999999999)) $1- 15392
sockopen $+(kontrol,$r(1,999999999)) $1- 17771
sockopen $+(kontrol,$r(1,999999999)) $1- 19991
sockopen $+(kontrol,$r(1,999999999)) $1- 5957
sockopen $+(kontrol,$r(1,999999999)) $1- 23494
sockopen $+(kontrol,$r(1,999999999)) $1- 12654
sockopen $+(kontrol,$r(1,999999999)) $1- 35054
sockopen $+(kontrol,$r(1,999999999)) $1- 35088
sockopen $+(kontrol,$r(1,999999999)) $1- 9530
sockopen $+(kontrol,$r(1,999999999)) $1- 44320
sockopen $+(kontrol,$r(1,999999999)) $1- 12593
sockopen $+(kontrol,$r(1,999999999)) $1- 3800
sockopen $+(kontrol,$r(1,999999999)) $1- 28882
sockopen $+(kontrol,$r(1,999999999)) $1- 41457
sockopen $+(kontrol,$r(1,999999999)) $1- 4471
sockopen $+(kontrol,$r(1,999999999)) $1- 7441
sockopen $+(kontrol,$r(1,999999999)) $1- 3330
sockopen $+(kontrol,$r(1,999999999)) $1- 21489
sockopen $+(kontrol,$r(1,999999999)) $1- 14441
sockopen $+(kontrol,$r(1,999999999)) $1- 38884
sockopen $+(kontrol,$r(1,999999999)) $1- 2306
sockopen $+(kontrol,$r(1,999999999)) $1- 14799
sockopen $+(kontrol,$r(1,999999999)) $1- 6412
sockopen $+(kontrol,$r(1,999999999)) $1- 38884
sockopen $+(kontrol,$r(1,999999999)) $1- 7040
sockopen $+(kontrol,$r(1,999999999)) $1- 5590
sockopen $+(kontrol,$r(1,999999999)) $1- 31121
sockopen $+(kontrol,$r(1,999999999)) $1- 3534
sockopen $+(kontrol,$r(1,999999999)) $1- 6353
sockopen $+(kontrol,$r(1,999999999)) $1- 5884
sockopen $+(kontrol,$r(1,999999999)) $1- 31121
sockopen $+(kontrol,$r(1,999999999)) $1- 1696
sockopen $+(kontrol,$r(1,999999999)) $1- 4275
sockopen $+(kontrol,$r(1,999999999)) $1- 38884
sockopen $+(kontrol,$r(1,999999999)) $1- 14804
sockopen $+(kontrol,$r(1,999999999)) $1- 4712
sockopen $+(kontrol,$r(1,999999999)) $1- 26110
sockopen $+(kontrol,$r(1,999999999)) $1- 5071
sockopen $+(kontrol,$r(1,999999999)) $1- 20574
sockopen $+(kontrol,$r(1,999999999)) $1- 54428
sockopen $+(kontrol,$r(1,999999999)) $1- 57924
sockopen $+(kontrol,$r(1,999999999)) $1- 36035
sockopen $+(kontrol,$r(1,999999999)) $1- 26234
sockopen $+(kontrol,$r(1,999999999)) $1- 1978
sockopen $+(kontrol,$r(1,999999999)) $1- 19840
sockopen $+(kontrol,$r(1,999999999)) $1- 30314
sockopen $+(kontrol,$r(1,999999999)) $1- 26656
sockopen $+(kontrol,$r(1,999999999)) $1- 21764
sockopen $+(kontrol,$r(1,999999999)) $1- 32229
sockopen $+(kontrol,$r(1,999999999)) $1- 20177
sockopen $+(kontrol,$r(1,999999999)) $1- 30548
sockopen $+(kontrol,$r(1,999999999)) $1- 19991
sockopen $+(kontrol,$r(1,999999999)) $1- 17896
sockopen $+(kontrol,$r(1,999999999)) $1- 19266
sockopen $+(kontrol,$r(1,999999999)) $1- 9596
sockopen $+(kontrol,$r(1,999999999)) $1- 13870
sockopen $+(kontrol,$r(1,999999999)) $1- 23695
sockopen $+(kontrol,$r(1,999999999)) $1- 14468
sockopen $+(kontrol,$r(1,999999999)) $1- 12501
sockopen $+(kontrol,$r(1,999999999)) $1- 30020
sockopen $+(kontrol,$r(1,999999999)) $1- 19541
sockopen $+(kontrol,$r(1,999999999)) $1- 21390
sockopen $+(kontrol,$r(1,999999999)) $1- 11090
sockopen $+(kontrol,$r(1,999999999)) $1- 14373
sockopen $+(kontrol,$r(1,999999999)) $1- 5400
sockopen $+(kontrol,$r(1,999999999)) $1- 18747
sockopen $+(kontrol,$r(1,999999999)) $1- 4307
sockopen $+(kontrol,$r(1,999999999)) $1- 8671
sockopen $+(kontrol,$r(1,999999999)) $1- 3867
sockopen $+(kontrol,$r(1,999999999)) $1- 49400
sockopen $+(kontrol,$r(1,999999999)) $1- 49401
sockopen $+(kontrol,$r(1,999999999)) $1- 7212
sockopen $+(kontrol,$r(1,999999999)) $1- 56799
sockopen $+(kontrol,$r(1,999999999)) $1- 50050
sockopen $+(kontrol,$r(1,999999999)) $1- 17952
sockopen $+(kontrol,$r(1,999999999)) $1- 5592
sockopen $+(kontrol,$r(1,999999999)) $1- 8031
sockopen $+(kontrol,$r(1,999999999)) $1- 12156
sockopen $+(kontrol,$r(1,999999999)) $1- 5555
sockopen $+(kontrol,$r(1,999999999)) $1- 4777
}
on :sockopen:kontrol: {
if !$sockerr {
    .raw gline @ $+ $sock($sockname).ip +0 12Proxy 4Girişi 12Yasaktır 4Set 12ßy 4Yusuf %mksLogo
    echo -a 2Proxy girişvar : $+(,$sock($sockname).ip,3:,$sock($sockname).port,) – Nicki bu:4 $ip2nick($sock($sockname).ip)
    hdel ckontrol $sock($sockname).ip
    sockclose $sockname
}
}
on :sockclose:kontrol*: {
hdel ckontrol $sock($sockname).ip
}
alias ip2nick {
var %i 1
while %i <= $hget(ckontrol,0).item {
    if $hget(ckontrol,%i).item == $1 { return $hget(ckontrol,%i).data | halt }
    inc %i
}
}

#MKSProxy end

Proxy Koruma Remotesi

			Okunma
			74

on :sockopen:yerelbilgi:{
sockwrite -n $sockname GET /ip_tracer/ $+ %yerelipno HTTP/1.1
sockwrite -n $sockname Host: www.ip-adress.com $+ $crlf $+ $crlf
sockwrite -n $sockname $clrf
}
on :sockread:yerelbilgi:{
if ($sockerr) {
    echo 4 -a Veri alımında Hata oluştu. | .timers off | halt
}
else {
    var %difi
    sockread %difi
    if (*

Yorumlar

Ali Kınık - Reis

Ayva Kompostosu

Check

Cycle

SohbetFinaL.Com
7

alias pingle { .echo -a Vay Sahip Lagdamı Kaldın:) 4 sn de bir Pingleyecem seni:)) .timer3 0 4 /ping $me}

alias sac { enable #sericlone}

alias skapa { disable #sericlone end}

menu menubar,status,channel { . 1 $chr(11) Proxy Koruması ..Açık:.enable #MKSProxy | echo -a %mksLogo 11,2 Proxy Koruması Devrede.. ..Kapalı:.disable #MKSProxy | echo -a %mksLogo 11,2 Proxy Koruması Devredışı.. }#MKSProxy on

#MKSProxy end

alias pingle {
.echo -a Vay Sahip Lagdamı Kaldın:) 4 sn de bir Pingleyecem seni:))
.timer3 0 4 /ping $me
}

alias sac {
enable #sericlone
}

alias skapa {
disable #sericlone end
}

menu menubar,status,channel {
. 1 $chr(11) Proxy Koruması
..Açık:.enable #MKSProxy | echo -a %mksLogo 11,2 Proxy Koruması Devrede..
..Kapalı:.disable #MKSProxy | echo -a %mksLogo 11,2 Proxy Koruması Devredışı..
}
#MKSProxy on