assmble:
	b0bts0	errorflag
	jmp	assmble80
	b0bts1	code_right_f
	jmp	assmble70
	bclr	code_right_f
	bclr	firstflag	
	bts0 	keydownflag
	jmp 	assmble10
	bset 	keydownflag
assmble00:
	mov	a,leveh2
	add	a,level2
	cmprs	a,#07h
	jmp	assmble10
assmble20:
	mov	a,leveh2
	cmprs	a,#1
	jmp	assmble10
	mov	a,leveh1
	add	a,level1
	cmprs	a,#0ffh
	jmp	assmble10
	mov	a,leveh1
	cmprs	a,#00111111b		;03/on
	jmp	assmble301
	mov_ 	aplcode,#1	
	jmp	assmble10
assmble301:
	b0bts1	openflag
	jmp	assmble10
	mov	a,leveh1
	cmprs	a,#00111110b		;83/off
	jmp	assmble302
	mov_ 	aplcode,#2	
	jmp	assmble10
assmble302:	
	cmprs	a,#00111101b		;43/low
	jmp	assmble303
	mov_ 	aplcode,#3	
	jmp	assmble10
assmble303:
	cmprs	a,#00111011b		;23/med
	jmp	assmble304
	mov_ 	aplcode,#4	
	jmp	assmble10
assmble304:	
	cmprs	a,#00110111b		;13/hi
	jmp	assmble305
	mov_ 	aplcode,#5	
	jmp	assmble10
assmble305:	
	cmprs	a,#00101111b		;0b/lamp/on/off
	jmp	assmble306
	mov_ 	aplcode,#6	
	jmp	assmble10
assmble306:
	cmprs	a,#00011100b		;c7/dim/ner
	jmp	assmble307
	mov_ 	aplcode,#7	
	jmp	assmble10				
assmble307:
	cmprs	a,#00011110b		;87/round
	jmp	assmble10
	mov_ 	aplcode,#8	
assmble10:
	bset 	fp00ien
assmble80:
	clr	leveh1
	clr	leveh2
	clr	level1
	clr	level2
	clr	disasmnum		
	clr	disasmcount		
	bclr	firstflag
	bclr	ft0enb
	bclr	errorflag
	clr	level_count
	clr	t0c
assmble70:
	bts1 	singleflag
	jmp 	assmble40
	bts1 	t10msflag
	jmp 	assmble90
	bclr 	keydownflag	
	jmp 	assmble90
assmble40:
	bclr 	t10msflag
	clr 	timer10ms	
assmble90:
	ret