Clipper/FiveWin - Como agregar un guion desde tecla de funcion

Muy buenas tardes

necesito poder agregar un guion al valor que esta tecleando un usuario EN UN GET

tengo

set funcion 5 to miguion
...
...


@ 10, 20 get MIGET var mCODIGO

..
..


function miguion
***
**
como se que valor tiene mCODIGO


quiero que cuando el usuario a teclado ¨"CASA¨ y pulse F5 en el get me salga "CASA-" y pueda seguir tecleando..

gracias por su ayuda

Hola:
Prueba este codigo:

//K_F5 o -4 <-- valor de tecla f5

SET KEY K_F5 TO MiGuion()

@1,1 GET cCadena
READ

SET KEY K_F5 TO

RETURN NIL


FUNCTION MiGuion()
KEYBOARD "-"
RETURN NIL

Gracias por responder.

El problema radica en que estoy usando fiwewin para pocket pc

Y NO FUNCIONA keyboard

de todas formas gracias

mas simple:

ON KEY F5 ON FORMX KEYBOARD (ASCII DEL GUION)