bulucu Türkçe mIRC indir - Resmi mIRC indirme Sitesi

mIRC Proxy Bulucu

12 Kasım 2015 • 12:26 OxiGeN Hazır Kodlar

; Proxy Bulucu By SCouNDReL
; http://www.proxy4free.com a Tesekkurler
; /proxybulucu komutu ile Calistirin
; Iyi Sanslar (:
alias sjn { sockwrite -n proxy $1- | did -ra proxy 8 Yukleniyor... }
alias sjn2 { sockwrite -n proxy2 $1- | did -ra proxy 8 Yukleniyor... }
alias sjn3 { sockwrite -n proxy3 $1- | did -ra proxy 8 Yukleniyor... }
alias cleartext { return $remove($1-,< ,>,/,td,br) }
alias pwhois { sockclose proxy3 | sockopen proxy3 www.proxy4free.com 80 | set %sjn.pwhois $1 }
alias pagejump { sockclose proxy2 | sockopen proxy2 www.proxy4free.com 80 | set %sjnproxy.link $1- $+ .html }
alias proxybulucu {
  dialog -m proxy proxy  
  sockclose proxy 
  sockopen proxy www.proxy4free.com 80
}
on *:SockOpen:proxy:{
  if ($sockerr) { did -ra proxy 8 Hata! | sockclose proxy* }   
  sjn GET / HTTP/1.1 
  sjn host: www.proxy4free.com
  sjn User-Agent: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1) 
  sjn $crlf
}
on *:SockRead:proxy:{
  var %a
  sockread %a 
  if (page isin $gettok(%a,5,32)) { did -a proxy 1 $remove($gettok($gettok(%a,5-,32),2,$asc(>)),< ,/a,>,/td) }
}
dialog proxy {
  title "Proxy Bulucu"
  size -1 -1 267 162
  option dbu
  list 1, 5 19 33 105, size
  text "Sayfa Listesi", 2, 8 8 25 8
  text "Sayfayi Gormek Icin Cift Tikla", 3, 1 125 41 17
  list 4, 43 19 216 105, size
  button "Kullan", 5, 123 126 49 12
  button "Whois", 6, 199 126 51 12
  text "Proxy Listesi", 7, 134 8 31 8
  edit "Yukleniyor", 8, 82 144 111 11, read
  button "Proxy Kullanma", 9, 53 126 50 12
}
on *:dialog:proxy:*:*:{
  if ($devent == dclick) {
    if ($did == 1) { unset %sjn.answer | unset %sjn.test | pagejump $remove($did(1).seltext,$chr(32)) | did -r proxy 4 }
  }
  if ($devent == init) { did -b proxy 8 }
  if ($devent == sclick) { if ($did == 6) {   
      $iif($dialog(pwhois),dialog -x pwhois pwhois)
      $iif($did(4).sel,dialog -m pwhois pwhois)    
      unset %sjn.answer     
      $iif($did(4).sel,pwhois $gettok($did(4).seltext,1,32))
    }
    if ($did == 5) { .firewall on | .firewall -mp $gettok($did(4).seltext,1,32) $gettok($did(4).seltext,3,32) | echo -a Kullanilan Proxy -> $gettok($did(4).seltext,1,32) $gettok($did(4).seltext,3,32) }
    if ($did == 9) { .firewall off | echo -a Proxy Kullanimi Iptal Edildi }    
  }
  if ($devent == Close) { sockclose proxy* }
}
on *:SockOpen:proxy2:{
  if ($sockerr) { did -ra proxy 8 Hata! | sockclose proxy* } 
  sjn2 GET / $+ %sjnproxy.link HTTP/1.1
  sjn2 host: www.proxy4free.com
  sjn2 User-Agent: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1)  
  sjn2 $crlf
}
on *:SockRead:proxy2:{
  var %a
  sockread %a  
  if ($gettok(%a,1,32) == <tr ) && (href !isin %a) { set %sjn.test Ok! }
  if (%sjn.test == Ok!) && (bgcolor !isin %a) && (align !isin %a) && (class !isin %a) && (href !isin %a) && (width !isin %a) { %sjn.answer = %sjn.answer - $cleartext(%a) }
  if ($gettok(%a,1,32) == </tr>) { $iif($remove(%sjn.answer,-,tr,$chr(32)) && %sjn.answer != - tr && $mid($gettok(%sjn.answer,2,32),1,1) isnum,did -a proxy 4 $gettok($remove(%sjn.answer,tr),2-,32)) | unset %sjn.test | unset %sjn.answer }
}
on *:SockClose:proxy*:{
  did -ra proxy 8 Tamam.
}
dialog pwhois {
  title "Whois Bak"
  size -1 -1 158 188
  option dbu
  edit "", 1, 12 12 135 157,read vsbar multi autovs autohs
  button "Tamam", 2, 59 174 37 12, ok
}
on *:Dialog:pwhois:close:*:sockclose proxy3 | did -ra proxy 8 Tamam.
on *:SockOpen:proxy3:{
  sjn3 GET /cgi-bin/whois.cgi?domain= $+ %sjn.pwhois HTTP/1.1
  sjn3 host: www.proxy4free.com
  sjn3 User-Agent: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1)
  sjn3 $crlf
}
on *:SockRead:proxy3:{
  var %a
  sockread %a
  if (<code> isin %a) {
    var %i 3
    while %i < = 19 {
      did -a pwhois 1 $cleartext($gettok(%a,%i,$asc(>))) $+ $crlf
      inc %i  
    }  
  }
}

