home *** CD-ROM | disk | FTP | other *** search
/ 64'er Special 84 / 64er_Magazin_Sonderheft_84_19xx_Markt__Technik_de_Side_B.d64 / miditest (.txt) < prev    next >
Encoding:
Commodore BASIC  |  1990-01-01  |  227 b   |  14 lines
  1. 100 rem *** midi-test ***
  2. 110 ifa=0thena=1:load"midifile",8,1
  3. 120 sys 51968:print"[147]"
  4. 130 for i=1 to 8
  5. 140 read b:print b
  6. 150 sys 51987,b
  7. 160 next i
  8. 170 print"":for i=1 to  8
  9. 180 sys 51997
  10. 190 printtab(12)peek(780)
  11. 200 next i
  12. 210 data 12,7,9,4,6,3,57,3
  13. 220 poke198,0:wait198,1:sys64738
  14.