pCkOpAt
29 Ağustos 2018, 16:40
Merhabalar,
on 1:input:*:{
if !$regex($1,/(\.|!|\/)/) || ($ctrlenter) {
var %^ = 1, %'
while %^ <= $0 {
%' = %' $iif($remove($gettok($1-,%^,32),!,:,;,$chr(44)) ison #,$+($chr(3),02,$chr(2),$gettok($1-,%^,32),$chr(2),$chr(3)),$iif($+(:,$chr(41),*) iswm $gettok($1-,%^,32),$+($chr(3),04,$left($gettok($1-,%^,32),1),$chr(3),$right($gettok($1-,%^,32),-1)),$gettok($1-,%^,32)))
inc %^
}
say %'
halt
}
}
Güle güle kullanın ;)
on 1:input:*:{
if !$regex($1,/(\.|!|\/)/) || ($ctrlenter) {
var %^ = 1, %'
while %^ <= $0 {
%' = %' $iif($remove($gettok($1-,%^,32),!,:,;,$chr(44)) ison #,$+($chr(3),02,$chr(2),$gettok($1-,%^,32),$chr(2),$chr(3)),$iif($+(:,$chr(41),*) iswm $gettok($1-,%^,32),$+($chr(3),04,$left($gettok($1-,%^,32),1),$chr(3),$right($gettok($1-,%^,32),-1)),$gettok($1-,%^,32)))
inc %^
}
say %'
halt
}
}
Güle güle kullanın ;)