150 POKE MAX,88
2000 REM SMOOTHER SINE
2010 DATA 4,4,4,5,5,5,6,6,6,6,7,7,7,7,7,7,8,8,8,8,8,8,8,8,8,7,7,7,7,7,7,6,6,6,6,5,5,5,4,4,4,3,3,3,3,2,2,2,1,1
2020 DATA 1,1,1,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,1,1,1,1,1,2,2,2,3,3,3,3,4