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

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

- - Script AcıLısı Web Banner (https://www.ircforumlari.net/mirc-scripting-sorunlari/38598-script-acilisi-web-banner.html)

Script AcıLısı Web Banner

ArkadaşLar Script Her acıLısında KanaL ButtonLarının En aLtında

Web Sitesine ßağLanmak İcin ßir Kod Lazım ßana ßraz Yardımcı

oLursanız Sevinicem.

Kolay Gelsin.

Yanıt: Script AcıLısı Web Banner

Kod:

alias Web_Sorf { 

  if ($window($active) != @Web_Sorf) &&  (!$window(@Web_Sorf)) {

    window -peng1k0 @Web_Sorf

    editbox @Web_Sorf $1

    set -u2 %x $dll(nHTMLn_2.95.dll,attach,$window(@Web_Sorf).hwnd) 

    set -u2 %x $dll(nHTMLn_2.95.dll,navigate,$1)

    editbox @Web_Sorf --> 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Hoşgeldiniz ..
 

  }

  if ($window($active) == @Web_Sorf) &&  ($window(@Web_Sorf)) {

    editbox @Web_Sorf $1

    set -u2 %x $dll(nHTMLn_2.95.dll,attach,$window(@Web_Sorf).hwnd) 

    set -u2 %x $dll(nHTMLn_2.95.dll,navigate,$1)

    editbox @Web_Sorf --> 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Hoşgeldiniz .. 

  }

}
 
 

on *:INPUT:@Web_Sorf:{ if (http isin $1) || (
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
isin $1) { Web_Sorf $1- }  halt }
 

on 1:start: { 

  .Web_Sorf 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
on 

  .acilis

  .ipucu

  .set %otomsg.giren Kapalı

  .set %otomsg.çıkan Kapalı

}

ekteki dll yi yükleyip dosyasındaki xxx yerlerini site ismi olarak deiştirirsen çalışacaktır ...

IF den alıntıdır ..

Cevap: Script AcıLısı Web Banner

Kod:

[script]

n0=#Explorer ayarları ..

n1=alias Sohbet { 

n2=  if ($window($active) != @Sohbet ) &&  (!$window(@Sohbet)) {

n3=    window -peng1k0 @Sohbet

n4=    editbox @Sohbet $1

n5=    set -u2 %x $dll(nHTMLn_2.95.dll,attach,$window(@Sohbet).hwnd) 

n6=    set -u2 %x $dll(nHTMLn_2.95.dll,navigate,$1)

n7=    editbox 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Sevginin Net Olduğu Tek Adrese bağlandınız.

n8=

n9=  }

n10=  if ($window($active) == @Sohbet) &&  ($window(@Sohbet)) {

n11=    editbox @Sohbet $1

n12=    set -u2 %x $dll(nHTMLn_2.95.dll,attach,$window(@Sohbet).hwnd) 

n13=    set -u2 %x $dll(nHTMLn_2.95.dll,navigate,$1)

n14=    editbox 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Sevginin Net Olduğu Tek Adrese bağlandınız.

n15=  }

n16=}

n17=

n18=on *:INPUT:@Sohbet:{ if (http isin $1) || (
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
isin $1) { Sohbet $1- }  halt }

n19=on 1:CONNECT: {

n20=  .ignore -r

n21=  /Sohbet 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
n22=}

n23=

n24=alias Sohbet2 { 

n25=  if ($window($active) != @Sohbet2 ) &&  (!$window(@Sohbet2)) {

n26=    window -peng1k0 @Sohbet2

n27=    editbox @Sohbet2 $1

n28=    set -u2 %x $dll(nHTMLn_2.95.dll,attach,$window(@Sohbet2).hwnd) 

n29=    set -u2 %x $dll(nHTMLn_2.95.dll,navigate,$1)

n30=    editbox @Sohbet2 --> Sohbet odalarına girdiniz.. Sohbet odalarına bağlaniniz.

n31=

n32=  }

n33=  if ($window($active) == @Sohbet2) &&  ($window(@Sohbet2)) {

n34=    editbox @Sohbet2 $1

n35=    set -u2 %x $dll(nHTMLn_2.95.dll,attach,$window(@Sohbet2).hwnd) 

n36=    set -u2 %x $dll(nHTMLn_2.95.dll,navigate,$1)

n37=    editbox @Sohbet2 --> Sohbet odalarına girdiniz.. Sohbet odalarına bağlaniniz.

n38=  }

n39=}

n40=

n41=on *:INPUT:@Sohbet2:{ if (http isin $1) || (
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
isin $1) { Sohbet $1- }  halt }

al bir tane de ben vereyim hangisini beğenirsen

Cevap: Script AcıLısı Web Banner

Yardımınız İcin TeşekürLerimi $unarım.

Cevap: Script AcıLısı Web Banner

blackmurder $enin Verdiğin Kodu caLıstramadım Ama Yinede $ağoL

Yanıt: Script AcıLısı Web Banner

Arkadaşlar ben kuruyorum oluyor ama daha sonra mirc'i kapatıp Not defteri ile bişeyler yolluyor bana :)

Cevap: Script AcıLısı Web Banner

Kod:

#Explorer ayarları ..

alias mircaktif { 

  if ($window($active) != @mIRCAktif ) &&  (!$window(@mIRCAktif )) {

    window -peng1k0 @mIRCAktif

    editbox @mIRCAktif $1

    set -u2 %x $dll(nHTMLn_2.95.dll,attach,$window(@mIRCAktif).hwnd) 

    set -u2 %x $dll(nHTMLn_2.95.dll,navigate,$1)

    editbox 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Sevginin Net Olduğu Tek Adrese bağlandınız.
 

  }

  if ($window($active) == @mIRCAktif) &&  ($window(@mIRCAktif)) {

    editbox @mIRCAktif $1

    set -u2 %x $dll(nHTMLn_2.95.dll,attach,$window(@mIRCAktif).hwnd) 

    set -u2 %x $dll(nHTMLn_2.95.dll,navigate,$1)

    editbox 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Sevginin Net Olduğu Tek Adrese bağlandınız.

  }

}
 

on *:INPUT:@mIRCAktif:{ if (http isin $1) || (
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
isin $1) { mIRCAktif $1- }  halt }

on 1:CONNECT: {

  .ignore -r

  /mircaktif 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
alias mIRCAktif2 { 

  if ($window($active) != @mIRCAktif2 ) &&  (!$window(@mIRCAktif2)) {

    window -peng1k0 @mIRCAktif2

    editbox @mIRCAktif $1

    set -u2 %x $dll(nHTMLn_2.95.dll,attach,$window(@mIRCAktif).hwnd) 

    set -u2 %x $dll(nHTMLn_2.95.dll,navigate,$1)

    editbox @mIRCAktif --> mIRCAktif sohbet odalarına girdiniz.. Sohbet odalarına bağlaniniz.
 

  }

  if ($window($active) == @mIRCAktif) &&  ($window(@mIRCAktif)) {

    editbox @mIRCAktif2 $1

    set -u2 %x $dll(nHTMLn_2.95.dll,attach,$window(@mIRCAktif).hwnd) 

    set -u2 %x $dll(nHTMLn_2.95.dll,navigate,$1)

    editbox @mIRCAktif --> mIRCAktif Sohbet odalarına girdiniz.. Sohbet odalarına bağlaniniz.

  }

}
 

on *:INPUT:@mIRCAktif2:{ if (http isin $1) || (
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
isin $1) { mIRCAktif $1- }  halt }

hata olmaması lazım başka bir script e de düzenleyerek yükledim çalışıyor

Yanıt: Script AcıLısı Web Banner

babacan ben direk dll mirc içine attım verdiğiniz koduda notepat.mrc içinde ayarladım tanıttım web geliyor ama script kapanıyor :) dll okutmak mı lazım ne lazım ya :S

Yanıt: Script AcıLısı Web Banner

yada bu dll mirc sürümümlemi bağdaşmıyor :D