'LINE-Demo mit B- und BF-Option

SCREEN 12                            'VGA-Grafikmodus 640x480 gew„hlt

COLOR 15                             'Leuchtend-Weiá

LINE (10, 200)-(600, 400), 13, B     'Nicht ausgef�lltes Rechteck

LOCATE 24, 1                         'Meldung ausgeben
PRINT "Nicht ausgef�lltes Rechteck"
PRINT "Beliebige Taste dr�cken..."
a$ = INPUT$(1)

CLS                                  'Bildschirm l”schen
LINE (10, 200)-(600, 400), 13, BF    'Ausgef�lltes Rechteck

LOCATE 24, 1                         'Meldung ausgeben
PRINT "Ausgef�lltes Rechteck"
PRINT "Beliebige Taste dr�cken..."
a$ = INPUT$(1)