BBS: Inland Empire Archive
Date: 02-13-93 (12:36)             Number: 204
From: ROB MCKEE                    Refer#: NONE
  To: ZACK JONES                    Recvd: NO  
Subj: Help                           Conf: (2) Quik_Bas
Hello Zack!
   You wrote in a message to Hugh Martin:

 ZJ> Howdy Hugh!

 ZJ> 08 Feb 93, Hugh Martin writes to Zack Jones:

 HM> You're funny, Zack.

 ZJ> I don't know 'bout that - considering some of the mail I've
 ZJ> gotten here lately. I wonder if there's a way to use an asm
 ZJ> routine to print 2000 characters and not scroll the screen?

 Yes, see below...

 ZJ> I'll ask Tom Hanlin over on BASNet and see what he says.

WHAT! When I'm here? Traitor <G> <giggle> ;)

Int 10 Func 9
    ' $INCLUDE: ''
    DIM r AS RegType
    LOCATE 1, 1 ' can use this or INTERRUPT &h10
(     Char2Write% = 179 ' can be 0 to 255
      Page% = 0
      Attribute = 7
      CountOfrepeat = 1920             ' 2000 for full
screen = &H9 * 256 + Char2Write%
      r.bx = Page% * 256 + Attribute = CountOfrepeat
      Interrupt &H10, r, r
      ' Returns None
    : LOOP

 Catcha Later , I'll see you on the flip side - Rob

--- timEd/B6
 * Origin: Another Quik_Bas Point in Richmond, CA (1:125/411)
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