2569|1

66

帖子

0

TA的资源

一粒金砂(初级)

楼主
 

用汇编编写了一段程序,用到了8255和8253,怎么不能让机器动起来? [复制链接]

DATA1   SEGMENT
;       TABLE DB R(S*N) DUP (?)             ;S为选针器数=16,N为总针数=1024,R为转数=1,2,3...。
                                            ;R循环次数R(S*N)当R等于1时为花型图片的基本单元,R的最大数(不包括纵行外循环)要求能达到200。
        TABLE1
         DB 01H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,01H,00H,00H,00H,00H,00H,00H,00H,01H,01H,00H,00H,00H,00H,00H,00H,00H
         DB 00H,01H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,01H,00H,00H,00H,00H,00H,00H,00H,01H,00H,00H,01H,00H,00H,00H,00H,00H,00H
         DB 00H,00H,01H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,01H,00H,00H,00H,00H,00H,00H,00H,01H,00H,00H,00H,00H,01H,00H,00H,00H,00H,00H
         DB 00H,00H,00H,01H,00H,00H,00H,00H,00H,00H,00H,00H,01H,00H,00H,00H,00H,00H,00H,00H,01H,00H,00H,00H,00H,00H,00H,01H,00H,00H,00H,00H
         DB 00H,00H,00H,00H,01H,00H,00H,00H,00H,00H,00H,01H,00H,00H,00H,00H,00H,00H,00H,01H,00H,00H,00H,00H,00H,00H,00H,00H,01H,00H,00H,00H
         DB 00H,00H,00H,00H,00H,01H,00H,00H,00H,00H,01H,00H,00H,00H,00H,00H,00H,00H,01H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,01H,00H,00H
         DB 00H,00H,00H,00H,00H,00H,01H,00H,00H,01H,00H,00H,00H,00H,00H,00H,00H,01H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,01H,00H
         DB 00H,00H,00H,00H,00H,00H,00H,01H,01H,00H,00H,00H,00H,00H,00H,00H,01H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,00H,01H
DATA1   ENDS
STACK1  SEGMENT STACK 'STG'
        DW 256 DUP(?)                       ;是否可以,还是要通过其它方法实现?
STACK1  ENDS
CODE    SEGMENT
        ASSUME CS:CODE,DS:DATA1,SS:STACK1
BEG:    MOV AX,DATA1                        ;设置DS
        MOV DS,AX
        LEA DI,TABLE1                       ;表首址
        MOV BL,0                            ;初始列号,实际是16列
        MOV CX,16                           ;外循环计数初值,即转数
LOP1:   PUSH CX                             ;暂存外循环计数的初值,循环时CL=CL-1
        INC BL
        MOV AL,10000001B                    ;设置8255-1工作方式为0,A口输出,B口输出,C口输入
        MOV DX,303H                         ;8255-1控制字寄存器端口地址
        OUT DX,AL                           ;写入控制字寄存器
TEST1:  MOV DX,302H                         ;8255-1C口端口地址
        IN AL,DX                            ;读C口外设状态信息,即接近开关,PC0的状态信息是1/0
        TEST AL,01H                         ;测试8255-1C口状态CF=1数据准备就绪等待,CF=0转移到下一步,即开始内循环,对否?
        JC TEST1
        MOV AL,00H
        MOV DX,301H
        OUT DX,AL
        MOV BX,0                            ;初始行号
        MOV CX,1024
LOP2:   INC BX                              ;列号计数加1,即列地址从0开始进入第一个16列数据输出
        MOV AL,BL
        MUL BX
        MOV AL,00000101B                    ;设置8253计数器0,工作方式2(因初值不修正时能自动重复设定)读写低8位,二进制
        MOV DX,30FH                         ;8253控制字寄存器端口地址
        OUT DX,AL                           ;写入控制字到寄存器
        MOV AL,10                           ;设置计数初值,因不能是整数,如何修正,中间还应加一段程序?
        MOV DX,30FH
        OUT DX,AL                           ;写入计数器0的计数初值
        MOV AL,00H                          ;设置计数器0通道的计数值的锁存命令字
        MOV DX,30CH                         ;将锁存命令字写入寄存器,锁存命令字读一次后必须写一次,否则第二次就读不到计数值
        OUT DX,AL
TEST2:  IN AL,00H                           ;读计数器0的计数值
        TEST AL,00H                         ;测试计数值CF=0转移到下一步,CF=1等待,对否?
        JNC TEST2
        MOV DX,300H                         ;输出内存数据,是否应16个字存储单元,一个字存储单元对应一个选针器,
                                            ;内含选针器的地址和8个选针器中的一个选针1/0信息,16个选针器的8个选针点都是一一对应的。
                                            ;是否可将16个选针器的地址先设置好,这样就能发16个低8位的选针信息1/0就方便了
        OUT DX,AX                           ;将数据写入8255-1B口置PB0=0作为选针器的选通信号
        INC DI                              ;表数据+1
        LOOP LOP2                           ;内循环开始
        POP CX                              ;内循环计数器CX=CX+1
        LOOP LOP1                           ;外循环开始
        MOV AH,4CH                          ;返回DOS系统
        INT 21H
CODE    ENDS                                ;结束
        END BEG


想用电脑控制织布机,读入花型数据,这里就用00H,01H表示了。
硬件应该已经接好了,用厂家提供的程序可以运转。
8255上的指示灯怎么都不亮,没有数据?

最新回复

ENG
8255比较麻烦的唉~~最怕调这玩意了~~  详情 回复 发表于 2007-3-6 12:32
点赞 关注

回复
举报

60

帖子

0

TA的资源

一粒金砂(初级)

沙发
 
8255比较麻烦的唉~~最怕调这玩意了~~
 
 

回复
您需要登录后才可以回帖 登录 | 注册

随便看看
查找数据手册?

EEWorld Datasheet 技术支持

相关文章 更多>>
关闭
站长推荐上一条 1/10 下一条

 
EEWorld订阅号

 
EEWorld服务号

 
汽车开发圈

About Us 关于我们 客户服务 联系方式 器件索引 网站地图 最新更新 手机版

站点相关: 国产芯 安防电子 汽车电子 手机便携 工业控制 家用电子 医疗电子 测试测量 网络通信 物联网

北京市海淀区中关村大街18号B座15层1530室 电话:(010)82350740 邮编:100190

电子工程世界版权所有 京B2-20211791 京ICP备10001474号-1 电信业务审批[2006]字第258号函 京公网安备 11010802033920号 Copyright © 2005-2024 EEWORLD.com.cn, Inc. All rights reserved
快速回复 返回顶部 返回列表