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

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)
-   mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)
-   -   tek komutla coklu işlem (https://www.ircforumlari.net/mirc-scripting-sorunlari/377765-tek-komutla-coklu-islem.html)

sahr 18 Ocak 2011 22:30

tek komutla coklu işlem
 
merhaba arkadaslar ben tek komut yazarak aşağıdaki işlemleri uygulamak istiyorum bunu yapabilirmiyim nasıl yapmalıyım



1: kanallarda kayıtlı niçklere getpass cekip + vermek istiyorum
2: kanalların modlarını +i +m yapsın
3: online oper adminleri opers kanalına alsın
4: sunucuya girenin ip adresini ip.txt varmı baksın varsa gzline atsın
5: koruma botlarımı herkanalda opa cıkartsın


arkadaşlar bilmiyorum olurmu ama olursa cok işime yarayacak :(:(:(


yetkim networkadmin

Coldman 18 Ocak 2011 23:29

Cevap: tek komutla coklu işlem
 
2: kanalların modlarını +i +m yapsın
( ve diyer Modlar ALT +P yapip Popuse Bölüme Eklersen İşini Görecektir ) manueldir.
Not: Txt Dosyasina ekleyipde kullanabilirsin )
elimde böyle birsey oldugu için vermek istedim, İşini görürse kullanırsın. Kolay gelsin.
Kod :

alias modeRall { var %; = 1 | while $chan(%;) { os mode $v1 +R | echo -a 7[14¤7] Sunucudaki Bütün Kanallar Süresiz 4 +R Moduna aLındı4 ! | inc %; } }
alias modeRver { var %; = 1 | while $chan(%;) { os mode $v1 -R | echo -a 7[14¤7] Sunucudaki Bütün Kanallar Süresiz 4 -R Moduna aLındı4 ! | inc %; } }
alias modeMall { var %; = 1 | while $chan(%;) { os mode $v1 +M | echo -a 7[14¤7] Sunucudaki Bütün Kanallar Süresiz 4 +M Moduna aLındı4 ! | inc %; } }
alias modeMver { var %; = 1 | while $chan(%;) { os mode $v1 -M | echo -a 7[14¤7] Sunucudaki Bütün Kanallar Süresiz 4 -M Moduna aLındı4 ! | inc %; } }
alias moodemall { var %; = 1 | while $chan(%;) { os mode $v1 +m | echo -a 7[14¤7] Sunucudaki Bütün Kanallar Süresiz 4 +m Moduna aLındı4 ! | inc %; } }
alias moodemver { var %; = 1 | while $chan(%;) { os mode $v1 -m | echo -a 7[14¤7] Sunucudaki Bütün Kanallar Süresiz 4 -m Moduna aLındı4 ! | inc %; } }
alias modeiall { var %; = 1 | while $chan(%;) { os mode $v1 +i | echo -a 7[14¤7] Sunucudaki Bütün Kanallar Süresiz 4 +i Moduna aLındı4 ! | inc %; } }
alias modeiver { var %; = 1 | while $chan(%;) { os mode $v1 -i | echo -a 7[14¤7] Sunucudaki Bütün Kanallar Süresiz 4 +R Moduna aLındı4 ! | inc %; } }
alias modeRimall { var %; = 1 | while $chan(%;) { os mode $v1 +Rim | echo -a 7[14¤7] Sunucudaki Bütün Kanallar Süresiz 4 +Rim Moduna aLındı4 ! | inc %; } }
alias modeRimver { var %; = 1 | while $chan(%;) { os mode $v1 -Rim | echo -a 7[14¤7] Sunucudaki Bütün Kanallar Süresiz 4 -Rim Moduna aLındı4 ! | inc %; } }
alias modeRalll { var %; = 1 | while $chan(%;) { mode $v1 +R | echo -a 7[14¤7] Sunucudaki Bütün Kanallar Süresiz 4 +R Moduna aLındı4 ! | inc %; } }
alias modeRverr { var %; = 1 | while $chan(%;) { mode $v1 -R | echo -a 7[14¤7] Sunucudaki Bütün Kanallar Süresiz 4 -R Moduna aLındı4 ! 7[14¤7] | inc %; } }
alias modeMalll { var %; = 1 | while $chan(%;) { mode $v1 +M | echo -a 7[14¤7] Sunucudaki Bütün Kanallar Süresiz 4 +M Moduna aLındı4 ! 7[14¤7] | inc %; } }
alias modeMverr { var %; = 1 | while $chan(%;) { mode $v1 -M | echo -a 7[14¤7] Sunucudaki Bütün Kanallar Süresiz 4 -R Moduna aLındı4 ! 7[14¤7] | inc %; } }
alias moodemalll { var %; = 1 | while $chan(%;) { mode $v1 +m | echo -a 7[14¤7] Sunucudaki Bütün Kanallar Süresiz 4 +m Moduna aLındı4 ! 7[14¤7] | inc %; } }
alias moodemverr { var %; = 1 | while $chan(%;) { mode $v1 -m | echo -a 7[14¤7] Sunucudaki Bütün Kanallar Süresiz 4 -m Moduna aLındı4 !7[14¤7] | inc %; } }
alias modeialll { var %; = 1 | while $chan(%;) { mode $v1 +i | echo -a 7[14¤7] Sunucudaki Bütün Kanallar Süresiz 4 +i Moduna aLındı4 ! 7[14¤7] | inc %; } }
alias modeiverr { var %; = 1 | while $chan(%;) { mode $v1 -i | echo -a 7[14¤7] Sunucudaki Bütün Kanallar Süresiz 4 -i Moduna aLındı4 ! 7[14¤7] | inc %; } }
alias modeRimalll { var %; = 1 | while $chan(%;) { mode $v1 +Rim | echo -a 7[14¤7] Sunucudaki Bütün Kanallar Süresiz 4 +Rim Moduna aLındı4 !7[14¤7] | inc %; } }
alias modeRimverr { var %; = 1 | while $chan(%;) { mode $v1 -Rim | echo -a 7[14¤7] Sunucudaki Bütün Kanallar Süresiz 4 -Rim Moduna aLındı4 !7[14¤7] | inc %; } }
menu * {
.KANALLARA MODE VER
..OperServden Mode verme
...Kanalları +R Almak:/modeRall
...Kanalları -R Almak:/modeRver
...Kanalları +M Almak:/modeMall
...Kanalları -M Almak:/modeMver
...Kanalları +m Almak:/moodemall
...Kanalları -m Almak:/moodemver
...Kanalları +i Almak:/modeiall
...Kanalları -i Almak:/modeiver
...Kanalları +Rim Almak:/modeRimall
...Kanalları -Rim Almak:/modeRimver
..Serverden mode verme
...Kanalları +R Almak:/modeRalll
...Kanalları -R Almak:/modeRverr
...Kanalları +M Almak:/modeMalll
...Kanalları -M Almak:/modeMverr
...Kanalları +m Almak:/moodemalll
...Kanalları -m Almak:/moodemverr
...Kanalları +i Almak:/modeialll
...Kanalları -i Almak:/modeiverr
...Kanalları +Rim Almak:/modeRimalll
...Kanalları -Rim Almak:/modeRimverr
}

sahr 18 Ocak 2011 23:34

Cevap: tek komutla coklu işlem
 
cok tesekurler emeğine ilgine sağlık ama bir komutla ben dediklerimi yapmak istiyorum senin verdiğin kod farklı benim isteğim bu değil uğraşmışsın okadar cok üzgünüm :(

X 19 Ocak 2011 00:03

Cevap: tek komutla coklu işlem
 
Alıntı:

sahr Nickli Üyeden Alıntı (Mesaj 1040652905)
cok tesekurler emeğine ilgine sağlık ama bir komutla ben dediklerimi yapmak istiyorum senin verdiğin kod farklı benim isteğim bu değil uğraşmışsın okadar cok üzgünüm :(

Tek komutla yapani repe bogacagim.

DeLiKaNLi 19 Ocak 2011 11:24

Cevap: tek komutla coklu işlem
 
Alıntı:

sahr Nickli Üyeden Alıntı (Mesaj 1040652856)
merhaba arkadaslar ben tek komut yazarak aşağıdaki işlemleri uygulamak istiyorum bunu yapabilirmiyim nasıl yapmalıyım



1: kanallarda kayıtlı niçklere getpass cekip + vermek istiyorum
2: kanalların modlarını +i +m yapsın
3: online oper adminleri opers kanalına alsın
4: sunucuya girenin ip adresini ip.txt varmı baksın varsa gzline atsın
5: koruma botlarımı herkanalda opa cıkartsın


arkadaşlar bilmiyorum olurmu ama olursa cok işime yarayacak :(:(:(


yetkim networkadmin

Kardes asagidaki ben bildigim kadariyla yardimci olayim sana..

1. Bu verdigim kod getpass cekmek yerine /ns status nick komutunu isleyip nick kayitli ise hosgeldin buyur cayin der ve samode ile voice verir. Eger nick kayitli deilse nickini kayitla sende hosgeldini haket yazar. (remote kismina koyacaksin)

;Kodu dieforyou arkadasimizdan buldum az eksigi wardi halledip editledim kendime gore..
on !*:join:#sohbet: { ns status $nick }
on *:notice:*:?: { if ($nick == nickserv) {
if ($2 == $me) halt
if ($3 == 0) { msg #sohbet Nickini kayitla ho$geldin mesaji almaya hak kazan 4 $2 12 :P }
if ($3 == 1) { msg #sohbet Hosgeldin 12 $2 1buyur buda cayin 4)_( | samode #sohbet +v $2 }
if ($3 == 3) { msg #sohbet Hosgeldin 12 $2 1buyur buda cayin 4)_( | samode #sohbet +v $2 }
}
}

2. /sac /mode # +im (Bu kod bulundugun kanali +im modelerine alir) kullanimi /sac

3. Yine bir remote kodu verecegim bu otomatik olarak isler..
;Difuzyon kardesimize aittir
on *:rawmode:#:yonlendir $1 $2 $chan

alias yonlendir {
if $3 == #sohbet {
if $istok(+h +o +oa +oq +q +rq +a,$1,32) { sajoin $2 #ops }
}
if $3 == #radyo {
if $istok(+h +o +oa +oq +q +rq +a,$1,32) { sajoin $2 #dj }
}
if $3 == #help {
if $istok(+h +o +oa +oq +q +rq +a,$1,32) { sajoin $2 #helper }
}
}

4. Okutmali proxy korumasi. Proxy.txt dosyasi kurup mirc ana dizinine atacaksin kardes.

;Lucifer kardesimize aittir.
on *:text:*:#opers:{
if !proxyekle* iswm $1- {
if $read(proxy.txt,w,$2-) {
.msg $chan $2 Proxy Listesinde zaten ekli.
}
else {
write proxy.txt $2-
.msg #KANAL $2 Proxy Listesine Eklendi.
.gzline $2 Proxy
}
}
if !proxysil* iswm $1- {
if !$read(proxy.txt,w,$2-) {
.msg #KANAL $2 Maskı Zaten Proxy Listesinde yok.
}
else {
write $+(-,dw,$2-) badlist.txt
.msg #KANAL $2 Maskı Proxy Listesinden Silindi.
.gzline $2
}
}
}

5. Remote koduna ekliceksin: Kullanimi /opall nick
;elt33 kardesimize aittir
alias opall { var %; = 1 | while $chan(%;) { cs op $v1 $me | inc %; } }

Peki simdi gelelim tek komut ile kullanicagin seyler 2 ve 5 numaralar ona bir alias yapalim..

/hepsi /sac | /opall botunnicki

Fonzerelli 19 Ocak 2011 12:49

Cevap: tek komutla coklu işlem
 
bir method yazıp, onu da bir buton ile invoke edilebilir.

sahr 20 Ocak 2011 01:35

Cevap: tek komutla coklu işlem
 
Alıntı:

sahr Nickli Üyeden Alıntı (Mesaj 1040652856)
merhaba arkadaslar ben tek komut yazarak aşağıdaki işlemleri uygulamak istiyorum bunu yapabilirmiyim nasıl yapmalıyım



1: kanallarda kayıtlı niçklere getpass cekip + vermek istiyorum
2: kanalların modlarını +i +m yapsın
3: online oper adminleri opers kanalına alsın
4: sunucuya girenin ip adresini ip.txt varmı baksın varsa gzline atsın
5: koruma botlarımı herkanalda opa cıkartsın


arkadaşlar bilmiyorum olurmu ama olursa cok işime yarayacak :(:(:(


yetkim networkadmin


teşekkurler kardesım yardımın ıcın benım anlatığımla bir bağlantısı varmı bu verdiğiinin


kanalların modlarını yazdım
online operlerleri oper kanalına almadan bahsettim
koruma botlarımı opa cıkartmadan bahsettım
getpas cekmek ıstedım

ip adres kısmına vermıs oldugun kod işimi görür teşekürler

ama diğerleri alakasız geldi bana :) umarım alınmazsın dediklerimden
yardımına minnettarım yardım etmek zorunda değilsin kimse yardım etmek zorunda değil

miteşekkirim bu konuda



Kod:


alias yonlendir {
if $3 == #sohbet {
if $istok(+h +o +oa +oq +q +rq +a,$1,32) { sajoin $2 #ops }
}
if $3 == #radyo {
if $istok(+h +o +oa +oq +q +rq +a,$1,32) { sajoin $2 #dj }
}
if $3 == #help {
if $istok(+h +o +oa +oq +q +rq +a,$1,32) { sajoin $2 #helper }
}
}

;;;;;;;;;;;;;;;;;;;;;;;;;;;
 
alias opall { var %; = 1 | while $chan(%;) { cs op $v1 $me | inc %; } }

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 
mode # +im (Bu kod bulundugun kanali +im modelerine alir)


sahr 21 Ocak 2011 02:20

Cevap: tek komutla coklu işlem
 
sanırım olmayacak bişey

Coldman 21 Ocak 2011 03:04

Cevap: tek komutla coklu işlem
 
Alıntı:

sahr Nickli Üyeden Alıntı (Mesaj 1040655230)
sanırım olmayacak bişey

2: kanalların modlarını +i +m yapsın
3: online oper adminleri opers kanalına alsın

eger ''+i'' ve ''+m'' modlari sabit modlar olacaka ; Bunu kodsuzda yapabilirsin ''cs set #kanaladi mlock +im '' Moduna alarak kanalli süresiz olarak im Moduna almiş olursun ayrica
Operler içinde unrealde Oto giriş verebilirsin operini giren direk belirlediğin kanala girer.

5: koruma botlarımı herkanalda opa cıkartsın

Botun Nicki Şifreli değil mi? Kanallarda Access Ekle Bot Oto Op aLir Diyer kodleride üstte verilenlerden bakarsan işini görür. diye düşünüyorum. botun ne yetki almasini istiyorsan ''Cs access #kanaladi add Nick Seviye'' Sekilinde ekleyebilirsim. Kolay gelsin.

sahr 21 Ocak 2011 23:29

Cevap: tek komutla coklu işlem
 
on *:text:*:#opers:{
if !proxyekle* iswm $1- {
if $read(proxy.txt,w,$2-) {
.msg $chan $2 Proxy Listesinde zaten ekli.
}
else {
write proxy.txt $2-
.msg #KANAL $2 Proxy Listesine Eklendi.
.gzline $2 Proxy
}
}
if !proxysil* iswm $1- {
if !$read(proxy.txt,w,$2-) {
.msg #KANAL $2 Maskı Zaten Proxy Listesinde yok.
}
else {
write $+(-,dw,$2-) badlist.txt
.msg #KANAL $2 Maskı Proxy Listesinden Silindi.
.gzline $2
}
}
} bu kotda sorun var sanırım atmıyor eklediğim ipler kanala girip cıkıo :S


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 11:56.

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2025 IRCForumlari.Net Sparhawk