os_ostimer.s

PXA250嵌入式

	IMPORT	osStack
	IMPORT	osScanInterval
	IMPORT	ledShareInterval
	IMPORT	ledStatusBuffer	


	IMPORT	button_statusFetch
	IMPORT	ot_intervalSet
	IMPORT	led_statusSet
	IMPORT	intIdentify


	EXPORT	dummyOs

	AREA dummyOs ,CODE ,READONLY

	ldr r13,=osStack

pendingMode
	ldr r1,=ledShareInterval
pendingLoop
	sub r1,r1,#0x1
	cmp r1,#0x0
	beq invertLedStatus
;
	mov r14,pc
	;$$$$$
	;input:null
	;
	ldr pc,=button_statusFetch
	;
	;output:r0--0 means no input, --!0 input value
	;$$$$$
;
	cmp r0,#0x0
	bne applicationMode

	b pendingLoop


invertLedStatus
	ldr r11,=ledStatusBuffer	
	ldr r0,[r11]
	mvn r0,r0
	str r0,[r11]

	mov r14,pc
	;$$$$$
	;input:r0--value 
	;
	ldr pc,=led_statusSet
	;
	;output:null
	;$$$$$	

	b pendingMode


;/////////////////
;*****************
;////////////////

applicationMode
	ldr r0,=osScanInterval

osScanDelayLoop	
	sub r0,r0,#0x1
	cmp r0,#0x0
	bne osScanDelayLoop

	mov r14,pc
	;$$$$$
	;input:null
	;
	ldr pc,=button_statusFetch
	;
	;output:r0--0 means no input, --!0 input value
	;$$$$$


	cmp r0,#0x0
	beq osPollIntStatusBranch

	cmp r0,#0x80
	beq osClearOsTimerBranch

	b osSetOsTimerIntervalBranch

osClearOsTimerBranch
	mov r0,#0x0
	ldr r11,=ledStatusBuffer
	str r0,[r11]

	mov r14,pc
	;$$$$$
	;input:r0--value 
	;
	ldr pc,=led_statusSet
	;
	;output:null
	;$$$$$	

	mov r0,#0xff

osSetOsTimerIntervalBranch
	mov r14,pc
	;$$$$$
	;input:r0--n set osTimer n;--0xff clear all osTimer 
	;
	ldr pc,=ot_intervalSet
	;
	;output:r0--0 means opt normal; --1 failed
	;$$$$$


osPollIntStatusBranch
	mov r14,pc
	;$$$$$
	;input:null
	;
	ldr pc,=intIdentify
	;
	;output:null
	;$$$$$

;///////////

	b applicationMode
	nop
	nop
	END