İlk Harf Büyük Noktalama işaretleri kırmızı yazı kodu

Aytac

Developer
Yönetici
Developer
Katılım
4 Şub 2020
Mesajlar
373
Tepkime puanı
17
Puanları
18
Konum
ircland
Web sitesi
www.ircalem.net
Kod:
on *:input:*:{
  if ($regex($1-,/^(?!\/|!|\.)/)) { 
    msg $active $regsubex(d,$regsubex(c,$regsubex(b,$regsubex(a,$1-,/([[:punct:]])/g,$+($chr(3), 4, \1, $chr(15))), $&
      /(\S+)/g,$iif($strip(\1) ison # || $strip(\1) = $active, $+($chr(2),$v1,$chr(2)),\1)),/^(\S)/,$upper(\1)),/(\x28|\x29)/g,$+($chr(3),1,\1,$chr(15))) | halt
  }
}
 
Üst