历史上的今天
返回首页

历史上的今天

今天是:2025年01月29日(星期三)

2018年01月29日 | EM78C156E+1621显示汇编例子

2018-01-29 来源:eefocus

 em78c156e+1621显示汇编例子

;XS1621 ,3.58,OUT 20001  /6/22

INDI    EQU     0X0
RTCC    EQU     0X1

PC      EQU     0X2
STATUS  EQU     0X3
FSR     EQU     0X4
PORT5   EQU     0X5
PORT6   EQU     0X6
STACK_A EQU     0X10
STACK_S EQU     0X11
XS1     EQU     0X12
XS2     EQU     0X13
XS3     EQU     0X15
XS4     EQU     0X16
XS5     EQU     0X17
XS6     EQU     0X18
XS7     EQU     0X19
XS8     EQU     0X1A
JP1     EQU     0X1B
JP2     EQU     0X1C
JP3     EQU     0X1D
JP4     EQU     0X1E
XS9     EQU     0X20
XS10    EQU     0X21
        ORG     0
        JMP     MAIN
        ORG     8
        MOV     STACK_A,A
        SWAP    STACK_A
        SWAPA   STATUS
        MOV     STACK_S,A
        CLR     0XF
        SWAPA   STACK_S
        MOV     STATUS,A
        SWAPA   STACK_A
        RETI
BIAO:
        ADD     0X2,A
        RETL    @0B11101110     ;0
        RETL    @0B01001000     ;1
        RETL    @0B10111010     ;2
        RETL    @0B11011010     ;3
        RETL    @0B01011100     ;4
        RETL    @0B11010110     ;5
        RETL    @0B11110110     ;6
        RETL    @0B01001010     ;7
        RETL    @0B11111110     ;8
        RETL    @0B01011110     ;9
        RETL    @0B00000000     ;A
XSZW:
        MOV     A,JP1
        CALL    BIAO
        MOV     XS3,A
        MOV     A,JP2
        CALL    BIAO
        MOV     XS4,A
        MOV     A,JP3
        CALL    BIAO
        MOV     XS5,A
        MOV     A,JP4
        CALL    BIAO
        MOV     XS6,A
        MOV     A,@7
        MOV     XS1,A
AWS:
        RLC     XS10
        RLC     XS9
        RLC     XS8
        RLC     XS7
        JBS     XS6,1
        JMP     ASD1
        BS      XS10,4
        JMP     ASG1
ASD1:
        BC      XS10,4
ASG1:
        RRC     XS6
        RLC     XS10
        RLC     XS9
        RLC     XS8
        RLC     XS7
        JBS     XS5,1
        JMP     ASD2
        BS      XS10,4
        JMP     ASG2
ASD2:
        BC      XS10,4
ASG2:
        RRC     XS5
        RLC     XS10
        RLC     XS9
        RLC     XS8
        RLC     XS7
        JBS     XS4,1
        JMP     ASD3
        BS      XS10,4
        JMP     ASG3
ASD3:
        BC      XS10,4
ASG3:
        RRC     XS4
        RLC     XS10
        RLC     XS9
        RLC     XS8
        RLC     XS7
        JBS     XS3,1
        JMP     ASD4
        BS      XS10,4
        JMP     ASG4
ASD4:
        BC      XS10,4
ASG4:
        RRC     XS3
        DJZ     XS1
        JMP     AWS
        RET
YSA:
        MOV     A,@2
        MOV     XS3,A
LOP1:
        NOP
        DJZ     XS3,A
        JMP     LOP1
        RET
XSS:                     ;HT1621 XS 8-BITS  COMMAND MODE
        BS      PORT5,1
        BC      PORT5,0    ;CS=0
        CALL    YSA
        BC      PORT5,1
        CALL    YSA
        BS      PORT5,1   ;DATA=1
        BC      PORT5,2
        BC      PORT5,1
        CALL    YSA
        BS      PORT5,1   ;DATA=0
        BC      PORT5,1
        CALL    YSA
        BS      PORT5,1  ;DATA=0
        MOV     A,@8
        MOV     XS1,A
XSC:
        JBS     XS2,7
        JMP     XSD
        BS      PORT5,2   ;DATA=1
        JMP     XSG
XSD:
        BC      PORT5,2    ;DATA=0
XSG:
        BC      PORT5,1
        CALL    YSA
        BS      PORT5,1
        RLC     XS2
        DJZ     XS1
        JMP     XSC
        BC      PORT5,1
        CALL    YSA
        BS      PORT5,1     ;DATA=?
        BS      PORT5,0    ;CS=1
        RET
