home *** CD-ROM | disk | FTP | other *** search
/ Turbo Toolbox / Turbo_Toolbox.iso / 1989 / 03 / tricks / prints.c < prev    next >
Encoding:
Text File  |  1988-12-13  |  745 b   |  23 lines
  1. /* ------------------------------------------------------ */
  2. /*                    PRINTS.C                            */
  3. /* schreibt Text in den Bildschirmspeicher, was schneller */
  4. /* schneller geschieht, als bei vergleichbaren Standard-  */
  5. /* funktionen. DOS.H muß eingebunden sein.                */
  6. /*      (c) 1989 Klaus Pink-Patzer & TOOLBOX              */
  7. /* ------------------------------------------------------ */
  8.  
  9. int prints(int zeile, int spalte, char *chr)
  10. {
  11.   int adress,i;
  12.   int segment = 0xb000;
  13.                     /* default ist hercules ega/cga=0xb800*/
  14.  
  15.   adress= (zeile - 1) * 160 + (spalte - 1) * 2;
  16.   while ((*chr) != '\0')
  17.   {
  18.     pokeb(segment, adress, *chr);
  19.     adress += 2;
  20.     chr++;
  21.   }
  22. }
  23.