04-20-2008, 08:50 PM
'Plese copy the program below to qb and run. Then, copy the screen to a second instance
'of qb and run again, to obtain the pure comments.
CLS
PRINT "'COMMENT.BAS is a comment-type program"
PRINT "PRINT"; CHR$(34); " This is a programming site, so program your comments, please!"; CHR$(34)
PRINT "PRINT"
PRINT "PRINT"; CHR$(34); " I think this form of posting comments will show that posting "; CHR$(34)
PRINT "PRINT"; CHR$(34); " only programs will be boring, and will make commenting too "; CHR$(34)
PRINT "PRINT"; CHR$(34); " bothersome and difficult to produce and read, as well as  "; CHR$(34)
PRINT "PRINT"; CHR$(34); " creating too much waste in time, space, and patience.    "; CHR$(34)
PRINT "PRINT"
PRINT "PRINT"; CHR$(34); " So, let's allow comments as such, without requiring the   "; CHR$(34)
PRINT "PRINT"; CHR$(34); " poster to program his comments, please!           "; CHR$(34)
PRINT "PRINT"
PRINT "PRINT"; CHR$(34); " Hmm, maybe someone will create a program to take a file with "; CHR$(34)
PRINT "PRINT"; CHR$(34); " simple text (comments) and create this type of program, with "; CHR$(34)
PRINT "PRINT"; CHR$(34); " the comments included already? Well, it's a thought, anyway!"; CHR$(34)
'of qb and run again, to obtain the pure comments.
CLS
PRINT "'COMMENT.BAS is a comment-type program"
PRINT "PRINT"; CHR$(34); " This is a programming site, so program your comments, please!"; CHR$(34)
PRINT "PRINT"
PRINT "PRINT"; CHR$(34); " I think this form of posting comments will show that posting "; CHR$(34)
PRINT "PRINT"; CHR$(34); " only programs will be boring, and will make commenting too "; CHR$(34)
PRINT "PRINT"; CHR$(34); " bothersome and difficult to produce and read, as well as  "; CHR$(34)
PRINT "PRINT"; CHR$(34); " creating too much waste in time, space, and patience.    "; CHR$(34)
PRINT "PRINT"
PRINT "PRINT"; CHR$(34); " So, let's allow comments as such, without requiring the   "; CHR$(34)
PRINT "PRINT"; CHR$(34); " poster to program his comments, please!           "; CHR$(34)
PRINT "PRINT"
PRINT "PRINT"; CHR$(34); " Hmm, maybe someone will create a program to take a file with "; CHR$(34)
PRINT "PRINT"; CHR$(34); " simple text (comments) and create this type of program, with "; CHR$(34)
PRINT "PRINT"; CHR$(34); " the comments included already? Well, it's a thought, anyway!"; CHR$(34)
Ralph, using QuickBASIC 4.5 and Windows XP Home Edition and Service Pack 2, with HP LaserJet 4L printer.