 Usage:   setmode(di, l_num, c_num, mode)   
 
 Input:

  di                     Display 
                         
                         
  l_num                  integer, 1 ... count of lines of di 
                         
                         
  c_num                  integer, 1 ... count of columns of di 
                         
                         
  mode                   0 if you need the default mode (ZOOM and INDEX) 
                         
                         1 if you want to brush 
                         
                         2 if you want to define your own actions using readevent 
                         
                         
                         
--------------------------------------------------------------
(C) MD*TECH Method and Data Technologies, 17.8.2000
