100 OPTION ANGLE DEGREES
110 DEF f(x)=2*sin(x)*cos(0.1*x)
120 SET WINDOW -100,3500,-5,5
130 DRAW GRID(360,1)
140 SET POINT STYLE 1
150 FOR x=-100 TO 3500  
160    PLOT POINTS: x,f(x)
170 NEXT x
180 END
