main.asm

凌阳61单片机实现的多功能电子琴源程序代码

	.dw 0
	.dw 0
	.dw 0
.debug
	.dw '.stabs "tea:G43=ar1;0;7;11",32,0,0,',0,0,offset _tea,seg _tea,0x0d,0x0a
.CODE
.public _zero
.iram
_zero:
	.dw 0
	.dw 0
	.dw 124
	.dw 68
	.dw 124
	.dw 0
	.dw 0
	.dw 0
.debug
	.dw '.stabs "zero:G44=ar1;0;7;11",32,0,0,',0,0,offset _zero,seg _zero,0x0d,0x0a
.CODE
.public _lsew
.iram
_lsew:
	.dw 0
	.dw 0
	.dw 92
	.dw 212
	.dw 116
	.dw 0
	.dw 0
	.dw 0
.debug
	.dw '.stabs "lsew:G45=ar1;0;7;11",32,0,0,',0,0,offset _lsew,seg _lsew,0x0d,0x0a
.CODE
.public _lla
.iram
_lla:
	.dw 0
	.dw 0
	.dw 124
	.dw 212
	.dw 116
	.dw 0
	.dw 0
	.dw 0
.debug
	.dw '.stabs "lla:G46=ar1;0;7;11",32,0,0,',0,0,offset _lla,seg _lla,0x0d,0x0a
.CODE
.public _ltea
.iram
_ltea:
	.dw 0
	.dw 0
	.dw 4
	.dw 132
	.dw 124
	.dw 0
	.dw 0
	.dw 0
.debug
	.dw '.stabs "ltea:G47=ar1;0;7;11",32,0,0,',0,0,offset _ltea,seg _ltea,0x0d,0x0a
.CODE
.public _hdoe
.iram
_hdoe:
	.dw 0
	.dw 0
	.dw 0
	.dw 125
	.dw 0
	.dw 0
	.dw 0
	.dw 0
.debug
	.dw '.stabs "hdoe:G48=ar1;0;7;11",32,0,0,',0,0,offset _hdoe,seg _hdoe,0x0d,0x0a
.CODE
.public _null
.iram
_null:
	.dw 0
	.dw 0
	.dw 0
	.dw 0
	.dw 0
	.dw 0
	.dw 0
	.dw 0
.debug
	.dw '.stabs "null:G49=ar1;0;7;11",32,0,0,',0,0,offset _null,seg _null,0x0d,0x0a
.CODE
.public _song0
.iram
_song0:
	.dw 1
	.dw 1
	.dw 5
	.dw 5
	.dw 6
	.dw 6
	.dw 5
	.dw 0
	.dw 4
	.dw 4
	.dw 3
	.dw 3
	.dw 2
	.dw 2
	.dw 1
	.dw 0
	.dw 5
	.dw 5
	.dw 4
	.dw 4
	.dw 3
	.dw 3
	.dw 2
	.dw 0
	.dw 5
	.dw 5
	.dw 4
	.dw 4
	.dw 3
	.dw 3
	.dw 2
	.dw 100
.debug
	.dw '.stabs "song0:G50=ar1;0;31;4",32,0,0,',0,0,offset _song0,seg _song0,0x0d,0x0a
.CODE
.public _song1
.iram
_song1:
	.dw 1
	.dw 1
	.dw 1
	.dw -5
	.dw 0
	.dw 3
	.dw 3
	.dw 3
	.dw 1
	.dw 0
	.dw 1
	.dw 3
	.dw 5
	.dw 5
	.dw 0
	.dw 4
	.dw 3
	.dw 2
	.dw 0
	.dw 2
	.dw 3
	.dw 4
	.dw 4
	.dw 0
	.dw 3
	.dw 2
	.dw 3
	.dw 1
	.dw 0
	.dw 1
	.dw 3
	.dw 2
	.dw -5
	.dw 0
	.dw -7
	.dw 2
	.dw 1
	.dw 100
.debug
	.dw '.stabs "song1:G51=ar1;0;37;4",32,0,0,',0,0,offset _song1,seg _song1,0x0d,0x0a
