home *** CD-ROM | disk | FTP | other *** search
/ 64'er 1985 September / 64er_Magazin_85-09_1985_Markt__Technik_de.d64 / filter (.txt) < prev    next >
Commodore BASIC  |  2022-10-26  |  209b  |  15 lines
  1. 100 rem demonstration 'filter'
  2. 110 :
  3. 120 (NULL):(NULL) 15
  4. 130 (NULL) 1,4
  5. 140 (NULL) 1,0,0,15,11
  6. 150 (NULL) 1,700:(NULL) 1,on
  7. 160 :
  8. 170 for i=4000 to 7500 step 10
  9. 180 (NULL) t,i,15,1:next
  10. 190 :
  11. 200 for i=7500 to 4000 step-10
  12. 210 (NULL) t,i,15,1:next
  13. 220 :
  14. 230 (NULL) 1,(NULL)
  15.