基于51单片机的数控稳压电源proteus仿真电路

电源

` 本帖最后由 544642572 于 2013-9-26 09:11 编辑

本文提供一种数控稳压电源的proteus 仿真电路设计，内有源代码，仅供参考。

说明：本电路是一个数控稳压电源，输出电压+1.5～+12V
按动输出电压增加按钮可以使输出电压升高；按动输出电压减小按钮可以使输出电压降低。按住按键不松手可以快速调整输出电压。

`

数控稳压电源.rar (107.12 KB, 下载次数: 623 )

2015-5-29 16:31:44

dawei1935 发表于 2015-5-28 09:21
程序在哪，只有.hex文件

是汇编程序，不是C语言。所以这个也只是仿真看看的。

2015-5-29 16:43:51

DAC EQU 8000H ;DAC0832的地址
VOL EQU 30H ;存储输出电压值
MAX EQU 229 ;输出电压最大值
MIN EQU 5 ;输出电压最小值
CHANGE EQU 1 ;输出电压增量
ORG 0H
LJMP START
ORG 3H
LJMP DOWN
ORG 13H
LJMP UP
;===============================================================
;主程序
;===============================================================
ORG 30H
START: MOV SP,#60H
SETB EX0
SETB EX1
SETB IT0
SETB IT1
SETB EA
MOV VOL,#MIN ;输出电压最小值
MOV DPTR,#DAC
MOV A,VOL
MOVX @DPTR,A ;输出最低电压
SJMP $
;================================================================
;外部中断1中断服务程序
;实现每次按键输出电压增加19.6*2.4=47.04mV
;按住键不松手则输出电压快速增加，每次循环(约514ms)增加19.6*5*2.4=235.2mV
;================================================================
UP: PUSH PSW
PUSH ACC
MOV A,VOL
ADD A,#CHANGE ;输出增加1个字
UP4: MOV VOL,A
CJNE A,#MAX,UP1
SJMP UP2
UP1: JC UP2
MOV VOL,#MAX ;输出最大电压值
UP2: MOV A,VOL
MOVX @DPTR,A ;改变D/A输出电压
LCALL DELAY
SETB P3.3
JB P3.3,UP3 ;按键松开则退出；否则快加。
MOV A,VOL
ADD A,#5 ;输出每次增加5个字
SJMP UP4
UP3: POP ACC
POP PSW
RETI
;================================================================
;外部中断0中断服务程序
;实现每次按键输出电压减少19.6*2.4=47.04mV
;按住键不松手则输出电压快速减少，每次循环(约514ms)减少19.6*5*2.4=235.2mV
;================================================================
DOWN: PUSH PSW
PUSH ACC
SETB RS0
MOV A,VOL
CLR C
SUBB A,#CHANGE ;输出减小1个字
DOWN4: MOV VOL,A
CJNE A,#MIN,DOWN1
SJMP DOWN2
DOWN1: JNC DOWN2
MOV VOL,#MIN ;输出最小电压值
DOWN2: MOV A,VOL
MOVX @DPTR,A ;改变D/A输出电压
LCALL DELAY
SETB P3.2
JB P3.2,DOWN3 ;按键松开则退出；否则快减。
CLR C
MOV A,VOL
SUBB A,#5 ;输出每次减少5个字
SJMP DOWN4
DOWN3: POP ACC
POP PSW
RETI
;============================================================
;延时子程序
;对于12MHz晶振，延时时间大约514ms
;============================================================
DELAY: MOV R5,#2
D2: MOV R6,#0
D1: MOV R7,#0
DJNZ R7,$
DJNZ R6,D1
DJNZ R5,D2
RET
END

2015-5-29 16:44:10

dawei1935 发表于 2015-5-28 09:19
楼主，给一下源程序行吗？这是我的课堂作业，我不想搞了，我也是做电源的

DAC EQU 8000H ;DAC0832的地址
VOL EQU 30H ;存储输出电压值
MAX EQU 229 ;输出电压最大值
MIN EQU 5 ;输出电压最小值
CHANGE EQU 1 ;输出电压增量
ORG 0H
LJMP START
ORG 3H
LJMP DOWN
ORG 13H
LJMP UP
;===============================================================
;主程序
;===============================================================
ORG 30H
START: MOV SP,#60H
SETB EX0
SETB EX1
SETB IT0
SETB IT1
SETB EA
MOV VOL,#MIN ;输出电压最小值
MOV DPTR,#DAC
MOV A,VOL
MOVX @DPTR,A ;输出最低电压
SJMP $
;================================================================
;外部中断1中断服务程序
;实现每次按键输出电压增加19.6*2.4=47.04mV
;按住键不松手则输出电压快速增加，每次循环(约514ms)增加19.6*5*2.4=235.2mV
;================================================================
UP: PUSH PSW
PUSH ACC
MOV A,VOL
ADD A,#CHANGE ;输出增加1个字
UP4: MOV VOL,A
CJNE A,#MAX,UP1
SJMP UP2
UP1: JC UP2
MOV VOL,#MAX ;输出最大电压值
UP2: MOV A,VOL
MOVX @DPTR,A ;改变D/A输出电压
LCALL DELAY
SETB P3.3
JB P3.3,UP3 ;按键松开则退出；否则快加。
MOV A,VOL
ADD A,#5 ;输出每次增加5个字
SJMP UP4
UP3: POP ACC
POP PSW
RETI
;================================================================
;外部中断0中断服务程序
;实现每次按键输出电压减少19.6*2.4=47.04mV
;按住键不松手则输出电压快速减少，每次循环(约514ms)减少19.6*5*2.4=235.2mV
;================================================================
DOWN: PUSH PSW
PUSH ACC
SETB RS0
MOV A,VOL
CLR C
SUBB A,#CHANGE ;输出减小1个字
DOWN4: MOV VOL,A
CJNE A,#MIN,DOWN1
SJMP DOWN2
DOWN1: JNC DOWN2
MOV VOL,#MIN ;输出最小电压值
DOWN2: MOV A,VOL
MOVX @DPTR,A ;改变D/A输出电压
LCALL DELAY
SETB P3.2
JB P3.2,DOWN3 ;按键松开则退出；否则快减。
CLR C
MOV A,VOL
SUBB A,#5 ;输出每次减少5个字
SJMP DOWN4
DOWN3: POP ACC
POP PSW
RETI
;============================================================
;延时子程序
;对于12MHz晶振，延时时间大约514ms
;============================================================
DELAY: MOV R5,#2
D2: MOV R6,#0
D1: MOV R7,#0
DJNZ R7,$
DJNZ R6,D1
DJNZ R5,D2
RET
END

