yuepu.vhd

本源码设计了自动电子琴

 when 1 => index0<="11111110";  --1 
  when 2 => index0<="11111111";  --1 
  when 3 => index0<="11111011";  --3 
  when 4 => index0<="11111110";  --5 
  when 5 => index0<="11111111";  --0 
  when 6 => index0<="11101111";  --5 
  when 7 => index0<="11111111";  --0 
  when 8 => index0<="11011111";  --6 
  when 9 => index0<="11111111";  --0 
  when 10 =>index0<="11101111";  --5
  when 11=> index0<="11101111";  --5 
  when 12=> index0<="11101111";  --5 
  when 13=> index0<="11110111";  --4
  when 14=> index0<="11111111";  --0 
  when 15=> index0<="11110111";  --4 
  when 16=> index0<="11111111";  --0 
  when 17=> index0<="11111011";  --3 
  when 18=> index0<="11111111";  --0 
  when 19=> index0<="11111011";  --3 
  when 20=> index0<="11111111";  --0 
  when 21=> index0<="11111101";  --2 
  when 22=> index0<="11111111";  --0 
  when 23=> index0<="11111101";  --2 
  when 24=> index0<="11111111";  --0 
  when 25=> index0<="11111110";  --1 
  when 26=> index0<="11111110";  --1 
 when 27=> index0<="11111110";  --1   
  when others =>index0<="11111111";  --nul