home *** CD-ROM | disk | FTP | other *** search
/ Fujiology Archive / fujiology_archive_v1_0.iso / !MAGS / !BONUS / COVERDSK / STFORMAT / STF34.ZIP / STF34A.MSA / STOS / MIDICOM.BAS (.txt) < prev    next >
Atari STOS Basic  |  1987-04-22  |  2KB  |  27 lines
  1. 10 REM MIDI Comunicator, for 2 ST's Linked via MIDI
  2. 100 REM message in
  3. 101 VARNAME
  4. 102 VARNAME
  5. 103 EXTENSION (Index #12) (Token 0x80)
  6. 15 RESERVE
  7. 199 RETURN
  8. 20 MODE
  9. 200 REM message out
  10. 201 IF
  11. 202 VARNAME
  12. 203 VARNAME
  13. 25 LOCATE
  14. 299 RETURN
  15. 30 EXTENSION (Index #12) (Token 0x80)
  16. 300 REM scancode
  17. 35 VARNAME
  18. 399 RETURN
  19. 40 VARNAME
  20. 50 LOCATE
  21. 55 IF
  22. 60 IF
  23. 70 IF
  24. 80 IF
  25. 85 IF
  26. 90 GOTO
  27.