alias oku { msg $active $regsubex($read(dosya.txt),/(^|[[:space:]])(.)/g,$+($chr(3),$rand(1,99)) \2) }