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

- mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)

- - Proxy Koruması (https://www.ircforumlari.net/mirc-scripting-sorunlari/212803-proxy-korumasi.html)

Arkadaslar buna örnek çok gördüm forumda fakat benim istediğim gibi yoktu, onun icin burda ayrı bir başlık altında istiyorum. Proxy koruması istiycektim , fakat soyle ;
-Gördüğüm tüm korumalarda sadece ip giriliyordu ben ise ip + port seklinde istiyorum. Birde kesinlikle dialog olmalı..
Eger elinde olan varsa paylaşımını bekliyorum...

Cevap: Proxy Koruması

Sen, IP'ye göre işlem yapan ve sana uygun olan bir korumayı buraya kopyala ki ona göre porta göre de tanımlayıp, ekleme yapalım.

Cevap: Proxy Koruması

Kod:

alias proxyy dialog -m proxy proxy

dialog proxy {

  title "Poxy Koruması..."

  size -1 -1 165 104

  option dbu

  box " Proxy Listesi ", 1, 4 6 103 91

  box " İşlemler ", 2, 110 6 50 91

  button "+ EKLE", 3, 116 16 37 12

  text "İp Adres", 4, 7 15 25 8

  edit "", 5, 35 14 68 10

  list 6, 7 26 96 67, size

  button "- SİL", 7, 116 33 37 12

  button "TAMAM", 8, 116 50 37 12, ok

}
 

on *:dialog:proxy:sclick:*:{

  if ($did = 7) {

    ruser ip $did($dname,6).seltext | did -d proxy 6 $did($dname,6).sel

  }

  if ($did = 3) { if ($did($dname,5) != $null ) { .auser ip $did($dname,5) | did -a proxy 6 $did($dname,5) } }

}
 

on *:dialog:proxy:init:0: {

  var %x = 1

  while (%x <= $ulist(*,ip,0)) { 

    did -a proxy 6 $ulist(*,ip,%x)

    inc %x 

  }

}
 

on @ip:join:#: {

  if $istok(%muafn,$nick,32) == $true { halt }

  if $istok(%muafall,#,32) == $true { halt }

  if $istok(%muaf10,#,32) == $true { halt }

  if (%proxy == 1) && ($me isop $chan) && ($nick !isop #) {

    ban # $wildsite | .kick # $nick %proxy.yazi 

    echo -s + $timestamp 4 $+ $nick 12 $+ $chan 1Kanalından 12Proxy Kullanımı  1Sebebinden Atılmıştır.

  }

}

Bu korumada sadece ip ekliyorsun. Ne attıgı bellide degil secenekte koyarsanız minnettar olurum arkadaslar. Orn : Kill atılsın , Gzline vs.. Hangisi Atılsın Secebileyim birde ben bu dialog'u /dialog -m proxy proxy yaparak calıstırıyorum. Remoteme ekledigimde otomatikman mause'n sol tusuna basında gorunsun arkadaslar. Son olarak zline mesajı eklenilen yerde yok birde o sorun var arkadaslar.
Ugrasan emek veren arkadaslara simdiden tesekkur ederim....

Cevap: Proxy Koruması

Bildiğim öğrenebildiğim kadarıyla Dialog Studio'dan dialog'u oluşturdum arkadaşlar. İstediğim gibi yaptım üzerinde oynama yapabilecek varsa buyursun.
-
-
-
-
-

Kod:

dialog new_table {

  title "New Project"

  size -1 -1 156 210

  option dbu

  text "İp Adress", 2, 6 16 25 8

  edit "", 3, 35 15 50 10

  text "Port", 4, 6 29 25 8

  edit "", 5, 35 28 50 10

  list 6, 3 43 96 72, size

  radio "Kill Atılsın", 1, 97 5 50 10

  radio "Zline Atılsın", 7, 97 16 50 10

  radio "Kick + Ban", 8, 97 27 50 10

  button "Ekle", 9, 108 48 37 12

  button "Sil", 10, 108 65 37 12

  button "Tamam", 11, 108 82 37 12

  button "Tamam", 12, 50 180 45 21

  text "Zline Sebebi", 14, 8 124 35 8

  edit "", 13, 49 122 90 12

  text "Kill Sebebi", 15, 9 141 25 8

  edit "", 16, 49 138 89 13

  text "Kick Sebebi", 17, 9 157 33 8

  edit "", 18, 49 154 89 13

  box "Proxy Koruması", 19, 2 2 149 204

}

Cevap: Proxy Koruması

Yokmu Yapabilecek Kimse Arkadaslar ;)

Cevap: Proxy Koruması

Yahu bir kişi bile çıkmadı lütfen rica ediyorum :)

Cevap: Proxy Koruması

Sağlam Bi Proxy Koruması İstiyorsan, Bu Addon'u Tavsiye EdebiLirim.

Kod:

#MKSProxy on

 

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ışı..  

}

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- 3128 

  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- 3124

  sockopen $+(kontrol,$r(1,999999999)) $1- 50050

  sockopen $+(kontrol,$r(1,999999999)) $1- 8008

} 

on *:sockopen:kontrol*: { 

  if !$sockerr { 

    .raw gline *@ $+ $sock($sockname).ip +0 14Proxy Girişi Yasaktır %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 off

Cevap: Proxy Koruması

Dostum buna birde ekleme özelliği katabilir miyiz ? ip port gibi

Cevap: Proxy Koruması

O özellikLer var zaten, Proxy GirişLerinde Oto GLine Atar.

Cevap: Proxy Koruması

bunu mircima nasıl ekliyebilirim yada görev olarak root mu olmam gerek ekleme yapabimem için ??? nereye nasıl eklenir izah edebilirmisiniz acaba ????

paylaşım için teşekkürler ..