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

Sayfa 1 Toplam 2 Sayfadan

Konuya ait 40 Mesajı başka Sayfada göster

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

- - Normal mesajı Noktalama... (https://www.ircforumlari.net/mirc-scripting-sorunlari/5654-normal-mesaji-noktalama.html)

eviL	16 Temmuz 2005 09:33

Normal mesajı Noktalama...

Merhabalar, bi forumda daha sormusdum cevap gelmeyince burdada sorma ihtiyacı duydum.. Bana gelen herhangi bir yazıyı (korumama göre) $2 ile yazılan mesajı kick msjına oldugu gibi aktarabiliyorum.. fakat benim istedigim olay şu $2 ile kik'e aktardıgım mesajı w.. w.. w.. sev..iyor..um.. cinsinden ayırsın bunu nasıl yapabilirim bir cok şey denememe ragmen yapamadim..Sizlerle sorma ihtiyacı duydum..

goXXip

16 Temmuz 2005 09:52

alias noktala {
var %yazi = $1-
var %yap = $regsub(%yazi,/([a-z])/g,...$1,%yazi)
return %yazi
}

Örneğin

//echo $noktala($2)

Kolay Gelsin;)

el33t

16 Temmuz 2005 10:43

Aşağıdaki kodu remote'a koyup //echo $mixitup(yazı) yazarsan sanırım istediğin gibi olur;

alias mixitup { var %c = 1, %d | while %c <= $len($1-) { if $mid($1-,%c,1) != $chr(32) { %d = $+(%d,$ifmatch,$str(.,$r(1,3))) } | else { %d = $+(%d,$chr(160)) } | inc %c } | return $replace(%d,$chr(160),$chr(32)) }

goXXip'in gösterdiği kod kesinlikle daha hızlı olacaktır.. Ben sanırım old school'um =P

goXXip

16 Temmuz 2005 10:46

Alıntı:

el33t Nickli Üyeden Alıntı

:) Senin kodlama sistemine hayranım el33t:) mircscripts.org da bir sürü help var:) Kendi gelişimin açısından:) Örneğin dll 'ler ;)

el33t

16 Temmuz 2005 10:50

=) DLL'leri şimdilik öğrenmeyi düşünmüyorum ama regex gerçekten çok önemli, ama tutorial okuyacak vaktim yok gerçekten =P, zaten regexle yapılan herşey normal scriptingde varolanlarla da yapılır ama dediğim gibi hız arasında farklar olur, tabi dakika ya da saniye değil milisaniye gibi =)

eviL	16 Temmuz 2005 15:39

verdigini kodlar normalde calısıyor fakat su sekilde : kick $chan(%cn) $4 %asb Spam $mixitup($2) sekilde degistirdigimde normaldeki kick msjını ne $mixitup'u nede $noktalayı okuyor

goXXip

16 Temmuz 2005 16:53

Bir yanlışlık yapıyor olmayasın...

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

eviL	16 Temmuz 2005 18:04

benim denedigim reklam koruması degil ama.. dedigim gibi kod normal korumada calışıyor fakat yapılmış bir botda çalışmıyor. mesajı oldugu gibi aktarıyor parçalamıyor botun kik msjında

CoCoRiCo

16 Temmuz 2005 18:18

el33t bende senin gibi yeniliklere bakmıyorum mirc help incelemiyorum
bildiklerimle yapıyorum ama DLL leri seviyorum :)

MephisTo

16 Temmuz 2005 20:05

Çözemediysen hala kodu yolla buraya bakalım.

eviL	16 Temmuz 2005 23:21

mephisto goxxipe yollamisdim kodu bakiyor o. msn acik oldugunda sanada yollarım ins :)

MephisTo

17 Temmuz 2005 00:42

Senin şu $2 eklediğin satır hangisi?

eviL	17 Temmuz 2005 09:32

tespit edildi diye arat o kodda cıkar. zaten tek bi yerde var

UOnur

17 Temmuz 2005 12:43

Kod:

alias .la {

  var %ş 1,%h $1-,%n,%t

  while (%ş <= $len(%h)) {

    if ($right($left(%h,%ş),1) == $chr(32)) { .set %n $+(%n,.) | set %t 1 }

    elseif (%t == 2) { .set %n $+(%n,.) | set %t 3 }

    elseif (%t == 1) { .set %n $+(%n,.) | set %t 2 }

    else { .set %n $+(%n,$right($left(%h,%ş),1)) }

    inc %ş  

  }

  return %n

}

Aha bi tanede Ben yaptım.Hoşuna gidermi bilmiom :)

//echo 5 -a $.la(deneme lan bunların hepsi)
deneme...n...nların...psi

Test edildi Onaylandı :)

eviL	17 Temmuz 2005 15:25

