06 级轧钢 3 班 霍战鹏 06 级轧钢 3 班 霍战鹏 汽车玻璃粘片 5 4 3.

28
06 06 级级级 级级级 3 3 级级级 级级级 级级级级级级 级级级级级级

Transcript of 06 级轧钢 3 班 霍战鹏 06 级轧钢 3 班 霍战鹏 汽车玻璃粘片 5 4 3.

Page 1: 06 级轧钢 3 班 霍战鹏 06 级轧钢 3 班 霍战鹏 汽车玻璃粘片 5 4 3.

0606 级轧钢级轧钢 33 班班 霍战鹏霍战鹏

汽车玻璃粘片汽车玻璃粘片

Page 2: 06 级轧钢 3 班 霍战鹏 06 级轧钢 3 班 霍战鹏 汽车玻璃粘片 5 4 3.

5

Page 3: 06 级轧钢 3 班 霍战鹏 06 级轧钢 3 班 霍战鹏 汽车玻璃粘片 5 4 3.

4

Page 4: 06 级轧钢 3 班 霍战鹏 06 级轧钢 3 班 霍战鹏 汽车玻璃粘片 5 4 3.

3

Page 5: 06 级轧钢 3 班 霍战鹏 06 级轧钢 3 班 霍战鹏 汽车玻璃粘片 5 4 3.
Page 6: 06 级轧钢 3 班 霍战鹏 06 级轧钢 3 班 霍战鹏 汽车玻璃粘片 5 4 3.
Page 7: 06 级轧钢 3 班 霍战鹏 06 级轧钢 3 班 霍战鹏 汽车玻璃粘片 5 4 3.

PICTURE

START

Page 8: 06 级轧钢 3 班 霍战鹏 06 级轧钢 3 班 霍战鹏 汽车玻璃粘片 5 4 3.

试验台试验台

Page 9: 06 级轧钢 3 班 霍战鹏 06 级轧钢 3 班 霍战鹏 汽车玻璃粘片 5 4 3.

项目布局介绍

LED 数码管

8255A芯片

数据线接口

用此灯来代替电机

此三灯显示定位三点

直流电动机

三个定位点三个定位点

实验箱实验箱总开关总开关

与电脑连接口

视频剪辑

Page 10: 06 级轧钢 3 班 霍战鹏 06 级轧钢 3 班 霍战鹏 汽车玻璃粘片 5 4 3.

电机驱动(在此用灯来表示)

工人拆卸工及玻璃,并准备开始下一工件的加工

三个定位点定位

三盏指示灯亮

电机进给,实现粘片动作

一个工件加工完毕,计数并调入数码管显示

观看视频.mp4

Page 11: 06 级轧钢 3 班 霍战鹏 06 级轧钢 3 班 霍战鹏 汽车玻璃粘片 5 4 3.

项目内容项目内容• 某生产线生产汽车玻璃,需要某生产线生产汽车玻璃,需要在某工步中装配两个插片,装在某工步中装配两个插片,装配插片时需要一种自动化装置,配插片时需要一种自动化装置,要采用三个定位点检测,两个要采用三个定位点检测,两个粘接动作和一个计数装置记录粘接动作和一个计数装置记录每班生产件数。每班生产件数。

Page 12: 06 级轧钢 3 班 霍战鹏 06 级轧钢 3 班 霍战鹏 汽车玻璃粘片 5 4 3.

项目接线图项目接线图

Page 13: 06 级轧钢 3 班 霍战鹏 06 级轧钢 3 班 霍战鹏 汽车玻璃粘片 5 4 3.

stack segment stackstack segment stack db 2024 dup(0)db 2024 dup(0)stack endsstack endsdata segment data segment protc1 DB 3fh,06h,5bh,4fh,66h,6dh,7dh,07h,7fh,6fhprotc1 DB 3fh,06h,5bh,4fh,66h,6dh,7dh,07h,7fh,6fh DB 0ffhDB 0ffh num dw 0hnum dw 0h baiwei db 8 dup(0)baiwei db 8 dup(0) shiwei db 8 dup(0)shiwei db 8 dup(0) gewei db 8 dup(0) gewei db 8 dup(0) data endsdata endscode segment 'code'code segment 'code' assume cs:code,ds:data,ss:stackassume cs:code,ds:data,ss:stackstart: MOV AX,datastart: MOV AX,data MOV DS,AXMOV DS,AX mov dx,0e3hmov dx,0e3h mov al,10010000b ;mov al,10010000b ; 写入方式控制字,写入方式控制字, AA 口输入,口输入, BB 、、 CC 口输出口输出 out dx,alout dx,al mov dx,0e1hmov dx,0e1h mov al,11111111bmov al,11111111b out dx,al ;out dx,al ; 初始化初始化 BB 口,使口,使 PB7=1PB7=1 ,电机指示灯灭,电机指示灯灭

