📄 main.s
字号:
.module main.c
.area text
_main::
; /*-----------------------------------------------------*
; *工 程 名:Prgframe.prj *
; *硬件连接:PTA.1接指示灯 *
; *程序描述:指示灯PTA.1闪烁 *
; *目 的:第一个freescale(Motorola) HC08系列MCU程序框架*
; *说 明:提供Motorola MCU的编程框架，供教学入门使用 *
; *注 意:如果延时不够长的话，会发觉灯不会闪烁，而是一 *
; * 直亮，这是由于人的视觉的引起的。 *
; *--------《嵌入式应用技术基础教程》教学实例-----------*/
; /*[头文件]*/
; /*[???]*/
; #include "GP32C.h" //映像寄存器地址头文件
; /*[指示灯所接引脚定义]*/
; #define light_a PTA //灯(Light)接在PTA口
; #define light_ctrla DDRA //相应的方向寄存器
; #define light_b PTB
; #define light_ctrlb DDRB
; #define light_pin i //灯所在的引脚
; /*[全局变量声明]*/
; unsigned char i;
; int k,z;
; /*[延时子函数声明]*/
; void Delay1000(void);
; /*[主函数]*/
; void main()
; {
; light_ctrla=0xff;
lda #-1
sta 0x4
; light_ctrlb=0x00;
clr 0x5
jmp L3
L2:
; while(1)
; {
; //8个LED中只有一个灯亮，亮灯顺序是从左到右，再从右到左，一个周期时间长度约4秒。
; if((light_b&0x03)==0x00)
lda 0x1
bit #3
beq X17
jmp L5
X17:
; { for(i=0;i<8;i++)
clr *_i
bra L10
L7:
; {
; light_a=~(1<<light_pin);
mov #1,*__r0
lda *_i
and #7
beq X2
X1:
lsl *__r0
dbnza X1
X2:
lda *__r0
coma
sta 0
; for(k=0;k<512;k++) //延时0.25秒
clr *_k+1
clr *_k
L11:
jsr _Delay1000
tsx
L12:
ldhx *_k
aix #1
sthx *_k
ldhx *_k
cphx #512
tsx
blt L11
L8:
inc *_i
L10:
lda *_i
cmp #8
blo L7
; Delay1000();
; }
; light_a=0xff;
lda #-1
sta 0
; for(k=0;k<512;k++) //延时0.25秒
clr *_k+1
clr *_k
L15:
jsr _Delay1000
tsx
L16:
ldhx *_k
aix #1
sthx *_k
ldhx *_k
cphx #512
tsx
blt L15
; Delay1000();
; Delay1000();
jsr _Delay1000
tsx
; for(i=0;i<=8;i++)
clr *_i
bra L22
L19:
; {
; light_a=~(0x80>>light_pin);
lda *_i
mov #0,*__r2
mov #-128,*__r3
and #15
beq X4
X3:
asr *__r2
ror *__r3
dbnza X3
X4:
mov *__r2,*__r0
mov *__r3,*__r1
com *__r1
com *__r0
mov *__r1,0
; for(k=0;k<512;k++)
clr *_k+1
clr *_k
L23:
jsr _Delay1000
tsx
L24:
ldhx *_k
aix #1
sthx *_k
ldhx *_k
cphx #512
tsx
blt L23
L20:
inc *_i
L22:
lda *_i
cmp #8
bls L19
; Delay1000();
; }
; }
jmp L6
L5:
;
; //8个LED中只有两个灯亮，亮灯顺序是从左到右，再从右到左，一个周期时间长度约4秒。
; else if((light_b&0x03)==0x01)
lda 0x1
and #3
cmp #1
beq X18
jmp L27
X18:
; { for(i=0;i<8;i++)
clr *_i
bra L32
L29:
; {
; light_a=~(3<<light_pin);
mov #3,*__r0
lda *_i
and #7
beq X6
X5:
lsl *__r0
dbnza X5
X6:
lda *__r0
coma
sta 0
; for(k=0;k<512;k++) //延时0.25秒
clr *_k+1
clr *_k
L33:
jsr _Delay1000
tsx
L34:
ldhx *_k
aix #1
sthx *_k
ldhx *_k
cphx #512
tsx
blt L33
L30:
inc *_i
L32:
lda *_i
cmp #8
blo L29
; Delay1000();
; }
; light_a=0xff;
lda #-1
sta 0
; for(k=0;k<512;k++) //延时0.25秒
clr *_k+1
clr *_k
L37:
jsr _Delay1000
tsx
L38:
ldhx *_k
aix #1
sthx *_k
ldhx *_k
cphx #512
tsx
blt L37
; Delay1000();
; for(i=0;i<=8;i++)
clr *_i
bra L44
L41:
; {
; light_a=~(0xc0>>light_pin);
lda *_i
mov #0,*__r2
mov #-64,*__r3
and #15
beq X8
X7:
asr *__r2
ror *__r3
dbnza X7
X8:
mov *__r2,*__r0
mov *__r3,*__r1
com *__r1
com *__r0
mov *__r1,0
; for(k=0;k<512;k++)
clr *_k+1
clr *_k
L45:
jsr _Delay1000
tsx
L46:
ldhx *_k
aix #1
sthx *_k
ldhx *_k
cphx #512
tsx
blt L45
L42:
inc *_i
L44:
lda *_i
cmp #8
bls L41
; Delay1000();
; }
; }
jmp L28
L27:
; //8个LED中只有一个灯亮，亮灯顺序是从左到右，再从右到左，一个周期时间长度约8秒。
; else if((light_b&0x03)==0x02)
lda 0x1
and #3
cmp #2
beq X19
jmp L49
X19:
; { for(i=0;i<8;i++)
clr *_i
bra L54
L51:
; {
; light_a=~(1<<light_pin);
mov #1,*__r0
lda *_i
and #7
beq X10
X9:
lsl *__r0
dbnza X9
X10:
lda *__r0
coma
sta 0
; for(k=0;k<1024;k++) //延时0.5秒
clr *_k+1
clr *_k
L55:
jsr _Delay1000
tsx
L56:
ldhx *_k
aix #1
sthx *_k
ldhx *_k
cphx #1024
tsx
blt L55
L52:
inc *_i
L54:
lda *_i
cmp #8
blo L51
; Delay1000();
; }
; light_a=0xff;
lda #-1
sta 0
; for(k=0;k<1024;k++) //延时0.5秒
clr *_k+1
clr *_k
L59:
jsr _Delay1000
tsx
L60:
ldhx *_k
aix #1
sthx *_k
ldhx *_k
cphx #1024
tsx
blt L59
; Delay1000();
; for(i=0;i<=8;i++)
clr *_i
bra L66
L63:
; {
; light_a=~(0x80>>light_pin);
lda *_i
mov #0,*__r2
mov #-128,*__r3
and #15
beq X12
X11:
asr *__r2
ror *__r3
dbnza X11
X12:
mov *__r2,*__r0
mov *__r3,*__r1
com *__r1
com *__r0
mov *__r1,0
; for(k=0;k<1024;k++)
clr *_k+1
clr *_k
L67:
jsr _Delay1000
tsx
L68:
ldhx *_k
aix #1
sthx *_k
ldhx *_k
cphx #1024
tsx
blt L67
L64:
inc *_i
L66:
lda *_i
cmp #8
bls L63
; Delay1000();
; }
; }
jmp L50
L49:
; //8个LED中只有两个灯亮，亮灯顺序是从左到右，再从右到左，一个周期时间长度约8秒。
; else if((light_b&0x03)==0x03)
lda 0x1
and #3
cmp #3
beq X20
jmp L71
X20:
; { for(i=0;i<8;i++)
clr *_i
bra L76
L73:
; {
; light_a=~(3<<light_pin);
mov #3,*__r0
lda *_i
and #7
beq X14
X13:
lsl *__r0
dbnza X13
X14:
lda *__r0
coma
sta 0
; for(k=0;k<1024;k++) //延时0.5秒
clr *_k+1
clr *_k
L77:
jsr _Delay1000
tsx
L78:
ldhx *_k
aix #1
sthx *_k
ldhx *_k
cphx #1024
tsx
blt L77
L74:
inc *_i
L76:
lda *_i
cmp #8
blo L73
; Delay1000();
; }
; light_a=0xff;
lda #-1
sta 0
; for(k=0;k<1024;k++) //延时0.5秒
clr *_k+1
clr *_k
L81:
jsr _Delay1000
tsx
L82:
ldhx *_k
aix #1
sthx *_k
ldhx *_k
cphx #1024
tsx
blt L81
; Delay1000();
; Delay1000();
jsr _Delay1000
tsx
; for(i=0;i<=8;i++) //延时0.6秒
clr *_i
bra L88
L85:
; {
; light_a=~(0xc0>>light_pin);
lda *_i
mov #0,*__r2
mov #-64,*__r3
and #15
beq X16
X15:
asr *__r2
ror *__r3
dbnza X15
X16:
mov *__r2,*__r0
mov *__r3,*__r1
com *__r1
com *__r0
mov *__r1,0
; for(k=0;k<1024;k++)
clr *_k+1
clr *_k
L89:
jsr _Delay1000
tsx
L90:
ldhx *_k
aix #1
sthx *_k
ldhx *_k
cphx #1024
tsx
blt L89
L86:
inc *_i
L88:
lda *_i
cmp #8
bls L85
; Delay1000();
; }
; }
L71:
L50:
L28:
L6:
L3:
jmp L2
X0:
L1:
.dbline 0 ; func end
rts
; u -> 0,X
_Delay1000::
ais #-1
tsx
; //IF结束
; }
; //while 结束
;
; }
; //主函数结束
; /*[内部子程序存放处］
; /*Delay1000:延时1000个时钟周期-------------------------*
; *功 能:延时函数(约1000个时钟周期) *
; *参 数:无 *
; *返 回:无 *
; *-----------------------------------------------------*/
; void Delay1000(void)
; { unsigned char u;
clr ,X
bra L97
L94:
L95:
inc ,X
L97:
; for(u=0;u<=110;u++);
lda ,X
cmp #110
bls L94
L93:
ais #1
.dbline 0 ; func end
rts
.area bss
_z::
.blkb 2
_k::
.blkb 2
_i::
.blkb 1
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -