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

 setintensity()      Set the intensity flag
------------------------------------------------------------------------------
 Declaration
   getset.hdr

 Syntax
   proc setintensity extern
   param value logical lOn

 Arguments
   lOn is the new setting for the flag.

 Return
   None.

 Description
   The setintensity() function sets the intensity flag according to the
   passed parameter.

 Example
   #define EXAMPLE_IO
   #include example.hdr

   proc Test_setintensity
   ? getintensity()                // prints .t.
   set intensity off
   ? getintensity()                // prints .f.
   setintensity( .t. )
   ? getintensity()                // prints .t.
   endproc

   proc main
   Test_setintensity()
   endproc