XSA:            ;HT1621XS WRITE MODE
        MOV     A,@8
        MOV     XS1,A
WXC:
        JBS     XS2,7
        JMP     WXD
        BS      PORT5,2    ;DATA=1
        JMP     WXG
WXD:
        BC      PORT5,2    ;DATA=0
WXG:
        BC      PORT5,1
        CALL    YSA
        BS      PORT5,1
        RLC     XS2
        DJZ     XS1
        JMP     WXC
        RET
MAIN:   
        MOV     A,@0X0
        IOW     0X0E 
        MOV     A,@0B11000000
        CONTW
        CLR     0X0F
        MOV     A,@0X01
        IOW     0X0F
        ENI
        MOV     A,@0X10
        MOV     0X4,A
LOPKN:
        MOV     A,@0
        MOV     0X0,A
        JBS     0X4,6
        JMP     KOL
        JMP     KIL
KOL:
        NOP
        INC     0X4
        JMP     LOPKN
KIL:
        BS      0X4,6
        MOV     A,@0B11110000
        IOW     PORT5
        CLR     PORT5
        MOV     A,@0B11111111
        IOW     PORT6
        CLR     PORT6
        NOP
        MOV     A,@0x0F
        MOV     PORT5,A
        MOV     A,@8
        MOV     JP1,A
        MOV     A,@8
        MOV     JP2,A
        MOV     A,@0
        MOV     JP3,A
        MOV     A,@9
        MOV     JP4,A
        CALL    XSZW
        BC      PORT5,0   ;CS=0
        CALL    YSA
        BS      PORT5,0   ;CS=1
        CALL    YSA
        BC      PORT5,0   ;CS=0
        CALL    YSA
        BS      PORT5,0   ;CS=1
        CALL    YSA
        MOV     A,@0B11100011 ;COMMAND NORAML MODE
        MOV     XS2,A
        CALL    XSS
        MOV     A,@0B00011000   ;SYSTEM RC 256K
        MOV     XS2,A
        CALL    XSS
        MOV     A,@0B00101001   ;BIAS 1/3 4 COMMONS
        MOV     XS2,A
        CALL    XSS
        MOV     A,@0B00000001   ;SYS EN
        MOV     XS2,A
        CALL    XSS
        MOV     A,@0B00001001   ;TONE ON
        MOV     XS2,A
        CALL    XSS
        MOV     A,@0B01000000   ;WRITE
        MOV     XS2,A
        BC      PORT5,0         ;CS=0
        CALL    YSA
        BS      PORT5,2
        BC      PORT5,1
        CALL    YSA
        BS      PORT5,1         ;DATA=1
        CALL    XSA
        MOV     A,XS7     ;1
        MOV     XS2,A
        CALL    XSA
        MOV     A,XS8       ;2
        MOV     XS2,A
        CALL    XSA
        MOV     A,XS9     ;3
        MOV     XS2,A
        CALL    XSA
        MOV     A,XS10       ;4
        MOV     XS2,A
        CALL    XSA
        MOV     A,@0XFF        ;5
        MOV     XS2,A
        CALL    XSA
        BS      PORT5,0   ;CS=1
        MOV     A,@0B00000011   ;LCD ON
        MOV     XS2,A
        CALL    XSS
        NOP
KK:
        NOP
        NOP
        NOP
        NOP
        NOP
        JMP     KK
        EOP


 


推荐阅读

史海拾趣

Fairchild Imaging公司的发展小趣事

Fairchild Imaging公司的历史可以追溯到1950年成立的Fairchild Camera & Instrument Company。这家公司自创立以来,就凭借其创新的技术和优质的产品,在许多重大的政府、国防项目中发挥了关键作用。随着公司业务的不断拓展,Fairchild Camera & Instrument Company逐渐将业务重心转向半导体和集成电路领域,并在此领域取得了显著成就。最终,Fairchild Imaging从Fairchild Camera & Instrument Company中独立出来,专注于高端成像技术的研发和应用。

Accelink Technologies Co Ltd公司的发展小趣事

Fairchild Imaging非常重视与行业领先企业的合作。通过与这些企业的紧密合作,Fairchild Imaging能够不断吸收先进的技术和管理经验,提升自身的研发和生产能力。同时,这种合作也有助于Fairchild Imaging将其技术成果更快地推向市场,满足客户的多样化需求。

Discrete Semiconductor Industries公司的发展小趣事

