' EndBASIC
' Copyright 2020 Julio Merino
'
' Licensed under the Apache License, Version 2.0 (the "License"); you may not
' use this file except in compliance with the License. You may obtain a copy
' of the License at:
'
' http://www.apache.org/licenses/LICENSE-2.0
'
' Unless required by applicable law or agreed to in writing, software
' distributed under the License is distributed on an "AS IS" BASIS, WITHOUT
' WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. See the
' License for the specific language governing permissions and limitations
' under the License.
' Tests that the background color is used only as the underlying color of new
' text, not the whole line. Previous versions of EndBASIC used to clear lines
' until the end on every PRINT, but that behavior prevented ASCII drawing.
CLS
A = 5: WHILE A > 0: COLOR A, A - 1: PRINT "Hello": A = A - 1: WEND
COLOR
COLOR 4, 2
INPUT "Number? "; num
123
PRINT "Message"
COLOR , 4
FOR I = 10 TO 14: LOCATE 0, I: PRINT " ": NEXT
COLOR , 5
LOCATE 4, 12
PRINT "####"
LOCATE 0, 20
COLOR