Page 14: 06 级轧钢 3 班 霍战鹏 06 级轧钢 3 班 霍战鹏 汽车玻璃粘片 5 4 3.

again: again: mov dx,0e0hmov dx,0e0h in al,dxin al,dx cmp al,11100000b ;cmp al,11100000b ; 当当 PA5,PA6,PA7PA5,PA6,PA7 都是都是 11 时,启动直流电机时,启动直流电机 je starteje starte jmp againjmp againstarte: mov dx,0e1hstarte: mov dx,0e1h mov al,10001111b ;PB4,PB5,PB6mov al,10001111b ;PB4,PB5,PB6 均置均置 00 ,三只指示灯亮 ,三只指示灯亮 out dx,alout dx,al call delay1 ;call delay1 ; 指示灯点亮时间指示灯点亮时间 mov dx,0e1hmov dx,0e1h mov al,01111111b ;mov al,01111111b ; 要求:直流电机一端接要求:直流电机一端接 5V5V 电压,一端接电压,一端接 PB7PB7 out dx,al ;out dx,al ; 电机灯亮,表征电机起动电机灯亮,表征电机起动 call delay1 ;call delay1 ; 电机起动延时电机起动延时 call delay1 call delay1 call delay1 ;delay1call delay1 ;delay1 是电机的转动时间是电机的转动时间mov dx,0e1hmov dx,0e1h mov al,11111111b ; mov al,11111111b ; 电机停止,开始粘胶动作 电机停止,开始粘胶动作 out dx,alout dx,al call delay2 call delay2 call delay2 call delay2 call delay2 ;delay2call delay2 ;delay2 是粘胶时间;是粘胶时间;

Page 15: 06 级轧钢 3 班 霍战鹏 06 级轧钢 3 班 霍战鹏 汽车玻璃粘片 5 4 3.

mov dx,0e1hmov dx,0e1h mov al,01111111b ;mov al,01111111b ; 电机指示灯亮,电机重新启动,活塞返回 电机指示灯亮,电机重新启动,活塞返回 out dx,alout dx,al call delay1 ;call delay1 ; 活塞返回时间活塞返回时间 call delay1 call delay1 call delay1 call delay1

mov dx,0e1hmov dx,0e1h mov al,11111111b ;mov al,11111111b ; 要求:直流电机一端接要求:直流电机一端接 5V5V 电压,一端接电压,一端接 PB7PB7 out dx,al ;out dx,al ; 电机指示灯灭,电机停止电机指示灯灭,电机停止 call delay3 call delay3 call delay3 call delay3 call delay3 ;delay3call delay3 ;delay3 是卸工件和安装新工件所用时间是卸工件和安装新工件所用时间 inc numinc num call xianshi ;call xianshi ; 将数量显示到数码管将数量显示到数码管 jmp start ;jmp start ; 开始下一工件的加工开始下一工件的加工

Page 16: 06 级轧钢 3 班 霍战鹏 06 级轧钢 3 班 霍战鹏 汽车玻璃粘片 5 4 3.

delay1 proc push cx mov cx,0a1: push ax pop ax loop a1 pop cx retdelay1 endpdelay2 proc push cx mov cx,0 a2:push ax pop ax loop a2 pop cx retdelay2 endp

右上角灯亮表示电机驱动。

Page 17: 06 级轧钢 3 班 霍战鹏 06 级轧钢 3 班 霍战鹏 汽车玻璃粘片 5 4 3.

delay3 procdelay3 proc push cxpush cx mov cx,0mov cx,0 a3:push axa3:push ax pop axpop ax loop a3loop a3 pop cxpop cx retretdelay3 endpdelay3 endp

以下为显示子程序:

Page 18: 06 级轧钢 3 班 霍战鹏 06 级轧钢 3 班 霍战鹏 汽车玻璃粘片 5 4 3.

xianshi proc push ax push bx push cx push dx mov ax,num call printnum

MOV DX,0e3h MOV AL,80h OUT DX,AL Mov cx,0h again1: MOV al,baiwei MOV BX,OFFSET PROTC1 XLAT MOV DX,0E2H OUT DX,AL

此为程序计数显示效果

Page 19: 06 级轧钢 3 班 霍战鹏 06 级轧钢 3 班 霍战鹏 汽车玻璃粘片 5 4 3.

