home *** CD-ROM | disk | FTP | other *** search
/ QBasic & Borland Pascal & C / Delphi5.iso / C / Samples / C-ASM_VI.ARJ / PROGC.ZIP / PROGC001.C < prev    next >
Text File  |  1988-04-10  |  655b  |  14 lines
  1.  
  2. /************************************************************************/
  3. /* Write 1 into register 0A hex, CURSOR START, in the CRT controller    */
  4. /************************************************************************/
  5.  
  6. write_curs_start()
  7.         {
  8.         /* Change cursor start to 0 at both mono and color CRT addresses*/
  9.         write_register(0x03D4, 0x0A);   /* Select register 07 in CRTC   */
  10.         write_register(0x03D5, 0x01);   /* Load selected reg with 1     */
  11.         write_register(0x03B4, 0x0A);   /* Select register 07 in CRTC   */
  12.         write_register(0x03B5, 0x01);   /* Load selected reg with 1     */
  13.         }
  14.