10 rem Showing TAB function
   15 rem 12/13/2019 Ken
   30 for x = 0 to 15 step .5
   40   print tab(30+15*sin(x)*exp(-.1*x));"*"
   50 next x
   60 end