用M8与LM2576制作可调数控开关电源Word文档下载推荐.docx

用M8与LM2576制作可调数控开关电源Word文档下载推荐.docx

《用M8与LM2576制作可调数控开关电源Word文档下载推荐.docx》由会员分享，可在线阅读，更多相关《用M8与LM2576制作可调数控开关电源Word文档下载推荐.docx（12页珍藏版）》请在冰豆网上搜索。

'

///////////////////////////////////////////////////////////////////////////////

/ 

/

用M8与LM2576制作可调数控开关电源 

输出电压 

0-30V 

最大输出电流 

3.0A 

截止型过电流保护 

0-3.0A 

连续调节 

程序设计：

吕军省 

junsheng427@ 

20081003 

天津大港 

$regfile 

= 

"

m8def.dat"

$crystal 

8000000

Config 

Lcdpin 

Pin 

Db4 

Portb.2 

Db5 

Portb.3 

Db6 

Portb.4 

Db7 

Portb.5 

E 

Portb.0 

Rs 

Portd.2

Lcd 

16 

* 

2

定义LED是16字符，2行

Adc 

Single 

Prescaler 

Auto 

Reference 

Internal

定义ADC为单次运行模式,转换时钟-自动,内部参考电压

Timer1 

Pwm 

10 

Compare 

A 

Clear 

Down 

Prescale 

1

PWM1A配置，用于数模转换,

Ddrb.1 

1 

PWM1A输出端子

定义所需要变量 

////////////////////////////////////////////////////////////////

Dim 

V_dc 

As 

Long 

V_dc1 

A_dc 

A_dc1 

Long

V1_dc 

Word 

V2_dc 

Word

A1_dc 

A2_dc 

C 

A1 

V1 

String 

5

V2 

V3 

V4 

C1 

4

Va1 

Byte

N 

Byte 

B2 

B3 

B4 

B5 

初始化设置/////////////////////////////////////////////////////////////////////

Ddrd.3 

0 

定义PD.3~PD.7为输入,上拉电阻有效 

.按键初始化

Ddrd.4 

0

Ddrd.5 

Ddrd.6 

Ddrd.7 

Portd.3 

Portd.4 

Portd.5 

Portd.6 

Portd.7 

Start 

Timer1

Adc

Cls

Cursor 

Off

Locate 

14

ON-"

3000

Ddrc.4 

初始化电源开关

Portc.4 

主程序/////////////////////////////////////////////////////////////////////////

Do

Pwm1a 

A

For 

To 

60 

ADC采样60次

Getadc（0） 

电源输出电压

+ 

ADC的原始值累加

Getadc

（1） 

电流300mA档

A1_dc

Getadc

（2） 

电流3A档

A2_dc

Getadc（3） 

电源输入电压

V2_dc

Next

还原各测量值

60

3040 

标准3040

1023

3120 

A_dc1

4025 

V_dc1

If 

A_dc>

Then 

截止型电流保护300mA档

Waitms 

500

Then

OC 

Gosub 

Mu

End 

If

A_dc1>

截止型电流保护3A档

<

1200 

输入电压范围低端保护

Input 

U<

12V"

V_dc1>

3500 

输入电压范围高端保护

U>

35V"

Lp_lcd

Lp_key

Loop

End

显示处理///////////////////////////////////////////////////////////////////////

Lp_lcd:

Str（v_dc） 

输出电压

Len（v1） 

读字符串

3 

Format（v1 

0.00"

） 

定位小数点

Else

Str（a_dc） 

Len（v2）

2 

Format（v2 

0.0"

Str（a_dc1） 

Format（v3 

0.000"

Str（v_dc1） 

输入电压

Format（v4 

0"

Str（c） 

设定电流

Format（c1 

8

U:

;

V"

I:

mA"

A"

3

0.0 

9

V4

10

Return

按键处理//////////////////////////////////////////////////////////////////////

Lp_key:

Pind.3 

启动

20

And 

Portc.4控制LM2576开/关

ON 

250

停止

控制LM2576开/关

OFF"

Pind.4 

电压+

1023 

B2>

20 

1013 

Pind.5 

电压-

A>

- 

B3>

Pind.6 

电流+

3000 

B4>

2980 

Pind.7 

电流-

C>

B5>

报警声音///////////////////////////////////////////////////////////////////////

Mu:

Sound 

Portc.5 

100 

1000

///////////////////////////////////////////////////////////////////////////////