Preliminary mouse support added
diff --git a/contiki-c64/ctk/ctk-mouse-asm.S b/contiki-c64/ctk/ctk-mouse-asm.S
new file mode 100644
index 0000000..7f72761
--- /dev/null
+++ b/contiki-c64/ctk/ctk-mouse-asm.S
@@ -0,0 +1,138 @@
+
+;---------------------------------------------------------------------
+
+ .import _ctk_mouse_joyx, _ctk_mouse_joyy
+ .import _ctk_mouse_firebutton
+ .export _ctk_mouse_asm_irq
+;---------------------------------------------------------------------
+.bss
+lastjoydy: .res 1
+lastjoydx: .res 1
+joydycnt: .res 1
+joydxcnt: .res 1
+;---------------------------------------------------------------------
+.data
+;---------------------------------------------------------------------
+.code
+_ctk_mouse_asm_irq:
+ lda $dc00
+ ldy #0
+ ldx #0
+ lsr
+ bcs nodey
+ dey
+nodey:
+ lsr
+ bcs noiny
+ iny
+noiny:
+ lsr
+ bcs nodex
+ dex
+nodex:
+ lsr
+ bcs noinx
+ inx
+noinx:
+ and #1
+ eor #1
+ sta _ctk_mouse_firebutton
+
+ cpy lastjoydy
+ sty lastjoydy
+ bne noydy
+ tya
+ pha
+ inc joydycnt
+ lda joydycnt
+ bpl nostajoydycnt
+ lda #$80
+ sta joydycnt
+nostajoydycnt:
+ lsr
+ lsr
+ lsr
+ lsr
+ tay
+ pla
+asldeyloop:
+ asl
+ dey
+ bpl asldeyloop
+ tay
+ jmp ydy
+noydy:
+ lda #0
+ sta joydycnt
+ydy:
+
+ tya
+ clc
+ adc _ctk_mouse_joyy
+ sta _ctk_mouse_joyy
+ php
+ lda #$ff
+ cpy #0
+ bmi nolda0
+ lda #0
+nolda0:
+ plp
+ adc _ctk_mouse_joyy+1
+ sta _ctk_mouse_joyy+1
+
+ cpx lastjoydx
+ stx lastjoydx
+ bne noxdx
+ txa
+ pha
+ inc joydxcnt
+ lda joydxcnt
+ bpl nostajoydxcnt
+ lda #$80
+ sta joydxcnt
+nostajoydxcnt:
+ lsr
+ lsr
+ lsr
+ lsr
+ tax
+ pla
+asldexloop:
+ asl
+ dex
+ bpl asldexloop
+ tax
+ jmp xdx
+noxdx:
+ lda #0
+ sta joydxcnt
+xdx:
+
+ txa
+ clc
+ adc _ctk_mouse_joyx
+ sta _ctk_mouse_joyx
+ php
+ lda #$ff
+ cpx #0
+ bmi nolda02
+ lda #0
+nolda02:
+ plp
+ adc _ctk_mouse_joyx+1
+ sta _ctk_mouse_joyy+1
+
+ lda _ctk_mouse_joyy
+ clc
+ adc #$30
+ sta $d001
+
+ lda _ctk_mouse_joyx
+ clc
+ adc #$18
+ sta $d000
+ lda #0
+ adc _ctk_mouse_joyx+1
+ and #1
+ sta $d010
+ jmp $ea31