“全球晶联”是Discrete Semiconductor Industries公司中一家注重国际化合作的代表。该公司积极与国际知名企业开展技术合作和市场拓展,通过引进先进的技术和管理经验,不断提升自身的竞争力。同时,全球晶联还积极开拓国际市场,参加各种国际展览和交流活动,加强与国际客户的沟通和合作。这种国际化合作的发展模式使得全球晶联在国际市场上取得了显著的成绩,成为了全球半导体行业的重要参与者之一。

展恒电子(Broadic)公司的发展小趣事

展恒电子始终坚持以品质为核心,严格把控产品质量。在与上海芯北电子科技有限公司的合作中,双方共同保证产品品质的一致性、兼容性和安全性。在合作期间,展恒电子成功向客户供应了数百万片芯片,并得到了客户的高度认可和信任。这种对品质的坚持和追求,使得展恒电子在电子行业中赢得了良好的声誉,也为公司的长期发展奠定了坚实的基础。

这五个故事从不同角度展示了展恒电子(Broadic)在电子行业中的发展历程和成就,体现了其在技术创新、市场拓展、品质保证等方面的实力和努力。通过不断努力和创新,展恒电子已经在电子行业中取得了显著的成果,并将继续为行业的发展贡献自己的力量。

ELM Technology Corporation公司的发展小趣事

ELM Technology Corporation一直将产品质量视为企业的生命线。公司建立了严格的质量管理体系,从原材料采购到产品生产的每一个环节都进行严格把控。这种对品质的坚持不仅赢得了客户的信任,还为ELM赢得了良好的口碑。在激烈的市场竞争中,ELM凭借卓越的产品品质赢得了市场份额。

GuangDong Province MengCo Semiconductor Co., Ltd公司的发展小趣事
对于变频器报警问题,应首先检查变频器本身的故障代码和状态指示灯,根据提示进行相应的故障排除和修复。

问答坊 | AI 解惑

4乘4键盘

4乘4键盘的程序和思想…

查看全部问答>

关于眼图测量(上) -Frankie

关于眼图测量(上) -Frankie…

查看全部问答>

为什么中文拼音无法输入?

我使用的工程是 sdk 自己带的 handlesip 程序, 安装了CHS sdk. 软件盘可以被调出来, 可是拼音按钮不可用(左下脚的拼字点击没有任何反映), 哪位大侠帮帮忙是什么原因! 跪谢了. 使用SHSipPreference(hWnd, SIP_UP);启动的软键盘.…

查看全部问答>

怎么降低CC1100的功耗

我现在用CC1100接收模块开发一个项目,用的单片机是MSP430F2274,但相应的电源板只能提供3mA的电流,我现在想用电磁波解决这个问题,想问哪个高手能给我些代码,非常感谢!…

查看全部问答>

evc和vs2005的兼容问题

我装上evc和开发板的sdk之后,vs2005就不能创建wince的工程了,不知道为什么,各位高手遇见过类似问题吗?…

查看全部问答>

vxWorks 6.2 中的浮点运算问题

CPU :AMCC-440EPx 操作系统 :VxWorks 6.2 开发环境 :WorkBench 2.4 当使用浮点运行时,结果不正确,在Config.h配置了以下内容: #undef INCLUDE_SW_FP #define INCLUDE_HW_FP #define INCLUDE_FLOATING_POINT AMCC-440EPx支持硬件浮点运 ...…

查看全部问答>

求教PID电机控制问题

本人在用DSP做电机控制时,使用PID算法进行位置环,速度环双闭环控制,出现如下问题: 1、单独使用PID位置环算法无问题,能够精确控制电机到指定位置 2、单独使用PID速度环算法无问题,能够精确控制电机到指定速度 3、但是当我将PID位置环和速度 ...…

查看全部问答>

interrupt[ADC_VECTOR]void ADC12(void)出错

#include \"msp430x14x.h\" void Init(void); interrupt [ADC_VECTOR]void ADC12(void); unsigned int Result;unsigned int Table[4][10] = { {0x040,0x0BC,0x138,0x1B4,0x230,0x2AC,0x328,0x3A4,0x420,0x49C},     &n ...…

查看全部问答>

I@R EW@RM 6501 破解

replyreload += \',\' + 1476714;破解为别人的,本人只是低调转发,不对任何错误负责 file:///C:\\DOCUME~1\\ADMINI~1\\LOCALS~1\\Temp\\TempPic\\MCUYE7)_}E]ASP$Z2]D2OL4.tmp 下载后感觉有用就帮顶下!! Timson,如果您要查看本帖隐藏内容请回 ...…

查看全部问答>