home *** CD-ROM | disk | FTP | other *** search
/ Set of Apple II Hard Drive Images / eric.hdv / OBJTEST / TESTPLAN2.txt < prev    next >
Text File  |  2020-08-13  |  5KB  |  171 lines
  1.  
  2.  
  3. ; ********************************************
  4. ; * PIANOSCR.SRC - DISPLAY CONTROLLER 
  5. ; ********************************************
  6. ;------------OBJECT REFERENCES
  7. PIANOSCR  EQU   9
  8. ;==========================================
  9. ; INTERNAL DATA MAINTAINED BY OBJECT:
  10. ;
  11. PTR1                EQU $06  ;USED FOR ADDRESSING SCREEN
  12. PTR2                EQU $08
  13. PTR3                EQU $19
  14. PTR4                EQU $1B
  15. ;
  16. SCRNLO              DFB $00
  17. SCRNHI              DFB $00
  18. BYTESAVE            DFB $00
  19. CHANNEL             DFB $00
  20. NOTENUM             DFB $00
  21. COUNTER             DFB $00
  22. MARKER              DFB $5D
  23. ;
  24. ;==========================================
  25. ; METHODS:
  26. ;
  27. ;        'I'        = INITIALIZE (READ SCREEN TO GET DEFAULT VALUES)
  28. ;        'C' <BYTE> = SET CHANNEL FOR MARKER DISPLAY
  29. ;        'N' <BYTE> = SET NOTE NUMBER
  30. ;        'O'        = NOTE ON
  31. ;        'F'        = NOTE OFF
  32. ;        'Z'        = REFRESH SCREEN (REMOVE ANY MARKERS)-USE AFTER TRANSPOSE
  33. ;
  34. ;==========================================
  35.  
  36. ; ********************************************
  37. ; * MOCKBRD.SRC - MOCKINGBOARD INTERFACE 
  38. ; ********************************************
  39. ;
  40. ;------------OBJECT REFERENCES
  41. MOCKBRD  EQU   10
  42. ;==========================================
  43. ; INTERNAL DATA MAINTAINED BY OBJECT:
  44. ;
  45. MSLOT               EQU   $06          ;WILL POINT TO MKBD SLOT ($C400)
  46. SLOTNUM             DFB   $04          ;DEFAULT TO SLOT 4
  47. ;
  48. SPEAKER             DFB   $00      ;00=LEFT, 80=RIGHT
  49. ;
  50. ;==========================================
  51. ; METHODS:
  52. ;
  53. ;        'I' - INITIALIZE MOCKINGBOARD
  54. ;        'P' <REG> <DATA> - POKE REGISTER WITH DATA
  55. ;        'L' <SLOT#> - CHANGE SLOT OF MOCKINGBOARD
  56. ;        'S' <SPKR#> - CHANGE SPEAKER (0=LEFT,1=RIGHT)
  57. ;
  58. ;==========================================
  59.  
  60. ; ********************************************
  61. ; * DRUMMACH.SRC - DRUM MACHINE OBJECT
  62. ; ********************************************
  63. ;
  64. ;------------OBJECT REFERENCES
  65. DRUMMACH EQU   11
  66. MOCKBRD  EQU   10            ;<===MOCKINGBOARD
  67. ;
  68. ;==========================================
  69. ; INTERNAL DATA MAINTAINED BY OBJECT:
  70. ;
  71. DRUM                DFB   $01          ; DRUM NUMBER
  72. ;
  73. ; INSTRUMENT DATA: NOISE PERIOD, COARSE TONE PERIOD
  74. ; 0=CYMBAL, 1=HIHAT, 2=SNARE, 3=TOMTOM, 4=BASSDRUM
  75. ;
  76. NOISE    DFB       $01,$01,$04,$10,$1F
  77. COARSE   DFB       $10,$02,$04,$02,$04
  78. ;
  79. DRUMMAP  DFB       $FF,60,52,44,36
  80. ;
  81. INITFLAG DFB 2     ;>0=INITIALIZE MKBD, WILL COUNT DOWN TO ZERO
  82. ;
  83. INITMSG  ASC 'I'
  84. POKEMSG  ASC 'P'
  85. REGISTER DFB $00
  86. DATA     DFB $00
  87. SPKRMSG  DFB 'S'
  88. SPEAKER  DFB $00   ; 0=LEFT 1=RIGHT
  89. ;==========================================
  90. ; METHODS:
  91. ;
  92. ;        D <DRUM #> = BANG DRUM (0-4)
  93. ;        N <MIDI NOTE#> = BANG DRUM CORRESPONDING TO MIDI NOTE #
  94. ;
  95. ;==========================================
  96.  
  97. ; ********************************************
  98. ; * MIDIFILT.SRC - MIDI FILTERING SYSTEM 
  99. ; ********************************************
  100. ;
  101. ;------------DEPENDENT OBJECTS
  102. MIDIFILT EQU  15             ;
  103. PIANOSCR EQU  09             ;<===DISPLAY MANAGER FOR PIANO SCREEN
  104. DRUMMACH EQU  11             ;<===MOCKINGBOARD DRUM MACHINE
  105. INTRFACE EQU  16             ;<===MIDI INTERFACE CONTROLLER
  106. ;
  107. ;==========================================
  108. ; INTERNAL DATA MAINTAINED BY OBJECT:
  109. ;
  110. INBYTE              DFB $00  ;BYTE RECEIVED
  111. PHASE               DFB $91  ;PHASE FLAG
  112. CURRSTS             DFB $90  ;CURRENT STATUS BYTE
  113. ;
  114. ; PROGRAM CHANGE DATA STORED HERE (START ADRS+8)
  115. ;
  116. PROG1               DFB $00,$00,$00,$00,$00,$00,$00,$00
  117.                     DFB $00,$00,$00,$00,$00,$00,$00,$00
  118. PROG2               DFB $00,$00,$00,$00,$00,$00,$00,$00
  119.                     DFB $00,$00,$00,$00,$00,$00,$00,$00
  120. VOLUME              DFB $40,$40,$40,$40,$40,$40,$40,$40
  121.                     DFB $40,$40,$40,$40,$40,$40,$40,$40
  122. BRILL               DFB $02,$02,$02,$02,$02,$02,$02,$02
  123.                     DFB $02,$02,$02,$02,$02,$02,$02,$02
  124. ;
  125. CHANNEL             DFB $00  ;CURRENT CHANNEL
  126. ;                   ;CHANNEL ASSIGNMENT:  1=XMIT 2=DRUM 4=PIANOSCR 8=MKBD
  127. CHNLASG             DFB 5,5,5,5,5,5,5,5
  128.                     DFB 5,6,6,6,6,6,6,6
  129. ;
  130. MULTI               DFB $01
  131. REVERB              DFB $03
  132. EFFECT              DFB $04
  133. TRANSP              DFB $00  ;TRANSPOSE INTERVAL
  134. KARAOKE             DFB $00  ;00=OFF 01=IGNORE NOTE-ON'S WITH VEL=$41
  135. PIANO               DFB $00  ; PIANO SCREEN ON /OFF
  136. PEDALS              DFB $00,$00,$00
  137. LOCAL               DFB $00
  138. VOLFLAG             DFB $00
  139. ;
  140. LOOPCTR             DFB $00
  141. ;
  142. XMITMSG  ASC 'X'
  143. XMITLEN  DFB $03
  144. XMITSTS  DFB $90
  145. XMITNOTE DFB $00
  146. XMITVEL  DFB $00
  147. ;
  148. CHNLMSG  ASC 'C'
  149. CHNLCHNL DFB $00
  150. ;
  151. NOTEMSG  ASC 'N'
  152. NOTENOTE DFB $00
  153. ;
  154. ONMSG    ASC 'O'
  155. OFFMSG   ASC 'F'
  156. ;
  157. REFRMSG  ASC 'Z'
  158. ;
  159. DRUMMSG  ASC 'N'
  160. DRUMNOTE DFB $00
  161. ;
  162. ;==========================================
  163. ; METHODS:
  164. ;
  165. ;        'T' <BYTE> = SET TRANSPOSE INTERVAL (SIGNED BINARY)
  166. ;        'K' <0-1> = KARAOKE MODE OFF/ON
  167. ;        'P' <0-1> = PIANO SCREEN OFF/ON
  168. ;        'C' <CHNL><NEW ASG> = CHANGE CHANNEL ASSIGNMENT
  169. ;        'X' <BYTES><$FF> = PROCESS A STREAM OF MIDI BYTES
  170. ;
  171.