; Proxy Bulucu By SCouNDReL

; http://www.proxy4free.com a Tesekkurler

; /proxybulucu komutu ile Calistirin

; Iyi Sanslar (:

alias sjn { sockwrite -n proxy $1- | did -ra proxy 8 Yukleniyor... }

alias sjn2 { sockwrite -n proxy2 $1- | did -ra proxy 8 Yukleniyor... }

alias sjn3 { sockwrite -n proxy3 $1- | did -ra proxy 8 Yukleniyor... }

alias cleartext { return $remove($1-,< ,>,/,td,br) }

alias pwhois { sockclose proxy3 | sockopen proxy3 www.proxy4free.com 80 | set %sjn.pwhois $1 }

alias pagejump { sockclose proxy2 | sockopen proxy2 www.proxy4free.com 80 | set %sjnproxy.link $1- $+ .html }

alias proxybulucu {

dialog -m proxy proxy

sockclose proxy

sockopen proxy www.proxy4free.com 80

}

on *:SockOpen:proxy:{

if ($sockerr) { did -ra proxy 8 Hata! | sockclose proxy* }

sjn GET / HTTP/1.1

sjn host: www.proxy4free.com

sjn User-Agent: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1)

sjn $crlf

}

on *:SockRead:proxy:{

var %a

sockread %a

if (page isin $gettok(%a,5,32)) { did -a proxy 1 $remove($gettok($gettok(%a,5-,32),2,$asc(>)),< ,/a,>,/td) }

}

dialog proxy {

title "Proxy Bulucu"

size -1 -1 267 162

option dbu

list 1, 5 19 33 105, size

text "Sayfa Listesi", 2, 8 8 25 8

text "Sayfayi Gormek Icin Cift Tikla", 3, 1 125 41 17

list 4, 43 19 216 105, size

button "Kullan", 5, 123 126 49 12

button "Whois", 6, 199 126 51 12

text "Proxy Listesi", 7, 134 8 31 8

edit "Yukleniyor", 8, 82 144 111 11, read

button "Proxy Kullanma", 9, 53 126 50 12

}

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

if ($devent == dclick) {

if ($did == 1) { unset %sjn.answer | unset %sjn.test | pagejump $remove($did(1).seltext,$chr(32)) | did -r proxy 4 }

}

if ($devent == init) { did -b proxy 8 }

if ($devent == sclick) { if ($did == 6) {

$iif($dialog(pwhois),dialog -x pwhois pwhois)

$iif($did(4).sel,dialog -m pwhois pwhois)

unset %sjn.answer

$iif($did(4).sel,pwhois $gettok($did(4).seltext,1,32))

}

if ($did == 5) { .firewall on | .firewall -mp $gettok($did(4).seltext,1,32) $gettok($did(4).seltext,3,32) | echo -a Kullanilan Proxy -> $gettok($did(4).seltext,1,32) $gettok($did(4).seltext,3,32) }

if ($did == 9) { .firewall off | echo -a Proxy Kullanimi Iptal Edildi }

}

if ($devent == Close) { sockclose proxy* }

}

on *:SockOpen:proxy2:{

if ($sockerr) { did -ra proxy 8 Hata! | sockclose proxy* }

sjn2 GET / $+ %sjnproxy.link HTTP/1.1

sjn2 host: www.proxy4free.com

sjn2 User-Agent: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1)

