[eLsukr]

s.a saygıdeger coder abilerim..ben mırcımı açtıgımda wep pencereside açılıyor. forum sayfamız ayrı. ayrıca forum pencereside eklemem için ne yapmam gerek, aşagıdaki verdiğim cod u kopy yapıp wep yerlerini forum olarak değiştirdim ama yinede forum penceresi açılmadı ne yapabilirim.. tskler..

alias Web {
if ($window($active) != @Web) && (!$window(@Web)) {
window -peng1k0 @Web
editbox @Web $1
set -u2 %x $dll(dlls/\nHTML.dll,attach,$window(@Web).hwnd)
set -u2 %x $dll(dlls/nHTML.dll,navigate,[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...])
editbox @Web [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] a Hoşgeldiniz! Web Sayfası Adreslerinizi
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
veya http formatlarını en başa yazarak giriniz!
}
if ($window($active) == @Web) && ($window(@Web)) {
editbox @Web $1
set -u2 %x $dll($mircdir\nHTML.dll,attach,$window(@Web).hwnd)
set -u2 %x $dll($mircdir\nHTML.dll,navigate ,$1)
editbox @Web $1 Web Sitesindesiniz! Yeni web adresine girerken
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
veya http formatlarını en başa yazınız!
}
}
on *:INPUT:@Web:{ if (http isin $1) || (
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
isin $1) { Web $1- } halt }



-
on *:join:#: { if $nick == $me { xpencere $chan } }
alias xpencere {
if !$widnow(@deneme) { window -dp +L @deneme 0 0 250 100 | window -h @deneme }
drawrect -f @deneme $colour(background) 50 $window(@deneme).x $window(@deneme).y $window(@deneme).w $window(@deneme).h
drawtext @deneme $colour(own text) TimesNewRoman 22 0 0 $1
drawtext @deneme $colour(info text) TimesNewRoman 12 10 30 iSlamiSohbet Script!
drawsave @deneme $+($chan,_tmp.bmp)
background -p $1 $+($chan,_tmp.bmp)
.remove $+($chan,_tmp.bmp)
set %XColorCheck $color(background)
}
alias XColorCheck { if $color(background) != %XColorCheck { var %i = $chan(0) | while %i { xpencere $chan(%i) | dec %i 1 } } }
on *:connect: { set %XColorCheck $color(background) | .timerXColorCheck -m 0 200 XColorCheck }
-
alias irc.iSlamiSohbet.com 6667 {
if ($window($active) != @AsyaRadyo) && (!$window(@AsyaRadyo)) {
window -peng1k0 @Radyoİslam
editbox @AsyaRadyo $1
set -u2 %x $dll(dlls/\nHTML.dll,attach,$window(@server irc.iSlamiSohbet.net 6667).hwnd)
set -u2 %x $dll(dlls/nHTML.dll,navigate, [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...])
editbox @Radyoİslam Özel Radyomuz Her An Aktif [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] Katkılarıyla Sizlerle
}
if ($window($active) == @AsyaRadyo) && ($window(@AsyaRadyo)) {
editbox @server irc.iSlamiSohbet.com 6667 $1
set -u2 %x $dll($mircdir\nHTML.dll,attach,$window(@).hwnd)
set -u2 %x $dll($mircdir\nHTML.dll,navigate,$1)
editbox @iSlamiSohbet $1 Web Sitesindesiniz! Yeni web adresine girerken
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
veya http formatlarını en başa yazınız!
}
}
on *:INPUT:@islamiSohbet:{ if (http isin $1) || (
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
isin $1) { Web $1- } halt }

[uFuK]

Alıntı:

alias forum { if ($window($active) != @Forum) && (!$window(@Forum)) { window -peng1k0 @Forum editbox @Forum $1 set -u2 %x $dll(dlls/\nHTML.dll,attach,$window(@Forum).hwnd) set -u2 %x $dll(dlls/nHTML.dll,navigate,[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]) editbox @Forum [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] a Hoşgeldiniz! Web Sayfası Adreslerinizi Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir. veya http formatlarını en başa yazarak giriniz! } if ($window($active) == @Forum) && ($window(@Forum)) { editbox @Forum $1 set -u2 %x $dll($mircdir\nHTML.dll,attach,$window(@Forum).hwn d) set -u2 %x $dll($mircdir\nHTML.dll,navigate ,$1) editbox @Web $1 Web Sitesindesiniz! Yeni web adresine girerken Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir. veya http formatlarını en başa yazınız! } } on *:INPUT:@forum:{ if (http isin $1) || ( Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir. isin $1) { Web $1- } halt } on *.start: { forum }

ALT R - Dosya - Yeni - Yapıştır.


----------

+ ek olarak söyleyim mIRC'inizde web sayfası açtırmak Scripti aşırı ve belirgin rahatsız edici derecede kasar.. Mümkün oldugunca kullanmamaya calısın

[eLsukr]

Fenomens ustadım olmadı..wep penceressinin altında ayrıca forum penceresi demek istedim.. yine wep açıldı ayrıca forum açılmadı...tskler

[uFuK]

Açılması lazım kopyaladığın kod düzenine göre. bikere illaki @forum penceresi açılacak start eventıyla destekledim. Boş bir sayfaya kopyala olmazsa

[eLsukr]

hocam özür dilerim ben beceremedim herhalde
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

[H3ctoR]

Aşağıda kodu vericem bu kodun doğru çalışması için dll/nHTML.dll bu şekilde olması gerek nhtml.dll

Kod:

alias Web {
if ($window($active) != @Web) && (!$window(@Web)) {
window -peng1k0 @Web
editbox @Web $1
set -u2 %x $dll($mircdirdll\nHTML.dll,attach,$window(@Web).hw nd)
set -u2 %x $dll($mircdirdll\nHTML.dll,navigate,[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...])
editbox @Web Web Sayfası Adreslerinizi
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
veya http formatlarını en başa yazarak giriniz!
}
if ($window($active) == @Web) && ($window(@Web)) {
editbox @Web $1
set -u2 %x $dll($mircdirdll\nHTML.dll,attach,$window(@Web).hw nd)
set -u2 %x $dll($mircdirdll\nHTML.dll,navigate,$1)
editbox @Web $1 Web Sitesindesiniz! Yeni web adresine girerken
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
veya http formatlarını en başa yazınız!
}
}
on *:INPUT:@Web:{ if (http isin $1) || (
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
isin $1) { Web $1- } halt }