Çevrimdışı

Selam arkadaşlar. Kullandığım scriptin otomatik girişi mynete ayarlı fakat Bağlan dediğimde mynete girmiyor. Manuel olarakta yazıyorum yine girmiyor. Önce mynet dışında başka bir servera giriyorum ve oradan da /server -m irc.mynet.com komutuyla girebiliyorum. Bunu nasıl düzeltebiliriz acaba sorun sizce nerede olabilir. Teşekkürler.

 

Çevrimdışı

start eventinde kod olabilir status ekranında bır uyarı cıkıyormu cıkıyorsa ne yazıyor /remote off yazıp dene bakalım mynete baglanacakmı manuel

 

Çevrimdışı

[servers]
n0=irc.mynet.com:6667GROUP:MyNetSERVER:
n1=irc.mynet.com:6667GROUP:MyNet
n2=SohbetteNetSERVER:irc.sohbettenet.com:6667
[success]
n0=irc.sohbettenet.com,1

Burası server ini dosyasında olan yer mynetle ilgili..

Bir de;


if $devent == sclick {
if $did == 65 {
var %site = $did(60).text
if ( %site == $null ) { spweb [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] }
else { spweb %site }
}
if $did == 45 {
var %google = $did(40)
if ( %google == $null ) { halt }
else { gogle [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]= $+ %google }
}
if $did == 1 {
if ($did($dname,1).sel = 3) {
if ($scid($activecid).status = disconnecting || $scid($activecid).status = disconnected ) { scid $activecid server irc.mynet.com }
else { scid $activecid disconnect }
update.tb
did -f $dname 1
scid $activecid window -a "status window"
}

Ve bir de burası var mynet ve /server -m ile ilgili;

}
alias cpanel_connect { dialog -m cpanel cpanel | did -f cpanel 10 }
alias cpanel_settings { dialog -m cpanel cpanel | did -f cpanel 11 }
alias cpanel_koruma { dialog -m cpanel cpanel | did -f cpanel 15 }
alias cpanel_extra { dialog -m cpanel cpanel | did -f cpanel 13 }
alias cpanel_info { dialog -m cpanel cpanel | did -f cpanel 14 }
on *:dialog:cpanel:sclick:*:{
if $did == 5 {
if $did(5).sel == 2 { did -f $dname 10 }
if $did(5).sel == 3 { did -f $dname 11 }
if $did(5).sel == 4 { did -f $dname 15 }
if $did(5).sel == 5 { did -f $dname 13 }
if $did(5).sel == 6 { did -f $dname 14 }
}
if ($did == 28) { b.bag irc.mynet.com }
if ($did == 26) {
if (%b.yeni == on) { set %b.yeni off | halt }
if (%b.yeni == off) { set %b.yeni on | halt }
}
}
on *:dialog:cpanel:dclick:*:{
if $did == 91 {
.timercpanel off
.timercpanel 91 1 .alias _temp_cpanel_alias
.alias _temp_cpanel_alias $gettok($readini($shortfn($scriptdircpanel.ini),cp anel,$calc($did(91).sel -1)),3,222)
_temp_cpanel_alias
}
}
alias -l b.bag { if (%b.yeni == on) { server -m $1 | .nick $did(cpanel,24) } | else { .nick $did(cpanel,24) | server $1 } | dialog -c cpanel cpanel }
alias _smerkez { dialog $iif($dialog(cpanel),-v,-m) cpanel cpanel }
on ^1:SNOTICE:*:{
if (/whois isin $1-) {
if ($window(@Whois) == $null) { window -ne @Whois }
echo 13 -t @Whois $1- | halt
}


eventle ve mynetle ilgili böyle bir yer var başka da yok mynetle ilgili..Bunlardan birisi olabilirmi acaba?

Remote Açık ve Kapalı iken Statüsde çıkan yazı da bu;

* Remote Açık
[03:00:44] * Bağlanılıyor irc.mynet.com (6667)
[03:01:05] * Servere Bağlanılamıyor (Bağlantı Düştü ( Tekrar Bağlanmayı Deneyiniz ))
[03:01:08] * Tekrar Bağlanılıyor # 1 irc.mynet.com (6667) (Dns paylaştırılıyor)
[03:01:29] * Servere Bağlanılamıyor (Bağlantı Düştü ( Tekrar Bağlanmayı Deneyiniz ))
[03:01:32] * Tekrar Bağlanılıyor # 2 irc.mynet.com (6667) (Dns paylaştırılıyor)
[03:01:53] * Servere Bağlanılamıyor (Bağlantı Düştü ( Tekrar Bağlanmayı Deneyiniz ))
[03:01:56] * Tekrar Bağlanılıyor # 3 irc.mynet.com (6667) (Dns paylaştırılıyor)


* Remote Kapalı
[03:06:04] * Bağlantınız iptal edildi
[03:06:05] * Bağlanılıyor irc.mynet.com (6667)
[03:06:26] * Servere Bağlanılamıyor (Bağlantı Düştü ( Tekrar Bağlanmayı Deneyiniz ))
[03:06:29] * Tekrar Bağlanılıyor # 1 irc.mynet.com (6667)
[03:06:50] * Servere Bağlanılamıyor (Bağlantı Düştü ( Tekrar Bağlanmayı Deneyiniz ))
[03:06:53] * Tekrar Bağlanılıyor # 2 irc.mynet.com (6667)

 

Çevrimdışı

/remote off
bu komutu yazarak tekrar bağlanabilirsin bence. ident fullname deiş bazen onlarda da sorun oluyor.

ya da en iyisi o scriptten kurtul . script mi kalmadı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

 

Çevrimdışı

bunlar baglantı diyalogu ve aliasları bu vermiş olduğun kod da bı sorun goremedim alt + o seceneğine gir ayarlarda sagda acılısta baglan yazısı işaretlıyse işareti kaldır alt +r tıkla mircinde :start: eventinlarini gözden gecir s irc. veya server irc. gibi baslangıc varmı bak remote off yaptığında da bağlanmıyor diyorsun senin mircinde raw lar ayrı pencerede göstermiyor umarım cünki mynet girişi giriş kod istemektedir senin verdiğin kopyada göremedim bunu ben giriş kod la baglanmıyormusunuz sana sormuyormu giriş kod diye sunucu

 

Çevrimdışı

Alt + o seçeneğinde Açılışta Bağlan seçeneği deaktif zaten muratt_aziz kardeşim. remoteler kapalıykende girmiyor yukarıda logunu vermiştim. Ve /server -m yapıp girdiğimde mynete GIRIS kodu soruyor zaten.. Atıyorum /GIRIS 586 gibi yaparak giriyorum. Neyse muratt_aziz kardeşim Allah senden razı olsun yardımcı olmaya çalıştın elinden geldiğince. Scripti görmeden ancak bu kadar olabilirdi zaten. Sağol varol tekrardan sevgilerimle teşekkürler.

start, /s, /server irc ve GIRIS Kodu ile ilgili yerleride pasteleyeyim son olarak;

on ^*:quit: {
set %quit 0
:start
inc %quit
if ($comchan($nick,%quit) != $null) {
echo $comchan($nick,%quit) $timestamp $+ 12 Çıkış : $nick ( $+ $address $+ $chr(41)) ( $1- )
goto start
}


bir diğeri;

; events
;echo -a scripting\görünüm\Üstmenü.ico
on *:start:{ if ($ppop.trig(n)) { ppop ~ $nick ~
<<<< Hoş Geldiniz >>>> } }
on *:connect:{ if ($ppop.trig(n)) { ppop Bağlantı Kuruldu.. Şu an $server Sunucusu İle Bağlantınız Kuruldu.. } }
on *:disconnect:{ if ($ppop.trig(i)) { ppop Bağlantı Kesildi.. Şu an $server Sunucusu İle Bağlantınız Kesildi.. } }
on *:kill:{ if ($ppop.trig(i)) { ppop Bağlantı Kesildi.. Şu an $2 Tarafından Sunucu İle Bağlantınız Kesildi.. } }
on *:filercvd:*:{ if ($ppop.trig(d)) { ppop DCC Dosya Alımı Tamamlandı.. Dosya: $+(",$get(-1).file,") Gönderen: $get(-1) Tamamlandı.. Alınan: $bytes($get(-1).size,3).suf $iif($get(-1).resumed,after Devam Edilen: $bytes($v1,3).suf) Süre: $duration($get(-1).secs) Ortalama Byte: $bytes($get(-1).cps,3).suf $+ /s. } }
on *:filesent:*:{ if ($ppop.trig(d)) { ppop DCC Dosya Gönderimi Tamamlandı.. Dosya: $+(",$send(-1).file,") Alıcı: $send(-1) Tamamlandı.. Gönderilen: $bytes($send(-1).size,3).suf $iif($send(-1).resumed,after Devam Edilen: $bytes($v1,3).suf) Süre: $duration($send(-1).secs) Ortalama Byte: $bytes($send(-1).cps,3).suf $+ /s. } }
on *:getfail:*:{ if ($ppop.trig(d)) { ppop DCC Dosya Alımı Başarısız.. Dosya: $+(",$get(-1).file,") Gönderen: $get(-1) Başarısız.. Alınan: $+($bytes($get(-1).rcvd,3),/,$bytes($get(-1).size,3).suf) ( $+ $get(-1).pc $+ %) $iif($get(-1).resumed,Devam Edilen: $bytes($v1,3).suf) Süre: $duration($get(-1).secs) Ortalama Byte: $bytes($get(-1).cps,3).suf $+ /s. } }
on *:sendfail:*:{ if ($ppop.trig(d)) { ppop DCC Dosya Gönderimi Başarısız.. Dosya: $+(",$send(-1).file,") Alıcı: $send(-1) Başarısız.. Gönderilen: $+($bytes($send(-1).sent,3),/,$bytes($send(-1).size,3).suf) ( $+ $send(-1).pc $+ %) $iif($send(-1).resumed,Devam Edilen: $bytes($v1,3).suf) Süre: $duration($send(-1).secs) Ortalama Byte: $bytes($send(-1).cps,3).suf $+ /s. } }
ctcp !*:*:*:{

nicklist bölümündeki start olayı, belki alakasız olabilir burası;

:start
var %cl.temp = $_vr(nicklist,$cl.return(%xt))
did - $+ $iif(%cl.temp,c,u) background %xt
did - $+ $iif($did(2).state,e,b) background %xt
if (%xt < 6) { inc %xt | goto start }
var %xt = 7
ve;
:start
_vw nicklist $cl.return(%xt) $did(%xt).state
if (%xt < 6) { inc %xt | goto start }
var %xt = 7



bir diğeri;

menu menubar {
}
on *:START: if ( %imgmirc_config & 1 == 1 ) im_preload
ctcp ^*:version:?: /ctcpreply $nick version %version



bir diğeri;

on 1:start:{
.set %TM1 Turkce mIRC | .set %TM2 Turkce mIRC | .set %logo Turkce mIRC | .set %version Turkce mIRC
.anick TurkcemİRC
.fullname
.identd on MyNet
.if ($group(#ozelkapat) == on) { .disable #ozelkapat }
.stat
}


bir diğeri;

on *^:ERROR:*BANNED*:{
echo 12 -a 5 Serverdan K-Line Yediniz.. ( $+ $9- $+ ) $chr(91) $+ $server $+ $chr(93) | timer 1 5 /server irc.mynet.com | halt
halt
}


bir diğeri;

if $did == 1 {
if ($did($dname,1).sel = 3) {
if ($scid($activecid).status = disconnecting || $scid($activecid).status = disconnected ) { scid $activecid server irc.mynet.com }
else { scid $activecid disconnect }
update.tb
did -f $dname 1
scid $activecid window -a "status window"
}

mynete /server -m ile girdiğimdeki GIRIS kodu örneği;

[05:56:46] * Bağlanılıyor irc.mynet.com (6667)
[05:56:46] -irc8.mynet.com- *** Looking up your hostname...
[05:56:46] -irc8.mynet.com- *** Couldn't resolve your hostname; using your IP address instead
Version Size VERSION Çekti.
[05:56:46] -> [Version] version Turkce mIRC
[05:56:46] [Version VERSION]
[05:56:46] -irc8.mynet.com- *** Version Korumasindan Geciyorsunuz.
[05:56:46] -irc8.mynet.com- *** Version Cevabi Alindi.
##############################
##############################
##############################
##############################
##############################
##############################
##############################
##############################
##############################
[05:56:46] -irc8.mynet.com- Sohbete girebilmek icin, yukaridaki kodu ornekteki gibi /Giris KOD seklinde girmeniz gerekmektedir.
[05:56:46] -irc8.mynet.com- ORNEK: /Giris 123



ve son olarakta bu var;

on *:start:{
.dialog -ma tb tb
.dialog -ma tyr tyr
.dialog -ma tyl tyl
.titlebar Turkce mIRC
.timerram 0 10 .did -ra tb 77,179 $round($remove($gettok($dll($shortfn
(scripting\dll\moo.dll),meminfo,_),3,32),$chr(40), $chr(41),$chr(37)),0))
.titles
}