home *** CD-ROM | disk | FTP | other *** search
/ Set of Apple II Hard Drive Images / pdoseric.hdv / SOURCE / CHARSET.SRC.txt < prev    next >
Text File  |  2020-08-13  |  5KB  |  167 lines
  1. ;
  2. ; CHARSET.SRC - CHARACTER SET FOR DANCING NOTES
  3. ;
  4. NUMBER0  DFB $1C   ;0011100
  5.          DFB $22   ;0100010
  6.          DFB $22   ;0100010
  7.          DFB $22   ;0100010
  8.          DFB $1C   ;0011100
  9. NUMBER1  DFB $08   ;0001000
  10.          DFB $08   ;0001000
  11.          DFB $08   ;0001000
  12.          DFB $08   ;0001000
  13.          DFB $08   ;0001000
  14. NUMBER2  DFB $1E   ;0111100
  15.          DFB $20   ;0000010
  16.          DFB $1C   ;0011100
  17.          DFB $02   ;0100000
  18.          DFB $3E   ;0111110
  19. NUMBER3  DFB $1E   ;0111100
  20.          DFB $20   ;0000010
  21.          DFB $1C   ;0011100
  22.          DFB $20   ;0000010
  23.          DFB $1E   ;0111100
  24. NUMBER4  DFB $12   ;0100100
  25.          DFB $12   ;0100100
  26.          DFB $3E   ;0111110
  27.          DFB $10   ;0000100
  28.          DFB $10   ;0000100
  29. NUMBER5  DFB $3E   ;0111110
  30.          DFB $02   ;0100000
  31.          DFB $1E   ;0111100
  32.          DFB $20   ;0000010
  33.          DFB $1E   ;0111100
  34. NUMBER6  DFB $1C   ;0011100
  35.          DFB $02   ;0100000
  36.          DFB $1E   ;0111100
  37.          DFB $22   ;0100010
  38.          DFB $1C   ;0011100
  39. NUMBER7  DFB $3E   ;0111110
  40.          DFB $20   ;0000010
  41.          DFB $10   ;0000100
  42.          DFB $08   ;0001000
  43.          DFB $04   ;0010000
  44. NUMBER8  DFB $1C   ;0011100
  45.          DFB $22   ;0100010
  46.          DFB $1C   ;0011100
  47.          DFB $22   ;0100010
  48.          DFB $1C   ;0011100
  49. NUMBER9  DFB $1C   ;0011100
  50.          DFB $22   ;0100010
  51.          DFB $3C   ;0011110
  52.          DFB $20   ;0000010
  53.          DFB $1C   ;0011100
  54. ;
  55. LETTERA  DFB $18   ;1001100
  56.          DFB $24   ;1010010
  57.          DFB $24   ;1010010
  58.          DFB $58   ;1001101
  59. ;
  60. LETTERB  DFB $04   ;1010000
  61.          DFB $34   ;1010110
  62.          DFB $4C   ;1011001
  63.          DFB $3C   ;1011110
  64. ;
  65. LETTERC  DFB $00   ;1000000
  66.          DFB $78   ;1001111
  67.          DFB $0C   ;1011000
  68.          DFB $78   ;1001111
  69. ;
  70. LETTERD  DFB $40   ;1000001
  71.          DFB $58   ;1001101
  72.          DFB $64   ;1010011
  73.          DFB $78   ;1001111
  74. ;
  75. LETTERE  DFB $38   ;1001110
  76.          DFB $7C   ;1011111
  77.          DFB $04   ;1010000
  78.          DFB $38   ;1001110
  79. ;
  80. LETTERF  DFB $38   ;1001110
  81.          DFB $04   ;1010000
  82.          DFB $1C   ;1011100
  83.          DFB $04   ;1010000
  84. ;
  85. LETTERG  DFB $38   ;1001110
  86.          DFB $7C   ;1011111
  87.          DFB $40   ;1000001
  88.          DFB $3C   ;1011110
  89. ;
  90. CAPITALA DFB $3E   ;0111110
  91.          DFB $22   ;0100010
  92.          DFB $3E   ;0111110
  93.          DFB $22   ;0100010
  94. ;
  95. CAPITALB DFB $3E   ;0111110
  96.          DFB $1A   ;0101100
  97.          DFB $26   ;0110010
  98.          DFB $1E   ;0111100
  99. ;
  100. CAPITALC DFB $3E   ;0111110
  101.          DFB $02   ;0100000
  102.          DFB $02   ;0100000
  103.          DFB $3E   ;0111110
  104. ;
  105. CAPITALD DFB $1E   ;0111100
  106.          DFB $22   ;0100010
  107.          DFB $22   ;0100010
  108.          DFB $1E   ;0111100
  109. ;
  110. CAPITALE DFB $3E   ;0111110
  111.          DFB $02   ;0100000
  112.          DFB $0E   ;0111000
  113.          DFB $3E   ;0111110
  114. ;
  115. CAPITALF DFB $3E   ;0111110
  116.          DFB $02   ;0100000
  117.          DFB $0E   ;0111000
  118.          DFB $02   ;0100000
  119. ;
  120. CAPITALG DFB $3E   ;0111110
  121.          DFB $02   ;0100000
  122.          DFB $3A   ;0101110
  123.          DFB $3E   ;0111110
  124. ;
  125. NOFF1    DFB $00
  126.          DFB $00
  127.          DFB $00
  128.          DFB $00
  129. ;
  130. NOFF2    DFB $00
  131.          DFB $00
  132.          DFB $00
  133.          DFB $00
  134. ;
  135. ; NOTEMAP TRANSLATES NOTE NUMBER INTO OFFSET FROM 'LETTERA'
  136. ;
  137. ;            A=CHARACTER: 0=c 1=C 2=d 3=D 4=e 5=f 6=F 7=g 8=G 9=a 10=A 11=b
  138. ;                        12=c 13=C,etc, same for 24,36,48,etc.
  139. ;                       128=C   d   D   e   E   F   g   G   a   A    b    B
  140. ;                       140=C 141=d,etc, same for 152,etc.
  141. ;
  142. NOTEMAP  DFB 8,36,12,40,16,20,48,24,52,0,28,4    ;UPPER CASE SHARPS 0-11
  143.          DFB 8,36,12,40,16,20,48,24,52,0,28,4    ;12-23
  144.          DFB 8,36,12,40,16,20,48,24,52,0,28,4    ;24-35
  145.          DFB 8,36,12,40,16,20,48,24,52,0,28,4    ;36-47
  146.          DFB 8,36,12,40,16,20,48,24,52,0,28,4    ;48-59
  147.          DFB 8,36,12,40,16,20,48,24,52,0,28,4    ;60-71
  148.          DFB 8,36,12,40,16,20,48,24,52,0,28,4    ;72-83
  149.          DFB 8,36,12,40,16,20,48,24,52,0,28,4    ;84-95
  150.          DFB 8,36,12,40,16,20,48,24,52,0,28,4    ;96-107
  151.          DFB 8,36,12,40,16,20,48,24,52,0,28,4    ;108-119
  152.          DFB 8,36,12,40,16,20,48,56              ;120-127 (127=NOTE OFF)
  153. ;
  154.          DFB 36,12,40,16,44,48,24,52,0,28,4,32   ;LOWER CASE FLATS 128-
  155.          DFB 36,12,40,16,44,48,24,52,0,28,4,32
  156.          DFB 36,12,40,16,44,48,24,52,0,28,4,32
  157.          DFB 36,12,40,16,44,48,24,52,0,28,4,32
  158.          DFB 36,12,40,16,44,48,24,52,0,28,4,32
  159.          DFB 36,12,40,16,44,48,24,52,0,28,4,32
  160.          DFB 36,12,40,16,44,48,24,52,0,28,4,32
  161.          DFB 36,12,40,16,44,48,24,52,0,28,4,32
  162.          DFB 36,12,40,16,44,48,24,52,0,28,4,32
  163.          DFB 36,12,40,16,44,48,24,52,0,28,4,32
  164.          DFB 36,12,40,16,44,48,24,60             ;255=NOTE OFF
  165. ;
  166.          CHN HGRMAP.SRC
  167.