91av视频/亚洲h视频/操亚洲美女/外国一级黄色毛片 - 国产三级三级三级三级

  • 大小: 61KB
    文件類型: .zip
    金幣: 2
    下載: 0 次
    發布日期: 2021-05-22
  • 語言: 其他
  • 標簽: 電子負載??

資源簡介

C51簡易直流電子負載程序,初學者,寫的不好。但可以借鑒一下

資源截圖

代碼片段和文件信息

#include“stc12c5a.h“
#include“intrins.h“
#include“adc.h“
#include“lcd1602.h“
#include“pwm.h“


int?w=100;
unsigned?char i;
unsigned?char?numtempnum1;
unsigned?int???i2 i1 q;
unsigned?int?Valei7V2V4;
int??adval0;
?float V0V1; //1通道出來的變量為adval1、V1、Vin1
unsigned?char?code?table[]={02550
75100125150175200225250};//0--250平均分配

int?code?jizhun[]={151490004400038800 //1A--100mA對應10等份輸出電壓
348002900023500190001470095004900};

void?delay(unsigned?int?z)
{?
??unsigned?int?xy;
????for?(x=z;x>0;x--)
?????for(y=110;y>0;y--);
}
unsigned?char?keyscan();
void?bijiao();
void?display(unsigned?char?xunsigned?char?yunsigned?int?Vin)
{
dis1[?y ] = Vin/10000+‘0‘;
dis1[y+1] = ‘.‘;
dis1[y+2] = Vin%10000/1000+‘0‘;
dis1[y+3] = Vin%1000/100+‘0‘;
dis1[y+4] = Vin%100/10+‘0‘;
dis1[y+5] = Vin%10+‘0‘;
lcd_pos(xy);
for(i=y;i ????{
?????lcd_wdat(dis1[i]);
?????delay1(1);
????}?
}
void?PWM0_set?(unsigned?char?a)
{
CCAP0L=?a;?//設置值直接寫入CCAP0L
? CCAP0H=?a;?//設置值直接寫入CCAP0H


}
void?PWM1_set?(unsigned?char?b)
{
CCAP1L=?b;?//設置值直接寫入CCAP1L
? CCAP1H=?b;?//設置值直接寫入CCAP1H
}
unsigned?int?GetADCResult(unsigned?char?ch)
{
// unsigned?int?Valei7V2;
unsigned?int?VinV3i6;
// V2=0;
??? //?for(i7=0;i7<15;)
????{?ADC_CONTR?=?ADC_POWER?|?ADC_SPEEDLL?|?ch?|?ADC_START;//設置ADC控制寄存器,開AD電源,設置ADC速度,設置通道,啟動ADC
????
//??while?(!(ADC_CONTR?&?ADC_FLAG));//等待轉換標志位FLAG為1
?? delay2(1);
????ADC_CONTR?&=?~ADC_FLAG;?????????//軟件flag清0
Vale?=?ADC_RES*4?+?ADC_RESL;?
?? if?(ch==0)
? {
? V2=V2+Vale?;
? i7++;
}
?? if(ch==1)
???{
??? V3=V3+Vale;
? i6++; ?
}
} ???
// adval0 =V3/15; //0路AD(P1.0)?;?
if(ch==0)
????{?? V0? =?(V4*49.5)/102.4; ? //轉換為模擬電壓量
?????// Vin? =?(unsigned?int)(V0); //強制類型轉換,而后取出各位的值。
Vin0=(unsigned?int)(V0)*5; //返回ADC的結果
return?Vin0;
}????????????????
if(ch==1&&i6>15)
{?? ?V3=V3/i6;?i6=0;
// ??V0?=?(V3*4950.0)/1024.0; ? //轉換為模擬電壓量
Vin? =?(unsigned?int)((V3*5000.0)/1024.0); //強制類型轉換,而后取出各位的值。
? V3=0;
?? Vin1=Vin*10; ??? //返回ADC的結果
return?Vin1;
}????? ???????????
}

void?main()
{
rw=0;
PWM_init();?//PWM初始化
lcd_init();
i2=0;
lcd_pos(16);
???? lcd_wdat(‘m‘);
lcd_pos(16);
???? lcd_wdat(‘m‘);
lcd_pos(26);
???? lcd_wdat(‘V‘);
lcd_pos(215);
???? lcd_wdat(‘Q‘);
while(1)
{??
InitADC();

while(i2<150)
{
GetADCResult(0);
GetADCResult(1);
?? bijiao();?
//?????delay(8);
?keyscan();?
?i2++;?
}
{?
????display(11Vin0);
display(21Vin1);
display(19(jizhun[num]/5));

i2=0;
}
if(num==11)
{
q=(50000-Vin1)*10000/50000;
display(29q);
}
}
}
unsigned?char?keyscan()
{
P3=0xfe;
temp=P3;
temp=temp&0xf0;
while(temp!=0xf0)
{
// delay(1);
temp=P3;
temp=temp&0xf0;
while(temp!=0xf0)
{
temp=P3;
switch(temp)
{
case?0xee:num=1;

?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----
?????目錄???????????0??2014-07-02?20:26??簡易直流電子負載程序2\
?????文件????????1947??2012-08-09?14:55??簡易直流電子負載程序2\ADC.h
?????文件??????????46??2012-08-06?09:58??簡易直流電子負載程序2\dingyi.h
?????文件????????2820??2012-08-07?06:57??簡易直流電子負載程序2\lcd1602.h
?????文件????????2057??2012-08-07?19:13??簡易直流電子負載程序2\pwm.h
?????文件???????46221??2012-04-24?19:07??簡易直流電子負載程序2\STC12C5A.h
?????文件???????25680??2014-07-02?20:25??簡易直流電子負載程序2\簡易直流電子負載
?????文件????????4699??2014-07-02?20:25??簡易直流電子負載程序2\簡易直流電子負載.c
?????文件????????7793??2014-07-02?20:25??簡易直流電子負載程序2\簡易直流電子負載.hex
?????文件??????????64??2014-07-02?20:25??簡易直流電子負載程序2\簡易直流電子負載.lnp
?????文件???????14885??2014-07-02?20:25??簡易直流電子負載程序2\簡易直流電子負載.LST
?????文件???????24119??2014-07-02?20:25??簡易直流電子負載程序2\簡易直流電子負載.M51
?????文件???????27556??2014-07-02?20:25??簡易直流電子負載程序2\簡易直流電子負載.OBJ
?????文件????????1417??2012-09-20?20:37??簡易直流電子負載程序2\簡易直流電子負載.opt.bak
?????文件?????????862??2014-07-02?20:26??簡易直流電子負載程序2\簡易直流電子負載.plg
?????文件????????2158??2012-09-20?20:37??簡易直流電子負載程序2\簡易直流電子負載.Uv2.bak
?????文件???????61511??2014-07-02?20:26??簡易直流電子負載程序2\簡易直流電子負載.uvopt
?????文件???????13286??2014-07-01?22:37??簡易直流電子負載程序2\簡易直流電子負載.uvproj
?????文件????????3138??2012-08-12?18:10??簡易直流電子負載程序2\簡易直流電子負載_Opt.Bak
?????文件????????2163??2012-08-06?11:56??簡易直流電子負載程序2\簡易直流電子負載_Uv2.Bak
?????文件???????57943??2014-07-01?22:37??簡易直流電子負載程序2\簡易直流電子負載_uvopt.bak
?????文件???????13286??2014-07-01?22:37??簡易直流電子負載程序2\簡易直流電子負載_uvproj.bak

評論

共有 條評論