历史上的今天
今天是: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
史海拾趣
|
我使用的工程是 sdk 自己带的 handlesip 程序, 安装了CHS sdk. 软件盘可以被调出来, 可是拼音按钮不可用(左下脚的拼字点击没有任何反映), 哪位大侠帮帮忙是什么原因! 跪谢了. 使用SHSipPreference(hWnd, SIP_UP);启动的软键盘.… 查看全部问答> |
|
我现在用CC1100接收模块开发一个项目,用的单片机是MSP430F2274,但相应的电源板只能提供3mA的电流,我现在想用电磁波解决这个问题,想问哪个高手能给我些代码,非常感谢!… 查看全部问答> |
|
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支持硬件浮点运 ...… 查看全部问答> |
|
本人在用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 ...… 查看全部问答> |
|
replyreload += \',\' + 1476714;破解为别人的,本人只是低调转发,不对任何错误负责 file:///C:\\DOCUME~1\\ADMINI~1\\LOCALS~1\\Temp\\TempPic\\MCUYE7)_}E]ASP$Z2]D2OL4.tmp 下载后感觉有用就帮顶下!! Timson,如果您要查看本帖隐藏内容请回 ...… 查看全部问答> |




