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

b_char()


Syntax:     b_char(<expN>)

Purpose:    Character at current file pointer

Arguments:  <expN> is the file handle returned by b_open()

Returns:    A Single Character

Library:    MICROSYS.LIB

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

   nCurByte := ""
   nHandle1 := b_open("myfile.txt")

   if( nHandle1 == -1 )
       qout("Unable to open myfile.txt!")
       retu(.f.)
   endi

   b_seek(nHandle1,20,0)
   nCurByte := b_char(nHandle1)
   b_close(nHandle1)
   retu(.t.)