
OS_WriteC		EQU	&0

	AREA |omicron$$code|, CODE, READONLY

	EXPORT change_screen_mode

	
change_screen_mode
	mov r1,r0
	mov r0,#22
	swi OS_WriteC
	mov r0,r1
	swi OS_WriteC
	movs pc,lr
	
	END
