A little letter replacement problem

[afcartman]

I'm making a script that will replace each letter the user types with a letter of a phrase I'm "forcing" them to type.

For example: The user types "Hi my name is jeff" but "Tomakecakebakefake" comes out instead. I want to make it so that nomatter what the user types, always the same message will come out. What i did was i used

$hotkeys = StringSplit("1,w,e,r,t,y,u,i,o,p,a,s,d,f,g,h,j,k,l,z,x,c,v,b,n,m,{TAB},{SPACE},{ENTER},q,+q,+w,+e,+r,+t,+y,+u
,+i,+o,+p,+a,+s,+d,+f,+g,+h,+j,+k,+l,+z,+x,+c,+v,+b,+n,+m,2,3,4,5,6,7,8,9,0", ",")

For $number = 1 to $hotkeys[0]; Use the variabele end so you can easily add more numbers to the Hotkey String.
    HotKeySet($hotkeys[$number], "FYang")
Next


While 1
      Sleep(100) 
Wend


Func FYang()
    $i = 0
    Do
        Send("+i")
        $i = $i + 1
    Until $i = 1
EndFunc

so that no matter what common letter the user types...a capital "I" will come out. I tried to make it so that it would only happen once because after that I want to do the same thing except instead of making capital "I" come out I'd make an apostrophe come out instead, but then I'd have to make a new funtion but use the same hotkeys and then the script wouldn't work.

Any ideas?