MOV DX,0E1HMOV DX,0E1H MOV AL,11111100BMOV AL,11111100B OUT DX,ALOUT DX,AL call clearcall clear MOV Al,shiweiMOV Al,shiwei MOV BX,OFFSET PROTC1MOV BX,OFFSET PROTC1 XLATXLAT MOV DX,0E2HMOV DX,0E2H OUT DX,ALOUT DX,AL MOV DX,0E1HMOV DX,0E1H MOV AL,11111010BMOV AL,11111010B OUT DX,ALOUT DX,AL call clearcall clear MOV Al,geweiMOV Al,gewei MOV BX,OFFSET PROTC1MOV BX,OFFSET PROTC1 XLATXLAT MOV DX,0E2HMOV DX,0E2H OUT DX,ALOUT DX,AL MOV DX,0E1HMOV DX,0E1H MOV AL,11110110BMOV AL,11110110B OUT DX,ALOUT DX,AL

Page 20: 06 级轧钢 3 班 霍战鹏 06 级轧钢 3 班 霍战鹏 汽车玻璃粘片 5 4 3.

call clear DEC CX JNZ AGAIN1 JMP STARTclear proc mov dx,0e1h mov al,11111111b out dx,al retclear endp

PRINTNUM PROC PUSH AX PUSH CX PUSH BX MOV CX,AX SUB AX,AX SUB BX,BX

数码三位显示效果

Page 21: 06 级轧钢 3 班 霍战鹏 06 级轧钢 3 班 霍战鹏 汽车玻璃粘片 5 4 3.

COUNT: ADD AL,1H PUSH AX SUB AL,0AH JZ GOTEN POP AX JMP NEXTGOTEN: POP AX MOV AL,0H ADD AH,1H PUSH AX SUB AH,0AH JZ GOHUNDRED POP AX JMP NEXTGOHUNDRED:POP AX MOV AH,0H ADD BL,1H ; 百位进 1

Page 22: 06 级轧钢 3 班 霍战鹏 06 级轧钢 3 班 霍战鹏 汽车玻璃粘片 5 4 3.

NEXT:LOOP COUNT PUSH BX SUB BL,0H JZ PRINTTEN POP BX MOV DL,BL mov baiwei,dl ADD DL,30H PUSH AX MOV AH,02H INT 21H POP AX MOV DL,AH mov shiwei,DL ADD DL,30H PUSH AX MOV AH,02H INT 21H POP AX

排线的布局情况,中间为 8255A

Page 23: 06 级轧钢 3 班 霍战鹏 06 级轧钢 3 班 霍战鹏 汽车玻璃粘片 5 4 3.

MOV DL,ALMOV DL,AL mov gewei,DLmov gewei,DL ADD DL,30HADD DL,30H PUSH AXPUSH AX MOV AH,02HMOV AH,02H INT 21HINT 21H POP AXPOP AX JMP OVERJMP OVERPRINTTEN:PRINTTEN: POP BXPOP BX PUSH AXPUSH AX SUB AH,0H SUB AH,0H JZ PRINTCOUNTJZ PRINTCOUNT POP AXPOP AX MOV DL,AHMOV DL,AH mov shiwei,DLmov shiwei,DL ADD DL,30H ADD DL,30H PUSH AXPUSH AX

Page 24: 06 级轧钢 3 班 霍战鹏 06 级轧钢 3 班 霍战鹏 汽车玻璃粘片 5 4 3.

MOV AH,02H INT 21H POP AX MOV DL,AL mov gewei,DL ADD DL,30H MOV AH,02H INT 21H JMP OVERPRINTCOUNT:POP AX MOV DL,AL mov gewei,dl ADD DL,30H MOV AH,02H INT 21HOVER:POP BX POP CX POP AX RETPRINTNUM ENDP

Page 25: 06 级轧钢 3 班 霍战鹏 06 级轧钢 3 班 霍战鹏 汽车玻璃粘片 5 4 3.

pop dxpop dx pop cxpop cx pop bxpop bx pop axpop ax retretxianshi endpxianshi endp code endscode ends end startend start

Page 26: 06 级轧钢 3 班 霍战鹏 06 级轧钢 3 班 霍战鹏 汽车玻璃粘片 5 4 3.

以上为项目组部分人员:

Page 27: 06 级轧钢 3 班 霍战鹏 06 级轧钢 3 班 霍战鹏 汽车玻璃粘片 5 4 3.

更多视频资料剪辑:

Page 28: 06 级轧钢 3 班 霍战鹏 06 级轧钢 3 班 霍战鹏 汽车玻璃粘片 5 4 3.

The end

指导教师:史艳国作者:霍战鹏学院:机械工程学院助理:刘凯磊总策划:霍战鹏摄影:刘泉

欢迎大家批评指正!

霍 鹏战

Thank you for your watching!