benim istedigim seyi aktarmiyor.. dun mephistoya yolladim bakalım cevap gelir umarım :)

goXXip

17 Temmuz 2005 15:39

Bir önceki verdiğim kod yalnızca parçalıyordu. Bu yerini nokta ile değiştiriyor

alias noktala {
var %::text = $1-
var %uygula = $regsub(%::text,/([a-i])/g,.,%::text)
return %::text
}

MephisTo

17 Temmuz 2005 15:40

cs akick $chan(%cn) add $address($1,2) 2[ DonT PaNiC! ] Lamer Is Detected Improper Message.

Bu satırdan mı bahsediyorsun?

eviL	17 Temmuz 2005 16:41

evet o satır.. sonucta aynı spy onda akick bende normal kik

eviL	17 Temmuz 2005 16:45

Alıntı:

goXXip Nickli Üyeden Alıntı

Bir önceki verdiğim kod yalnızca parçalıyordu. Bu yerini nokta ile değiştiriyor

alias noktala {
var %::text = $1-
var %uygula = $regsub(%::text,/([a-i])/g,.,%::text)
return %::text
}

arasında pek bi fark yok. onuda kullandım ama gene ayni. sonuc mafis :)

MephisTo

17 Temmuz 2005 18:31

alias noktala {
var %::text = $1-
var %uygula = $regsub(%::text,/([a-i])/g,.,%::text)
return %::text
}

Burada bir .okluk var :)

MephisTo

17 Temmuz 2005 18:40

[18:38:59] <Utuk> bu bir deneme mesajıdır utkucuğum anlaşıldı mı?

Reklamcı: Utuk Text: bu bir deneme mesajıdır utkucuğum anlaşıldı mı?
goXXip'in noktalanan text olayı: 14
el33t'in noktalanan text olayı: b...u... b.i..r... d...e..n.e..m...e... m.e...s.a...j..ı.d..ı.r.. u.t..k..u.c...u...ğ..u...m. a...n.l...a.ş..ı.l..d.ı. m.ı.?..

Return edilen text'ler bunlar, el33t'inki kusursuz çalışıyor, goXXip'inkinde biraz gariplik var tam çözemedim :p

UOnur

17 Temmuz 2005 18:48

Kod:

alias .la {

  var %ş 1,%h $1-,%n,%t

  while (%ş <= $len(%h)) {

    if ($right($left(%h,%ş),1) == $chr(32)) { .set %n $+(%n,.) | set %t 1 }

    elseif (%t == 2) && ($right($left(%h,%ş),1) != ) && ($right($left(%h,%ş),1) != ) && ($right($left(%h,%ş),1) != ) && ($right($left(%h,%ş),1) != ) { .set %n $+(%n,.) | set %t 3 }

    elseif (%t == 1) && ($right($left(%h,%ş),1) != ) && ($right($left(%h,%ş),1) != ) && ($right($left(%h,%ş),1) != ) && ($right($left(%h,%ş),1) != ) { .set %n $+(%n,.) | set %t 2 }

    else { .set %n $+(%n,$right($left(%h,%ş),1)) }

    inc %ş  

  }

  return %n

}

bunu Dene ?
Ben denedim O mesajda Çalıştı.

//echo -a $.la(2[ DonT PaNiC! ] Lamer Is Detected Improper Message.)

[...nT...NiC!.....mer......tected...proper...ssage.

MephisTo

17 Temmuz 2005 18:53

Reklamcı: Utuk Text: bu bir deneme mesajıdır utkucuğum anlaşıldı mı?
goXXip'in noktalanan text olayı: 14
el33t'in noktalanan text olayı: b.u... b.i.r.. d...e...n.e...m.e... m...e...s..a.j...ı...d...ı.r. u..t.k.u.c..u.ğ.u.m.. a.n.l..a..ş...ı...l...d...ı... m..ı..?.
UOnur'un noktalanan text olayı: bu...r...neme...sajıdır...kucuğum...laşıldı...?

Çalışıyor. goXXip in gelmesini bekleyeyim, onunki daha uygun gibi spam için. eviL beklemeye gerek yok derse bu haliyle vereyim :)

UOnur

17 Temmuz 2005 18:53

oo ne bicim bisi yapmısım :)
uzatmısım saçmalatmışım :D

MephisTo

17 Temmuz 2005 18:54

Bir dk ya, ne diyorum ben :) UOnur seninki daha tatlı duruyor, aralarına nokta koyduktan sonra reklam yine yapılmış oluyor, seninki nokta ile değiştiriyor text'in bazı kısımlarını.

UOnur

17 Temmuz 2005 18:55

vallamı :)
ee tatlı adamın tatlı kodu olur :)

goXXip

17 Temmuz 2005 20:10

Sanıyorum bende bir gariplik var:) Neden bende çalışıyor ?:D

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

