home *** CD-ROM | disk | FTP | other *** search
/ Set of Apple II Hard Drive Images / eric.hdv / SOURCE / TESTCTRL.SC2.txt < prev    next >
Text File  |  2020-08-13  |  3KB  |  62 lines
  1. ;
  2. ;
  3. ; JOYCTRL - JOYSTICK MIDI CONTROLLERS WITH MIDI THRU
  4. ;
  5. ;
  6. CHKMIDI  LDA $C0A8
  7.          AND #$01            ;DID WE GET MIDI DATA
  8.          BEQ CHKMRTS         ;NO - CONTINUE PROCESSING
  9.          LDA $C0A9           ;YES- GET MIDI BYTE
  10.          CMP #$F8
  11.          BCS CHKMIDI         ;DON'T STORE REALTIME MSGS
  12.          LDY #$00
  13.          STA (QHEAD),Y       ;STORE MIDI MESSAGE
  14.          INC QHEAD
  15.          JMP CHKMIDI
  16. CHKMRTS  RTS
  17. ;
  18. STOREQ   LDY #$00
  19.          STA (QHEAD),Y       ;STORE MIDI MESSAGE
  20.          INC QHEAD
  21. ;         LDA QHEAD
  22. ;         CMP QTAIL
  23. ;         BEQ QFULL
  24.          RTS
  25. QFULL    BRK
  26. ;
  27. XTABLE   DFB 0,0
  28.          DFB 1,1,2,2,3,3,4,4,5,5,6,6,7,7,8,8
  29.          DFB 9,9,10,10,11,11,12,12,13,13,14,14,15,15,16,16
  30.          DFB 17,17,18,18,19,19,20,20,21,21,22,22,23,23,24,24
  31.          DFB 25,25,26,26,27,27,28,28,29,29,30,30,31,31,32,32
  32.          DFB 33,33,34,34,35,35,36,36,37,37,38,38,39,39,40,40
  33.          DFB 41,41,42,42,43,43,44,44,45,45,46,46,47,47,48,48
  34.          DFB 49,49,50,50,51,51,52,52,53,53,54,54,55,55,56,56
  35.          DFB 57,57,58,58,59,59,60,60,61,61,62,62,63,63,64,64
  36.          DFB 65,65,66,66,67,67,68,68,69,69,70,70,71,71,72,72
  37.          DFB 73,73,74,74,75,75,76,76,77,77,78,78,79,79,80,80
  38.          DFB 81,81,82,82,83,83,84,84,85,85,86,86,87,87,88,88
  39.          DFB 89,89,90,90,91,91,92,92,93,93,94,94,95,95,96,96
  40.          DFB 97,97,98,98,99,99,100,100,101,101,102,102,103,103,104,104
  41.          DFB 105,105,106,106,107,107,108,108,109,109,110,110,111,111,112,112
  42.          DFB 113,113,114,114,115,115,116,116,117,117,118,118,119,119,120,120
  43.          DFB 121,121,122,122,123,123,124,124,125,125,126,126,127,127
  44. ;
  45. YTABLE   DFB 127,127,126,126,125,125,124,124,123,123,122,122,121,121,120,120
  46.          DFB 119,119,118,118,117,117,116,116,115,115,114,114,113,113,112,112
  47.          DFB 111,111,110,110,109,109,108,108,107,107,106,106,105,105,104,104
  48.          DFB 103,103,102,102,101,101,100,100,99,99,98,98,97,97,96,96
  49.          DFB 95,95,94,94,93,93,92,92,91,91,90,90,89,89,88,88
  50.          DFB 87,87,86,86,85,85,84,84,83,83,82,82,81,81,80,80
  51.          DFB 79,79,78,78,77,77,76,76,75,75,74,74,73,73,72,72
  52.          DFB 71,71,70,70,69,69,68,68,67,67,66,66,65,65,64,64
  53.          DFB 63,63,62,62,61,61,60,60,59,59,58,58,57,57,56,56
  54.          DFB 55,55,54,54,53,53,52,52,51,51,50,50,49,49,48,48
  55.          DFB 47,47,46,46,45,45,44,44,43,43,42,42,41,41,40,40
  56.          DFB 39,39,38,38,37,37,36,36,35,35,34,34,33,33,32,32
  57.          DFB 31,31,30,30,29,29,28,28,27,27,26,26,25,25,24,24
  58.          DFB 23,23,22,22,21,21,20,20,19,19,18,18,17,17,16,16
  59.          DFB 15,15,14,14,13,13,12,12,11,11,10,10,9,9,8,8
  60.          DFB 7,7,6,6,5,5,4,4,3,3,2,2,1,1,0,0
  61. ;
  62.