学生项目汇报4-微机原理大作业.ppt

微机原理大作业 班级： 机电一班 姓名： 崔胜杰 学号：060101010054 指导教师： 史艳国 项目一：某生产线生产汽车玻璃，需要在某工步中装配两个插片，装配插片时需要一种自动化装置，要采用三个定位点检测，两个粘接动作和一个计数装置记录每班生产件数。 接线图如下： 程序如下： stack segment stack db 1024 dup(0) stack ends data segment counted db 5 dup (0) ledtb db 3fh,06h, 5bh,4fh,66h,6dh,7dh,07h,7fh,6fh data ends code segment code assume ss:stack,ds:data,cs:code start:mov ax,data mov ds,ax mov dx,0e3h mov al out dx,al mov al out 0e1h,al prn:call read mov dx,0e0h in al,dx or al cmp al jnz prn out 0e1h,al call delay call countss cmp [counted+4],1 jz done jmp prn done: mov ax,4c00h int 21h read proc push ax push bx push dx push cx mov al out 0e1h,al mov al,[counted] mov bx,offset ledtb xlat out 0e2h,al mov al out 0e1h,al mov al out 0e1h,al mov al,[counted+1] mov bx,offset ledtb xlat out 0e2h,al mov al out 0e1h,al mov al out 0e1h,al mov al,[counted+2] mov bx,offset ledtb xlat out 0e2h,al mov al out 0e1h,al mov al out 0e1h,al mov al,[counted+3] xlat out 0e2h,al mov al out 0e1h,al mov al out 0e1h,al pop cx pop dx pop bx pop ax ret read endp countss proc push ax push bx push cx add [counted],1 cmp [counted],0AH jnz tuichu mov [counted],0 add [counted+1],1 cmp [counted+1],0ah jnz tuichu mov [counted+1],0 add [counted+2],1 cmp [counted+2],0ah jnz tuichu mov [counted+2],0  add [counted+3],1 cmp [counted+3],0ah jnz tuichu mov [counted+3],0 mov [counted+4],1 tuichu: pop cx pop bx pop ax ret