DW> getting a stack full error after about 45 entries into a 
 DW> looping routine similar to the one that follows.

 DW> -- start here ---
 DW> /*  TESTHOT.CMD   --  testing out hotkeys */
 DW> call rxfuncadd 'SysGetKey', 'RexxUtil', 'SysGetKey'

 DW> M1:                               
 DW> Say 'Press any key to continue'
 DW> key = SysGetKey(noecho)

 DW> IF key='r'
 DW>    THEN
 DW>      CALL R1

 DW>    ESLE CALL T1

 DW> R1:
 DW> SAY " You entered "'R'
 DW> call M1

   You keep calling functions and never return, thus you eventually fill up
the space reserved for holding return information.
   Try putting the keyboard routine in a loop which calls subroutines,
which return when done (note that you will need to add an option to break
out of the keyboard loop).  If you will have more than a few options, it
will be easier to use Select When than a forrest of If Thens.

Do Forever
  Key = SysGetKey( NoEcho )
  Select
    When Key = "R" | Key = "r" Then
      Call R1
    When Key = "Q" | Key = "q" Then   /* break out of loop */
      Leave  
    Otherwise                         /* default action    */
      Call Beep 1000,100
  End
End
Exit  /* terminates CMD execution so we don't start running the */
      /* following subroutines                                  */

R1:
Say " You entered "'R'
Return


Jeff

--- timEd/2 1.00