version$ = "zGraphics_QB64forum.bas" 'alpha Red Green Blue
z = &HFFFFFFFF ' color bright white
Xlimit% = 3200 - 1: Ylimit% = 1800 - 1 '3200x1800 laptop display
xx& = Xlimit%: yy& = Ylimit%
LINE (1, 1)-(xx&
- 1, yy&
- 1), z
, B
' can not do box with x=0 or xx&, y=0 or yy& LINE (5, 5)-(xx&
- 5, yy&
- 5), z
, B
' next resolved inner box 'should have 3 resolved points
'ending: DO: LOOP UNTIL INKEY$ <> ""