找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索
查看: 2558|回复: 2
打印 上一主题 下一主题
收起左侧

低成本可调数显稳压电源(1.3V~25V)proteus仿真资料

[复制链接]
跳转到指定楼层
楼主
低成本可调数显稳压电源(1.3V~25V)proteus仿真资料的仿真图如下:


所有资料下载:
低成本可调数显稳压电源(1.3V~25V)proteus仿真资料.rar (87.07 KB, 下载次数: 40)

单片机程序源码:
  1.         list      p=12c672           ; list directive to define processor
  2.         #include <p12c672.inc>        ; processor specific variable definitions
  3. w_temp                EQU        0x70
  4. status_temp        EQU        0x71
  5. pclath_temp        EQU        0x72
  6. reg0                EQU        0x75
  7. reg1                EQU        0x76
  8. advalue                EQU        0x77
  9. advflag                EQU        0x78
  10. bank0        macro
  11. bcf        STATUS,5
  12. endm
  13. bank1        macro
  14. bsf        STATUS,5
  15. endm
  16.         ORG        0x00
  17.         nop
  18.         nop
  19.         goto        start
  20.         ORG     0x004
  21.        
  22.        
  23. start
  24.         bank0
  25.         clrf        GPIO
  26.         bcf        INTCON,GIE
  27.         bank1
  28.         movlw        0xc0
  29.         movwf        OPTION_REG
  30.         movlw        0x06
  31.         movwf        ADCON1
  32.         movlw        0xc9
  33.         TRIS        GPIO
  34.        
  35.        
  36.         movlw        0x00
  37.         movwf        reg0
  38.         movlw        0x08
  39.         movwf        reg1
  40.        
  41.        
  42.         bank0
  43.         movlw        b'00110000'
  44.         iorwf        GPIO,f
  45.         movlw        0xc1
  46.         movwf        ADCON0
  47.        
  48.         bsf        ADCON0,GO
  49.         goto        mainlp
  50. mainlp
  51.         btfsc        ADCON0,GO_DONE
  52.         goto        $-1
  53.         movlw        HIGH(tablev)
  54.         movwf        PCLATH
  55.        
  56.         clrf        advflag
  57.         movlw        0xab
  58.         subwf        ADRES,w
  59.         btfss        STATUS,C
  60.         goto        $+3
  61.         bsf        advflag,1
  62.         goto        gratethan20
  63.         movlw        0x56
  64.         subwf        ADRES,w
  65.         btfsc        STATUS,C
  66.         bsf        advflag,0
  67. gratethan20               
  68.         movf        ADRES,w
  69.        
  70.         call        tablev
  71.         movwf        advalue
  72.         clrf        PCLATH
  73.         bsf        ADCON0,GO
  74.         call        refreshled
  75.         goto        mainlp
  76. refreshled
  77.         movlw        0x0
  78.         btfss        advflag,0
  79.         goto        refreshled0
  80.         movlw        b'01100000'
  81.         goto        refreshled2
  82. refreshled0
  83.         btfsc        advflag,1
  84.         movlw        b'11011010'       
  85. refreshled2
  86.         movwf        reg0
  87. mainlp0
  88.         bcf        GPIO,1
  89.         rrf        reg0
  90.         btfsc        STATUS,C
  91.         goto        $+3
  92.         bcf        GPIO,2
  93.         goto        $+2
  94.         bsf        GPIO,2
  95.         bsf        GPIO,1
  96.         decfsz        reg1
  97.         goto        mainlp0
  98.        
  99.        
  100.         ;bcf        INTCON,GIE
  101.         movlw        b'11001111'
  102.         andwf        GPIO,f
  103.         swapf        advalue,w
  104.         andlw        0x0f
  105.         call        tableseg
  106.         movwf        reg0
  107.         bsf        reg0,0
  108.         movlw        0x08
  109.         movwf        reg1
  110.         movlw        b'00110000'
  111.         iorwf        GPIO,f
  112.         ;bsf        INTCON,GIE
  113. mainlp1
  114.         bcf        GPIO,1
  115.         rrf        reg0
  116.         btfsc        STATUS,C
  117.         goto        $+3
  118.         bcf        GPIO,2
  119.         goto        $+2
  120.         bsf        GPIO,2
  121.         bsf        GPIO,1
  122.         decfsz        reg1
  123.         goto        mainlp1
  124.         ;bcf        INTCON,GIE
  125.         movlw        b'11011111'
  126.         andwf        GPIO,f
  127.         movf        advalue,w
  128.         andlw        0x0f
  129.         call        tableseg
  130.         movwf        reg0
  131.         movlw        0x08
  132.         movwf        reg1
  133.         movlw        b'00110000'
  134.         iorwf        GPIO,f
  135.         ;bsf        INTCON,GIE
  136. mainlp2
  137.         bcf        GPIO,1
  138.         rrf        reg0
  139.         btfsc        STATUS,C
  140.         goto        $+3
  141.         bcf        GPIO,2
  142.         goto        $+2
  143.         bsf        GPIO,2
  144.         bsf        GPIO,1
  145.         decfsz        reg1
  146.         goto        mainlp2
  147.         ;bcf        INTCON,GIE
  148.         movlw        b'11101111'
  149.         andwf        GPIO,f
  150.         movlw        0x08
  151.         movwf        reg1
  152.         nop
  153.         nop
  154.         nop
  155.         nop
  156.         movlw        b'00110000'
  157.         iorwf        GPIO,f
  158.         ;bsf        INTCON,GIE
  159.         return
  160. ;
  161. ;abcdefgp
  162. tableseg
  163.         addwf        PCL,f
  164.         retlw        b'11111100'        ;0
  165.         retlw        b'01100000'        ;1
  166.         retlw        b'11011010'        ;2
  167.         retlw        b'11110010'        ;3
  168.         retlw        b'01100110'        ;4
  169.         retlw        b'10110110'        ;5
  170.         retlw        b'10111110'        ;6
  171.         retlw        b'11100100'        ;7
  172.         retlw        b'11111110'        ;8
  173.         retlw        b'11110110'        ;9
  174.        
  175.         ORG        0x100
  176. tablev
  177.         addwf        PCL,f
  178.         retlw        0x00
  179.         retlw        0x01
  180.         retlw        0x02
  181.         retlw        0x03
  182.         retlw        0x00
  183.         retlw        0x01
  184.         retlw        0x02
  185.         retlw        0x03
  186.         retlw        0x00
  187.         retlw        0x01
  188.         retlw        0x02
  189.         retlw        0x13       
  190.         retlw        0x14
  191.         retlw        0x15
  192.         retlw        0x16
  193.         retlw        0x17
  194.         retlw        0x18
  195.         retlw        0x19
  196.         retlw        0x20
  197.         retlw        0x22
  198.         retlw        0x24
  199.         retlw        0x25
  200.         retlw        0x26
  201.         retlw        0x27
  202.         retlw        0x28
  203.         retlw        0x29
  204.         retlw        0x30
  205.         retlw        0x31
  206.         retlw        0x33
  207.         retlw        0x34
  208.         retlw        0x35
  209.         retlw        0x36
  210.         retlw        0x37
  211.         retlw        0x38
  212.         retlw        0x39
  213.         retlw        0x40
  214.         retlw        0x42
  215.         retlw        0x43
  216.         retlw        0x44
  217.         retlw        0x45
  218.         retlw        0x46
  219.         retlw        0x48
  220.         retlw        0x49
  221.         retlw        0x50
  222.         retlw        0x52
  223.         retlw        0x53
  224.         retlw        0x54
  225.         retlw        0x55
  226.         retlw        0x56
  227.         retlw        0x57
  228.         retlw        0x58
  229.         retlw        0x59
  230.         retlw        0x60
  231.         retlw        0x62
  232.         retlw        0x63
  233.         retlw        0x64
  234.         retlw        0x65
  235.         retlw        0x66
  236.         retlw        0x68
  237.         retlw        0x70
  238.         retlw        0x71
  239.         retlw        0x72
  240.         retlw        0x74
  241.         retlw        0x75
  242.         retlw        0x76
  243.         retlw        0x77
  244.         retlw        0x79
  245.         retlw        0x80
  246.         retlw        0x81
  247.         retlw        0x82
  248.         retlw        0x83
  249.         retlw        0x84
  250.         retlw        0x85
  251.         retlw        0x86
  252.         retlw        0x87
  253.         retlw        0x88
  254.         retlw        0x89
  255.         retlw        0x90
  256.         retlw        0x91
  257.         retlw        0x93
  258.         retlw        0x94
  259.         retlw        0x96
  260.         retlw        0x97
  261.         retlw        0x98
  262.         retlw        0x99
  263.         retlw        0x02
  264.         retlw        0x02
  265.         retlw        0x03       
  266.         retlw        0x04
  267.         retlw        0x05
  268.         retlw        0x06
  269.         retlw        0x07
  270.         retlw        0x08
  271.         retlw        0x09
  272.         retlw        0x10
  273.         retlw        0x11
  274.         retlw        0x13
  275.         retlw        0x14
  276.         retlw        0x15
  277.         retlw        0x16
  278.         retlw        0x17
  279.         retlw        0x19
  280.         retlw        0x20
  281.         retlw        0x22
  282.         retlw        0x23
  283.         retlw        0x24
  284.         retlw        0x25
  285.         retlw        0x26
  286.         retlw        0x27
  287.         retlw        0x28
  288.         retlw        0x29
  289.         retlw        0x30
  290.         retlw        0x32
  291.         retlw        0x33
  292.         retlw        0x34
  293.         retlw        0x35
  294.         retlw        0x36
  295.         retlw        0x37
  296.         retlw        0x39
  297.         retlw        0x41
  298.         retlw        0x42
  299.         retlw        0x43
  300.         retlw        0x44
  301.         retlw        0x45
  302.         retlw        0x46
  303.         retlw        0x47
  304.         retlw        0x48
  305.         retlw        0x49
  306.         retlw        0x50
  307.         retlw        0x52
  308.         retlw        0x53
  309.         retlw        0x54
  310.         retlw        0x55
  311.         retlw        0x56
  312.         retlw        0x57
  313.         retlw        0x59
  314.         retlw        0x61
  315.         retlw        0x62
  316.         retlw        0x63
  317.         retlw        0x64
  318.         retlw        0x65
  319.         retlw        0x66
  320.         retlw        0x67
  321.         retlw        0x69
  322.         retlw        0x70
  323.         retlw        0x71
  324.         retlw        0x72
  325.         retlw        0x73
  326.         retlw        0x74
  327.         retlw        0x75
  328.         retlw        0x76
  329.         retlw        0x77
  330.         retlw        0x79
  331.         retlw        0x80
  332.         retlw        0x82
  333.         retlw        0x83
  334.         retlw        0x84
  335.         retlw        0x85
  336.         retlw        0x86
  337.         retlw        0x87
  338.         retlw        0x88
  339.         retlw        0x89
  340.         retlw        0x90
  341.         retlw        0x92       
  342.         retlw        0x93
  343.         retlw        0x94
  344.         retlw        0x95
  345.         retlw        0x96
  346.         retlw        0x98
  347.         retlw        0x99
  348.         retlw        0x01
  349.         retlw        0x02
  350.         retlw        0x03
  351.         retlw        0x04
  352.         retlw        0x05
  353.         retlw        0x06
  354.         retlw        0x07
  355.         retlw        0x08
  356.         retlw        0x09
  357.         retlw        0x10
  358.         retlw        0x11
  359.         retlw        0x13
  360.         retlw        0x14
  361.         retlw        0x15
  362.         retlw        0x16
  363.         retlw        0x17
  364.         retlw        0x19
  365.         retlw        0x20
  366.         retlw        0x22
  367.         retlw        0x23
  368.         retlw        0x24
  369.         retlw        0x25
  370.         retlw        0x26
  371.         retlw        0x27
  372.         retlw        0x28
  373.         retlw        0x29
  374.         retlw        0x30
  375.         retlw        0x31
  376.         retlw        0x32
  377.         retlw        0x33
  378.         retlw        0x34
  379.         retlw        0x35
  380.         retlw        0x36
  381.         retlw        0x39
  382.         retlw        0x40
  383.         retlw        0x41
  384.         retlw        0x42
  385.         retlw        0x43
  386.         retlw        0x45
  387.         retlw        0x46
  388.         retlw        0x47
  389.         retlw        0x48
  390.         retlw        0x49
  391.         retlw        0x50
  392.         retlw        0x52
  393.         retlw        0x53
  394.         retlw        0x54
  395.         retlw        0x55
  396.         retlw        0x56
  397.         retlw        0x57
  398.         retlw        0x58
  399.         retlw        0x60
  400.         retlw        0x61
  401.         retlw        0x62
  402.         retlw        0x63
  403.         retlw        0x65
  404.         retlw        0x66
  405.         retlw        0x68
  406.         retlw        0x69
  407.         retlw        0x70
  408.         retlw        0x71
  409.         retlw        0x72
  410.         retlw        0x73
  411.         retlw        0x74
  412.         retlw        0x76
  413.         retlw        0x77
  414.         retlw        0x78
  415.         retlw        0x79
  416.         retlw        0x79
  417.         retlw        0x80       
  418.         retlw        0x00
  419.         retlw        0x01
  420.         retlw        0x02
  421.         retlw        0x03
  422.         retlw        0x00
  423.         retlw        0x01
  424.         retlw        0x02
  425.         retlw        0x03       
  426.         retlw        0x00
  427.         retlw        0x01
  428.         retlw        0x02
  429.         retlw        0x03
  430.         retlw        0x01
  431.         retlw        0x02
  432.         retlw        0x03
  433. END

复制代码


评分

参与人数 2黑币 +55 收起 理由
ssfc + 5 赞一个!
admin + 50 共享资料的黑币奖励!

查看全部评分

分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏2 分享淘帖 顶 踩
回复

使用道具 举报

沙发
ID:1 发表于 2017-1-3 23:13 | 只看该作者
好资料,51黑有你更精彩!!!
回复

使用道具 举报

板凳
ID:154108 发表于 2017-1-4 13:29 | 只看该作者
全汇编,高手
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

手机版|小黑屋|51黑电子论坛 |51黑电子论坛6群 QQ 管理员QQ:125739409;技术交流QQ群281945664

Powered by 单片机教程网

快速回复 返回顶部 返回列表