renkli yazi
 

Selamlar böyle bi kodum var ve sorunsuz calisiyor ben extra olarak parantez icinde yazilan nicki bi de kalin harf olmasini istiyorum yardimci olabilecek var mi tsk ederim simdiden.

on *:input:*:{
if (!$regex($left($1,1),/^!|[./]|/|/i/)) {
var %wn $numtok($1-,32)
while (%wn > 0) {
if ($gettok($1-,%wn,32) ison #) { set %wm $+($chr(40) $+ $chr(32),,$yr,$gettok($1-,%wn,32),,,$chr(32) $+ $chr(41)) %wm } | else { set %wm $gettok($1-,%wn,32) %wm } | if (%wn == 1) { say $wn(%wm) | unset %wm | halt } | dec %wn
}
}
}
alias wn return $replace($+($regsubex($regsubex($1-,/([.,;,!,+,*,?,{,},=,-,:,’,^,%,&,/,_,~,`,”])/g,$+(,$yr,\t,,$chr(15))),/([A-Z])/g,\t),),$chan,$+(<,,$yr,,$chan,,,>))
alias yr return $r(2,6)

Cevap: renkli yazi
 

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