Kodu yeniden yazdım; sizdekini biraz uzun tutmuş yazan kişi.
* Kanalda olan birinin nickini belirttiğinizde
«Nick
» şeklinde belirtilir.
* Cümlenin ilk harfi büyük.
Kod: Kodu kopyalamak için üzerine çift tıklayın!
on *:input:*:{
if !$ctrlenter && !$inpaste && !$regex($1-,^\x2F) {
haltdef
var %thu $1-
var %bolt 1
while %bolt <= $numtok(%thu,32) {
if $gettok(%thu,%bolt,32) ison # { var %thu $puttok(%thu,$+(4«1,$gettok(%thu,%bolt,32),4»),%bolt,32) }
inc %bolt
}
say $regsubex(%thu,^(.),$upper(\t))
}
}
İyi forumlar.