Copying

[dadsherm]

Korin,

Here is a quick little "flag" program for you.
It actually makes the star area appear sideways, but it was just a quick thing to do, so maybe you can get that corrected.
(If you want to use it that is. :roll: )

SCREEN 0, , 0, 0: CLS
COLOR 0, 7
FOR R = 5 TO 19: FOR C = 5 TO 55
LOCATE R, C: PRINT CHR$(32): NEXT: NEXT
COLOR 0, 4
R = 5
FOR P = 1 TO 8
LOCATE R, 5: PRINT STRING$(51, 32)
R = R + 2: NEXT
COLOR 0, 1
FOR R = 5 TO 13
FOR C = 5 TO 23
LOCATE R, C: PRINT CHR$(32): NEXT: NEXT
COLOR 7, 1
R = 5: C = 6
FOR R = 5 TO 12
FOR C = 6 TO 23
LOCATE R, C: PRINT CHR$(42)
C = C + 2: NEXT: R = R + 1: NEXT
FOR C = 6 TO 23
LOCATE 13, C: PRINT CHR$(42): C = C + 2: NEXT
R = 6: C = 7
FOR R = 6 TO 13
FOR C = 8 TO 21
LOCATE R, C: PRINT CHR$(42)
C = C + 2: NEXT: R = R + 1: NEXT: END

[Meg]

Korin, the "text pictures" you are looking for are commonly referred to as "ASCII art". If you put "ASCII art" into a search engine like google.com, I'm sure you'll find tons and tons of sites.

*peace*

Meg.

[DrV]

AAlib (realtime ascii art generator thingie) is the shiznorz (or something) - iirc, there's even a DOOM port for it -- aa-project.sourceforge.net/aalib/

[Korin]

OK.. all problems resolved.. thanks guys

[Korin]

uh.. this is gonna sound really stupid.. but how do i get text i have in a document into qbasic? cuz ive quickly learned reg copy and paste doesnt work...

[Sterling Christensen]

Save as plain text, open in QB.

[whitetiger0990]

or open the code in notepad and paste there
(if you are using qb45 you have to save as text)

[Korin]

kk ... again.. all problems resolved..

[Ralph]

whitetiger0990 wrote:

"or open the code in notepad and paste there
(if you are using qb45 you have to save as text)"

Just wanted to say that your solution is TOPS! I have rewritten many things in QB, just because I didn't know about your very cool method! MANY THANKS!

[whitetiger0990]

No problem =P