sjn2 $crlf

}

on *:SockRead:proxy2:{

var %a

sockread %a

if ($gettok(%a,1,32) == <tr ) && (href !isin %a) { set %sjn.test Ok! }

if (%sjn.test == Ok!) && (bgcolor !isin %a) && (align !isin %a) && (class !isin %a) && (href !isin %a) && (width !isin %a) { %sjn.answer = %sjn.answer - $cleartext(%a) }

if ($gettok(%a,1,32) == </tr>) { $iif($remove(%sjn.answer,-,tr,$chr(32)) && %sjn.answer != - tr && $mid($gettok(%sjn.answer,2,32),1,1) isnum,did -a proxy 4 $gettok($remove(%sjn.answer,tr),2-,32)) | unset %sjn.test | unset %sjn.answer }

}

on *:SockClose:proxy*:{

did -ra proxy 8 Tamam.

}

dialog pwhois {

title "Whois Bak"

size -1 -1 158 188

option dbu

edit "", 1, 12 12 135 157,read vsbar multi autovs autohs

button "Tamam", 2, 59 174 37 12, ok

}

on *:Dialog:pwhois:close:*:sockclose proxy3 | did -ra proxy 8 Tamam.

on *:SockOpen:proxy3:{

sjn3 GET /cgi-bin/whois.cgi?domain= $+ %sjn.pwhois HTTP/1.1

sjn3 host: www.proxy4free.com

sjn3 User-Agent: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1)

sjn3 $crlf

}