.CODE
.public _song2
.iram
_song2:
	.dw 1
	.dw 2
	.dw 3
	.dw 1
	.dw 5
	.dw 0
	.dw 6
	.dw 6
	.dw 8
	.dw 6
	.dw 5
	.dw 0
	.dw 6
	.dw 6
	.dw 8
	.dw 0
	.dw 5
	.dw 6
	.dw 3
	.dw 0
	.dw 6
	.dw 5
	.dw 3
	.dw 5
	.dw 3
	.dw 1
	.dw 2
	.dw 3
	.dw 1
	.dw 100
.debug
	.dw '.stabs "song2:G52=ar1;0;29;4",32,0,0,',0,0,offset _song2,seg _song2,0x0d,0x0a
.CODE
.public _song3
.iram
_song3:
	.dw 5
	.dw 3
	.dw 5
	.dw 3
	.dw 5
	.dw 3
	.dw 1
	.dw 0
	.dw 2
	.dw 4
	.dw 3
	.dw 2
	.dw 5
	.dw 5
	.dw 0
	.dw 5
	.dw 3
	.dw 5
	.dw 3
	.dw 5
	.dw 3
	.dw 1
	.dw 0
	.dw 2
	.dw 4
	.dw 3
	.dw 2
	.dw 1
	.dw 1
	.dw 0
	.dw 2
	.dw 2
	.dw 4
	.dw 4
	.dw 3
	.dw 1
	.dw 5
	.dw 0
	.dw 2
	.dw 4
	.dw 3
	.dw 2
	.dw 5
	.dw 5
	.dw 0
	.dw 5
	.dw 3
	.dw 5
	.dw 3
	.dw 5
	.dw 3
	.dw 1
	.dw 1
	.dw 0
	.dw 2
	.dw 4
	.dw 3
	.dw 2
	.dw 1
	.dw 1
	.dw 100
.debug
	.dw '.stabs "song3:G53=ar1;0;60;4",32,0,0,',0,0,offset _song3,seg _song3,0x0d,0x0a
.CODE
.public _song4
.iram
_song4:
	.dw 5
	.dw 5
	.dw 6
	.dw 4
	.dw 0
	.dw 1
	.dw 1
	.dw 5
	.dw 4
	.dw 5
	.dw 6
	.dw 4
	.dw 0
	.dw 6
	.dw 7
	.dw 6
	.dw 4
	.dw 5
	.dw 5
	.dw 0
	.dw 6
	.dw 7
	.dw 6
	.dw 4
	.dw 5
	.dw 5
	.dw 1
	.dw 0
	.dw 5
	.dw 5
	.dw 6
	.dw 4
	.dw 0
	.dw 1
	.dw 1
	.dw 5
	.dw 4
	.dw 5
	.dw 6
	.dw 4
	.dw 0
	.dw 5
	.dw 7
	.dw 5
	.dw 4
	.dw 5
	.dw 5
	.dw 0
	.dw 6
	.dw 7
	.dw 6
	.dw 7
	.dw 1
	.dw 1
	.dw 0
	.dw 1
	.dw 2
	.dw 4
	.dw 0
	.dw 4
	.dw 5
	.dw 6
	.dw 0
	.dw 1
	.dw 2
	.dw 3
	.dw 2
	.dw 1
	.dw 6
	.dw 0
	.dw 5
	.dw 6
	.dw 1
	.dw 6
	.dw 0
	.dw 6
	.dw 5
	.dw 6
	.dw 5
	.dw 4
	.dw 4
	.dw 2
	.dw 2
	.dw 100
.debug
	.dw '.stabs "song4:G54=ar1;0;83;4",32,0,0,',0,0,offset _song4,seg _song4,0x0d,0x0a
.CODE
.public _mode
.iram
_mode:
	.dw 0
.debug
	.dw '.stabs "mode:G4",32,0,0,',0,0,offset _mode,seg _mode,0x0d,0x0a
.CODE
.public _page
.iram
_page:
	.dw 0
.debug
	.dw '.stabs "page:G1",32,0,0,',0,0,offset _page,seg _page,0x0d,0x0a
