Click above to get retro games delivered to your door ever month!

##############################################################################
###+-----+####################################################################
#+-| TSR |-------------------------------------------+########################
#| +-----+ Terminates a program and remains resident |########################
#+---------------------------------------------------+########################
##############################################################################
##############################################################################
#+--| Summary |------------+##################################################
#|     #INCLUDE io.hdr     |##################################################
#+-------------------------+##################################################
##############################################################################
##############################################################################
#+--| Syntax |---------------------------------+##############################
#|     PROCEDURE tsr PROTOTYPE                 |##############################
#|      PARAMETERS VALUE ULONG memory_size     |##############################
#+---------------------------------------------+##############################
##############################################################################
##############################################################################
########+---| Description |------------------------------------------+########
########| tsr terminates a program and remains resident.  If the tsr |########
########| procedure returns, then it is unable to make the program   |########
########| resident.  If tsr exits, then the procedure specified by   |########
########| the proc_entry() function is active.                       |########
########| ---------------------------------------------------------- |########
########| memory_size specifies the amount of RAM to keep beyond the |########
########| size required for the image of the program.  Adjust        |########
########| memory_size for better performance.                        |########
########| ---------------------------------------------------------- |########
########| Use the following equation to calculate the amount of RAM  |########
########| required by a TSR application:                             |########
########|                                                            |########
########|     image_size + stack_size + 16k + memory_size            |########
########|                                                            |########
########| image_size is the amount of memory required for the .exe   |########
########| file and stack_size is the size of the runtime stack which |########
########| is set via the /S FORCE command line switch and defaults   |########
########| to 16k.  16k is an internal database buffer.               |########
########+------------------------------------------------------------+########
##############################################################################
##############################################################################
#########+--| Example 1 |-------------------------------------------+#########
#########| *    Make a program TSR.                                 |#########
#########|                                                          |#########
#########| DO tsr                    && if tsr returns...then       |#########
#########|                           &&  it can't make program tsr  |#########
#########|                                                          |#########
#########| ? "Unable to terminate and stay resident"                |#########
#########+----------------------------------------------------------+#########
##############################################################################
##############################################################################
#########+--| Example 2 |-------------------------------------------+#########
#########| *    The proc_entry() function specifies the             |#########
#########| *    "hot key" procedure.                                |#########
#########|                                                          |#########
#########| IF .NOT. proc_entry( my_hot_key, "<Ctrl><B>" )           |#########
#########|     ? "Cannot chain into keyboard"                       |#########
#########| ENDIF                                                    |#########
#########|                                                          |#########
#########| tsr()                                                    |#########
#########+----------------------------------------------------------+#########
##############################################################################