Re: CHR$(...)

 BBS: Inland Empire Archive
Date: 04-06-92 (19:29)             Number: 197
From: ROBBIE CHURCH                Refer#: 76
  To: ERIC MILLER                   Recvd: NO  
Subj: Re: CHR$(...)                  Conf: (2) Quik_Bas
EM>  value.  Also depending on
EM>  whether you use monochrome or color, you might need to use a different
EM>  routine because mine works for color text in SCREEN 0.  I have no idea

EM>  DEF SEG = &HB800          'Color text memory segment
EM>  Ch = ASC(C$)              'Get ASCII value of your character
EM>  Addr = (Y - 1) * 160 + (X - 1) * 2   'find location of X,Y
EM>  POKE Addr, Ch                        'Place Chr$(Ch) at X,Y
EM>  DEF SEG


FYI
To do the same thing on a monochrome, you change DEF SEG = &HB800 to
DEF SEG = &HB000.  That's it!

-Rob


 * SLMR 2.1a * Real programmers use COPY CON MYPROG.EXE

--- 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