on *:input:*:{ if ( $left($1,1) != / ) { msg $active $replace($1-,o,0) halt } }
--------------------------------------------------------------------------

k it replace the leter but it says halt after it and it repeats the text in unreplaced form too


<q[o_O]p> 00 halt
<q[o_O]p> oo
<q[o_O]p> 00 halt
<q[o_O]p> oo
<q[o_O]p> s0 halt
<q[o_O]p> so
<q[o_O]p> Oh
<q[o_O]p> 0 halt
<q[o_O]p> s0s halt
<q[o_O]p> sos
<q[o_O]p> 0s halt
<q[o_O]p> os
<q[o_O]p> asasa halt
<q[o_O]p> asasa
<q[o_O]p> sad halt
<q[o_O]p> sad