home *** CD-ROM | disk | FTP | other *** search
/ Computer Shopper 180 / dpcs0203b.iso / editorial / easypc / Easy-Spice / data1.cab / Examples / ALB_Examples / SineLookUp.LDF < prev    next >
Encoding:
Text File  |  2002-07-08  |  1.4 KB  |  29 lines

  1. // A simple sine wave look up table
  2.  
  3. PORT (DELAY=10n) ROMout out[0:7] ;
  4. PORT             input  in[0:7] ;
  5.  
  6. READONLY (WIDTH=8) ROM[256] =
  7.  
  8. 128, 131, 134, 137, 140, 143, 146, 149, 152, 156, 159, 162,
  9. 165, 168, 171, 174, 176, 179, 182, 185, 188,  191, 193, 196,
  10. 199, 201, 204, 206, 209, 211, 213, 216, 218, 220, 222, 224,
  11. 226, 228, 230, 232, 234, 236,  237, 239, 240, 242, 243, 245,
  12. 246, 247, 248, 249, 250, 251, 252, 252, 253, 254, 254, 255,
  13. 255, 255, 255,  255, 255, 255, 255, 255, 255, 255, 254, 254,
  14. 253, 252, 252, 251, 250, 249, 248, 247, 246, 245, 243, 242, 
  15. 240, 239, 237, 236, 234, 232, 230, 228, 226, 224, 222, 220,
  16. 218, 216, 213, 211, 209, 206, 204, 201, 199,  196, 193, 191,
  17. 188, 185, 182, 179, 176, 174, 171, 168, 165, 162, 159, 156,
  18. 152, 149, 146, 143, 140, 137,  134, 131, 128, 124, 121, 118,
  19. 115, 112, 109, 106, 103, 99, 96, 93, 90, 87, 84, 81, 79, 76,
  20. 73, 70,  67, 64, 62, 59, 56, 54, 51, 49, 46, 44, 42, 39, 37,
  21. 35, 33, 31, 29, 27, 25, 23, 21, 19,  18, 16, 15, 13, 12, 10,
  22. 9, 8, 7, 6, 5, 4, 3, 3, 2, 1, 1, 0, 0, 0, 0, 0,  0, 0, 0, 0,
  23. 0, 0, 1, 1, 2, 3, 3, 4, 5, 6, 7, 8, 9, 10, 12, 13, 15, 16, 
  24. 18, 19, 21, 23, 25, 27, 29, 31, 33, 35, 37, 39, 42, 44, 46,
  25. 49, 51, 54, 56, 59, 62, 64,  67, 70, 73, 76, 79, 81, 84, 87,
  26. 90, 93, 96, 99, 103, 106, 109, 112, 115, 118, 121, 124 ;
  27.                                 
  28. ROMout = ROM[input] ;
  29.