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

 twAMClickShow( nButton, aRegions )
 ----------------------------------------------------------------------------
     Determine whether a button was pressed in an array of regions and
     if so, display the region in the current Clipper  enhanced colour
     for as long as the button is held down.

       Arguments:

     nButton  - 'N' Mouse button to for which to check.

     aRegions - 'A' Array of regions.

       Return:

     The region array element number in which the click occurred or
     zero if there was bo click detected.

       Example:

     DO WHILE INKEY() != K_ESC
     // Check regions
        IF ( nRegion := twAMClickShow( 1, aRegions )) > 0
                _twM2()
                @ twRow( 09 ), twCol( 07 ) SAY "Region " + ;
                                STRINT( nRegion ) + " Clicked."
                _twM1()
        ENDIF
     ENDDO