построить график функции в QBasic? y=ax+b a=3,b=1вот  программка,но надобно составить немножко

Выстроить график функции в QBasic? y=ax+b a=3,b=1
вот программка,но надо составить немного проще...без клеток.
20 SCREEN 12

30 VIEW (10, 10)-(300, 300), , 3

40 WINDOW (-10, 10)-(10, -10)

50 FOR x = -10 TO 10

60 LINE (x,
-10)-(x, 10), 7

70 LINE (-10,
x)-(10, x), 7

80 NEXT x

90 LINE (-10, 0)-(10, 0), 5

100 LINE (0, -10)-(0, 10), 5

101 FOR x = -10 TO 10 STEP 0.1

102 PSET (x, 3*x +1), 10

103 NEXT x

104 END