e varsa a olsun
tarzı isteklerin karşılığını $replace identifier'iyle elde edebilirsiniz.
Anlayacağınız bir şekilde bir örnek vermem gerekirse:
//echo -a $replace(yemek,e,a)
uyguladığınızda size yanıt yamak olarak dönecektir.
Aşağıdaki kod ilk harfleri büyük yapmakla beraber; s harfini S, l harfinide L olarak değiştirecektir.
Kod: Kodu kopyalamak için üzerine çift tıklayın! #yazıstil on
on *:input:*:{
if ($left($1,1) != /) {
var %Jnk
var %e = 0
while %e != $numtok($1-,32) {
inc %e 1
var %Jnk = %Jnk $upper($left($token($1-,%e,32),1)) $+ $lower($right($gettok($1-,%e,32),-1))
}
msg $active $replace(%Jnk,s,S,l,L)
halt
}
}
#yazıstil end
menu query,channel {
.Yazı Stil
..Aç:.enable #yazıstil
..Kapa:.disable #yazıstil
}
|