[SafraN]

on *:input:#: if $regex($1,/^[!\.](n|c|m|o|h)$/Si) { $+($right($1,-1),s) $2- | set -u3 %axx $chan }

on ^*:notice:*:?: { haltdef | $iif(%axx,msg %axx $nick 2» $1-,echo -a 14© 7 $+ $nick $+ 5 $1-) }

on *:input:*: { if $left($1,1) != / && !$ctrlenter && !$inpaste { say $+($upper($left($1-,1)),$right($1-,-1)) | haltdef } }

[Toprak]

SafraN Nickli Üyeden Alıntı Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

on *:input:#: if $regex($1,/^[!\.](n|c|m|o|h)$/Si) { $+($right($1,-1),s) $2- | set -u3 %axx $chan } on ^*:notice:*:?: { haltdef | $iif(%axx,msg %axx $nick 2» $1-,echo -a 14© 7 $+ $nick $+ 5 $1-) } on *:input:*: { if $left($1,1) != / && !$ctrlenter && !$inpaste { say $+($upper($left($1-,1)),$right($1-,-1)) | haltdef } }

Sorun olmaz ise kodu böyle güncelliyelim

Kod:   Kodu kopyalamak için üzerine çift tıklayın!

on *:input:#: if $regex($1,/^[!.](ns|cs|ms|os|hs)$/Si) && $2 { $+(/,$regml(1)) $2- | set -u3 %axx # }
on ^*:notice:*:?:{ $iif(%axx,msg %axx $nick 2» $1-,echo -a 14© 7 $+ $nick $+ 5 $1-) | haltdef }

Ek olarak diğer input eventi yazının ilk harf'ini büyük yapar bunlarla alakası yok ondan eklemedim
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

[SafraN]

düzenlemeye acık @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Araya renk katmakta iyidir <3