.CODE
.public _colume
.iram
_colume:
	.dw 0
.debug
	.dw '.stabs "colume:G1",32,0,0,',0,0,offset _colume,seg _colume,0x0d,0x0a
.CODE
.public _n
.iram
_n:
	.dw 0
.debug
	.dw '.stabs "n:G1",32,0,0,',0,0,offset _n,seg _n,0x0d,0x0a
.CODE
.debug
	.dw '.stabs "song:G55=ar1;0;95;1",32,0,0,',0,0,offset _song,seg _song,0x0d,0x0a
.CODE
.public _k
.iram
_k:
	.dw -1
.debug
	.dw '.stabs "k:G1",32,0,0,',0,0,offset _k,seg _k,0x0d,0x0a
.CODE
.code
.debug
	.dw '.stabs "main:F1",36,0,0,',0,0,offset _main,seg _main,0x0d,0x0a
.CODE
.public _main
_main:	.proc
.debug
	.dw '.stabn 0x44,0,26,',0,0
	.dd LM1-_main
	.dw 0x0d,0x0a
.code
LM1:
	// total=5, vars=5
	// frame_pointer_needed: 1
	push bp to [sp]
	sp-=5
	bp=sp+1

	R1=BP+8
	[bp+4]=R1	// QImode move
.debug
	.dw '.stabn 0x44,0,27,',0,0
	.dd LM2-_main
	.dw 0x0d,0x0a
.code
LM2:
LBB2:
	R1=19	// QImode move
	[28691]=R1	// QImode move
.debug
	.dw '.stabn 0x44,0,28,',0,0
	.dd LM3-_main
	.dw 0x0d,0x0a
.code
LM3:
	R1=(-1)	// QImode move
	[28679]=R1	// QImode move
.debug
	.dw '.stabn 0x44,0,29,',0,0
	.dd LM4-_main
	.dw 0x0d,0x0a
.code
LM4:
	R1=(-1)	// QImode move
	[28680]=R1	// QImode move
.debug
	.dw '.stabn 0x44,0,30,',0,0
	.dd LM5-_main
	.dw 0x0d,0x0a
.code
LM5:
	R1=255	// QImode move
	[28677]=R1	// QImode move
.debug
	.dw '.stabn 0x44,0,31,',0,0
	.dd LM6-_main
	.dw 0x0d,0x0a
.code
LM6:
	R1=(-256)	// QImode move
	[28674]=R1	// QImode move
.debug
	.dw '.stabn 0x44,0,32,',0,0
	.dd LM7-_main
	.dw 0x0d,0x0a
.code
LM7:
	R1=(-256)	// QImode move
	[28675]=R1	// QImode move
.debug
	.dw '.stabn 0x44,0,33,',0,0
	.dd LM8-_main
	.dw 0x0d,0x0a
.code
LM8:
	R1=255	// QImode move
	[28672]=R1	// QImode move
.debug
	.dw '.stabn 0x44,0,34,',0,0
	.dd LM9-_main
	.dw 0x0d,0x0a
.code
LM9:
	call _lcd_initial	// call without return value
.debug
	.dw '.stabn 0x44,0,35,',0,0
	.dd LM10-_main
	.dw 0x0d,0x0a
.code
LM10:
	call _Key_Init	// call without return value
.debug
	.dw '.stabn 0x44,0,36,',0,0
	.dd LM11-_main
	.dw 0x0d,0x0a
.code
LM11:
	call _Initial_INT	// call without return value
.debug
	.dw '.stabn 0x44,0,39,',0,0
	.dd LM12-_main
	.dw 0x0d,0x0a
.code
LM12:
	R1=500	// QImode move
	[SP--]=R1	// QImode move
	call _delay_nms	// call without return value
	SP = SP + 1	//SP
.debug
	.dw '.stabn 0x44,0,40,',0,0
	.dd LM13-_main
	.dw 0x0d,0x0a
.code
LM13:
	call _Clear_S	// call without return value
