| --------------------------------------------------------------------------------------------
| SUB: Type
| --------------------------------------------------------------------------------------------
Sub Type(InStr)
TEXT trying to enter : ${recipe}
/declare char string local
/declare loopctr int local
/for loopctr 1 to ${InStr.Length}
/varset char ${InStr.Mid[${loopctr},1]}
/if (!${char.Length}) {
/nomodkey /keypress space chat
} else {
/nomodkey /keypress ${char} chat
}
/next loopctr
/return