国产免费AV|泡泡玛特欧洲总部将设在伦敦|中文天堂网www新版资源在线|一本久道综合在线中文|国精产品一二三产区的使用方法|香蕉鱼在线观看|www.27eee

ELEOK

標題: 51單片機RLC測量儀程序設計 源碼和proteus仿真 [打印本頁]
作者: coolfire    時間: 2021-4-21 03:22
標題: 51單片機RLC測量儀程序設計 源碼和proteus仿真
RLC.pdsprj 仿真文件需要Proteus8.7以上版本才能打開，沒有則可以打開Proteus軟件后打開RLC.DSN文件進行仿真=
仿真原理圖如下（proteus仿真工程文件可到本帖附件中下載）

單片機部分源程序如下:
  1. #include<reg52.h>
  2. #include<intrins.h>
  3. #define uchar unsigned char
  4. #define uint  unsigned int
  5. sbit RS=P2^6;
  6. sbit RW=P2^5;
  7. sbit E=P2^7;
  8. sbit R=P1^0;
  9. sbit C=P1^1;
  10. sbit L=P1^2;
  11. sbit A1=P1^3;
  12. sbit A0=P1^4;

  14. #define LCD_data  P0                                       
  15. uchar   code  table1[10]={"R=      R"};
  16. uchar   code  table2[10]={"C=      pF"};
  17. uchar   code  table3[10]={"L=      mH"};

  19. uchar code f_table[88]={13,14,15,16,17,        18,        19,        20,        21,        22,        23,        24,        25,        26,        27,        28,        29,        30,        31,        32,        33,        34,        35,        36,        37,        38,        39,        40,        41,        42,        43,        44,        45,        46,        47,        48,        49,        50,        51,        52,        53,        54,        55,        56,        57,        58,        59,        60,        61,        62,        63,        64,        65,        66,        67,        68,        69,        70,        71,        72,        73,        74,        75,        76,        77,        78,        79,        80,        81,        82,        83,        84,        85,        86,        87,        88,        89,        90,        91,        92,        93,        94,        95,        96,        97,        98,        99,        100};
  20. uchar code f_correct[88]={9,10,        11,        12,        12,        12,        13,        14,        15,        16,        17,        18,        18,        18,        19,        20,        21,        21,        22,        23,        24,        25,        25,        26,        26,        27,        28,        29,        29,        30,        30,        31,        32,        33,        33,        34,        35,        35,        36,        37,        38,        38,        39,        40,        41,        41,        42,        42,        43,        44,        45,        45,        46,        47,        48,        49,        49,        50,        51,        51,        52,        53,        54,        54,        55,        55,        56,        57,        57,        58,        59,        60,        60,        62,        62,        63,        64,        64,        65,        66,        66,        67,        67,        68,        69,        70,        71,        71,};

  22. uchar a6,a5,a4,a3,a2,a1;
  23. uchar flag;
  24. unsigned long cnt,cnt1;
  25. uchar f_cnt;


  28. /********************************/

  30. void delay_us(); //18us
  31. void delay_ms(uint);
  32. void lcd_init();
  33. void lcd_write_com(uchar com);
  34. void lcd_write_dat(uchar dat);
  35. void lcd_init();
  36. void lcd_display(uchar add,uchar dat);
  37. /***********************************/

  39. void delay_us()
  40. {
  41.         uchar x;
  42.         for(x=0;x<5;x++);
  43. }

  45. void delay_ms(uint z)
  46. {
  47.         uint x,y;
  48.         for(x=0;x<z;x++)
  49.                 for(y=0;y<123;y++);
  50. }
  51. void lcd_write_com(uchar com)
  52. {
  53.   E=0;
  54.   RS=0;
  55.   RW=0;
  56.   delay_us();
  57.   LCD_data=com;
  58.   E=1;           //???????
  59.   delay_us();
  60.   E=0;
  61. }
  62. void lcd_write_dat(uchar dat)
  63. {
  64.   E=0;
  65.   RS=1;
  66.   RW=0;
  67.   delay_us();
  68.   LCD_data=dat;
  69.   E=1;           //???????
  70.   delay_us();
  71.   E=0;
  72. }
  73. 完整程序請下載附件查看
復制代碼
仿真文件和C語言代碼： RLC仿真和程序.zip (167.64 KB, 售價: 5 E幣)




歡迎光臨 ELEOK (http://m.afoofa.cn/) Powered by Discuz! X5.0