4 * [Generated from akbd, 25 September 1996]
7 #if !defined(__CC_NORCROFT) || !defined(__arm)
8 #error You must use the Norcroft ARM Compiler for Sapphire programs
11 #pragma include_only_once
12 #pragma force_top_level
21 /*----- Overview ----------------------------------------------------------*
30 /* --- akbd_test --- *
32 * On entry: R0 == internal key number to test
34 * On exit: CS if key was pressed, CC otherwise
36 * Use: Informs you whether a given key is currently being pressed.
39 extern routine akbd_test;
41 /* --- akbd_translate --- *
43 * On entry: R0 == Wimp key number
45 * On exit: R0 == Straylight extended keyset key number
47 * Use: Translates a Wimp key number into one of the more specific
48 * Straylight key numbers.
51 extern routine akbd_translate;
53 /* --- akbd_pollKey --- *
57 * On exit: CC if a key was in the buffer and
58 * R0 == wimp translated key code
62 * Use: Reports whether the user has typed ahead, and if so what the ; keypress. Note that the keypresses returned are WIMP-type,
63 * not Straylight extended ones so you will have to use
64 * akbd_translate if you need the extended type.
66 * This call could be used to allow buffering of keypresses:
67 * on a Key_Pressed event you would call this routine until
68 * it returns FALSE and store the codes it returns in a buffer
69 * along with the code from the event.
72 extern routine akbd_pollKey;
74 /*----- That's all, folks -------------------------------------------------*/