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

- mIRC Scripting Hazır Kodlar (https://www.ircforumlari.net/mirc-scripting-hazir-kodlar/)

- - Otomatik Oper İşlemi... (https://www.ircforumlari.net/mirc-scripting-hazir-kodlar/36940-otomatik-oper-islemi.html)

Otomatik Oper İşlemi...

Kod:

alias otooper { if ($dialog(otooper)) dialog -v otooper | else dialog -m otooper otooper }

dialog otooper {

  size -1 -1 251 145

  title "Otomatik Oper |LauReLL|"

  button "Ok",1, 160 110 85 20, OK

  box "",2, 5 8 240 97

  text "Server'i :",3, 15 20 45 20

  edit "",4, 70 20 115 20, autohs

  text "Nickiniz :",5, 15 50 55 20

  edit "",6, 70 48 115 20, autohs 

  text "OperPass :",7, 15 80 55 20

  edit "",8, 70 78 115 20, autohs %oper.pass

  button "SiL",10, 190 20 40 20 

  button "SiL",11, 190 48 40 20

  button "SiL",12, 190 78 40 20

  radio "Aç",13, 5 110 35 20,

  radio "Kapat",14, 45 110 45 20,

}

on *:DIALOG:otooper:edit:*: {

  if ($did == 6) { set %oper.nick $did(6) }

  if ($did == 8) { set %oper.pass $did(8).text }

  if ($did == 4) { set %oper.serv $did(4) }

}

on *:dialog:otooper:init:0:{

  laurellrenk

  did -o otooper 6 1 %oper.nick $did(6)

  did -o otooper 8 1 %oper.pass $did(8).text

  did -o otooper 4 1 %oper.serv $did(4)

  if (%oto.oper == on) { did -c otooper 13 1 %oto.oper $did(13) }

  if (%oto.oper == off) { did -c otooper 14 1 %oto.oper $did(14) }

  if (%oto.oper == off) { did -b $dname 3,4,5,6,7,8 }

  if (%oto.oper == on) { did -e $dname 3,4,5,6,7,8 }

} 

on *:dialog:otooper:sclick:*:{

  if ($did == 10) { unset %oper.serv | did -o otooper 4 1 %oper.serv }

  if ($did == 11) { unset %oper.nick | did -o otooper 6 1 %oper.nick }

  if ($did == 12) { unset %oper.pass | did -o otooper 8 1 %oper.pass }

  if ($did == 13) { set %oto.oper on | did -e $dname 3,4,5,6,7,8 }

  if ($did == 14) { set %oto.oper off | did -b $dname 3,4,5,6,7,8 }

}

on *:connect: { 

  if (%oper.nick != $null) && (%oper.pass != $null) && ($server == %oper.serv) && (%oto.oper == on) { oper %oper.nick %oper.pass }

}

alias laurellrenk {

  mdxdll SetMircVersion $version 

  mdxdll MarkDialog $dname

  mdxdll SetDialog [ $dname ] bgcolor [ $rgb(190,190,190) ] 

  mdxdll SetColor 3,5,7,13,14 textbg [ $rgb(190,190,190) ]

  mdxdll SetColor 3,5,7,13,14 background [ $rgb(190,190,190) ]

  mdxdll SetColor $dname 3,5,7,13,14 text $rgb(178,0,0) 

  mdxdll SetColor $dname 4,6,8 text $rgb(200,200,200) 

  mdxdll SetColor 4,6,8 textbg [ $rgb(0,64,128) ]

  mdxdll SetColor 4,6,8 background [ $rgb(0,64,128) ]

}

alias mdxdll { return $shortfn(DLL\mdx.dll,$1,$2-) }

c:\D:\bilmemnemIRC\dll\mdx.dLL Olmazı lazım yoksa dosya düzgün ÇalışmayabiLir...

Cevap: Otomatik Oper İşlemi...

Teşekkürler LaureLL

Cevap: Otomatik Oper İşlemi...

C:\Program Files\mIRC
C:\Aralarında boşluk olan klasör\mIRC

de düzgün çalışması için

Kod:

$shortfn(mdx.dll yolu)

$qt(mdx.dll yolu)

$+(",mdx.dll yolu,")

aliaslarından birini kullanabilirsin.

Cevap: Otomatik Oper İşlemi...

Alıntı:

el33t Nickli Üyeden Alıntı (Mesaj 254682)

C:\Program Files\mIRC
C:\Aralarında boşluk olan klasör\mIRC

de düzgün çalışması için

Kod:

$shortfn(mdx.dll yolu)

$qt(mdx.dll yolu)

$+(",mdx.dll yolu,")

aliaslarından birini kullanabilirsin.

Hatayı Düzelttim hocan ben $shortfn Olayını anlamıyorum o yüzden basite alıp direkt yazıyorum...

Yanıt: Otomatik Oper İşlemi...

nasıl yukluyoruz acaba yrdcı olurmusun?

Cevap: Yanıt: Otomatik Oper İşlemi...

Alıntı:

LoGoS Nickli Üyeden Alıntı (Mesaj 257439)

nasıl yukluyoruz acaba yrdcı olurmusun?

Alt + R bas kodları ekle yanliz eksiksiz :)

Cevap: Otomatik Oper İşlemi...

siz bunu bır mırce uygulayıp buraya dowland adresiin yollasanaız olmazmmı

Cevap: Otomatik Oper İşlemi...

Alıntı:

Niyekine Nickli Üyeden Alıntı (Mesaj 267609)

siz bunu bır mırce uygulayıp buraya dowland adresiin yollasanaız olmazmmı

Ne anlamı kaldı "mIRC Scripting" yardım bölümünün? Yükleyenlerin 2 tane beyinleri yok, gayet basit. 1.5 saniyede kopyalayabilir, 1 saniyede taşıyabilir, 1.5 saniyede de yapıştırabilirsin. Toplam 4 saniye, acemiliğine de 1 saniye süre versek 5 saniyelik iş çıkmış olur.

Yanıt: Otomatik Oper İşlemi...

o kadar bile sürmez ben 3.43 de bitirdim :D

Yanıt: Otomatik Oper İşlemi...

özür dilerim ben bu konularda yeniyim de bana düştükten sonra
tekrar connect olacak nickimi şifremi ve operimi girecek
ardından da istediğim kanallara giecek bir Kod arıyorum.
bu sitede 2 sini ayrı ayrı buldum birleştirdim kafama göre ama olmadı.
Bu konuda yardımcı olabilir misiniz? Şimdiden Teşekkürler.

Cevap: Otomatik Oper İşlemi...

on *start: { server irc.***.net }
on *:connect: { if $server == irc.***.net { nick Onder | ns sidentify şifre | oper nick şifre | umode tcbXpLk-x | sajoin #admin,#muhabbet,#mop,#cafe,#oyun } }

Bunu remotene ekle.mIRC inden de Kopunca tekrar bağlanı seç.
L4roXyL den.

Cevap: Otomatik Oper İşlemi...

on *:disconnect: { if $server == irc.falanfilan.net { server irc.falanfilan.net } }
on *:connect: { if $server == irc.falanfilan.net { nick nick'in | ns identify şifren | join #kanal1,#kanal2 | bunuyap | şunu-yap | hatta-bunuda-yap } }
Gibi.

Yanıt: Cevap: Otomatik Oper İşlemi...

Alıntı:

Onder Nickli Üyeden Alıntı (Mesaj 271508)

on *start: { server irc.***.net }
on *:connect: { if $server == irc.***.net { nick Onder | ns sidentify şifre | oper nick şifre | umode tcbXpLk-x | sajoin #admin,#muhabbet,#mop,#cafe,#oyun } }

Bunu remotene ekle.mIRC inden de Kopunca tekrar bağlanı seç.
L4roXyL den.

hatalı..
bu şekilde SAJOIN Not enough parameters hatası alırsın

sajoin $me #kanal1,#kanal2,vs..

şeklinde olmalı

PHP- Kodu:

   on *start: { server irc.***.net }
on *:connect: { if $server == irc.***.net { nick Onder | ns sidentify şifre | oper nick şifre | umode tcbXpLk-x | sajoin $me #admin,#muhabbet,#mop,#cafe,#oyun } }

Cevap: Otomatik Oper İşlemi...

Benim verdiğim öyle değildi zaten.
Sanırım onder kopyalarken yanlışlık olmuş.

Yanıt: Otomatik Oper İşlemi...

arkadaşlar çok sağolun. çok makbule geçti.

Cevap: Otomatik Oper İşlemi...

bunu birde rar lı olarak upload etseniz indirip kurmak daha kolay ve sorun çıkarmayacaktir görüşündeyim .. tşk. iyi forumlar...

Cevap: Otomatik Oper İşlemi...

Konu Hortlamış sanırım .)

Cevap: Otomatik Oper İşlemi...

Alıntı:

Niyekine Nickli Üyeden Alıntı (Mesaj 267609)

siz bunu bır mırce uygulayıp buraya dowland adresiin yollasanaız olmazmmı

Alıntı:

MavipikSeL Nickli Üyeden Alıntı (Mesaj 267657)

NeTy mavipiksel durumu kısa ve öz olarak açıklamış.

Cevap: Otomatik Oper İşlemi...

* Çok fazla parametre: $shortfn (Satır 55, script2.ini)

alias mdxdll { return $shortfn(DLL\mdx.dll,$1,$2-) } şu satırda bi fazlalık var sanırım