Построить график функции y=2x+1- QBasic(Бейсик)

DEF FNY (x)=2*x+1
SCREEN 12
LINE (0,240)-(640,240)
LINE (320,0)-(320,480)
K=30 'масштаб
FOR x=0 TO 640
y= 240-K*FNY((x-320)/K)
PSET (x,y),15
NEXT X