草庐IT

实验六：并行口8255的使用—LED静态显示

Einstein·Jun 2023-10-29 原文

目录

一、实验目的

熟悉使用8255并行口扩展芯片
熟悉使用发光二极管及数码管等常见的外围设备
理解静态显示的方法

二、实验内容

使用数码管静态显示的方法，使最右边的数码管循环显示0-9的数值。

硬件连接：
选通端：PC0-S0

段码端：PA0-a、PA1-b、PA2-c、PA3-d、PA4-e、PA5-f、PA6-g、PA7-dp

8255的CS：接288H

已知：
1、8255的端口地址：
          A口为 288H、C口为28AH、控制口为28BH，
放在数据段定义
              C8255 equ 28ah
              K8255 equ 28bh
              A8255 equ 288h

2、实验台上的七段数码管为共阴型，本应在公共端S0加低电平点亮，但是内部做了反向处理，所以输入端S0为1才选中最右边的数码管显示，位码输入端（段码端）高电平点亮。所以，可以求得0-9的段码可如下定义为（段码也应写在数据段的定义中）：
    LED db 3fh,06h,5bh,4fh,66h,6dh,7dh,07h,7fh,6fh

3、8255的设置：注意设置A、C口都为输出。

4、延时程序：
            mov cx,60000
            delay: loop delay ;延时
   如果延时时间不够，可以多次使用。

三、实验报告

①写出该程序中8255的控制字中每一位设置的意义。
D6、D5基本输入输出方式 （方式0）
D4:A口是输出的，所以是0
D3:C口也是输出的，所以是0
D2、D1：B口没有用，都是0
D0：C口的第四位也是输出的，所以是0

D7 D6 D5 D4 D3 D2 D1 D0
1 0 0 0 0 0 0 0

即（80H）

②写出程序代码并加上注释。

data segment
    C8255        equ 	28ah
	K8255        equ 	28bh
	A8255        equ 	288h    
	LED db 3fh,06h,5bh,4fh,66h,6dh,7dh,07h,7fh,6fh
ends

stacks segment
    dw   128  dup(0)
ends

code segment 
    ASSUME CS:CODE,DS:DATA,SS:stacks
start:
	mov ax, data
      mov ds, ax

	MOV	DX,K8255	;控制口的端口地址
	MOV AL,80H	;AL是命令字
	OUT	DX,AL	;把80H控制字送入8255的控制口，让它的A口和C口都属于输出形式

	MOV AL,0FH;低四位都是1，高四位都是0----那些数码管会点亮？
	MOV DX,C8255
	OUT DX,AL;把AL中的内容out到DX端口去

	
	;取段码
N1:MOV BX,OFFSET	LED
   MOV SI,10
   loop delay
N2:MOV	AL,[BX]
	
	MOV	DX,A8255;通过A口送出去
	OUT DX,AL;这样我们就可以在整个LED上显示0这个数字
	INC BX
	SUB SI,1
	CMP SI,0
	JE N1
	mov cx,0  
delay:  loop delay                  ;延时
	mov di,0 
delays:  loop delays                  ;延时
	JMP  N2
ends

end start

最右边单个数码管显示
只需要将上述的0FH改为01H
并在此基础上连接上PC2—S2，PC3—S3


另一份代码，此代码正确，已经验证

data segment
    C8255        equ 	28ah
	K8255        equ 	28bh
	A8255        equ 	288h    
	LED db 3fh,06h,5bh,4fh,66h,6dh,7dh,07h,7fh,6fh
ends

stack segment
    dw   128  dup(0)
ends

code segment 
    ASSUME CS:CODE,DS:DATA,SS:stack
  	start:
  			mov al,80H
  			mov	dx,K8255 
  			out dx,al
  	n2:
  			mov	bx,offset LED
  			mov si,10
  			mov	ax,data
  			mov	ds,ax
  	n1:		
  			mov	al,[bx]
  			mov	dx,A8255 
  			out dx,al
			
			mov cx,60000
	delay:	loop delay
			mov	al,01h
			mov dx,C8255
			out dx,al
	
			inc bx
			dec si
			jz n2
			jmp n1
	ends
	end start

四、程序流程图

五、实验结果显示

  




mdash8255spanclasstokenfpga开发