.debug
	.dw '.stabn 0x44,0,41,',0,0
	.dd LM14-_main
	.dw 0x0d,0x0a
.code
LM14:
	call _display_mode_0	// call without return value
.debug
	.dw '.stabn 0x44,0,42,',0,0
	.dd LM15-_main
	.dw 0x0d,0x0a
.code
LM15:
	R1=129	// QImode move
	[SP--]=R1	// QImode move
	call _speak	// call without return value
	SP = SP + 1	//SP
.debug
	.dw '.stabn 0x44,0,43,',0,0
	.dd LM16-_main
	.dw 0x0d,0x0a
.code
LM16:
L3:
	pc=L5	// Indirect jump
	pc=L4	// Indirect jump
L5:
.debug
	.dw '.stabn 0x44,0,45,',0,0
	.dd LM17-_main
	.dw 0x0d,0x0a
.code
LM17:
LBB3:
	R1=0	// QImode move
	[BP]=R1	// QImode move
.debug
	.dw '.stabn 0x44,0,46,',0,0
	.dd LM18-_main
	.dw 0x0d,0x0a
.code
LM18:
	R1=BP	// QImode move
	R2=BP+1
	R1=0	// QImode move
	R3=R2	// QImode move
	[R3]=R1	// QImode move
.debug
	.dw '.stabn 0x44,0,47,',0,0
	.dd LM19-_main
	.dw 0x0d,0x0a
.code
LM19:
	R1=BP	// QImode move
	R2=BP+2
	R1=0	// QImode move
	R3=R2	// QImode move
	[R3]=R1	// QImode move
.debug
	.dw '.stabn 0x44,0,48,',0,0
	.dd LM20-_main
	.dw 0x0d,0x0a
.code
LM20:
	R1=BP	// QImode move
	R2=BP+3
	R1=_null	// QImode move
	R3=R2	// QImode move
	[R3]=R1	// QImode move
.debug
	.dw '.stabn 0x44,0,49,',0,0
	.dd LM21-_main
	.dw 0x0d,0x0a
.code
LM21:
	R2=[_mode]	// QImode move
	R1=R2	// QImode move
	CMP R1,3	// QImode compare
	NSJA L6	//QImode GTU
	R2=L87	// QImode move
	R1 = R1 + R2	//addqi3
	R2=R1	// QImode move
	R1=[R2]	// QImode move
	pc=R1	// tablejump
.text
L87:
	.dw L7
	.dw L25
	.dw L43
	.dw L61
.code
L7:
.debug
	.dw '.stabn 0x44,0,53,',0,0
	.dd LM22-_main
	.dw 0x0d,0x0a
.code
LM22:
L8:
	pc=L10	// Indirect jump
	pc=L9	// Indirect jump
L10:
.debug
	.dw '.stabn 0x44,0,55,',0,0
	.dd LM23-_main
	.dw 0x0d,0x0a
.code
LM23:
	R1=1	// QImode move
	[28690]=R1	// QImode move
.debug
	.dw '.stabn 0x44,0,56,',0,0
	.dd LM24-_main
	.dw 0x0d,0x0a
.code
LM24:
L11:
	call _Key_Get	// call with return value
	[BP]=R1	// QImode move
	R1=1	// QImode move
	[28690]=R1	// QImode move
L13:
.debug
	.dw '.stabn 0x44,0,57,',0,0
	.dd LM25-_main
	.dw 0x0d,0x0a
.code
LM25:
	R1=[BP]	// QImode move
	CMP R1,0	// QImode test
	NSJZ L14	//QImode EQ
	pc=L12	// Indirect jump
L14:
	pc=L11	// Indirect jump
L12:
.debug
	.dw '.stabn 0x44,0,58,',0,0
	.dd LM26-_main
	.dw 0x0d,0x0a
.code
LM26:
	R1=[BP]	// QImode move
	CMP R1,33	// QImode compare
	NSJZ L17	//QImode EQ
	CMP R1,33	// QImode compare
	NSJA L21	//QImode GTU
	CMP R1,17	// QImode compare
	NSJZ L18	//QImode EQ
	pc=L19	// Indirect jump
