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

b_control()


Syntax:     b_control(<expC>)

Purpose:    Test for control characters

Arguments:  <expC> is the character or string

Returns:    A Logical Value

Note:       Characters 0 thru 31 and 127 - 255 are control characters

Library:    MICROSYS.LIB

----------------------------------- Example ----------------------------------

   mcus_name := spac(30)
   @1,1 say "Customer Name : " get mcus_name
   read

   if( b_control(mcus_name) )
      qout("Invalid characters in customer name!")
   endif