' GFA-BASIC Demo fr STE/TT ' PRINT STE? n%=360*32 DIM a|(n%) ' DMASOUND V:a|(0),V:a|(n%),0 ' DMASOUND V:a|(0),V:a|(n%),1 ' DMASOUND V:a|(0),V:a|(n%),2 DMASOUND V:a|(0),V:a|(n%),3,3 FOR i%=0 TO n% a|(i%)=128+SINQ(i%*i%/7200)*127 NEXT i% REPEAT UNTIL MOUSEK DMACONTROL 0