QPrint

 BBS: Inland Empire Archive
Date: 04-06-92 (19:26)             Number: 196
From: ROBBIE CHURCH                Refer#: 186
  To: JOHN GALLAS                   Recvd: NO  
Subj: QPrint                         Conf: (2) Quik_Bas
JG>     I thought I heard of a sub somewhere that would use
JG>  pokes to print stuff on the screen so it would be printed
JG>  really fast.  Could someone either post the source for it,

I swiped this from Jean Crepeau (Thank you Jean) to David Bliss on 3-11-92:
___________________________________________________________________________
         First of all, you must define the data segment where your video
   memory (VRAM) is.  This is done with DEF SEG
   DEF SEG = &HB000   '  for monochrome  (Hercules) cards
   DEF SEG = &HB800   '  for color (CGA, EGA & VGA) cards

         For text modes, the address is
   A = (Row + 80 * Column) * 2

         PEEK(A)   returns the ASCII character and PEEK(A + 1) returns the
   attributes of that character.
___________________________________________________________________________

To print, you can substitute the PEEKs for POKEs.  You need to POKE the
character to print at the address (A) returned.  You must POKE the attribute
at the address + 1.  Hope this helps.

-Rob


 * SLMR 2.1a * Floggings will continue until morale improves!

--- Maximus 2.01wb
 * Origin: Mostly Mail (1:105/319)
Outer Court
Echo Basic Postings

Books at Amazon:

Back to BASIC: The History, Corruption, and Future of the Language

Hackers: Heroes of the Computer Revolution (including Tiny BASIC)

Go to: The Story of the Math Majors, Bridge Players, Engineers, Chess Wizards, Scientists and Iconoclasts who were the Hero Programmers of the Software Revolution

The Advent of the Algorithm: The Idea that Rules the World

Moths in the Machine: The Power and Perils of Programming

Mastering Visual Basic .NET