BBS: Inland Empire Archive
Date: 03-15-92 (16:12)             Number: 117
From: BOB SEWELL                   Refer#: NONE
  To: K.L. LEE                      Recvd: NO  
Subj: Re: QLB                        Conf: (2) Quik_Bas
KL>     Thanks your kindly help, do you know how to load ANSI file,
KL>    it must be have color.

   One way is to open the screen as an output file, and
open the ANSI file for input. Read a line from the ANSI
file, then print it to the screen file, making sure to add
the ";" character at the end so you don't get an undesired
carriage return/line feed. The following is off the top of
my head, so if it doesn't work right, fiddle with it until
it does.

   OPEN "cons" FOR OUTPUT AS #1         'opens the screen as a file
   OPEN "ansifile.ans" FOR INPUT AS #2  'open your ansi file
   WHILE NOT EOF(2)                     'perform loop until end of file
     LINE INPUT #2, a$                  'get a complete ANSI line
     PRINT #1, a$;                      'put tha line on the screen    WEND

  That oughta do it.

--- Echodor 3.10a
 * Origin: Strawberry Fields - Nashville (1:116/5.0)
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