L21:
	CMP R1,65	// QImode compare
	NSJZ L16	//QImode EQ
	pc=L19	// Indirect jump
.debug
	.dw '.stabn 0x44,0,60,',0,0
	.dd LM27-_main
	.dw 0x0d,0x0a
.code
LM27:
L16:
	R1=1	// QImode move
	[_mode]=R1	// QImode move
	call _Clear_S	// call without return value
	call _display_mode_1	// call without return value
	R1=65	// QImode move
	[SP--]=R1	// QImode move
	call _speak	// call without return value
	SP = SP + 1	//SP
	pc=L15	// Indirect jump
L17:
.debug
	.dw '.stabn 0x44,0,61,',0,0
	.dd LM28-_main
	.dw 0x0d,0x0a
.code
LM28:
	R1=2	// QImode move
	[_mode]=R1	// QImode move
	call _Clear_S	// call without return value
	call _display_mode_2	// call without return value
	R1=33	// QImode move
	[SP--]=R1	// QImode move
	call _speak	// call without return value
	SP = SP + 1	//SP
	pc=L15	// Indirect jump
L18:
.debug
	.dw '.stabn 0x44,0,62,',0,0
	.dd LM29-_main
	.dw 0x0d,0x0a
.code
LM29:
	R1=3	// QImode move
	[_mode]=R1	// QImode move
	call _Clear_S	// call without return value
	call _display_mode_3	// call without return value
	R1=17	// QImode move
	[SP--]=R1	// QImode move
	call _speak	// call without return value
	SP = SP + 1	//SP
	pc=L15	// Indirect jump
L19:
.debug
	.dw '.stabn 0x44,0,63,',0,0
	.dd LM30-_main
	.dw 0x0d,0x0a
.code
LM30:
	pc=L15	// Indirect jump
L15:
.debug
	.dw '.stabn 0x44,0,65,',0,0
	.dd LM31-_main
	.dw 0x0d,0x0a
.code
LM31:
	R1=[BP]	// QImode move
	CMP R1,65	// QImode compare
	NSJZ L23	//QImode EQ
	R1=[BP]	// QImode move
	CMP R1,33	// QImode compare
	NSJZ L23	//QImode EQ
	R1=[BP]	// QImode move
	CMP R1,17	// QImode compare
	NSJZ L23	//QImode EQ
	pc=L22	// Indirect jump
L23:
.debug
	.dw '.stabn 0x44,0,67,',0,0
	.dd LM32-_main
	.dw 0x0d,0x0a
.code
LM32:
	R1=0	// QImode move
	[BP]=R1	// QImode move
	pc=L9	// Indirect jump
.debug
	.dw '.stabn 0x44,0,68,',0,0
	.dd LM33-_main
	.dw 0x0d,0x0a
.code
LM33:
	pc=L24	// Indirect jump
L22:
.debug
	.dw '.stabn 0x44,0,69,',0,0
	.dd LM34-_main
	.dw 0x0d,0x0a
.code
LM34:
	R1=0	// QImode move
	[BP]=R1	// QImode move
L24:
.debug
	.dw '.stabn 0x44,0,70,',0,0
	.dd LM35-_main
	.dw 0x0d,0x0a
.code
LM35:
	pc=L8	// Indirect jump
L9:
.debug
	.dw '.stabn 0x44,0,71,',0,0
	.dd LM36-_main
	.dw 0x0d,0x0a
.code
LM36:
	pc=L6	// Indirect jump
L25:
.debug
	.dw '.stabn 0x44,0,74,',0,0
	.dd LM37-_main
	.dw 0x0d,0x0a
.code
LM37:
L26:
	pc=L28	// Indirect jump
	pc=L27	// Indirect jump
L28:
.debug
	.dw '.stabn 0x44,0,76,',0,0
	.dd LM38-_main
	.dw 0x0d,0x0a
.code
LM38:
	R1=1	// QImode move
	[28690]=R1	// QImode move
.debug
	.dw '.stabn 0x44,0,77,',0,0
	.dd LM39-_main
	.dw 0x0d,0x0a