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

 找回密码
 立即注册

QQ登录

只需一步，快速开始

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

搜索
»论坛 › 电子技术分类讨论区 › 智能小车/机器人 › 自动入库小车设计 报告+程序
返回列表 发新帖
查看: 4449|回复: 0
打印 上一主题 下一主题
收起左侧

自动入库小车设计 报告+程序

[复制链接]
跳转到指定楼层
楼主
ID:120587 发表于 2016-5-13 18:37 | 只看该作者 |只看大图 回帖奖励 |倒序浏览 |阅读模式
一个很好的自动入库小车设计资料


自动入库小车设计.zip (172.7 KB, 下载次数: 18)


  1. ZUOLUN BIT P1.4 ;
  2. YOULUN BIT P1.5;
  3. ZUOLUN_DIR BIT P1.6;
  4. YOULUN_DIR BIT P1.7;
  5. ZUO_CHEWEI BIT P1.0;车尾传感器信号输入端，高电平有效
  6. YOU_CHEWEI BIT P1.1;
  7. YUYIN_CLK EQU P1.2;
  8. ZUOQIAN_CHUANGANQI EQU P1.3
  9. IRCOM  EQU  20H       ;20H-23H IR使用
  10. JISHUQI_MIAOGEWEI EQU 45H;定60MS的倍数
  11. JISHUQI_MIAOSHIWEI EQU 46H ;此地址里放的是秒数；
  12. RUKU_TIME EQU 47H;
  13. TINGCHE_TIME EQU 48H;
  14. CHUKU_TIME EQU 49H;
  15. IRIN   bit  P3.6      ;遥控信号输入端
  16. FC_MARK equ P3.7; 检测返程标志
  17. ZHUANWAN_OK EQU P3.0
  18. MANSU4_MARK EQU P3.1;
  19. CHANGSU_MARK EQU P2.0;
  20. MANSU3_MARK EQU P2.1
  21. ;--------------------------
  22. org 0000h;
  23. sjmp start;
  24. org 0003h;
  25. ljmp ZUOLUN_ZHUAN;P3.2_zuolun zhong duan  ru kou
  26. org 000bh;
  27. LJMP JIANCE_TIEPIAN ;dian shi qi dang zhongduan yong ,jian ce tie pian
  28. org 0013h;
  29. ljmp YOULUN_ZHUAN;P3.3_youlun zhongduan ru kou
  30. ORG 001BH;
  31. LJMP TIMER_1;全程实现定时

  33. ;--------------------------
  34. org 0030h; 程序开始执行，初始化
  35. ;---------------------------
  36. start:mov SP,#60h;
  37.         mov P1,#00h;
  38.         mov p0,#0FFh;接语音芯片，先不说话
  39.         SETB YUYIN_CLK
  40.         MOV P3,#0FFH;
  41.         MOV TMOD,#15h ;定时器0计数检测铁片，定时器1工作定时状态
  42.         MOV TH0,#0FFH;
  43.         MOV TL0,#0FFH;
  44.         mov th1,#4Ch;定时50MS，方式1
  45.         mov tl1,#00h
  46.         mov IP,#02h;现在定时器0，检测铁片中断级别最高
  47.         mov TCON,#00h ;低电平触发,TIEPIAN,JIANCHE XIAN
  48.         mov IE,#0FH  ; 开两个外中断及两个定时器中断，关总中断
  49.         clr FC_MARK   ;此条程序是想用P2。0，返程标志检测，换速度
  50.         CLR ZHUANWAN_OK
  51.         CLR ZUO_CHEWEI;初始化停车信号位
  52.         CLR YOU_CHEWEI;
  53.         CLR MANSU4_MARK
  54.         CLR CHANGSU_MARK
  55.         CLR MANSU3_MARK
  56.         MOV JISHUQI_MIAOGEWEI,#00H;   清时间值
  57.         MOV JISHUQI_MIAOSHIWEI,#00H;
  58.         MOV RUKU_TIME,#00H;
  59.         MOV TINGCHE_TIME,#00H;
  60.         MOV CHUKU_TIME,#00H;
  61. ;------------------------------------
  62. QIDONG:   MOV   A,#00H
  63.           MOV   R0,#20H
  64. LOOP0:    MOV   @R0,A          ;20H-24H清零
  65.           INC   R0
  66.           CJNE  R0,#25H,LOOP0
  67.           SETB  IRIN
  68.           MOV  22H,#0FFH
  69. LOOP1:    CALL  IR_IN
  70.           MOV A,22H;
  71.           CJNE A,#0FFH,LOOP3;
  72.           SJMP LOOP1
  73. LOOP3:    CJNE A,#01,LOOP1;
  74.           SJMP MAIN1;

  76. ;---------------------------------------------------
  77. ; IR 译码子程序
  78. ;引导码9MS低电平，4.375MS高电平，
  79. ;8窄8宽固定码（0.5MS/0.6MS；1.5MS/0.6MS）
  80. ;8位数据码；8位数据反码，（0.5MS/0.6MS；1.5MS/0.6MS）
  81. ;---------------------------------------------------
  82. IR_IN:
  83.           MOV   R0,#IRCOM
  84. I1:      JNB  IRIN,I2       ;等待 IR 信号出现
  85.           JMP  I1
  86. I2:      MOV  R4,#20
  87. I20:     CALL  DEL
  88.           DJNZ  R4,I20
  89.           JB  IRIN,I1        ;确认IR信号出现
  90. I21:     JB  IRIN,I3        ;等 IR 变为高电平
  91.           CALL  DEL
  92.           JMP  I21
  93. I3:      MOV  R3,#0         ;8位数清为0
  94. LL:      JNB  IRIN,I4       ;等 IR 变为低电平
  95.           CALL  DEL
  96.           JMP  LL
  97. I4:      JB  IRIN,I5        ;等 IR 变为高电平
  98.           CALL  DEL
  99.           JMP  I4
  100. I5:      MOV  R2,#0         ;0.14ms 计数
  101. L1:      CALL  DEL
  102.           JB  IRIN, N1       ;等 IR 变为高电平

  104.                              ;IR=0，检查R2中的计数值
  105.           MOV  A,#8          ;0.14MS*8=1.12ms;A>8,是高电平；A<8,低电平
  106.           CLR  C
  107.           SUBB  A,R2         ;判断高低位
  108.                              ;IF C=0  BIT=0
  109.           MOV  A,@R0
  110.           RRC  A
  111.           MOV  @R0,A         ;处理完一位
  112.           INC  R3
  113.           CJNE  R3,#8,LL     ;需处理完8位
  114.           MOV  R3,#0
  115.           INC  R0            ;调整接收数据存储地址,20H-23H,22H里放的数据;
  116.           CJNE  R0,#24H,LL   ;收集到4字节了?不等就是没接收完;相等就接收完了;
  117. N1:      INC  R2
  118.           CJNE  R2,#30,L1    ;0.14ms 计数过长则时间到自动离开
  119.           RET
  120. ;---------------------------------------------------------------
  121. ; DELAY  R5*0.14MS
  122. DEL:
  123.           MOV  R5,#1       ;IR解码使用
  124. DEL0:     MOV  R6,#2
  125. DEL1:     MOV  R7,#32
  126. DEL2:     DJNZ  R7,DEL2
  127.           DJNZ  R6,DEL1
  128.           DJNZ  R5,DEL0
  129.           RET

  131. DELAY1:                    ;延时5MS
  132.          MOV  R6,#25
  133.   DL2:   MOV  R7,#100
  134.          DJNZ  R7,$
  135.          DJNZ  R6,DL2
  136.          RET
  137. ;***************************************
  138. ;            主程序
  139. ;***************************************
  140. MAIN1: MOV P0,#00010011B;准备就绪
  141.        CALL YUYIN_MAICONG;
  142.        MOV R6,#250;
  143.        YAN_YUYIN:MOV R5,#250
  144.        DJNZ R5,$;
  145.        DJNZ R6,YAN_YUYIN
  146. ;--------------------------------------
  147.       SETB EA;
  148.       setb tr1;
  149.       setb tr0;

  151. MAIN:JB ZHUANWAN_OK,FANCHENG;判断转弯是否成功，成功条入满速返回
  152.      JB FC_MARK,TING_60S ;全速前进程序
  153.      SETB ZUOLUN;
  154.      SETB YOULUN;
  155.      SJMP MAIN
  156. ;-------------------------------------停车60秒程序
  157. TING_60S:SETB EA;
  158.          SETB TR1
  159. WAIT_ZHUANWAN:MOV A,JISHUQI_MIAOSHIWEI;
  160.          CJNE A,#8,WAIT_ZHUANWAN;先暂时让车停六十秒
  161.          MOV JISHUQI_MIAOSHIWEI,#00H;再次清零，以便计返程时间
  162.          MOV JISHUQI_MIAOGEWEI,#00H;

  164.          ZHUANWAN1: mov p0,#00111111b; 播放转弯语音
  165.                    lcall YUYIN_MAICONG
  166.                ZHUANWAN:SETB ZUOLUN_DIR;
  167.                CLR  YOULUN_DIR ;
  168.                SETB ZUOLUN;
  169.                SETB YOULUN;
  170.                call YANSHI_CHANG;
  171.                JB P3.3,CHU_ZHUANWAN
  172.                CLR ZUOLUN;
  173.                CLR YOULUN;
  174.                CALL YANSHI_DUAN;
  175.                JNB P3.3,ZHUANWAN
  176.   CHU_ZHUANWAN:
  177.                CLR ZUOLUN;
  178.                CLR YOULUN;
  179.                CLR ZUOLUN_DIR
  180.                CLR YOULUN_DIR;
  181.                SETB ZHUANWAN_OK;转弯成功标志
  182.                SETB EX1;
  183.                SETB EX0;
  184.                SETB EA
  185.                SJMP MAIN
  186. ;------------------------------------慢速返回程序
  187. FANCHENG:JNB ZUO_CHEWEI,mansu4;
  188.          JNB YOU_CHEWEI,mansu4;
  189.          clr ea;两个尾灯都检测到黑线时就关中断，以后就靠尾灯来检测方向及停止
  190.          SJMP TINGCHE;
  191.   mansu4:MOV A,JISHUQI_MIAOSHIWEI;
  192.          CLR CY
  193.          CJNE A,#3,BIJIAO
  194.          SJMP MANSU

  196. BIJIAO:JC MANSU;
  197.        SJMP ZHENGCHANGSUDU

  199. ;-----------------------------------------返回时慢速4秒
  200. MANSU:SETB ZUOLUN; 刚充完电时，200/80都向外冲
  201.      SETB YOULUN;
  202.      MOV R4,#240;
  203.      DJNZ R4,$;
  204.      CLR ZUOLUN;
  205.      CLR YOULUN;
  206.      MOV R4,#90;
  207.      DJNZ R4,$;
  208.      SJMP FANCHENG
  209. ;---------------------------返回时加速程序
  210. ZHENGCHANGSUDU:CLR CY
  211.                MOV A,JISHUQI_MIAOSHIWEI;
  212.                CJNE A,#11,BIJIAO1
  213.                SJMP TINGCHE_JIANSU
  214.          BIJIAO1:JC ZHENGCHANSU;
  215.                  SJMP TINGCHE_JIANSU

  217.    ZHENGCHANSU:SETB ZUOLUN;
  218.                SETB YOULUN;
  219.                lcall dl_50us

  221.                SJMP FANCHENG
  222. ;-------------------------------------
  223. TINGCHE_JIANSU:
  224.      
  225.      SETB ZUOLUN; 刚充完电时，200/80都向外冲
  226.      SETB YOULUN;
  227.      MOV R4,#200;
  228.      DJNZ R4,$;
  229.      CLR ZUOLUN;
  230.      CLR YOULUN;
  231.      MOV R4,#112;
  232.      DJNZ R4,$;
  233.      SJMP FANCHENG
  234. ;----------------------------------跑完全程，停车
  235. TINGCHE:;jb ZUO_CHEWEI,TINGCHE;
  236. TINGCHE1:;JB YOU_CHEWEI,TINGCHE1
  237.        clr ZUOLUN_DIR
  238.        CLR YOULUN_DIR;
  239. PANTING:mov a,p1;
  240.         anl a,#03h;
  241.         cjne a,#11h,pan_tingche1;
  242.         SETB ZUOLUN;
  243.         SETB YOULUN;
  244.         LCALL TEDUAN_DELAY0;
  245.         CLR ZUOLUN;
  246.         CLR ZUOLUN;
  247.         LCALL TEDUAN_DELAY1
  248.         SJMP PANTING
  249. pan_tingche1:cjne a,#01h,pan_tingche2;
  250.         SETB ZUOLUN;
  251.         clr YOULUN;
  252.         LCALL TEDUAN_DELAY0;
  253.         CLR ZUOLUN;
  254.         CLR ZUOLUN;
  255.         LCALL TEDUAN_DELAY1
  256.         SJMP PANTING
  257. pan_tingche2:cjne a,#10h,cheditingche
  258.         clr ZUOLUN;
  259.         SETB YOULUN;
  260.         LCALL TEDUAN_DELAY0;
  261.         CLR ZUOLUN;
  262.         CLR ZUOLUN;
  263.         LCALL TEDUAN_DELAY1
  264.         SJMP PANTING                  
  265.         
  266.         ;CLR EA
  267.         ;mov r6,#15;
  268.         ;djnz r6,$
  269. cheditingche:MOV R7,#6
  270. XIANGQIAN_TIAO:SETB ZUOLUN;
  271.              SETB YOULUN;
  272.              MOV R6,#20
  273.              MOV R5,#5;
  274.              CLR ZUOLUN;
  275.              CLR YOULUN;
  276.              MOV R6,#20;
  277.              MOV R5,#2
  278.              SM:DJNZ R5,$;
  279.              DJNZ R6,SM;
  280.              DJNZ R7,XIANGQIAN_TIAO
  281.             
  282.         CLR ZUOLUN;
  283.         CLR YOULUN;
  284.         CLR ZUOLUN;
  285.         CLR YOULUN;
  286.         ;lcall yuyin;调全程跑完语音
  287.         mov p0,#01011111b;
  288.         lcall  YUYIN_MAICONG

  290.         ;LCALL DISPLAY;停车，显示全程信息
  291.         SJMP $
  292. ;-------------------------------停车时用特短延时        
  293. TEDUAN_DELAY0:MOV R4,#50
  294.               DJNZ R4,$
  295.               RET;
  296. TEDUAN_DELAY1:MOV R4,#5;
  297.               DJNZ R4,$;
  298.               RET;                  
  299. ;--------------------------------  左轮调整程序
  300. ZUOLUN_ZHUAN:PUSH A;
  301.              PUSH PSW;
  302.              NOP
  303.              NOP
  304.              NOP
  305.              NOP
  306.              NOP
  307.              NOP
  308.              jNb YOULUN,XIANGQIANPAO
  309.             ; MOV P1,#00H;两个轮全停止转动
  310.              nop;
  311.              nop;
  312.              nop;
  313.              nop;
  314.              SETB YOULUN;左轮转-调整车位置 FAN LE ,GAI LE ?
  315.              CLR  ZUOLUN
  316.              LCALL DUAN_DELAY;

  318.             ; MOV P1,#00H;
  319.              SJMP TIAOCHU
  320. XIANGQIANPAO:SETB ZUOLUN;
  321.              SETB YOULUN;
  322.      TIAOCHU:POP PSW;
  323.              POP A;
  324.              RETI;
  325. ;-----------------------------------  右轮调整
  326. YOULUN_ZHUAN:PUSH A;
  327.              PUSH PSW;
  328.              NOP
  329.              NOP
  330.              NOP
  331.              NOP
  332.              NOP
  333.              NOP
  334.              JNB ZUOLUN,XIANGQIANPAO1
  335.              ;MOV P1,#00H;两个轮全停止转动
  336.              nop;
  337.              nop;
  338.              nop;
  339.              nop;
  340.              SETB ZUOLUN;右轮转-调整车位置 FAN LE GAI LE ?
  341.              CLR  YOULUN
  342.              LCALL DUAN_DELAY;
  343.              ;MOV P1,#00H;
  344.              SJMP TIAOCHU1
  345. XIANGQIANPAO1:SETB ZUOLUN;
  346.              SETB YOULUN;
  347.     TIAOCHU1:POP PSW;
  348.              POP A;
  349.              RETI;
  350. ;-------------------------------------- 车位置调整短暂延时
  351. DUAN_DELAY:MOV R5,#30;
  352.        DL1:MOV R6,#40;
  353.        DL3:DJNZ R6,DL3;
  354.            DJNZ R5,DL1;
  355.            RET;
  356. ;-----------------------------------定时器1定时
  357. TIMER_1:CLR EA;
  358.         PUSH A;
  359.         PUSH PSW;
  360.         mov th1,#4Ch;定时60MS，方式1
  361.         mov tl1,#00h

  363.         MOV A,JISHUQI_MIAOGEWEI;
  364.         CJNE A,#20,JIAYI
  365.         MOV JISHUQI_MIAOGEWEI,#00H;
  366.         INC JISHUQI_MIAOSHIWEI;
  367.         SJMP CHU_TIME
  368.   JIAYI:INC JISHUQI_MIAOGEWEI;
  369. CHU_TIME:SETB EA;
  370.         POP PSW;
  371.         POP A
  372.         RETI
  373. ;--------------------------------------- 检测铁片程序
  374. JIANCE_TIEPIAN:CLR EA;
  375. clr ZUOLUN;
  376. CLR YOULUN
  377.                CLR EX0;停止检测黑线
  378.                CLR EX1;
  379.                CLR ET0;禁止定时器0中断，即停止检测铁片
  380.                CLR TR0;
  381.                CLR TR1;
  382.                SETB FC_MARK
  383.             ;--------------------播放入库语音
  384.             mov p0,#00101111b;
  385.             lcall YUYIN_MAICONG
  386.             ;----------------------------
  387.                MOV RUKU_TIME,JISHUQI_MIAOSHIWEI;读取入库时间
  388.                MOV JISHUQI_MIAOSHIWEI,#00H;把计数秒值清零
  389.                CLR ZUOLUN;
  390.                CLR YOULUN
  391.                RETI;
  392. ;---------------------------------------转弯时调PWM用延时
  393. YANSHI_DUAN:MOV R3,#25;
  394. YANSHIDUAN:DJNZ R3,YANSHIDUAN;
  395.             RET
  396. YANSHI_CHANG:MOV R3,#180
  397. YANSHICHANG:DJNZ R3,YANSHICHANG;
  398.              RET;
  399. ;--------------------------------------
  400. dl_50us:mov r3,#25
  401.         djnz r3,$;
  402.         ret
  403. ;----------------------------------------语音脉冲信号
  404. YUYIN_MAICONG:clr YUYIN_CLK
  405.               ;LCALL YANSHI_CHANG;
  406.               nop
  407.               nop
  408.               nop
  409.               nop
  410.               nop
  411.               NOP
  412.               NOP
  413.               setb YUYIN_CLK;
  414.               RET
  415. ;----------------------------
  416. END
复制代码


评分

参与人数 1黑币 +50 收起 理由
admin + 50 共享资料的黑币奖励！

查看全部评分

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

使用道具 举报

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

本版积分规则

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

Powered by 单片机教程网

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