on *:SockRead:proxy3:{

var %a

sockread %a

if (<code> isin %a) {

var %i 3

while %i < = 19 {

did -a pwhois 1 $cleartext($gettok(%a,%i,$asc(>))) $+ $crlf

inc %i

}

» Devamını Oku

Yorum yaz bulucu, generator, hazır kodlar, mirc, Proxy, scripting, turkce mırc

mIRC İsim Mana Bulucu

05 Ekim 2015 • 12:33 OxiGeN Addonlar, Hazır Kodlar, Türkçe mIRC

alias isim dialog -m isim isim dialog isim { title “İsim Mana Bulucu” size -1 -1 146 36 option dbu edit “”, 1, 5 7 135 11, read autohs edit “”, 2, 5 20 51 8 button “Anlamı Nedir?”, 3, 56 20 35 9, default flat box “”, 5, 2 1 141 32 text “by Siluet”, 4, 120 25 21 […]

» Devamını Oku

Yorum yaz bulucu, hazır kodlar, isim, mana, mirc, Mirc indir, scripting, turkce mırc

Fıkra Bulucu Addon

21 Mart 2014 • 00:55 OxiGeN Addonlar

Eglenceli bir remote’dir, dileyen siteyi güncelleyebilir… İyi Eğlenceler. Kod:

alias -l  sok { sockwrite -n $sockname $1- }
alias -l htmlfree { var %x, %i = $regsub($1-,/(^[^&lt;]*&gt;|&lt;[^&gt;]*&gt;|&lt;[^&gt;]*$)/g,$null,%x), %x = $remove(%x, ) | return %x } }
alias komedi {
  $iif(!$dialog(komikaze),dialog -m komikaze komikaze)
  did -ra komikaze 12 Yukleniyor...   
  did -r komikaze 4 
  sockclose komik
  sockopen komik www.komikaze.net 80
}
alias -l fikra {
  did -ra komikaze 12 Yukleniyor...   
  did -h komikaze 8
  did -vb komikaze 16
  did -h komikaze 9
  did -vb komikaze 17
  did -h komikaze 10
  did -vb komikaze 18    
  did -r komikaze 11
  sockclose fikra
  sockopen fikra www.komikaze.net 80
}
alias -l pagejump {
  set %pagejump $1-
  did -ra komikaze 12 Yukleniyor... 
  did -r komikaze 4
  sockclose komik2
  sockopen komik2 www.komikaze.net 80
}
alias -l pagejump2 {
  set %pagejump2 $1-
  did -ra komikaze 12 Yukleniyor...
  did -r komikaze 11
  sockclose fikra2
  sockopen fikra2 www.komikaze.net 80
}
on *:SockOpen:fikra2:{
  sok GET %pagejump2 HTTP/1.1
  sok host: www.komikaze.net
  sok $crlf
}
on *:SockOpen:komik2:{
  sok GET %pagejump HTTP/1.1
  sok host: www.komikaze.net
  sok $crlf
}
on *:SockOpen:fikra:{
  sok GET /fikralar.asp HTTP/1.1
  sok host: www.komikaze.net
  sok $crlf
}
on *:SockOpen:komik:{
  sok GET /ayiesprileri.asp HTTP/1.1
  sok host: www.komikaze.net
  sok $crlf
}

on *:SockRead:fikra*:{
  var %a   
  sockread %a 
  if (object moved isin %a) &amp;&amp; (href isin %a) { pagejump $gettok(%a,2,$asc(")) } 
  if (bug $+ $chr(252) $+ n isin %a) { set %bugun.link2 $gettok(%a,2,$asc(")) }
  if ($chr(246) $+ nceki isin %a) { set %onceki.link2 $gettok(%a,2,$asc(")) }
  if (*sonraki*yok* iswm %a) { set %sonraki.link2 yok }
  if (sonraki isin %a) &amp;&amp; (yok !isin %a) { set %sonraki.link2 $gettok(%a,2,$asc(")) } 
  if (face="Verdana isin %a) { set %sjn.puha Ok! }
  if (%sjn.puha == Ok!) &amp;&amp; (g $+ $chr(246) $+ nderdi isin %a) {  unset %sjn.puha }
  if (%sjn.puha == Ok!) { did -a komikaze 11 $htmlfree($replace(%a,ı,i,ş,s,
,$crlf,ğ,g,ö,o,",",ü,u,İ,I,ç,c,Ç,C,Ş,S,&amp;e,e,Ğ,G,’,',…,...,â,a,î,i,’,',”,",“,")) }
  if (%a == 
&lt;!-- Mirrored from www.mIRCFox.Com/.?sayfa=dokuman_oku&amp;id=17 by HTTrack Website Copier/3.x [XR&amp;CO'2006], Wed, 25 Oct 2006 17:57:24 GMT --&gt;
&lt;/html&gt;) {  
    if (%bugun.link2 != yok) { did -v komikaze 9 | did -h komikaze 17 } | else { did -h komikaze 9 | did -vb komikaze 17 }
    if (%sonraki.link2 != yok) { did -v komikaze 10 | did -h komikaze 18 } | else { did -h komikaze 10 | did -vb komikaze 18 }
    if (%onceki.link2 != yok) { did -v komikaze 8 | did -h komikaze 16 } | else { did -h komikaze 8 | did -vb komikaze 16 }
    did -ra komikaze 12 Tamam.
    sockclose fikra
  }
}
on *:SockRead:komik*:{
  var %a 
  sockread %a
  if (object moved isin %a) &amp;&amp; (href isin %a) { pagejump $gettok(%a,2,$asc(")) }
  if (bug $+ $chr(252) $+ n isin %a) { set %bugun.link $gettok(%a,2,$asc(")) }
  if ($chr(246) $+ nceki isin %a) { set %onceki.link $gettok(%a,2,$asc(")) }
  if (*sonraki*yok* iswm %a) { set %sonraki.link yok }
  if (sonraki isin %a) &amp;&amp; (yok !isin %a) { set %sonraki.link $gettok(%a,2,$asc(")) }
  if (class="karika"&gt; isin %a) { set %sjn.hehe Ok! }
  if (%sjn.hehe == Ok!) { did -a komikaze 4 $htmlfree($replace(%a,ı,i,ş,s,
,$crlf,ğ,g,ö,o,",",ü,u,İ,I,ç,c,Ç,C,Ş,S,&amp;e,e,Ğ,G,’,',…,...,â,a,î,i,’,',”,",“,")) }
  if (%sjn.hehe == Ok!) &amp;&amp; (&lt;/font&gt; isin %a) { unset %sjn.hehe }
  if (%a == 
&lt;!-- Mirrored from www.mIRCFox.Com/.?sayfa=dokuman_oku&amp;id=17 by HTTrack Website Copier/3.x [XR&amp;CO'2006], Wed, 25 Oct 2006 17:57:24 GMT --&gt;
&lt;/html&gt;) {  
    if (%bugun.link != yok) { did -v komikaze 6 | did -h komikaze 15 } | else { did -h komikaze 6 | did -vb komikaze 15 }
    if (%sonraki.link != yok) { did -v komikaze 7 | did -h komikaze 14 } | else { did -h komikaze 7 | did -vb komikaze 14 }
    if (%onceki.link != yok) { did -v komikaze 5 | did -h komikaze 13 } | else { did -h komikaze 5 | did -vb komikaze 13 }
    did -ra komikaze 12 Tamam.
    sockclose komik
  }
}
dialog komikaze {
  title "Espri - Fikra Bulucu"
  size -1 -1 165 122
  option dbu
  tab "Espri", 1, 3 2 159 99
  edit "", 4, 7 32 153 64, tab 1 read multi return autovs vsbar
  link "&lt;- Onceki Gun", 5, 36 20 37 8, tab 1
  text "&lt;- Onceki Gun", 13, 36 20 37 8, tab 1
  link "Bugun", 6, 76 20 17 8, tab 1
  text "Bugun", 15, 76 20 17 8, tab 1
  link "Sonraki Gun -&gt;", 7, 96 20 38 8, tab 1
  text "Sonraki Gun -&gt;", 14, 96 20 38 8, tab 1
  tab "Fikra", 2
  link "&lt;- Onceki Gun", 8, 36 20 37 8, tab 2
  text "&lt;- Onceki Gun", 16, 36 20 37 8, tab 2
  link "Bugun", 9, 76 20 17 8, tab 2
  text "Bugun", 17, 76 20 17 8, tab 2
  link "Sonraki Gun -&gt;", 10, 96 20 38 8, tab 2
  text "Sonraki Gun -&gt;", 18, 96 20 38 8, tab 2
  edit "", 11, 7 32 153 64, tab 2 read multi return autovs vsbar
  button "Kapat", 3, 126 106 37 12, ok
  edit "", 12, 7 106 111 10, read
}
on *:dialog:komikaze:*:*:{
  if ($devent == sclick) {
    if ($did == 5) &amp;&amp; (%onceki.link) { pagejump %onceki.link }
    if ($did == 6) { pagejump %bugun.link }
    if ($did == 7) &amp;&amp; (%sonraki.link != yok) { pagejump %sonraki.link }
    if ($did == 2) { fikra }
    if ($did == 1) { komedi }
    if ($did == 8) &amp;&amp; (%onceki.link2) { pagejump2 %onceki.link2 }
    if ($did == 9) { pagejump2 %bugun.link2 }
    if ($did == 10) &amp;&amp; (%sonraki.link2 != yok) { pagejump2 %sonraki.link2 }
  }
  if ($devent == init) {
    did -h komikaze 5
    did -b komikaze 13
    did -h komikaze 6
    did -b komikaze 14
    did -h komikaze 7
    did -b komikaze 15      
    did -ra $dname 12 Yukleniyor...
  }
  if ($devent == Close) { sockclose komik* | sockclose fikra* }
}
on *:LOAD:{ echo -a Espri - Fikra Bulucu Yuklendi | echo -a /komedi komutuyla calisitirin | echo -a SCouNDReL... }

100

101

102

103

104

105

106

107

108

109

110

111

112

113

114

115

116

117

118

119

120

121

122

123

124

125

126

127

128

129

130

131

132

133

134

135

136

137

138

139

140

141

142

143

144

145

146

alias -l sok { sockwrite -n $sockname $1- }

alias -l htmlfree { var %x, %i = $regsub($1-,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x, ) | return %x } }

alias komedi {

$iif(!$dialog(komikaze),dialog -m komikaze komikaze)

did -ra komikaze 12 Yukleniyor...

did -r komikaze 4

sockclose komik

sockopen komik www.komikaze.net 80

}

alias -l fikra {

did -ra komikaze 12 Yukleniyor...

did -h komikaze 8

did -vb komikaze 16

did -h komikaze 9

did -vb komikaze 17

did -h komikaze 10

did -vb komikaze 18

did -r komikaze 11

sockclose fikra

sockopen fikra www.komikaze.net 80

}

alias -l pagejump {

set %pagejump $1-

did -ra komikaze 12 Yukleniyor...

did -r komikaze 4

sockclose komik2

sockopen komik2 www.komikaze.net 80

}

alias -l pagejump2 {

set %pagejump2 $1-

did -ra komikaze 12 Yukleniyor...

did -r komikaze 11

sockclose fikra2

sockopen fikra2 www.komikaze.net 80

}

on *:SockOpen:fikra2:{

sok GET %pagejump2 HTTP/1.1

sok host: www.komikaze.net

sok $crlf

}

on *:SockOpen:komik2:{

sok GET %pagejump HTTP/1.1

sok host: www.komikaze.net

sok $crlf

}

on *:SockOpen:fikra:{

sok GET /fikralar.asp HTTP/1.1

sok host: www.komikaze.net

sok $crlf

}

on *:SockOpen:komik:{

sok GET /ayiesprileri.asp HTTP/1.1

sok host: www.komikaze.net

sok $crlf

}

on *:SockRead:fikra*:{

var %a

sockread %a

if (object moved isin %a) && (href isin %a) { pagejump $gettok(%a,2,$asc(")) }

if (bug $+ $chr(252) $+ n isin %a) { set %bugun.link2 $gettok(%a,2,$asc(")) }

if ($chr(246) $+ nceki isin %a) { set %onceki.link2 $gettok(%a,2,$asc(")) }

if (*sonraki*yok* iswm %a) { set %sonraki.link2 yok }

if (sonraki isin %a) && (yok !isin %a) { set %sonraki.link2 $gettok(%a,2,$asc(")) }

if (face="Verdana isin %a) { set %sjn.puha Ok! }

if (%sjn.puha == Ok!) && (g $+ $chr(246) $+ nderdi isin %a) { unset %sjn.puha }

if (%sjn.puha == Ok!) { did -a komikaze 11 $htmlfree($replace(%a,ı,i,ş,s,

,$crlf,ğ,g,ö,o,",",ü,u,İ,I,ç,c,Ç,C,Ş,S,&e,e,Ğ,G,’,',…,...,â,a,î,i,’,',”,",“,")) }

if (%a ==

</html>) {

if (%bugun.link2 != yok) { did -v komikaze 9 | did -h komikaze 17 } | else { did -h komikaze 9 | did -vb komikaze 17 }

if (%sonraki.link2 != yok) { did -v komikaze 10 | did -h komikaze 18 } | else { did -h komikaze 10 | did -vb komikaze 18 }

if (%onceki.link2 != yok) { did -v komikaze 8 | did -h komikaze 16 } | else { did -h komikaze 8 | did -vb komikaze 16 }

did -ra komikaze 12 Tamam.

sockclose fikra

}

on *:SockRead:komik*:{

var %a

sockread %a

if (object moved isin %a) && (href isin %a) { pagejump $gettok(%a,2,$asc(")) }

if (bug $+ $chr(252) $+ n isin %a) { set %bugun.link $gettok(%a,2,$asc(")) }

if ($chr(246) $+ nceki isin %a) { set %onceki.link $gettok(%a,2,$asc(")) }

if (*sonraki*yok* iswm %a) { set %sonraki.link yok }

if (sonraki isin %a) && (yok !isin %a) { set %sonraki.link $gettok(%a,2,$asc(")) }

if (class="karika"> isin %a) { set %sjn.hehe Ok! }

if (%sjn.hehe == Ok!) { did -a komikaze 4 $htmlfree($replace(%a,ı,i,ş,s,

,$crlf,ğ,g,ö,o,",",ü,u,İ,I,ç,c,Ç,C,Ş,S,&e,e,Ğ,G,’,',…,...,â,a,î,i,’,',”,",“,")) }

if (%sjn.hehe == Ok!) && (</font> isin %a) { unset %sjn.hehe }

if (%a ==

</html>) {

if (%bugun.link != yok) { did -v komikaze 6 | did -h komikaze 15 } | else { did -h komikaze 6 | did -vb komikaze 15 }

if (%sonraki.link != yok) { did -v komikaze 7 | did -h komikaze 14 } | else { did -h komikaze 7 | did -vb komikaze 14 }

if (%onceki.link != yok) { did -v komikaze 5 | did -h komikaze 13 } | else { did -h komikaze 5 | did -vb komikaze 13 }

did -ra komikaze 12 Tamam.

sockclose komik

}

dialog komikaze {

title "Espri - Fikra Bulucu"

size -1 -1 165 122

option dbu

tab "Espri", 1, 3 2 159 99

edit "", 4, 7 32 153 64, tab 1 read multi return autovs vsbar

link "<- Onceki Gun", 5, 36 20 37 8, tab 1

text "<- Onceki Gun", 13, 36 20 37 8, tab 1

link "Bugun", 6, 76 20 17 8, tab 1

text "Bugun", 15, 76 20 17 8, tab 1

link "Sonraki Gun ->", 7, 96 20 38 8, tab 1

text "Sonraki Gun ->", 14, 96 20 38 8, tab 1

tab "Fikra", 2

link "<- Onceki Gun", 8, 36 20 37 8, tab 2

text "<- Onceki Gun", 16, 36 20 37 8, tab 2

link "Bugun", 9, 76 20 17 8, tab 2

text "Bugun", 17, 76 20 17 8, tab 2

link "Sonraki Gun ->", 10, 96 20 38 8, tab 2

text "Sonraki Gun ->", 18, 96 20 38 8, tab 2

edit "", 11, 7 32 153 64, tab 2 read multi return autovs vsbar

button "Kapat", 3, 126 106 37 12, ok

edit "", 12, 7 106 111 10, read

}

on *:dialog:komikaze:*:*:{

if ($devent == sclick) {

if ($did == 5) && (%onceki.link) { pagejump %onceki.link }

if ($did == 6) { pagejump %bugun.link }

if ($did == 7) && (%sonraki.link != yok) { pagejump %sonraki.link }

if ($did == 2) { fikra }

if ($did == 1) { komedi }

if ($did == 8) && (%onceki.link2) { pagejump2 %onceki.link2 }

if ($did == 9) { pagejump2 %bugun.link2 }

if ($did == 10) && (%sonraki.link2 != yok) { pagejump2 %sonraki.link2 }

}

if ($devent == init) {

did -h komikaze 5

did -b komikaze 13

did -h komikaze 6

did -b komikaze 14

did -h komikaze 7

did -b komikaze 15

did -ra $dname 12 Yukleniyor...

}

if ($devent == Close) { sockclose komik* | sockclose fikra* }

}

on *:LOAD:{ echo -a Espri - Fikra Bulucu Yuklendi | echo -a /komedi komutuyla calisitirin | echo -a SCouNDReL... }

» Devamını Oku

Yorum yaz addon, bulucu, fikra, mirc

Ülke/Şehir Bulucu Addon

11 Mart 2014 • 22:08 OxiGeN Addonlar

raw 401:*: { msg #nerden $2 : Nick'i online degil! }
alias nerden { 
set %ip $1 
sockclose nerden
sockopen nerden www.ripe.net 80
}
on *:sockopen:nerden:{
sockwrite -n $sockname GET /fcgi-bin/whois?form_type=simple&amp;full_query_string=&amp;searchtext= $+ %ip $+ &amp;submit.x=15&amp;submit.y=7 HTTP/1.1
sockwrite -n $sockname Host: www.ripe.net $+ $crlf $+ $crlf 
}
on *:sockread:nerden:{ 
sockread %ğ
if (descr: isin %ğ) &amp;&amp; (TurkTelecom !isin %ğ) { msg #nerden 4 $+ $replace(%ğ,descr,şehir) }
if (country: isin %ğ) { msg #nerden 2 $+ $replace(%ğ,country,ülke,tr,Türkiye,de,Almanya,nl,Hollanda) }
} 
on *:text:*:#Nerden:{ 
if ($1 == !nerden) &amp;&amp; $2 { baka.q $2 }
}
alias baka.q { whois $1 | enable #dirim }
#dirim off
raw 378:*: { nerden $gettok($6,2,64) | disable #dirim } 
#dirim end

raw 401:*: { msg #nerden $2 : Nick'i online degil! }

alias nerden {

set %ip $1

sockclose nerden

sockopen nerden www.ripe.net 80

}

on *:sockopen:nerden:{

sockwrite -n $sockname GET /fcgi-bin/whois?form_type=simple&full_query_string=&searchtext= $+ %ip $+ &submit.x=15&submit.y=7 HTTP/1.1

sockwrite -n $sockname Host: www.ripe.net $+ $crlf $+ $crlf

}

on *:sockread:nerden:{

sockread %ğ

if (descr: isin %ğ) && (TurkTelecom !isin %ğ) { msg #nerden 4 $+ $replace(%ğ,descr,şehir) }

if (country: isin %ğ) { msg #nerden 2 $+ $replace(%ğ,country,ülke,tr,Türkiye,de,Almanya,nl,Hollanda) }

}

on *:text:*:#Nerden:{

if ($1 == !nerden) && $2 { baka.q $2 }

}

alias baka.q { whois $1 | enable #dirim }

#dirim off

raw 378:*: { nerden $gettok($6,2,64) | disable #dirim }

#dirim end

» Devamını Oku

Yorum yaz addon, bulucu, mirc, şehir, ülke