Изобразить на экране шахматную доску nxn клеток заданного размера- QBasic(Бейсик)

SCREEN 12
KL = 50 'razmer
n = 5 'kol-vo
xpl = (640 - (n * KL)) / 2: ypl = (480 - (n * KL)) / 2
FOR m = 0 TO (n * n) - 1
    y = m \ n: x = m MOD n: cv = (-(y AND 1) + (x AND 1)) * 15
    LINE (x * KL + xpl, y * KL + ypl)-(x * KL + KL - 1 + xpl, y * KL + KL - 1 + ypl), cv, BF
NEXT
xpl = xpl + (n * KL) / 2: ypl = ypl + (n * KL) / 2
LINE (xpl - (n * KL) / 2, ypl - (n * KL) / 2)-(xpl + (n * KL) / 2, ypl + (n * KL) / 2), 7, B