设为首页收藏本站
开启辅助访问 切换到宽版

 找回密码
 立即注册

QQ登录

只需一步，快速开始

热门： 51单片机 | 24小时必答区 | 单片机教程 | 单片机DIY制作 | STM32 | Cortex M3 | 模数电子 | 电子DIY制作 | 音响/功放 | 拆机乐园 | Arduino | 嵌入式OS | 程序设计

搜索
»论坛 › 嵌入式/单片机论坛 › 51单片机 › 光电编码盘的直流伺服电机PID闭环调速系统proteus仿真
返回列表 发新帖
查看: 5719|回复: 1
打印 上一主题 下一主题
收起左侧

光电编码盘的直流伺服电机PID闭环调速系统proteus仿真

[复制链接]
跳转到指定楼层
楼主
ID:137190 发表于 2016-9-4 22:13 | 只看该作者 |只看大图 回帖奖励 |倒序浏览 |阅读模式
这个设计的仿真原理图：


基于单片机的光电编码盘的直流伺服电机PID闭环调速系统proteus仿真的所有资料下载：
基于光电编码盘的直流伺服电机PID闭环调速系统.zip (122.5 KB, 下载次数: 119)


  1. ;HC11 PWM Motor Control Example
  2. ;Demonstrates ADC and Timer Output Capture functions

  4. PORTA             equ      $1000
  5. PORTC             equ      $1003
  6. PORTB             equ      $1004
  7. DDRC              equ      $1007
  8. TOC1              equ      $1016
  9. TOC2              equ      $1018
  10. TCTL1             equ      $1020
  11. TCTL2             equ      $1021
  12. TMSK1             equ      $1022
  13. TFLG1             equ      $1023
  14. TMSK2             equ      $1024
  15. PACTL             equ      $1026
  16. ADCTL             equ      $1030
  17. ADR1              equ      $1031
  18. ADR2              equ      $1032

  20.                 org $F000

  22. start:          lds  #$FF

  24.                 ldaa #$FF                        ;Port C is output
  25.                 staa DDRC

  27.                 ldaa #$80                        ;Enable OC1 interrupts.
  28.                 staa TMSK1                        ;

  30.                 ldaa #$2                        ;Set the prescaler (divide by 16)
  31.                 staa TMSK2

  33.                 ldaa #$80                        ;Enable PA7 as output
  34.                 staa PACTL
  35.        
  36.                           
  37.                 ldaa #$10                        ;Start first ADC conversion - multi mode enable
  38.                 staa ADCTL
  39.                           
  40.                 ldd #$0100                        ;Load the capture register
  41.                 std TOC1
  42.                        
  43.                 cli                                ;Enable interupts

  45. loop                wai
  46.                 bra loop



  50. ;OC1 interrupt service
  51. oc1f                ldaa #$10                         ;Start another ADC conversion
  52.                 staa ADCTL

  54.                 ldaa ADR1                        ;Read the pot position from ADC channel 1
  55.                 staa PORTB                        ;Display it
  56.                                                                                                    
  57.                 suba #127                        ;0x7F is zero reference.
  58.                
  59.                 bne oc1f_ne                            ;Jump if values not same

  61. ;Set Both outputs low. Motor is stationary
  62.                 clrb                                   
  63.                 stab PORTA                        ;Both OC1 and OC2 outputs low
  64.                 stab TCTL1                        ;TOC2 mode is disabled
  65.                 bra done
  66.                
  67. ;Non-zero drive - decide if +ve or -ve:
  68.                
  69. oc1f_ne                bcs oc1f_cs

  71. ;Positive result - motor spins clockwise:

  73.                 ldab #$40                        ;Port A drives this value:
  74.                 stab PORTA
  75.                 clrb                                ;Release TOC2 latch - Port A acquires value, above.
  76.                 stab TCTL1
  77.                 ldab #$40                         ;TOC 2 output toggles on OC2 event; motor drive stops.
  78.                 stab TCTL1
  79.                 bra done               

  81. ;Negative result - motor spins anti-clockwise:

  83. oc1f_cs                ldab #$80                        ;Port A drives this value:
  84.                 stab PORTA
  85.                 clrb                            ;Release TOC2 latch - Port A acquires value, above.
  86.                 stab TCTL1
  87.                 ldab #$40                         ;TOC 2 output toggles on OC2 event; motor drive stops.
  88.                 stab TCTL1
  89.                 nega                                ;Invert result -> 0xFF -> 0x01 etc.

  91. ;Now set up TOC2 to trigger at a time forward of TOC1. This means that the motor will
  92. ;be powered for the number of ticks in ACCA * 256.                                                                                
  93.                                                                                                                                                                                                                
  94. done:                tab                             ;TOC 2 is set to trigger after this no of cycles.
  95.                 clra
  96.                 rolb
  97.                 rola
  98.                 rolb
  99.                 rola               
  100.                 rolb
  101.                 rola
  102.                 rolb
  103.                 rola               
  104.                 rolb
  105.                 rola               
  106.                 addd TOC1  
  107.                 std TOC2
  108.                
  109.                 ldd #$1000
  110.                 addd TOC1
  111.                 std TOC1
  112.                
  113.                 ldaa #$80                        ;Clear the TOC 1 interrupt
  114.                 staa TFLG1
  115.                 rti


  118. ;Interrupt Vectors

  120.                 org $FFE8
  121.                 dw oc1f               

  123.                 org $FFFE
  124.                 dw start
复制代码



电子电路, 计算机, pdf下载, 技术, 伺服电机
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏3 分享淘帖 顶顶1 踩踩

相关帖子
回复

使用道具 举报

沙发
ID:194876 发表于 2017-5-16 22:00 | 只看该作者
看看感觉还行
回复

使用道具 举报

返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

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

Powered by 单片机教程网

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