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

 RDCURLEVEL()
 This routine will return the current level of READs
------------------------------------------------------------------------------
 Syntax
      RDCURLEVEL() -> <nCurLevel>
 Arguments
     None
 Returns
     <nCurLevel> The current depth of the READs. The level number
          is the current count of nested READs starting at 1.
 Description
     This number is useful when calling RDExclMouse() for excluding the
     mouse from lower level READs.
 Examples
     nCurLevel=RDCurLevel()
     RDExclMouse(nCurLevel)

 Source: MOUSEGET.PRG

 Author: Leo Letendre