Paste Code from BASIC Stamp IDE
Jon Williams
Posts: 6,491
Will the colors be maintained?...
Reset:
· DEBUG CLS,
······· "MIDI Finder", CR, CR
Main:
· FOR chan = 0 TO 15
··· DEBUG "Channel ", DEC chan, CR
··· SEROUT Sout, Baud, [noparse][[/noparse](NoteOn + chan), 60, 127]
··· PAUSE 500
··· SEROUT Sout, Baud, [noparse][[/noparse]60, 0]················· ' off with running status
··· PAUSE 1000
· NEXT
· END
▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔
Jon Williams
Applications Engineer, Parallax
Dallas, TX· USA
Reset:
· DEBUG CLS,
······· "MIDI Finder", CR, CR
Main:
· FOR chan = 0 TO 15
··· DEBUG "Channel ", DEC chan, CR
··· SEROUT Sout, Baud, [noparse][[/noparse](NoteOn + chan), 60, 127]
··· PAUSE 500
··· SEROUT Sout, Baud, [noparse][[/noparse]60, 0]················· ' off with running status
··· PAUSE 1000
· NEXT
· END
▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔
Jon Williams
Applications Engineer, Parallax
Dallas, TX· USA
Comments
▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔
Jon Williams
Applications Engineer, Parallax
Dallas, TX· USA