LDA #$01
    STA $1404
	LDY #$00		
	
	REP #$20		 
	
	LDA $80			
	CMP #$00C0		
	SEP #$20
	
	BMI + 		
	LDA #$80
	STA $7D 
	BRA end
+
	REP #$20
	LDA $80			
	CMP #$0070		
	
	SEP #$20		
	BPL ++			
	INY				
++	
	STY $1412

	
end:	
	RTL

back to listings