eviL	17 Temmuz 2005 21:31

yahu anti spamda diyorum çalışmıyor diyorummmmmmmmm.:) yoksa normal remotede çalışıyor..

goXXip

17 Temmuz 2005 21:53

:) Sıfırdan anti spam yazmak lazım :D

eviL	17 Temmuz 2005 22:01

eywallah goxxip ve mephisto saolun var olun..uygulamali oldu güzel oldu :D:D:D

MephisTo

17 Temmuz 2005 22:08

Euheeehue rica :)

goXXip

17 Temmuz 2005 22:12

Gerçi herşeyi Utku yaptı. :) Ben birşey yapmadım :D

MephisTo

17 Temmuz 2005 22:20

Kod kısmı sana uygulama kısmı bana ait. Ama en büyük görev de eviL'e düştü, bot tarafından ilk kicklenen kişi o oldu :D

goXXip

17 Temmuz 2005 22:31

Alıntı:

MephisTo Nickli Üyeden Alıntı

Kod kısmı sana uygulama kısmı bana ait. Ama en büyük görev de eviL'e düştü, bot tarafından ilk kicklenen kişi o oldu :D

Kesinlikle :D

eviL	17 Temmuz 2005 22:43

:)))) olsun sonucta muradima erdim ;D

djiNn

18 Temmuz 2005 12:33

Alıntı:

MephisTo Nickli Üyeden Alıntı

cs akick $chan(%cn) add $address($1,2) 2[ DonT PaNiC! ] Lamer Is Detected Improper Message.

Bu satırdan mı bahsediyorsun?

Abi Unlu Ola Ola Benimde Bu Kick Mesajı Unlu Oldu E-kolayda Botlarda Ve Ben Bu Mesajı Kullanıyorum Sozlugun Yardımıyla 5 Dk Felan Ayırmıstım :)))))))))))))

ehaueh neyhse Şu Kick Mesajı Olayını Deniyim :=)

djiNn

18 Temmuz 2005 19:54

Ya Simdi Bu Olayi @ASB Penceresinde Çalışdırdım $2- nin başına $.la yı Koydum Ama sadece @ASB de Cıkıyor Yani Kick Mesajında Cıkmıyor..
Mesela

NOTICE - KELEBEK6USER2 ...tık...nin...zdıklarını...rmeyeceğim...nore..... .2......7...ELEBEK....0)...2......

Gayet Güzel.. Ama Bu şekli Kick Mesajına Ulaştırma Yontemi Variable ile Denedim Yapamadım..

UOnur

19 Temmuz 2005 12:58

Çünkü yanlış yerde Kullanılıorrr :)

ASB Kick'lerken %değişken'de kayıtlı olan mesajları Kullanıyor...

No InvIteR (Reklam&CTCP&DCC)!!! v.s. v.s.

ÖRN:

Kod:

      while (%cn <= %ct) {

        if (($numtok(%asb.curchans,44) == 1) && ($me isop $gettok(%asb.curchans,1,44)) && ($1 !ison $gettok(%asb.curchans,1,44))) { set %asb.didkb 1 | ban -u $+ $calc(%asb.spamkb.mins * 60) $gettok(%asb.curchans,1,44) %asb.checkspammask %asb.spamkb.mask | goto end }

        if (($1 ison $chan(%cn)) && ($me isop $chan(%cn)) && (%asb.spamkb == 1)) {

          ban -u $+ $calc(%asb.spamkb.mins * 60) $chan(%cn) $1 %asb.spamkb.mask

          kick $chan(%cn) $1 %asb.spamkb.msg %isim

Kod:

%asb.spamkb.msg 15No InviteR(Reklam&Ctcp&DCC)!!!

Gibi...
Önce mesajları bir yere Kaydeceksiniz Sonra kick'leyen yerlere koyacaksınız...
Yani Kasmanız Gerekecek. :)

djiNn

19 Temmuz 2005 23:30

yA Işte Bi KullanMayı Cozebilsem Şimdi Ben @ASB Penceresindeki Noktalı Yazıları Nerden Nasıl Alip Kaydetcemde Kick Mesajına koyacam..

UOnur

20 Temmuz 2005 13:51

Kod:

on *:sockread:asb*: {

  sockread %asb.temp.sockread

  tokenize 32 %asb.temp.sockread

Kısmını

Kod:

on *:sockread:asb*: {

  sockread %asb.temp.sockread

  tokenize 32 %asb.temp.sockread

  echo -a $1-

Yaparsan Tüm Olayları görebilirsin.
Ona Görede kick mesajlarına Aktarmayı Deneyebilirsin :)

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

Sayfa 1 Toplam 2 Sayfadan

Konuya ait 40 Mesajı başka Sayfada göster