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

- mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)

- - Nick ince alt yazılı (https://www.ircforumlari.net/mirc-scripting-sorunlari/533476-nick-ince-alt-yazili.html)

Nick ince alt yazılı

Selam şöyle bir sorum olacak tek input içersinde birden fazla özelliği toparlayamadım

Nick ince vede altı cizgili olacak Normal yazılarım ilk harfi büyük vede sonunda nokta olacak şekilde nasıl ayarlaya bilirim ?

Cevap: Nick ince alt yazılı

Alıntı:

ZenqerDenq Nickli Üyeden Alıntı (Mesaj 1041307248)

Şu kodu önerebilirim, kendimde kullaniyorum;
Dp/ kodda eksik olan sadece sonundaki "noktadir". bu kurcalamadimda, kode bozulmasin diye.

Alıntı:

on 1:input:*:{
if ($chr(47) == $mid($1-,1,1)) || ($inpaste) || ($ctrlenter) { goto end }
if ($1- == isnum) { goto end }
var %a 0, %b, %c, %d, %e, %f
while (%a < $numtok($1-,32)) {
inc %a
%c = $gettok($1-,%a,32)
if ($remove(%c,!,?,:,;,.,$chr(44),?) ison #) { %b = $iif(%b,%b) $+(,%c,) }
else {
if (%a == $numtok($1-,32)) {
%d = $+($right(%c,1),)
%f = $right(%d,2)
}
%e = $regsubex(%c,/(?=^| )(.)/g,$+(,$upper(\1),))
%b = %b $+(%e,%f)
}
}
if (!%b) { %b = $1- }
else { say %b }
halt
:end
}

Şu kode işini görecektir istek üzerine bir coder arkadaşim yazmişti bunu bana.

Cevap: Nick ince alt yazılı

Alıntı:

ZenqerDenq Nickli Üyeden Alıntı (Mesaj 1041307248)

Toparlayamadın kısma kadarki yaptıgın codu paylasırsan yardımcı oluruz. Hayırlı IF'ler.

Cevap: Nick ince alt yazılı

Kod:

On 1:input:*:{

if ($left($1,1) !isin x/$%.! && !$ctrlenter) {

var %smiley = :) :D :P :( :\\ :/ ;) ;D ;P ;/ ;\\ ;( :* ;* :@ :S :# :$ :o xD :< :> ;@ ;S ;# ;$ ;o ;< ;>

var %smileys = :-) :-D :-P :-( :-\\ :-/ ;-) ;-D ;-P ;-/ ;-\\ ;-( :-* ;-* :-@ :-S :-# :-$ :-o :-< :-> ;-@ ;-S ;-# ;-$ ;-o ;-< ;-> :=) :=D :=P :=( :=\\ :=/ ;=) ;=D ;=P ;=/ ;=\\ ;=( :=* ;=* :=@ :=S :=# :=$ :=o :=< :=> ;=@ ;=S ;=# ;=$ ;=o ;=< ;=> ^_^ o_o O_O o_O O_o 0_0 0_o o_0 *_^ ^_* -.- omg lol btw wtf heh bbl brb

var %noact = $chr(33) $chr(64) $chr(35) $chr(36) $chr(37) $chr(94) $chr(38) $chr(42) $chr(40) $chr(41) $chr(45) $chr(43) $chr(61) $chr(49) $chr(50) $chr(51) $chr(52) $chr(53) $chr(54) $chr(55) $chr(56) $chr(57) $chr(48) $chr(92) $chr(123) $chr(125) $chr(124) $chr(59) $chr(58) $chr(39) $chr(34) $chr(44) $chr(46) $chr(60) $chr(62) $chr(47) $chr(63) $chr(95) $chr(91) $chr(93)

var %httpthingy = htt 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
ftp

var %httpthingy21 = .com .net .org .php .asp .htm omfg rofl .asx

var %httpthingy22 = .html .aspx

var %newmsg = $iif($1 !ison $active && $1 != $active && !$istok(%smiley,$1,32) && !$istok(%smileys,$1,32) && !$istok(%noact,$1,32) && !$istok(%httpthingy,$left($1,3),32) && !$istok(%httpthingy21,$right($1,4),32) && !$istok(%httpthingy22,$right($1,5),32),$upper($left($1,1)) $+ $right($1,-1),$1) $+ $iif($2-,$chr(32) $+ $2- $+ $iif(!$istok(%noact,$right($2-,1),32) && !$istok(%smiley,$right($2-,2),32) && !$istok(%smileys,$right($2-,3),32) && !$istok(%httpthingy,$left($gettok($2-,-1,32),3),32) && !$istok(%httpthingy21,$right($gettok($2-,-1,32),4),32) && !$istok(%noact,$left($gettok($2-,-1,32),1),32) && !$istok(%httpthingy22,$left($gettok($2-,-1,32),5),32),.),$iif(!$istok(%noact,$right($1,1),32) && !$istok(%smiley,$right($1,2),32) && !$istok(%smileys,$right($1,3),32) && !$istok(%httpthingy,$left($1,3),32) && !$istok(%httpthingy21,$right($1,4),32) && !$istok(%noact,$left($1,1),32) && !$istok(%httpthingy22,$right($1,5),32),.))

var %newmsg = $regsubex(%newmsg,/\\bi\\b/g,I)

msg $active %newmsg

halt

}

}

burada text in ilk harfi büyük ve sonunda nokta var ama ince altı cizgili nicki ekleyemedim :S

Alıntı:

CoLdmAn Nickli Üyeden Alıntı (Mesaj 1041307334)

Şu kodu önerebilirim, kendimde kullaniyorum;
Dp/ kodda eksik olan sadece sonundaki "noktadir". bu kurcalamadimda, kode bozulmasin diye.

Şu kode işini görecektir istek üzerine bir coder arkadaşim yazmişti bunu bana.

bu vermiş olduğun kodda nickler ince değil vede her kelimenin başı büyük harf ben cümlenin ilk harfi büyük istiyorum

Cevap: Nick ince alt yazılı

Kod:

On 1:input:*:{

  if ($left($1,1) !isin x/$%.! && !$ctrlenter) {

    var %smiley =   :P :( :\\ :/ ;) ;D ;P ;/ ;\\ ;( :* ;* :@ :S :# :$ :o xD :< :> ;@ ;S ;# ;$ ;o ;< ;>

    var %smileys = :-) :-D :-P :-( :-\\ :-/ ;-) ;-D ;-P ;-/ ;-\\ ;-( :-* ;-* :-@ :-S :-# :-$ :-o :-< :-> ;-@ ;-S ;-# ;-$ ;-o ;-< ;-> :=) :=D :=P :=( :=\\ :=/ ;=) ;=D ;=P ;=/ ;=\\ ;=( :=* ;=* :=@ :=S :=# :=$ :=o :=< :=> ;=@ ;=S ;=# ;=$ ;=o ;=< ;=> ^_^ o_o O_O o_O O_o 0_0 0_o o_0 *_^ ^_* -.- omg lol btw wtf heh bbl brb

    var %noact = $chr(33) $chr(64) $chr(35) $chr(36) $chr(37) $chr(94) $chr(38) $chr(42) $chr(40) $chr(41) $chr(45) $chr(43) $chr(61) $chr(49) $chr(50) $chr(51) $chr(52) $chr(53) $chr(54) $chr(55) $chr(56) $chr(57) $chr(48) $chr(92) $chr(123) $chr(125) $chr(124) $chr(59) $chr(58) $chr(39) $chr(34) $chr(44) $chr(46) $chr(60) $chr(62) $chr(47) $chr(63) $chr(95) $chr(91) $chr(93)

    var %httpthingy = htt 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
ftp

    var %httpthingy21 = .com .net .org .php .asp .htm omfg rofl .asx

    var %httpthingy22 = .html .aspx

    var %newmsg = $iif($1 !ison $active && $1 != $active && !$istok(%smiley,$1,32) && !$istok(%smileys,$1,32) && !$istok(%noact,$1,32) && !$istok(%httpthingy,$left($1,3),32) && !$istok(%httpthingy21,$right($1,4),32) && !$istok(%httpthingy22,$right($1,5),32),$upper($left($1,1)) $+ $right($1,-1),$1) $+ $iif($2-,$chr(32) $+ $2- $+ $iif(!$istok(%noact,$right($2-,1),32) && !$istok(%smiley,$right($2-,2),32) && !$istok(%smileys,$right($2-,3),32) && !$istok(%httpthingy,$left($gettok($2-,-1,32),3),32) && !$istok(%httpthingy21,$right($gettok($2-,-1,32),4),32) && !$istok(%noact,$left($gettok($2-,-1,32),1),32) && !$istok(%httpthingy22,$left($gettok($2-,-1,32),5),32),.),$iif(!$istok(%noact,$right($1,1),3 2) && !$istok(%smiley,$right($1,2),32) && !$istok(%smileys,$right($1,3),32) && !$istok(%httpthingy,$left($1,3),32) && !$istok(%httpthingy21,$right($1,4),32) && !$istok(%noact,$left($1,1),32) && !$istok(%httpthingy22,$right($1,5),32),.))

    var %newmsg  = $regsubex(%newmsg,/(\w+)/g,$iif(\t ison #,$chr(2)\t$chr(2),\t))

    var %newmsg = $regsubex(%newmsg,/\\bi\\b/g,I)

    say %newmsg

    halt

  }

}

Cevap: Nick ince alt yazılı

çok tşkler işe yarıyor ama şu var nicki yazdığımda sonuna nokta koyuyor onu koymasa ?

Cevap: Nick ince alt yazılı

Kod:



On 1:input:*:{

  if ($left($1,1) !isin x/$%.! && !$ctrlenter) {

    var %smiley =   :P :( :\\ :/ ;) ;D ;P ;/ ;\\ ;( :* ;* :@ :S :# :$ :o xD :< :> ;@ ;S ;# ;$ ;o ;< ;>

    var %smileys = :-) :-D :-P :-( :-\\ :-/ ;-) ;-D ;-P ;-/ ;-\\ ;-( :-* ;-* :-@ :-S :-# :-$ :-o :-< :-> ;-@ ;-S ;-# ;-$ ;-o ;-< ;-> :=) :=D :=P :=( :=\\ :=/ ;=) ;=D ;=P ;=/ ;=\\ ;=( :=* ;=* :=@ :=S :=# :=$ :=o :=< :=> ;=@ ;=S ;=# ;=$ ;=o ;=< ;=> ^_^ o_o O_O o_O O_o 0_0 0_o o_0 *_^ ^_* -.- omg lol btw wtf heh bbl brb

    var %noact = $chr(33) $chr(64) $chr(35) $chr(36) $chr(37) $chr(94) $chr(38) $chr(42) $chr(40) $chr(41) $chr(45) $chr(43) $chr(61) $chr(49) $chr(50) $chr(51) $chr(52) $chr(53) $chr(54) $chr(55) $chr(56) $chr(57) $chr(48) $chr(92) $chr(123) $chr(125) $chr(124) $chr(59) $chr(58) $chr(39) $chr(34) $chr(44) $chr(46) $chr(60) $chr(62) $chr(47) $chr(63) $chr(95) $chr(91) $chr(93)

    var %httpthingy = htt 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
ftp

    var %httpthingy21 = .com .net .org .php .asp .htm omfg rofl .asx

    var %httpthingy22 = .html .aspx

    var %newmsg = $iif($1 !ison $active && $1 != $active && !$istok(%smiley,$1,32) && !$istok(%smileys,$1,32) && !$istok(%noact,$1,32) && !$istok(%httpthingy,$left($1,3),32) && !$istok(%httpthingy21,$right($1,4),32) && !$istok(%httpthingy22,$right($1,5),32),$upper($left($1,1)) $+ $right($1,-1),$1) $+ $iif($2-,$chr(32) $+ $2- $+ $iif(!$istok(%noact,$right($2-,1),32) && !$istok(%smiley,$right($2-,2),32) && !$istok(%smileys,$right($2-,3),32) && !$istok(%httpthingy,$left($gettok($2-,-1,32),3),32) && !$istok(%httpthingy21,$right($gettok($2-,-1,32),4),32) && !$istok(%noact,$left($gettok($2-,-1,32),1),32) && !$istok(%httpthingy22,$left($gettok($2-,-1,32),5),32) && $token($1-,-1,32) !ison #,.),$iif(!$istok(%noact,$right($1,1),3 2) && !$istok(%smiley,$right($1,2),32) && !$istok(%smileys,$right($1,3),32) && !$istok(%httpthingy,$left($1,3),32) && !$istok(%httpthingy21,$right($1,4),32) && !$istok(%noact,$left($1,1),32) && !$istok(%httpthingy22,$right($1,5),32),.)),.))

    var %newmsg  = $regsubex(%newmsg,/(\w+)/g,$iif(\t ison #,$chr(2)\t$chr(2),\t))

    var %newmsg = $regsubex(%newmsg,/\\bi\\b/g,I)

    say %newmsg

    halt

  }

}

Cevap: Nick ince alt yazılı

Nickler ince değil ve yazdığım nickin sonunada nokta koyuyor

Cevap: Nick ince alt yazılı

Alıntı:

ZenqerDenq Nickli Üyeden Alıntı (Mesaj 1041307248)

@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] un başka bir konuda paylaşmış olduğu kodda biraz değişiklik yapılıp istediğin hale getirilebilir.
Cümlenin ilk harfini büyük yapıp cümle sonuna nokta koymak. Nickleri ince ve alt çizgili olacak şekilde yazdırmak. Cümle içinde nokta konup tekrar cümleye veya kelimeye başlanmışsa ilk harfi büyük yapmak gibi.

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

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

Kod:

on *:input:*:{ 

  if !$istok(/ ! .,$left($1,1),32) { 

    if $window($active).type == channel { msg $active $regsubex($regsubex($1-,/(\S+)/g,$iif(\1 ison #,$+(,\1,,),\1)),/(?<=^|\.)(\s.|.)/g,$upper(\1)) $+ . } 

    elseif $window($active).type == query { msg $active $regsubex($regsubex($1-,/(\S+)/g,$iif(\1 == $active,$+(,\1,,),\1)),/(?<=^|\.)(\s.|.)/g,$upper(\1)) $+ . }

    halt

  }

}

Cevap: Nick ince alt yazılı

tşkler ederim ancak bu kodda hatalı cünki smiley veya virgül ünlem soru işaretleri ile biten cümlerin sonunda nokta koyuyor