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/)

- - Ban Açma Hakkında Sorun! (https://www.ircforumlari.net/mirc-scripting-sorunlari/32433-ban-acma-hakkinda-sorun.html)

BeLaLim

07 Haziran 2007 10:11

Ban Açma Hakkında Sorun!

Alıntı:

f1 { if $me isop # { var %' = $ibl(#,0), %. | while %' { if ($calc($ctime - $ibl(#,%').ctime) >= 900) { %. = $addtok(%.,$ibl(#,%'),32) | if $numtok(%.,32) == $modespl { !mode # $+(-,$str(b,$v1)) %. | %. = } } | dec %' } | if %. { !mode # $+(-,$str(b,$numtok(%.,32))) %. } } }

Elimde Böyle bir kod var. misal x kanalına tıkladıysam ve f1 e bastıysam o kanaldaki süresi dolan banları açıyor. ben istiyorumki f1 e bastıgımda bulundugum kanallardaki süresi dolan banları açsın. yardımcı olursanız sevinirim. şimdiden teşekkürler..

detay

07 Haziran 2007 15:32

Cevap: Ban Açma Hakkında Sorun!

Kod:

alias f1 {

  var %t = 0 | while  %t < $chan(0) {

    inc %t 

    if $me isop $chan(%t) { var %' = $ibl($chan(%t),0), %. | while %' { if ($calc($ctime - $ibl($chan(%t),%').ctime) >= 900) { %. = $addtok(%.,$ibl($chan(%t),%'),32) | if $numtok(%.,32) == $modespl { !mode $chan(%t) $+(-,$str(b,$v1)) %. | %. = } } | dec %' } | if %. { !mode $chan(%t) $+(-,$str(b,$numtok(%.,32))) %. } } 

  }

}

BeLaLim

07 Haziran 2007 21:13

Yanıt: Ban Açma Hakkında Sorun!

Mikrop kod güzel çalışıyor ama misal kanal panelini açıp kapattıgım zaman f1 e bastıgımda tüm banları açıyor sebebi nedir acaba.?

detay

08 Haziran 2007 12:48

Cevap: Ban Açma Hakkında Sorun!

Belalim kodun rawla bir ilgisi yok yani banliste gelince acmasina bir anlam veremedim.F1 yerine baska bir tusa al öyle dene baska bir aliasla ilgili olabilir

BeLaLim

09 Haziran 2007 15:25

Yanıt: Ban Açma Hakkında Sorun!

f1 değiştirmiştim zaten /x yaptım. ama yine aynı.

detay

09 Haziran 2007 18:44

Cevap: Ban Açma Hakkında Sorun!

iyide bunun banlistle ilgisi yokki hicbir anlam veremedim (: baska bos bir mircte denemeni tavsiye ederim rawla falan cakisiyor olabilir cünkü ayni kodu ben de kullaniyorum ve banlist acinca bi sorun cikmiyor f1 e bastiginda 15 dklık banlari acmasi gerekir

ScladeR

11 Haziran 2007 03:44

Cevap: Ban Açma Hakkında Sorun!

bunu sole yapabılırmıyız

op oldugum
herhangı bır kanalda bnt yazdıgımda o kanaldakı banları acsın

detay

11 Haziran 2007 05:43

Cevap: Ban Açma Hakkında Sorun!

o dedigini senin ilk kod yapiyo işte alias f1 li olani ekle

SaintCty

11 Haziran 2007 13:52

Cevap: Ban Açma Hakkında Sorun!

Alıntı:

mikrop Nickli Üyeden Alıntı

o dedigini senin ilk kod yapiyo işte alias f1 li olani ekle

ustam aliaslas f 1 yerine benim kanal koruma botum var ona bu rermoteyi eklesem özelinde veya bulundugu bir kanalın genelinde
!banac #adana yazsam bütün banları acsa veya tek bir kişiyi acacaksam !banac #adana nick banlını acsa master olarakta ben ve bir founder arkadaşım olsa mümkünmü yardım ve emekleriniz için şimdiden tşkler

Teori

11 Haziran 2007 15:28

Yanıt: Ban Açma Hakkında Sorun!

Kod:

 alias Banac {
 
 

var %t = 0 | while  %t < $chan(0) {
   inc %t 

  if $me isop $chan(%t) { var %' = $ibl($chan(%t),0), %. | while %' { if ($calc($ctime - $ibl($chan(%t),%').ctime) >= 900) { %. = $addtok(%.,$ibl($chan(%t),%'),32) | if $numtok(%.,32) == $modespl { !mode $chan(%t) $+(-,$str(b,$v1)) %. | %. = } } | dec %' } | if %. { !mode $chan(%t) $+(-,$str(b,$numtok(%.,32))) %. } } 

}

}

on *:text:!banac:#adana: {

if ($nick isop $chan) {

if ($nick == SaintCty) {
 .banac

}

}

}

Boyle Bir Mantıkla Mikrop Arkadasimin Codesine Eklenti Yapabilirsin SaintCty Boylece Adana Kanalında !banac Dediginde Oplar ve Senin KOmutun Ile 15 Dk lık Banlar Acilir Kolay Gelsin SaintCty Yerine Kendi Nickini Eklemeyi Unutma .;)

SaintCty

11 Haziran 2007 19:00

Cevap: Yanıt: Ban Açma Hakkında Sorun!

Alıntı:

Teori Nickli Üyeden Alıntı

Kod:

 alias Banac {


 

 
 var %t = 0 | while  %t < $chan(0) {
 

 inc %t 
  if $me isop $chan(%t) { var %' = $ibl($chan(%t),0), %. | while %' { if ($calc($ctime - $ibl($chan(%t),%').ctime) >= 900) { %. = $addtok(%.,$ibl($chan(%t),%'),32) | if $numtok(%.,32) == $modespl { !mode $chan(%t) $+(-,$str(b,$v1)) %. | %. = } } | dec %' } | if %. { !mode $chan(%t) $+(-,$str(b,$numtok(%.,32))) %. } } 

}

}

on *:text:!banac:#adana: {

if ($nick isop $chan) {

if ($nick == SaintCty) {
 .banac

}

}

}

öncelikle sagol cevab verdigin için benim demek istedigim botum birden fazla kanalda yetkili bende öyle botum acacak ve sade adana degil
mesela !banac #adana dedimmi adana !banac #bursa dedimmi bursa veya sade bir nick !banac #adana ali dedimmi alinin adanadaki banını ve bunu botun özelinde veya bulundugu bir kanalın genelinde yapmak isti,yorum anlatmaya calıştım ve master benim vede bir arkadaşım daha var bizim yetkimizle degil botun 999 sop yetkisiyle bunları yapalım ilgin ve alakan için tşlkler

CipriX

11 Haziran 2007 19:08

Cevap: Ban Açma Hakkında Sorun!

alias banac { mode $1 +b }
raw 367:*:mode $2 -b $3 | halt
on *:text:*:#: {
if ($nick isop $chan) {
if ($nick == SaintCty) {
if !banac* iswm $1- {
.banac $1
}
}
}
}

SaintCty

11 Haziran 2007 19:31

Cevap: Ban Açma Hakkında Sorun!

calışmadı ustam hiç bir hareket yok botun özelindede kanal genelindede !banac #adana yazdım tık yok bir bakarmısın sana zahmet

CipriX

11 Haziran 2007 19:40

Cevap: Ban Açma Hakkında Sorun!

.banac $1

Bunu

.banac $2

Olarak değiştir..

===

<as> !banac #he
*** CipriX mod değiştirdi:-b 11111111!*@*
*** CipriX mod değiştirdi:-b 1111111!*@*
*** CipriX mod değiştirdi:-b 111111!*@*
*** CipriX mod değiştirdi:-b 11111!*@*
*** CipriX mod değiştirdi:-b 1111!*@*
*** CipriX mod değiştirdi:-b 111!*@*
*** CipriX mod değiştirdi:-b 11!*@*

OzAn	01 Eylül 2007 18:47

Yanıt: Ban Açma Hakkında Sorun!

şöyle bişey olmazmı kanalda ban atılınca scriptim o banı 5 dk. sonra geri acsın.

L4roXyL

01 Eylül 2007 18:56

Cevap: Ban Açma Hakkında Sorun!

on @*:ban:#: { var %: = $2- | var %. = $1 | .timer 1 300 .mode # $+(-,$gettok(%.,1,43)) %: }

delikan82

03 Eylül 2007 07:28

Cevap: Ban Açma Hakkında Çok Büyük Bir Sorun!

alias banlist {
var %banlanan $ibl(#lovetime,0)
if (%banlanan == 0) { msg #lovetime 4 %kanldıran : Kanal Ban Listesi Boş.. | unset %kaldıran | unset %kişi | halt }
var %i 1
var %kim $gettok(%kişi,2,58)
while (%i <= %banlanan) {
if ($remove($ibl(#lovetime,%i),~,q,:,!,*,@) iswm %kişi) { mode #lovetime -b $ibl(#lovetime,%i) | msg #lovetime 5 %kanldıran : 2 %kişi $+ 'in Banı Kaldırılmıştır.. | unset %kaldıran | unset %kişi | halt }
else { msg #lovetime 5 %kanldıran : Belirtilen 2 %kişi Ban Listesinde Bulunamadı.. | unset %kaldıran | unset %kişi | halt }
inc %i
}
}
bunu yaptım ama tam sağlıklı değil :D sebebi ise ~n:nick!*@*
~r:nick!*@* ~q:nick!*@* ~T:Block:*#* bunları açarken şaşırabiliyorr geliştirmeye çalışıyorum ama burada takıldım yardım edebilecek var mı ?

L4roXyL

03 Eylül 2007 19:13

Cevap: Ban Açma Hakkında Sorun!

alias banac { if !$1 { echo -a Kanal ismi giriniz. | halt } | if $ibl($1,0) == 0 { .echo -a $1 kanalında ban kaydı bulunamadı. | halt } | if $ibl($1,0) >= 1 { var %. = 1 | var %: = $ibl($1,0) { while %. <= %: { .mode $1 -b $ibl($1,%.) | inc %. } } } }

Kanaldaki atılan banın çeşidi ne olursa olsun hepsini açıcaktır.
Kafana göre geliştirebilirsin.
Umarım işini görür.

MoRtaL_

04 Eylül 2007 14:08

Cevap: Ban Açma Hakkında Sorun!

ßunu SoyLe Yapabilirmiyiz MeseLa Yönetim KanaLında ßulunan ßiri ßenim ßulunduqum Kanalların ßirinde !unban Yazdıqında ßenim Kanaldaki ßutun ßanlari Otomatik Acmam mumkunmu ?

L4roXyL

04 Eylül 2007 15:14

Cevap: Ban Açma Hakkında Sorun!

Üst'de verdiğim alias'ı ekliyorsun birde;
on *:text:*:#: { if $nick ison #yönetim && !unban isin $1 { banac # } }
Kodunu eklediğin zaman işini görecektir.

delikan82

05 Eylül 2007 02:09

Cevap: Ban Açma Hakkında Sorun!

Alıntı:

L4roXyL Nickli Üyeden Alıntı (Mesaj 257558)

bu benim botta var ama ben şu şekilde ban açsın istiyorumm
!unban nick şeklinde nick kanalda nick!*@* şeklindeki banları açıyor ama ~q:nick!*@* şeklindekileri açmıyor eşleştirme yaparken ~q: !*@* bunları görmemesi lazım $remove kullanınca nickinde q olan birinide tanımıyorr saygılarr bunun içinde teşekkür ederimm

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