10 REM TACKER:  smj (Stephen M. Jones)
11 REM DATE:    07-Aug-16 18:27:21
12 REM CHECKED: bwbasic
50 B=0
110 FOR T=0 TO 40 STEP .25
120   A=INT(26+25*SIN(T))
130   PRINT TAB(A);
140   IF B=1 THEN 180
150   PRINT "SDF"
160   B=1
170   GOTO 200
180   PRINT "RULES"
190   B=0
200 NEXT T
999 END