2015-5-29 16:44:44

dawei1935 发表于 2015-5-28 09:19
楼主，给一下源程序行吗？这是我的课堂作业，我不想搞了，我也是做电源的

DAC EQU 8000H ;DAC0832的地址
VOL EQU 30H ;存储输出电压值
MAX EQU 229 ;输出电压最大值
MIN EQU 5 ;输出电压最小值
CHANGE EQU 1 ;输出电压增量
ORG 0H
LJMP START
ORG 3H
LJMP DOWN
ORG 13H
LJMP UP
;===============================================================
;主程序
;===============================================================
ORG 30H
START: MOV SP,#60H
SETB EX0
SETB EX1
SETB IT0
SETB IT1
SETB EA
MOV VOL,#MIN ;输出电压最小值
MOV DPTR,#DAC
MOV A,VOL
MOVX @DPTR,A ;输出最低电压
SJMP $
;================================================================
;外部中断1中断服务程序
;实现每次按键输出电压增加19.6*2.4=47.04mV
;按住键不松手则输出电压快速增加，每次循环(约514ms)增加19.6*5*2.4=235.2mV
;================================================================
UP: PUSH PSW
PUSH ACC
MOV A,VOL
ADD A,#CHANGE ;输出增加1个字
UP4: MOV VOL,A
CJNE A,#MAX,UP1
SJMP UP2
UP1: JC UP2
MOV VOL,#MAX ;输出最大电压值
UP2: MOV A,VOL
MOVX @DPTR,A ;改变D/A输出电压
LCALL DELAY
SETB P3.3
JB P3.3,UP3 ;按键松开则退出；否则快加。
MOV A,VOL
ADD A,#5 ;输出每次增加5个字
SJMP UP4
UP3: POP ACC
POP PSW
RETI
;================================================================
;外部中断0中断服务程序
;实现每次按键输出电压减少19.6*2.4=47.04mV
;按住键不松手则输出电压快速减少，每次循环(约514ms)减少19.6*5*2.4=235.2mV
;================================================================
DOWN: PUSH PSW
PUSH ACC
SETB RS0
MOV A,VOL
CLR C
SUBB A,#CHANGE ;输出减小1个字
DOWN4: MOV VOL,A
CJNE A,#MIN,DOWN1
SJMP DOWN2
DOWN1: JNC DOWN2
MOV VOL,#MIN ;输出最小电压值
DOWN2: MOV A,VOL
MOVX @DPTR,A ;改变D/A输出电压
LCALL DELAY
SETB P3.2
JB P3.2,DOWN3 ;按键松开则退出；否则快减。
CLR C
MOV A,VOL
SUBB A,#5 ;输出每次减少5个字
SJMP DOWN4
DOWN3: POP ACC
POP PSW
RETI
;============================================================
;延时子程序
;对于12MHz晶振，延时时间大约514ms
;============================================================
DELAY: MOV R5,#2
D2: MOV R6,#0
D1: MOV R7,#0
DJNZ R7,$
DJNZ R6,D1
DJNZ R5,D2
RET
END

爱的意义 · 2015-5-30 17:42:36

谢谢分享了。。。。

爱的意义 · 2015-5-30 17:42:50

下载下来看看先啦。。

孙晋波 · 2015-6-6 19:42:00

赞。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。

luoshigu · 2015-6-17 20:56:00

谢谢诶楼主的分享。

子非鱼非子 · 2015-6-24 19:02:24

Linux零基础初级教程

子非鱼非子 · 2015-6-24 19:02:36

Linux零基础初级教程

31^#

提示: 该帖被管理员或版主屏蔽

weslydreamer · 2015-7-30 17:19:43

感谢正需要！感激不尽！

邓宽 · 2015-7-31 17:24:47

楼主好人.积分不足了.

邓宽 · 2015-7-31 17:26:12

积分需要很多才行啊.

bowen__ · 2015-8-6 10:26:07

谢谢楼主分享。。。。。。

陈卫国 · 2015-8-16 15:11:28

基于51单片机的数控稳压电源proteus仿真电路很好

wangwot · 2015-8-16 15:52:07

这是需要这种基础资料，感谢

废墟竖立 · 2015-11-22 20:51:37

好好啊。。。。。。。。。。。

ltp610076 · 2015-12-9 08:57:08

http://bzszxxpx2015.fwx.px.teacher.com.cn/

wangwo28 · 2015-12-16 08:32:59

楼主发布资源辛苦了，谢谢分享！！！！！！！！！！

搜索历史

基于51单片机的数控稳压电源proteus仿真电路

相关推荐

63 条评论

评论

精选推荐

站长推荐 /6