有关实验六：并行口8255的使用—LED静态显示的更多相关文章

  1. ruby - 如何使用 Nokogiri 的 xpath 和 at_xpath 方法 - 2

    我正在学习如何使用Nokogiri，根据这段代码我遇到了一些问题:require'rubygems'require'mechanize'post_agent=WWW::Mechanize.newpost_page=post_agent.get('http://www.vbulletin.org/forum/showthread.php?t=230708')puts"\nabsolutepathwithtbodygivesnil"putspost_page.parser.xpath('/html/body/div/div/div/div/div/table/tbody/tr/td/div

  2. ruby - 使用 RubyZip 生成 ZIP 文件时设置压缩级别 - 2

    我有一个Ruby程序，它使用rubyzip压缩XML文件的目录树。gem。我的问题是文件开始变得很重，我想提高压缩级别，因为压缩时间不是问题。我在rubyzipdocumentation中找不到一种为创建的ZIP文件指定压缩级别的方法。有人知道如何更改此设置吗？是否有另一个允许指定压缩级别的Ruby库？ 最佳答案 这是我通过查看ruby​​zip内部创建的代码。level=Zlib::BEST_COMPRESSIONZip::ZipOutputStream.open(zip_file)do|zip|Dir.glob("**/*")d

  3. ruby - 为什么我可以在 Ruby 中使用 Object#send 访问私有(private)/ protected 方法？ - 2

    类classAprivatedeffooputs:fooendpublicdefbarputs:barendprivatedefzimputs:zimendprotecteddefdibputs:dibendendA的实例a=A.new测试a.foorescueputs:faila.barrescueputs:faila.zimrescueputs:faila.dibrescueputs:faila.gazrescueputs:fail测试输出failbarfailfailfail.发送测试[:foo,:bar,:zim,:dib,:gaz].each{|m|a.send(m)resc

  4. ruby-on-rails - 使用 Ruby on Rails 进行自动化测试 - 最佳实践 - 2

    很好奇，就使用ruby​​onrails自动化单元测试而言，你们正在做什么？您是否创建了一个脚本来在cron中运行rake作业并将结果邮寄给您？git中的预提交Hook？只是手动调用？我完全理解测试，但想知道在错误发生之前捕获错误的最佳实践是什么。让我们理所当然地认为测试本身是完美无缺的，并且可以正常工作。下一步是什么以确保他们在正确的时间将可能有害的结果传达给您？ 最佳答案 不确定您到底想听什么，但是有几个级别的自动代码库控制:在处理某项功能时，您可以使用类似autotest的内容获得关于哪些有效，哪些无效的即时反馈。要确保您的提

  5. ruby - 在 Ruby 中使用匿名模块 - 2

    假设我做了一个模块如下:m=Module.newdoclassCendend三个问题:除了对m的引用之外，还有什么方法可以访问C和m中的其他内容？我可以在创建匿名模块后为其命名吗(就像我输入“module...”一样)？如何在使用完匿名模块后将其删除，使其定义的常量不再存在？ 最佳答案 三个答案:是的，使用ObjectSpace.此代码使c引用你的类(class)C不引用m:c=nilObjectSpace.each_object{|obj|c=objif(Class===objandobj.name=~/::C$/)}当然这取决于

  6. ruby - 使用 ruby​​ 和 savon 的 SOAP 服务 - 2

    我正在尝试使用ruby​​和Savon来使用网络服务。测试服务为http://www.webservicex.net/WS/WSDetails.aspx?WSID=9&CATID=2require'rubygems'require'savon'client=Savon::Client.new"http://www.webservicex.net/stockquote.asmx?WSDL"client.get_quotedo|soap|soap.body={:symbol=>"AAPL"}end返回SOAP异常。检查soap信封，在我看来soap请求没有正确的命名空间。任何人都可以建议我

  7. python - 如何使用 Ruby 或 Python 创建一系列高音调和低音调的蜂鸣声？ - 2

    关闭。这个问题是opinion-based.它目前不接受答案。想要改进这个问题？更新问题，以便editingthispost可以用事实和引用来回答它.关闭4年前。Improvethisquestion我想在固定时间创建一系列低音和高音调的哔哔声。例如:在150毫秒时发出高音调的蜂鸣声在151毫秒时发出低音调的蜂鸣声200毫秒时发出低音调的蜂鸣声250毫秒的高音调蜂鸣声有没有办法在Ruby或Python中做到这一点？我真的不在乎输出编码是什么(.wav、.mp3、.ogg等等)，但我确实想创建一个输出文件。

  8. ruby-on-rails - 'compass watch' 是如何工作的/它是如何与 rails 一起使用的 - 2

    我在我的项目目录中完成了compasscreate.和compassinitrails。几个问题:我已将我的.sass文件放在public/stylesheets中。这是放置它们的正确位置吗？当我运行compasswatch时，它不会自动编译这些.sass文件。我必须手动指定文件:compasswatchpublic/stylesheets/myfile.sass等。如何让它自动运行？文件ie.css、print.css和screen.css已放在stylesheets/compiled。如何在编译后不让它们重新出现的情况下删除它们？我自己编译的.sass文件编译成compiled/t

  9. ruby - 使用 ruby​​ 将 HTML 转换为纯文本并维护结构/格式 - 2

    我想将html转换为纯文本。不过，我不想只删除标签，我想智能地保留尽可能多的格式。为插入换行符标签，检测段落并格式化它们等。输入非常简单，通常是格式良好的html(不是整个文档，只是一堆内容，通常没有anchor或图像)。我可以将几个正则表达式放在一起，让我达到80%，但我认为可能有一些现有的解决方案更智能。 最佳答案 首先，不要尝试为此使用正则表达式。很有可能你会想出一个脆弱/脆弱的解决方案，它会随着HTML的变化而崩溃，或者很难管理和维护。您可以使用Nokogiri快速解析HTML并提取文本:require'nokogiri'h

  10. ruby-on-rails - Rails 编辑表单不显示嵌套项 - 2

    我得到了一个包含嵌套链接的表单。编辑时链接字段为空的问题。这是我的表格:Editingkategori{:action=>'update',:id=>@konkurrancer.id})do|f|%>'Trackingurl',:style=>'width:500;'%>'Editkonkurrence'%>|我的konkurrencer模型:has_one:link我的链接模型:classLink我的konkurrancer编辑操作:defedit@konkurrancer=Konkurrancer.find(params[:id])@konkurrancer.link_attrib

随机推荐