00010 PRINT TAB(30);"SINE WAVE"
00020 PRINT TAB(15);"CREATIVE COMPUTING  MORRISTOWN, NEW JERSEY"
00021 PRINT
00022 PRINT
00023 PRINT
00024 PRINT
00025 PRINT
00040 REM REMARKABLE PROGRAM BY DAVID AHL
00041 REM Portability enhancement by David Meyer (2012/2/2)
00050 B=0
00100 REM  START LONG LOOP
00110 FOR T=0 TO 160
00120 A=INT(26+25*SIN(T/4))
00130 PRINT TAB(A);
00140 IF B=1 THEN 180
00150 PRINT "CREATIVE"
00160 B=1
00170 GOTO 200
00180 PRINT "COMPUTING"
00190 B=0
00200 NEXT T
00999 END