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

Nick için oto identify Remotesi

13 Mart 2014 • 01:57 OxiGeN Hazır Kodlar

on *:notice:*:?: { 
if ($nick == NickServ) { 
if (Bu kayitli ve sifre korumali bir nick'tir isin $1-) { msg NickServ IDENTIFY şifreniz } 
} 
} 
on *:notice:*:?: { 
if ($nick == NickServ) { 
if (Bu nick kayitli bir nicktir, siz bu nicki kullanamazsiniz isin $1-) { msg NickServ ghost nickiniz şifreniz | msg NickServ release nickiniz şifreniz | timer 2 5 nick nickiniz | timer 2 10 msg NickServ IDENTIFY şifreniz } 
} 
}

on *:notice:*:?: {

if ($nick == NickServ) {

if (Bu kayitli ve sifre korumali bir nick'tir isin $1-) { msg NickServ IDENTIFY şifreniz }

}

on *:notice:*:?: {

if ($nick == NickServ) {

if (Bu nick kayitli bir nicktir, siz bu nicki kullanamazsiniz isin $1-) { msg NickServ ghost nickiniz şifreniz | msg NickServ release nickiniz şifreniz | timer 2 5 nick nickiniz | timer 2 10 msg NickServ IDENTIFY şifreniz }

}

» Devamını Oku

Yorum yaz addon, identify, mirc, Nick, Oto, remote

mirc indir mirc odaları

12 Mart 2014 • 18:20 OxiGeN Türkçe mIRC

< @Darkness Özgürüz tutsak oldukca.. shy Mrb elly mirhabaa Shy m :* serhatt Merhaba herkese Hoş Sohbetler.. shy elly ;* shy Naber shy Tatlm elly iyiyim gelinim sen ^_^ renos :* renos renos oyhhh mnvbnö vb shy Kötü:( elly noldu kuzum :( samet Hayırlı akşamlar gider. :) elly renos kaynama arada. renos elly renos kaynarım sana elly cigkofte :d elly [...]

» Devamını Oku

Yorum yaz indir, mirc, Mirc indir, mirc odaları

Download – Dosya indirici addon

12 Mart 2014 • 14:46 OxiGeN Addonlar


Örnek : /download Sohbet.net selam.txt
İşte kod:

alias download {
if ($sock(download)) {
echo $colour(info text) @download *** başka bir dosya download ediliyor, birazdan tekrar deneyiniz.
return
}
sockopen download $1 80
sockmark download $1 $2
}
on *:sockopen:download:{
if ($sockerr) {
echo $colour(info text) @download *** download ederken hata: $sockerr
return
}
write -c $gettok($sock($sockname).mark,2,32)
unset %downloadlength %downloadready
window -c @download
sockwrite -n $sockname GET $+(/,$gettok($sock($sockname).mark,2,32)) HTTP/1.0
sockwrite -n $sockname Accept: */*
sockwrite -n $sockname Host: $gettok($sock($sockname).mark,1,32)
sockwrite -n $sockname
}
on *:sockread:download:{
if (%downloadready != 1) {
var %header
sockread %header
while ($sockbr) {
if (Content-length: * iswm %header) {
%downloadlength = $gettok(%header,2,32)
if (* !iswm $window(@download)) window @download
echo $colour(info text) @download *** dosya boyutu: %downloadlength bytes
}
elseif (* !iswm %header) {
%downloadready = 1
%downloadoffset = $sock($sockname).rcvd
break
}
sockread %header
}
}
sockread 4096 &amp;d
while ($sockbr) {
if (* !iswm $window(@download)) window @download
echo $colour(info text) @download *** alınan: $round( $calc(100 * ($sock($sockname).rcvd - %downloadoffset) / %downloadlength) ,1) $+ %
bwrite $gettok($sock($sockname).mark,2,32) -1 -1 &amp;d
sockread 4096 &amp;d
}
}
on *:sockclose:download:{
echo $colour(info text) @download *** indirme tamamlandı.
}

Örnek : /download Sohbet.net selam.txt

İşte kod:

alias download {

if ($sock(download)) {

echo $colour(info text) @download *** başka bir dosya download ediliyor, birazdan tekrar deneyiniz.

return

}

sockopen download $1 80

sockmark download $1 $2

}

on *:sockopen:download:{

if ($sockerr) {

echo $colour(info text) @download *** download ederken hata: $sockerr

return

}

write -c $gettok($sock($sockname).mark,2,32)

unset %downloadlength %downloadready

window -c @download

sockwrite -n $sockname GET $+(/,$gettok($sock($sockname).mark,2,32)) HTTP/1.0

sockwrite -n $sockname Accept: */*

sockwrite -n $sockname Host: $gettok($sock($sockname).mark,1,32)

sockwrite -n $sockname

}

on *:sockread:download:{

if (%downloadready != 1) {

var %header

sockread %header

while ($sockbr) {

if (Content-length: * iswm %header) {

%downloadlength = $gettok(%header,2,32)

if (* !iswm $window(@download)) window @download

echo $colour(info text) @download *** dosya boyutu: %downloadlength bytes

}

elseif (* !iswm %header) {

%downloadready = 1

%downloadoffset = $sock($sockname).rcvd

break

}

sockread %header

}

sockread 4096 &d

while ($sockbr) {

if (* !iswm $window(@download)) window @download

echo $colour(info text) @download *** alınan: $round( $calc(100 * ($sock($sockname).rcvd - %downloadoffset) / %downloadlength) ,1) $+ %

bwrite $gettok($sock($sockname).mark,2,32) -1 -1 &d

sockread 4096 &d

}

on *:sockclose:download:{

echo $colour(info text) @download *** indirme tamamlandı.

}

» Devamını Oku

Yorum yaz addon, dosya, download, indirici, mirc, remote

Tarihte Bugün Addon

12 Mart 2014 • 14:45 OxiGeN Addonlar

alias -l htmlfree { var %x, %i = $regsub($1-,/(^[^&lt;]*&gt;|&lt;[^&gt;]*&gt;|&lt;[^&gt;]*$)/g,$null,%x), %x = $remove(%x, ) | return %x } }
alias -l tarih { return $+($replace($gettok($date,2,$asc(/)),01,ocak,02,subat,03,mart,04,nisan,05,mayis,06,haziran,07,temmuz,08,agustos,09,eylul,10,ekim,11,kasim,12,aralik),_,$gettok($date,1,$asc(/)),.htm) }
alias tbugun { dialog -m tarih tarih  }
on *:SockOpen:tarih*:{
  sockwrite -n $sockname GET $+(/tarih_arsiv/,$tarih) HTTP/1.0
  sockwrite -n $sockname host: www.bianet.org $+ $crlf $+ $crlf
}
on *:SockRead:tarih*:{ 
  var %a
  sockread %a
  if ($sockerr) { did -ra tarih 1 Bağlantı Hatası Lütfen Daha Sonra Tekrar Deneyin | return }
  if (%sjn == Ok!) &amp;&amp; (sayfa başına !isin %a) &amp;&amp; (dön&lt;/FONT&gt; !isin %a) { did -a tarih 1 $htmlfree($replace($+(%a,$chr(160)),&lt;BR&gt;,$crlf)) }
  if (Tarihte bugün isin %a) { set %sjn Ok! | did -ra tarih 1 Tarihte Bugün $+ $crlf }
}
dialog tarih {
  title "Tarihte Bugün Gösterici"
  size -1 -1 133 169
  option dbu
  edit "Yükleniyor..", 1, 4 2 124 144, read multi return autovs vsbar
  button "Çıkış", 2, 47 151 37 12, ok
}
on *:dialog:tarih:init:*:{
  unset %sjn 
  sockclose tarih* 
  sockopen $+(tarih,$r(1,999)) www.bianet.org 80
}

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

alias -l tarih { return $+($replace($gettok($date,2,$asc(/)),01,ocak,02,subat,03,mart,04,nisan,05,mayis,06,haziran,07,temmuz,08,agustos,09,eylul,10,ekim,11,kasim,12,aralik),_,$gettok($date,1,$asc(/)),.htm) }

alias tbugun { dialog -m tarih tarih }

on *:SockOpen:tarih*:{

sockwrite -n $sockname GET $+(/tarih_arsiv/,$tarih) HTTP/1.0

sockwrite -n $sockname host: www.bianet.org $+ $crlf $+ $crlf

}

on *:SockRead:tarih*:{

var %a

sockread %a

if ($sockerr) { did -ra tarih 1 Bağlantı Hatası Lütfen Daha Sonra Tekrar Deneyin | return }

if (%sjn == Ok!) && (sayfa başına !isin %a) && (dön</FONT> !isin %a) { did -a tarih 1 $htmlfree($replace($+(%a,$chr(160)),<BR>,$crlf)) }

if (Tarihte bugün isin %a) { set %sjn Ok! | did -ra tarih 1 Tarihte Bugün $+ $crlf }

}

dialog tarih {

title "Tarihte Bugün Gösterici"

size -1 -1 133 169

option dbu

edit "Yükleniyor..", 1, 4 2 124 144, read multi return autovs vsbar

button "Çıkış", 2, 47 151 37 12, ok

}

on *:dialog:tarih:init:*:{

unset %sjn

sockclose tarih*

sockopen $+(tarih,$r(1,999)) www.bianet.org 80

}

» Devamını Oku

Yorum yaz addon, bugün, mirc, remote, tarihte

İddaa Sonuçlarını gösteren Addon

11 Mart 2014 • 22:10 OxiGeN Addonlar

alias -l txt $iif($1 == -o,drawtext -or @tahmin $2 Tahoma 11 $3 $4 $5-,drawtext -r @tahmin $1 Tahoma 11 $2 $3 $4-)
alias -l rect $iif($1 == -f,drawrect -rf @tahmin $2 1 $3 $4 $5 $6,drawrect -r @tahmin $1 1 $2 $3 $4 $5)
alias -l mlist { inc %mly 23 | txt -o $rgb(255,255,255) 30 %mly $1- }
alias -l create-&gt;table {
  if ($window(@tahmin)) {
    set %ly 26
    rect -f $rgb(0,130,65) 6 6 770 22
    rect $rgb(0,0,0) 6 6 770 22
    rect -f $rgb(69,101,8) 6 27 770 25
    rect $rgb(0,0,0) 6 27 770 25
    rect $rgb(0,0,0) 60 27 1 25
    rect $rgb(0,0,0) 120 27 1 25
    ;rect $rgb(0,0,0) 320 27 1 25
    rect $rgb(0,0,0) 530 27 1 25
    rect $rgb(0,0,0) 590 27 1 25
    rect $rgb(0,0,0) 660 27 1 25
    txt -o $rgb(255,204,0) 20 33 Saat
    txt -o $rgb(255,204,0) 80 33 Kod
    txt -o $rgb(255,204,0) 300 33 KARŞILAŞMA
    ;txt -o $rgb(255,204,0) 470 33 Misafir Takım
    txt -o $rgb(255,204,0) 550 33 MBS
    txt -o $rgb(255,204,0) 610 33 Sonuç
    txt -o $rgb(255,204,0) 680 33 Banko/Süpriz
  }
}
alias -l create-&gt;col {
  if ($window(@tahmin)) {
    rect -f $rgb(52,113,52) 0 50 2000 2000
    var %tsay = 1
    while (%tsay &lt;= $lines(maclar.txt)) {
      inc %ly 24
      tokenize 191 $read(maclar.txt,%tsay)
      rect -f $rgb(0,92,0) 6 %ly 770 25
      rect $rgb(0,0,0) 6 %ly 770 25
      rect $rgb(0,0,0) 60 %ly 1 25
      rect $rgb(0,0,0) 120 %ly 1 25
      ;rect $rgb(0,0,0) 320 %ly 1 25
      rect $rgb(0,0,0) 530 %ly 1 25
      rect $rgb(0,0,0) 590 %ly 1 25
      rect $rgb(0,0,0) 660 %ly 1 25
      $iif($1 != $null,txt $rgb(255,255,255) 17 $calc(%ly + 5) $1)
      $iif($2 != $null,txt $rgb(255,255,0) 77 $calc(%ly + 5) $2)
      $iif($3 != $null,txt $rgb(255,255,0) 180 $calc(%ly + 5) $3)
      $iif($4 != $null,txt $rgb(255,255,255) 555 $calc(%ly + 5) $4)
      $iif($5 != $null,txt $rgb(255,255,255) 620 $calc(%ly + 5) $5)
      $iif($6 != $null,txt $rgb(255,255,255) 700 $calc(%ly + 5) $6)
      $iif(%tsay == $lines(maclar.txt),guncel-&gt;button)
      inc %tsay
    }
  }
}
alias tahmin {
  window -pxk[1] @Tahmin
  rect -f $rgb(52,113,52) 0 0 2000 2000
  create-&gt;table
  drawtext -or @tahmin $rgb(255,255,0) Tahoma 25 50 150 Bekleyin...
}
alias -l guncel-&gt;button {
  txt -o $rgb(255,255,255) 280 10 %tarih
  rect -f $rgb(0,128,64) 700 $calc(%ly + 30) 70 20
  rect $rgb(0,0,0) 700 $calc(%ly + 30) 70 20
  txt -o $rgb(255,255,0) 709 $calc(%ly + 33) Gün. Bilgi
}
alias -l htmlfree { var %x, %i = $regsub($1-,/(^[^&lt;]*&gt;|&lt;[^&gt;]*&gt;|&lt;[^&gt;]*$)/g,$null,%x), %x = $remove(%x, ) | return %x } }
alias iddaa { tahmin | sockclose tiddaa* | write -c maclar.txt | sockopen $+(tiddaa,$r(1,999)) www.betstudy.com 80 }
on *:SockOpen:tiddaa*:{
  sockwrite -n $sockname GET /turkce/iddaa/iddaa-tahminleri.htm/ HTTP/1.1
  sockwrite -n $sockname host: www.betstudy.com
  sockwrite -n $sockname $crlf
}
on *:load:sockclose update | unset %yap | sockopen update www.geocities.com 80 | echo -a Addon Başarıyla Yüklenmiştir | echo -a Iddaa Tahminleri By SCouNDReL &amp; SeRDaR406
on *:SockRead:tiddaa*:{
  var %a
  sockread %a
  if (&lt;strong&gt; isin %a) &amp;&amp; (iddaa tahminleri isin %a) { set %tarih $htmlfree(%a) }
  if (%yas) &amp;&amp; (Oyna !isin %a) &amp;&amp; (&lt;/div&gt; isin %a) { set %serdarjan $addtok(%serdarjan,$htmlfree($replace(%a,ı,i,ş,s,,$crlf,ğ,g,ö,o,",",ü,u,İ,I,ç,c,Ç,C,Ş,S,&amp;e,e,Ğ,G,’,',…,...,â,a,î,i,’,',”,",“,",YORUM İÇİN TIKLA,-)),191) }
  if (#00CC33 isin %a) { set %yas temem }
  if (/tr isin %a) &amp;&amp; (%yas) { unset %yas | write maclar.txt %serdarjan | unset %serdarjan }
}
alias -l update.basla { sockclose updatestart | unset %yap | sockopen updatestart www.geocities.com 80 }
on *:SockOpen:update:{
  sockwrite -n $sockname GET /serjan.team/iddaa.txt HTTP/1.1
  sockwrite -n $sockname host: www.geocities.com
  sockwrite -n $sockname $crlf
}
on *:SockOpen:updatestart:{
  sockwrite -n $sockname GET $+(/serjan.team/,%guncel) HTTP/1.1
  sockwrite -n $sockname host: www.geocities.com
  sockwrite -n $sockname $crlf
}
on *:SockRead:update:{
  var %a
  sockread %a
  if ($sockerr) { return }
  if ($gettok($script,-1,$asc(\)) != %a) &amp;&amp; (.txt isin %a) { set %guncel $gettok(%a,-1,$asc(/)) }
}
menu @tahmin {
  uclick: {
    $iif($inrect($mouse.x,$mouse.y,700,$calc(%ly + 30),70,20),dialog -m guncel guncel)
  }
  Yenile:.iddaa
  -
  Kapat:close -@ @Tahmin
}
on *:SockRead:updatestart:{
  var %a
  sockread %a
  if (%yap) { write %guncel %a }
  if (¿ isin %a) { set %yap Ok! }
}
on *:SockClose:update:$iif(%guncel,update.basla,echo -a Iddaa Tahminleri Gösterici Güncellendi)
on *:SockClose:updatestart:{
  $iif($exists($shortfn($+($scriptdir,%guncel))),.load -rs $shortfn($+($scriptdir,%guncel)),halt)
  unset %guncel
  unset %yap
  .remove $script
  .unload -rs $shortfn($script)
  echo -a Iddaa Tahminleri Gösterici Güncellendi
}
dialog guncel {
  title "Güncelleştirme Bilgileri"
  size -1 -1 150 93
  option dbu
  edit "Yükleniyor...", 1, 3 15 155 60, read multi hsbar vsbar
  text "Güncelleştirme Bilgileri", 2, 33 3 54 8
  button "Tamam", 3, 55 78 37 12,ok
}
on *:sockclose:tiddaa*: create-&gt;col
on *:dialog:guncel:init:0:guncel.bilgi
alias -l guncel.bilgi { sockclose guncel.bilgi | sockopen guncel.bilgi www.geocities.com 80 }
on *:SockOpen:guncel.bilgi:{
  sockwrite -n $sockname GET /serjan.team/iddaaguncel.txt HTTP/1.1
  sockwrite -n $sockname host: www.geocities.com
  sockwrite -n $sockname $crlf
}
on *:SockRead:guncel.bilgi:{
  var %a
  sockread %a
  if ($sockerr) { $iif($dialog(guncel),did -ra guncel 1 Bağlantı Hatası!) }
  if (%yap == Ok!) &amp;&amp; ($dialog(guncel)) { did -a guncel 1 %a $crlf }
  if (¿ isin %a) { set %yap Ok! | $iif($dialog(guncel),did -r guncel 1) }
}
on *:start: { sockclose update | sockopen update www.geocities.com 80 }
on *:SockClose:guncel.bilgi:unset %yap

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

alias -l txt $iif($1 == -o,drawtext -or @tahmin $2 Tahoma 11 $3 $4 $5-,drawtext -r @tahmin $1 Tahoma 11 $2 $3 $4-)

alias -l rect $iif($1 == -f,drawrect -rf @tahmin $2 1 $3 $4 $5 $6,drawrect -r @tahmin $1 1 $2 $3 $4 $5)

alias -l mlist { inc %mly 23 | txt -o $rgb(255,255,255) 30 %mly $1- }

alias -l create->table {

if ($window(@tahmin)) {

set %ly 26

rect -f $rgb(0,130,65) 6 6 770 22

rect $rgb(0,0,0) 6 6 770 22

rect -f $rgb(69,101,8) 6 27 770 25

rect $rgb(0,0,0) 6 27 770 25

rect $rgb(0,0,0) 60 27 1 25

rect $rgb(0,0,0) 120 27 1 25

;rect $rgb(0,0,0) 320 27 1 25

rect $rgb(0,0,0) 530 27 1 25

rect $rgb(0,0,0) 590 27 1 25

rect $rgb(0,0,0) 660 27 1 25

txt -o $rgb(255,204,0) 20 33 Saat

txt -o $rgb(255,204,0) 80 33 Kod

txt -o $rgb(255,204,0) 300 33 KARŞILAŞMA

;txt -o $rgb(255,204,0) 470 33 Misafir Takım

txt -o $rgb(255,204,0) 550 33 MBS

txt -o $rgb(255,204,0) 610 33 Sonuç

txt -o $rgb(255,204,0) 680 33 Banko/Süpriz

}

alias -l create->col {

if ($window(@tahmin)) {

rect -f $rgb(52,113,52) 0 50 2000 2000

var %tsay = 1

while (%tsay <= $lines(maclar.txt)) {

inc %ly 24

tokenize 191 $read(maclar.txt,%tsay)

rect -f $rgb(0,92,0) 6 %ly 770 25

rect $rgb(0,0,0) 6 %ly 770 25

rect $rgb(0,0,0) 60 %ly 1 25

rect $rgb(0,0,0) 120 %ly 1 25

;rect $rgb(0,0,0) 320 %ly 1 25

rect $rgb(0,0,0) 530 %ly 1 25

rect $rgb(0,0,0) 590 %ly 1 25

rect $rgb(0,0,0) 660 %ly 1 25

$iif($1 != $null,txt $rgb(255,255,255) 17 $calc(%ly + 5) $1)

$iif($2 != $null,txt $rgb(255,255,0) 77 $calc(%ly + 5) $2)

$iif($3 != $null,txt $rgb(255,255,0) 180 $calc(%ly + 5) $3)

$iif($4 != $null,txt $rgb(255,255,255) 555 $calc(%ly + 5) $4)

$iif($5 != $null,txt $rgb(255,255,255) 620 $calc(%ly + 5) $5)

$iif($6 != $null,txt $rgb(255,255,255) 700 $calc(%ly + 5) $6)

$iif(%tsay == $lines(maclar.txt),guncel->button)

inc %tsay

}

alias tahmin {

window -pxk[1] @Tahmin

rect -f $rgb(52,113,52) 0 0 2000 2000

create->table

drawtext -or @tahmin $rgb(255,255,0) Tahoma 25 50 150 Bekleyin...

}

alias -l guncel->button {

txt -o $rgb(255,255,255) 280 10 %tarih

rect -f $rgb(0,128,64) 700 $calc(%ly + 30) 70 20

rect $rgb(0,0,0) 700 $calc(%ly + 30) 70 20

txt -o $rgb(255,255,0) 709 $calc(%ly + 33) Gün. Bilgi

}

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

alias iddaa { tahmin | sockclose tiddaa* | write -c maclar.txt | sockopen $+(tiddaa,$r(1,999)) www.betstudy.com 80 }

on *:SockOpen:tiddaa*:{

sockwrite -n $sockname GET /turkce/iddaa/iddaa-tahminleri.htm/ HTTP/1.1

sockwrite -n $sockname host: www.betstudy.com

sockwrite -n $sockname $crlf

}

on *:load:sockclose update | unset %yap | sockopen update www.geocities.com 80 | echo -a Addon Başarıyla Yüklenmiştir | echo -a Iddaa Tahminleri By SCouNDReL & SeRDaR406

on *:SockRead:tiddaa*:{

var %a

sockread %a

if (<strong> isin %a) && (iddaa tahminleri isin %a) { set %tarih $htmlfree(%a) }

if (%yas) && (Oyna !isin %a) && (</div> isin %a) { set %serdarjan $addtok(%serdarjan,$htmlfree($replace(%a,ı,i,ş,s,,$crlf,ğ,g,ö,o,",",ü,u,İ,I,ç,c,Ç,C,Ş,S,&e,e,Ğ,G,’,',…,...,â,a,î,i,’,',”,",“,",YORUM İÇİN TIKLA,-)),191) }

if (#00CC33 isin %a) { set %yas temem }

if (/tr isin %a) && (%yas) { unset %yas | write maclar.txt %serdarjan | unset %serdarjan }

}

alias -l update.basla { sockclose updatestart | unset %yap | sockopen updatestart www.geocities.com 80 }

on *:SockOpen:update:{

sockwrite -n $sockname GET /serjan.team/iddaa.txt HTTP/1.1

sockwrite -n $sockname host: www.geocities.com

sockwrite -n $sockname $crlf

}

on *:SockOpen:updatestart:{

sockwrite -n $sockname GET $+(/serjan.team/,%guncel) HTTP/1.1

sockwrite -n $sockname host: www.geocities.com

sockwrite -n $sockname $crlf

}

on *:SockRead:update:{

var %a

sockread %a

if ($sockerr) { return }

if ($gettok($script,-1,$asc(\)) != %a) && (.txt isin %a) { set %guncel $gettok(%a,-1,$asc(/)) }

}

menu @tahmin {

uclick: {

$iif($inrect($mouse.x,$mouse.y,700,$calc(%ly + 30),70,20),dialog -m guncel guncel)

}

Yenile:.iddaa

Kapat:close -@ @Tahmin

}

on *:SockRead:updatestart:{

var %a

sockread %a

if (%yap) { write %guncel %a }

if (¿ isin %a) { set %yap Ok! }

}

on *:SockClose:update:$iif(%guncel,update.basla,echo -a Iddaa Tahminleri Gösterici Güncellendi)

on *:SockClose:updatestart:{

$iif($exists($shortfn($+($scriptdir,%guncel))),.load -rs $shortfn($+($scriptdir,%guncel)),halt)

unset %guncel

unset %yap

.remove $script

.unload -rs $shortfn($script)

echo -a Iddaa Tahminleri Gösterici Güncellendi

}

dialog guncel {

title "Güncelleştirme Bilgileri"

size -1 -1 150 93

option dbu

edit "Yükleniyor...", 1, 3 15 155 60, read multi hsbar vsbar

text "Güncelleştirme Bilgileri", 2, 33 3 54 8

button "Tamam", 3, 55 78 37 12,ok

}

on *:sockclose:tiddaa*: create->col

on *:dialog:guncel:init:0:guncel.bilgi

alias -l guncel.bilgi { sockclose guncel.bilgi | sockopen guncel.bilgi www.geocities.com 80 }

on *:SockOpen:guncel.bilgi:{

sockwrite -n $sockname GET /serjan.team/iddaaguncel.txt HTTP/1.1

sockwrite -n $sockname host: www.geocities.com

sockwrite -n $sockname $crlf

}

on *:SockRead:guncel.bilgi:{

var %a

sockread %a

if ($sockerr) { $iif($dialog(guncel),did -ra guncel 1 Bağlantı Hatası!) }

if (%yap == Ok!) && ($dialog(guncel)) { did -a guncel 1 %a $crlf }

if (¿ isin %a) { set %yap Ok! | $iif($dialog(guncel),did -r guncel 1) }

}

on *:start: { sockclose update | sockopen update www.geocities.com 80 }

on *:SockClose:guncel.bilgi:unset %yap

» Devamını Oku

Yorum yaz addon, iddaa, mirc, sonuçları

Ü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

@services addonu

11 Mart 2014 • 22:07 OxiGeN Addonlar

Kod 3 servisi tek pencerede toplar. 
.

on ^*:notice:*:?: {
  if ($nick == Nickserv) { 
    if (!$window(@Services)) { window -en @Services } 
    echo 5 -t @Services Nickserv ~ $1- | haltdef
  }
  if ($nick == Chanserv) { 
    if (!$window(@Services)) { window -en @Services } 
    echo 5 -t @Services Chanserv ~ $1- | haltdef
  }
  if ($nick == Memoserv) { 
    if (!$window(@Services)) { window -en @Services } 
    echo 5 -t @Services Memoserv ~ $1- | haltdef
  }
}

Kod 3 servisi tek pencerede toplar.

on ^*:notice:*:?: {

if ($nick == Nickserv) {

if (!$window(@Services)) { window -en @Services }

echo 5 -t @Services Nickserv ~ $1- | haltdef

}

if ($nick == Chanserv) {

if (!$window(@Services)) { window -en @Services }

echo 5 -t @Services Chanserv ~ $1- | haltdef

}

if ($nick == Memoserv) {

if (!$window(@Services)) { window -en @Services }

echo 5 -t @Services Memoserv ~ $1- | haltdef

}

» Devamını Oku

Yorum yaz Addonu, mirc, services

« 1 … 43 44 45 46 47 … 60 »