zhiyin.vhd

八音自动播放电子琴设计

                    
                    when 250 => yuepu <=13;    --24
                    when 251 => yuepu <=13;
                    when 252 => yuepu <=10;
                    when 253 => yuepu <=10;
                    when 254 => yuepu <=10;
                    when 255 => yuepu <=9;     
                    when 256 => yuepu <=10;
                    when 257 => yuepu <=10;
                    when 258 => yuepu <=10;
                    when 259 => yuepu <=9;
                    when 260 => yuepu <=8;
                    
                    when 261 => yuepu <=10;       --25
                    when 262 => yuepu <=10;
                    when 263 => yuepu <=9;
                    when 264 => yuepu <=9;     
                    when 265 => yuepu <=9;
                    when 266 => yuepu <=9;
                    when 267 => yuepu <=9;
                    when 268 => yuepu <=8;
                    when 269 => yuepu <=8;
                    when 270 => yuepu <=6;
                    
                    when 271 => yuepu <=9;    --26
                    when 272 => yuepu <=9;       
                    when 273 => yuepu <=8;
                    when 274 => yuepu <=8;
                    when 275 => yuepu <=8;                                
                    when 276 => yuepu <=8;
                    when 277 => yuepu <=8;
                    when 278 => yuepu <=7;
                    when 279 => yuepu <=7;
                    
                    when 280 => yuepu <=6;      --27
                    when 281 => yuepu <=6;
                    when 282 => yuepu <=6;
                    when 283 => yuepu <=6;
                    when 284 => yuepu <=0;
                    when 285 => yuepu <=0;
                    when 286 => yuepu <=0;
                    when 287 => yuepu <=0;
                    
                    when 288 => yuepu <=0;     --28
                    when 289 => yuepu <=0;
                    when 290 => yuepu <=13;
                    when 291 => yuepu <=13;
                    when 292 => yuepu <=12;
                    when 293 => yuepu <=13;
                    when 294 => yuepu <=13;
                    when 295 => yuepu <=15;
                    when 296 => yuepu <=15;     
                    when 297 => yuepu <=15;
                    
                    when 298 => yuepu <=0;    --29
                    when 299 => yuepu <=0;
                    when 300 => yuepu <=16;
                    when 301 => yuepu <=16;
                    when 302 => yuepu <=15;    
                    when 303 => yuepu <=16;        
                    when 304 => yuepu <=16;                                 
                    when 305 => yuepu <=13;
                    when 306 => yuepu <=13;
                    when 307 => yuepu <=15;
                    when 308 => yuepu <=16;
                    
                    when 309 => yuepu <=17;      --30
                    when 310 => yuepu <=17;
                    when 311 => yuepu <=19;    
                    when 312 => yuepu <=19;
                    when 313 => yuepu <=19;     
                    when 314 => yuepu <=17;
                    when 315 => yuepu <=16;    
                    when 316 => yuepu <=16;
                    when 317 => yuepu <=19;
                    when 318 => yuepu <=19;
                    when 319 => yuepu <=19;
                    when 320 => yuepu <=16;
                    
                    when 321 => yuepu <=15;   --31
                    when 322 => yuepu <=15;
                    when 323 => yuepu <=19;    
                    when 324 => yuepu <=19;
                    when 325 => yuepu <=19;
                    when 326 => yuepu <=19;
                    when 327 => yuepu <=17;
                    when 328 => yuepu <=17;
                    when 329 => yuepu <=17;   
                    when 330 => yuepu <=15;
                    when 331 => yuepu <=16;   
                    
                    when 332 => yuepu <=17;  --32
                    when 333 => yuepu <=17;
                    when 334 => yuepu <=19;
                    when 335 => yuepu <=19;
                    when 336 => yuepu <=19;
                    when 337 => yuepu <=17;  
                    when 338 => yuepu <=16;
                    when 339 => yuepu <=16;   
                    when 340 => yuepu <=19;                                
                    when 341 => yuepu <=19;
                    when 342 => yuepu <=19;
                    when 343 => yuepu <=19;
                    
                    when 344 => yuepu <=20;   --33
                    when 345 => yuepu <=20;   
                    when 346 => yuepu <=17;
                    when 347 => yuepu <=17;        
                    when 348 => yuepu <=17;
                    when 349 => yuepu <=16;
                    when 350 => yuepu <=17;
                    when 351 => yuepu <=17;
                    when 352 => yuepu <=17;
                    when 353 => yuepu <=16;    
                    when 354 => yuepu <=15;
                        
                    when 355 => yuepu <=16;   --34
                    when 356 => yuepu <=17;   
                    when 357 => yuepu <=16;
                    when 358 => yuepu <=16;
                    when 359 => yuepu <=16;
                    when 360 => yuepu <=16;
                    when 361 => yuepu <=16;    
                    when 362 => yuepu <=15;
                    when 363 => yuepu <=15;
                    when 364 => yuepu <=20;     
                    
                    when 365 => yuepu <=16;  --35
                    when 366 => yuepu <=15;
                    when 367 => yuepu <=15;
                    when 368 => yuepu <=15;
                    when 369 => yuepu <=15;     
                    when 370 => yuepu <=15;
                    when 371 => yuepu <=15;
                    when 372 => yuepu <=15;       
                    when 373 => yuepu <=15;
                    
                    when 374 => yuepu <=9;   --36
                    when 375 => yuepu <=9;                                
                    when 376 => yuepu <=8;
                    when 377 => yuepu <=8;
                    when 378 => yuepu <=8;
                    when 379 => yuepu <=8;    
                    when 380 => yuepu <=8;    
                    when 381 => yuepu <=10;
                    when 382 => yuepu <=9;
                    when 383 => yuepu <=8;
                   
                    when 384 => yuepu <=9;   --37
                    when 385 => yuepu <=9;
                    when 386 => yuepu <=8;
                    when 387 => yuepu <=8;  
                    when 388 => yuepu <=8;    
                    when 389 => yuepu <=8;
                    when 390 => yuepu <=8;
                    when 391 => yuepu <=8;
                    when 392 => yuepu <=8;
                    when 393 => yuepu <=6;
                    
                    when 394 => yuepu <=9;  --38
                    when 395 => yuepu <=9;    
                    when 396 => yuepu <=8;     
                    when 397 => yuepu <=8;
                    when 398 => yuepu <=8;
                    when 399 => yuepu <=8;      
                    when 400 => yuepu <=8;   
                    when 401 => yuepu <=10;
                    when 402 => yuepu <=9;      
                    when 403 => yuepu <=8;
                    
                    when 404 => yuepu <=10;     --39                           
                    when 405 => yuepu <=10;
                    when 406 => yuepu <=9;    
                    when 407 => yuepu <=9;
                    when 408 => yuepu <=9;
                    when 409 => yuepu <=9;
                    when 410 => yuepu <=9;      
                    when 411 => yuepu <=8;
                    when 412 => yuepu <=6;      
                    when 413 => yuepu <=9;
                    
                    when 414 => yuepu <=9;   --40                             
                    when 415 => yuepu <=9;
                    when 416 => yuepu <=8;
                    when 417 => yuepu <=8;
                    when 418 => yuepu <=8;
                    when 419 => yuepu <=8;
                    when 420 => yuepu <=8;     
                    when 421 => yuepu <=7;     
                    when 422 => yuepu <=7;
                        
                    when 423 => yuepu <=6;   --41
                    when 424 => yuepu <=6;                                 
                    when 425 => yuepu <=6;
                    when 426 => yuepu <=6;
                    when 427 => yuepu <=6;
                    when 428 => yuepu <=6;
                    when 429 => yuepu <=6;
                    when 430 => yuepu <=6;
                       
                    when 431 => yuepu <=0;  --42
                    when 432 => yuepu <=0;      
                    when 433 => yuepu <=0;
                    when 434 => yuepu <=0;                                 
                    when 435 => yuepu <=0;
                    when 436 => yuepu <=0;
                    when 437 => yuepu <=0;
                    when 438 => yuepu <=0;
                    when others => yuepu <=0;
             end case;
   else
           case count3 is 
                    when 0 => yuepu <=8;      --1
                    when 1 => yuepu <=9;
                    when 2 => yuepu <=9;      --2
                    when 3 => yuepu <=10;
                    when 4 => yuepu <=10 ;                                
                    when 5 => yuepu <=10;
                    when 6 => yuepu <=10;
                    when 7 => yuepu <=10;
                    when 8 => yuepu <=9;
                    when 9 => yuepu <=8;
                    when 10 => yuepu <=9;     --3
                    when 11 => yuepu <=12;
                    when 12 => yuepu <=12;
                    when 13 => yuepu <=12;
                    when 14 => yuepu <=12;
                    when 15 => yuepu <=13;
                    when 16 => yuepu <=12;
                    when 17 => yuepu <=11;
                    when 18 => yuepu <=10;
                    when 19 => yuepu <=8;       --4
                    when 20 => yuepu <=8;
                    when 21 => yuepu <=6;
                    when 22 => yuepu <=6;
                    when 23 => yuepu <=6;
                    when 24 => yuepu <=6;
                    when 25 => yuepu <=4;
                    when 26 => yuepu <=4;
                    when 27 => yuepu <=4;      --5
                    when 28 => yuepu <=5;
                    when 29 => yuepu <=5;
                    when 30 => yuepu <=5;
                    when 31 => yuepu <=5;
                    when 32 => yuepu <=5;
                    when 33 => yuepu <=8;
                    when 34 => yuepu <=9;
                    when 35 => yuepu <=9;     --6
                    when 36 => yuepu <=10;
                    when 37 => yuepu <=10;
                    when 38 => yuepu <=10;
                    when 39 => yuepu <=10;
                    when 40 => yuepu <=10;                           
                    when 41 => yuepu <=11;
                    when 42 => yuepu <=10;
                    when 43 => yuepu <=9;
                    when 44 => yuepu <=8;
                    when 45 => yuepu <=9;     --7
                    when 46 => yuepu <=12;
                    when 47 => yuepu <=12;
                    when 48 => yuepu <=12;
                    when 49 => yuepu <=12;
                    when 50 => yuepu <=12;
                    when 51 => yuepu <=10;
                    when 52 => yuepu <=12;
                    when 53 => yuepu <=13;    --8
                    when 54 => yuepu <=13;
                    when 55 => yuepu <=13;
                    when 56 => yuepu <=13;
                    when 57 => yuepu <=12;
                    when 58 => yuepu <=12;
                    when 59 => yuepu <=12;
                    when 60 => yuepu <=12;
                    when 61 => yuepu <=9;       
                    when 62 => yuepu <=9;
                    when 63 => yuepu <=9;
                    when 64 => yuepu <=9;
                    when 65 => yuepu <=9;
                    when 66 => yuepu <=9;
                    when 67 => yuepu <=9;
                    when 68 => yuepu <=9;
                    when 69 => yuepu <=8;
                    when 70 => yuepu <=8;
                    when 71 => yuepu <=8;
                    when 72 => yuepu <=8;
                    when 73 => yuepu <=8;
                    when 74 => yuepu <=8;
                    when 75 => yuepu <=8;                               
                    when 76 => yuepu <=8;
                    when 77 => yuepu <=8;      --9
                    when 78 => yuepu <=8;
                    when 79 => yuepu <=8;
                    when 80 => yuepu <=8;
                    when 81 => yuepu <=8;
                    when 82 => yuepu <=8;
                    when 83 => yuepu <=8;
                    when 84 => yuepu <=8;
                    when 85 => yuepu <=7;    --10
                    when 86 => yuepu <=7;
                    when 87 => yuepu <=8;
                    when 88 => yuepu <=8;
                    when 89 => yuepu <=8;
                    when 90 => yuepu <=8;
                    when 91 => yuepu <=8;
                    when 92 => yuepu <=8;
                    when 93 => yuepu <=7;       --11
                    when 94 => yuepu <=7;
                    when 95 => yuepu <=8;
                    when 96 => yuepu <=8;
                    when 97 => yuepu <=8;
                    when 98 => yuepu <=8;
                    when 99 => yuepu <=9;
                    when 100 => yuepu <=9;
                    when 101 => yuepu <=10;     --12
                    when 102 => yuepu <=10;
                    when 103 => yuepu <=10;
                    when 104 => yuepu <=11;
                    when 105 => yuepu <=10;                             
                    when 106 => yuepu <=9;
                    when 107 => yuepu <=9;
                    when 108 => yuepu <=9;
                    when 109 => yuepu <=9;
                    --when 100 => yuepu <=9;
                    when 111 => yuepu <=8;      --13
                    when 112 => yuepu <=8;
                    when 113 => yuepu <=8;
                    when 114 => yuepu <=8;
                    when 115 => yuepu <=8;
                    when 116 => yuepu <=8;
                    when 117 => yuepu <=8;
                    when 118 => yuepu <=7;