API tools faq
paste
Advertisement
Electgpl

PIC - Generador de Funciones DAC

Electgpl
Oct 1st, 2016
102
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
C 4.87 KB | None | 0 0
raw download clone embed print report
  1. #include <16F883.h>
  2. #device adc=8
  3. #use delay(int=4000000)
  4. const int sintable[] = {
  5. 0x80,0x83,0x86,0x89,0x8c,0x8f,0x92,0x95,
  6. 0x98,0x9c,0x9f,0xa2,0xa5,0xa8,0xab,0xae,
  7. 0xb0,0xb3,0xb6,0xb9,0xbc,0xbf,0xc1,0xc4,
  8. 0xc7,0xc9,0xcc,0xce,0xd1,0xd3,0xd5,0xd8,
  9. 0xda,0xdc,0xde,0xe0,0xe2,0xe4,0xe6,0xe8,
  10. 0xea,0xeb,0xed,0xef,0xf0,0xf2,0xf3,0xf4,
  11. 0xf6,0xf7,0xf8,0xf9,0xfa,0xfb,0xfb,0xfc,
  12. 0xfd,0xfd,0xfe,0xfe,0xfe,0xff,0xff,0xff,
  13. 0xff,0xff,0xff,0xff,0xfe,0xfe,0xfd,0xfd,
  14. 0xfc,0xfc,0xfb,0xfa,0xf9,0xf8,0xf7,0xf6,
  15. 0xf5,0xf4,0xf2,0xf1,0xef,0xee,0xec,0xeb,
  16. 0xe9,0xe7,0xe5,0xe3,0xe1,0xdf,0xdd,0xdb,
  17. 0xd9,0xd7,0xd4,0xd2,0xcf,0xcd,0xca,0xc8,
  18. 0xc5,0xc3,0xc0,0xbd,0xba,0xb8,0xb5,0xb2,
  19. 0xaf,0xac,0xa9,0xa6,0xa3,0xa0,0x9d,0x9a,
  20. 0x97,0x94,0x91,0x8e,0x8a,0x87,0x84,0x81,
  21. 0x7e,0x7b,0x78,0x75,0x71,0x6e,0x6b,0x68,
  22. 0x65,0x62,0x5f,0x5c,0x59,0x56,0x53,0x50,
  23. 0x4d,0x4a,0x47,0x45,0x42,0x3f,0x3c,0x3a,
  24. 0x37,0x35,0x32,0x30,0x2d,0x2b,0x28,0x26,
  25. 0x24,0x22,0x20,0x1e,0x1c,0x1a,0x18,0x16,
  26. 0x14,0x13,0x11,0x10,0x0e,0x0d,0x0b,0x0a,
  27. 0x09,0x08,0x07,0x06,0x05,0x04,0x03,0x03,
  28. 0x02,0x02,0x01,0x01,0x00,0x00,0x00,0x00,
  29. 0x00,0x00,0x00,0x01,0x01,0x01,0x02,0x02,
  30. 0x03,0x04,0x04,0x05,0x06,0x07,0x08,0x09,
  31. 0x0b,0x0c,0x0d,0x0f,0x10,0x12,0x14,0x15,
  32. 0x17,0x19,0x1b,0x1d,0x1f,0x21,0x23,0x25,
  33. 0x27,0x2a,0x2c,0x2e,0x31,0x33,0x36,0x38,
  34. 0x3b,0x3e,0x40,0x43,0x46,0x49,0x4c,0x4f,
  35. 0x51,0x54,0x57,0x5a,0x5d,0x60,0x63,0x67,
  36. 0x6a,0x6d,0x70,0x73,0x76,0x79,0x7c,0x80,
  37. };
  38. const int tritable[] = {
  39. 0x02,0x04,0x06,0x08,0x0a,0x0c,0x0e,0x10,
  40. 0x12,0x14,0x16,0x18,0x1a,0x1c,0x1e,0x20,
  41. 0x22,0x24,0x26,0x28,0x2a,0x2c,0x2e,0x30,
  42. 0x32,0x34,0x36,0x38,0x3a,0x3c,0x3e,0x40,
  43. 0x42,0x44,0x46,0x48,0x4a,0x4c,0x4e,0x50,
  44. 0x52,0x54,0x56,0x58,0x5a,0x5c,0x5e,0x60,
  45. 0x62,0x64,0x66,0x68,0x6a,0x6c,0x6e,0x70,
  46. 0x72,0x74,0x76,0x78,0x7a,0x7c,0x7e,0x80,
  47. 0x82,0x84,0x86,0x88,0x8a,0x8c,0x8e,0x90,
  48. 0x92,0x94,0x96,0x98,0x9a,0x9c,0x9e,0xa0,
  49. 0xa2,0xa4,0xa6,0xa8,0xaa,0xac,0xae,0xb0,
  50. 0xb2,0xb4,0xb6,0xb8,0xba,0xbc,0xbe,0xc0,
  51. 0xc2,0xc4,0xc6,0xc8,0xca,0xcc,0xce,0xd0,
  52. 0xd2,0xd4,0xd6,0xd8,0xda,0xdc,0xde,0xe0,
  53. 0xe2,0xe4,0xe6,0xe8,0xea,0xec,0xee,0xf0,
  54. 0xf2,0xf4,0xf6,0xf8,0xfa,0xfc,0xfe,0xff,
  55. 0xfe,0xfc,0xfa,0xf8,0xf6,0xf4,0xf2,0xf0,
  56. 0xee,0xec,0xea,0xe8,0xe6,0xe4,0xe2,0xe0,
  57. 0xde,0xdc,0xda,0xd8,0xd6,0xd4,0xd2,0xd0,
  58. 0xce,0xcc,0xca,0xc8,0xc6,0xc4,0xc2,0xc0,
  59. 0xbe,0xbc,0xba,0xb8,0xb6,0xb4,0xb2,0xb0,
  60. 0xae,0xac,0xaa,0xa8,0xa6,0xa4,0xa2,0xa0,
  61. 0x9e,0x9c,0x9a,0x98,0x96,0x94,0x92,0x90,
  62. 0x8e,0x8c,0x8a,0x88,0x86,0x84,0x82,0x80,
  63. 0x7e,0x7c,0x7a,0x78,0x76,0x74,0x72,0x70,
  64. 0x6e,0x6c,0x6a,0x68,0x66,0x64,0x62,0x60,
  65. 0x5e,0x5c,0x5a,0x58,0x56,0x54,0x52,0x50,
  66. 0x4e,0x4c,0x4a,0x48,0x46,0x44,0x42,0x40,
  67. 0x3e,0x3c,0x3a,0x38,0x36,0x34,0x32,0x30,
  68. 0x2e,0x2c,0x2a,0x28,0x26,0x24,0x22,0x20,
  69. 0x1e,0x1c,0x1a,0x18,0x16,0x14,0x12,0x10,
  70. 0x0e,0x0c,0x0a,0x08,0x06,0x04,0x02,0x00,
  71. };
  72. const int dectable[] = {
  73. 0xff,0xf5,0xec,0xe3,0xda,0xd2,0xca,0xc2,
  74. 0xba,0xb3,0xac,0xa6,0x9f,0x99,0x93,0x8e,
  75. 0x88,0x83,0x7e,0x79,0x74,0x70,0x6c,0x67,
  76. 0x63,0x60,0x5c,0x58,0x55,0x52,0x4f,0x4c,
  77. 0x49,0x46,0x43,0x41,0x3e,0x3c,0x39,0x37,
  78. 0x35,0x33,0x31,0x2f,0x2d,0x2c,0x2a,0x28,
  79. 0x27,0x25,0x24,0x23,0x21,0x20,0x1f,0x1e,
  80. 0x1c,0x1b,0x1a,0x19,0x18,0x17,0x16,0x16,
  81. 0x15,0x14,0x13,0x12,0x12,0x11,0x10,0x10,
  82. 0xf,0xf,0xe,0xd,0xd,0xc,0xc,0xc,
  83. 0xb,0xb,0xa,0xa,0x9,0x9,0x9,0x8,
  84. 0x8,0x8,0x7,0x7,0x7,0x7,0x6,0x6,
  85. 0x6,0x6,0x5,0x5,0x5,0x5,0x5,0x4,
  86. 0x4,0x4,0x4,0x4,0x4,0x4,0x3,0x3,
  87. 0x3,0x3,0x3,0x3,0x3,0x3,0x2,0x2,
  88. 0x2,0x2,0x2,0x2,0x2,0x2,0x2,0x2,
  89. 0x2,0x2,0x2,0x1,0x1,0x1,0x1,0x1,
  90. 0x1,0x1,0x1,0x1,0x1,0x1,0x1,0x1,
  91. 0x1,0x1,0x1,0x1,0x1,0x1,0x1,0x1,
  92. 0x1,0x1,0x1,0x1,0x1,0x1,0x1,0x0,
  93. 0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,
  94. 0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,
  95. 0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,
  96. 0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,
  97. 0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,
  98. 0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,
  99. 0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,
  100. 0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,
  101. 0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,
  102. 0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,
  103. 0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,
  104. 0x0,0x0,0x0,0x0,0x0,0x0,0x0,0x0,
  105. };
  106. int8 i, sec=1, time=0;
  107. void main(){
  108.    setup_adc_ports(sAN1|VSS_VDD);
  109.    setup_adc(ADC_CLOCK_DIV_2);
  110.    while(true){
  111.       for(i=0;i<256;i++){
  112.          set_adc_channel(1);
  113.          time=read_adc();
  114.          if(input(PIN_A0)==1)
  115.             delay_ms(30);
  116.             if(input(PIN_A0)==1)
  117.                sec=1;
  118.          if(sec==1){
  119.             output_b(tritable[i]);
  120.             delay_us(time+1);
  121.          }
  122.          if(input(PIN_A0)==1)
  123.             delay_ms(30);
  124.             if(input(PIN_A0)==1)
  125.                sec=2;
  126.          if(sec==2){
  127.             output_b(sintable[i]);
  128.             delay_us(time+1);
  129.          }
  130.          if(input(PIN_A0)==1)
  131.             delay_ms(30);
  132.             if(input(PIN_A0)==1)
  133.                sec=3;
  134.          if(sec==3){
  135.             output_b(dectable[i]);
  136.             delay_us(time+1);
  137.          }
  138.          if(input(PIN_A0)==1)
  139.             delay_ms(30);
  140.             if(input(PIN_A0)==1)
  141.                sec=1;
  142.       }
  143.    }
  144. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!