home *** CD-ROM | disk | FTP | other *** search
/ Set of Apple II Hard Drive Images / eric.hdv / ERIC / SOURCE / TESTCTRL.SC2BAK < prev    next >
Encoding:
Text File  |  1997-04-10  |  3.4 KB  |  93 lines  |  [04] ASCII Text (0x0000)
  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 000,000,000,000,000,000,000,000
  28.          DFB 000,000,000,000,000,000,000,000
  29.          DFB 000,000,000,000,000,000,000,000
  30.          DFB 000,000,000,000,000,000,000,000
  31.          DFB 000,000,000,000,000,000,000,000
  32.          DFB 001,001,002,003,003,004,005,005
  33.          DFB 006,007,007,008,009,009,010,011
  34.          DFB 011,012,013,013,014,015,015,016
  35.          DFB 017,017,018,019,019,020,021,021
  36.          DFB 022,023,023,024,025,025,026,027
  37.          DFB 027,028,029,029,030,031,031,032
  38.          DFB 033,033,034,035,035,036,037,037
  39.          DFB 038,039,039,040,041,041,042,043
  40.          DFB 043,044,045,045,046,047,047,048
  41.          DFB 049,049,050,051,051,052,053,053
  42.          DFB 054,055,055,056,057,057,058,059
  43.          DFB 059,060,061,061,062,063,063,064
  44.          DFB 064,064,064,064,064,064,064,064
  45.          DFB 064,064,064,064,064,064,064,064
  46.          DFB 065,065,066,067,067,068,069,069
  47.          DFB 070,071,071,072,073,073,074,075
  48.          DFB 070,076,077,077,078,079,079,080
  49.          DFB 081,081,082,083,083,084,085,085
  50.          DFB 086,087,087,088,089,089,090,090
  51.          DFB 091,091,092,093,093,094,095,095
  52.          DFB 096,097,097,098,099,099,100,101
  53.          DFB 101,102,103,103,104,105,105,106
  54.          DFB 107,107,108,109,109,110,111,111
  55.          DFB 112,113,113,114,115,115,116,117
  56.          DFB 117,118,119,119,120,121,121,122  
  57.          DFB 123,123,124,125,125,126,127,127
  58.          DFB 127,127,127,127,127,127,127,127
  59. ;
  60. YTABLE   DFB 000,000,000,000,000,000,000,000
  61.          DFB 000,000,000,000,000,000,000,000
  62.          DFB 000,000,000,000,000,000,000,000
  63.          DFB 000,000,000,000,000,000,000,000
  64.          DFB 000,000,000,000,000,000,000,000
  65.          DFB 001,001,002,003,003,004,005,005
  66.          DFB 006,007,007,008,009,009,010,011
  67.          DFB 011,012,013,013,014,015,015,016
  68.          DFB 017,017,018,019,019,020,021,021
  69.          DFB 022,023,023,024,025,025,026,027
  70.          DFB 027,028,029,029,030,031,031,032
  71.          DFB 033,033,034,035,035,036,037,037
  72.          DFB 038,039,039,040,041,041,042,043
  73.          DFB 043,044,045,045,046,047,047,048
  74.          DFB 049,049,050,051,051,052,053,053
  75.          DFB 054,055,055,056,057,057,058,059
  76.          DFB 059,060,061,061,062,063,063,064
  77.          DFB 064,064,064,064,064,064,064,064
  78.          DFB 064,064,064,064,064,064,064,064
  79.          DFB 065,065,066,067,067,068,069,069
  80.          DFB 070,071,071,072,073,073,074,075
  81.          DFB 070,076,077,077,078,079,079,080
  82.          DFB 081,081,082,083,083,084,085,085
  83.          DFB 086,087,087,088,089,089,090,090
  84.          DFB 091,091,092,093,093,094,095,095
  85.          DFB 096,097,097,098,099,099,100,101
  86.          DFB 101,102,103,103,104,105,105,106
  87.          DFB 107,107,108,109,109,110,111,111
  88.          DFB 112,113,113,114,115,115,116,117
  89.          DFB 117,118,119,119,120,121,121,122  
  90.          DFB 123,123,124,125,125,126,127,127
  91.          DFB 127,127,127,127,127,127,127,127
  92. ;
  93.