	n2$
       stx $57
       sta $58
       sty $59
       cpx #$c8
       bcs 1$
       cpy #$01
       bcc 1$
       cmp #$40
1$
       rts
sline
       lda #$01
       sta temp18
       jmp main
       lda #$00
       sta temp18
main   
  jsr chkcom
       jsr getcor
       lda $14
       ldy $15
       jsr 2$
       bcs 1$
       sta temp1
       sty temp2
       stx temp3
       jsr chkcom
       jsr getcor
       lda $14
       ldy $15
       jsr 2$
       bcs 1$
       sta temp5
       sty temp6
       stx temp7
       sec
       lda temp5
       sbc temp1
       sta temp19
       lda temp6
       sbc temp2
       sta temp20
       jsr 9$
       sta temp11
       cmp #$01
       bne 3$
       lda #$00
3$  
  sta temp12
       jsr 13$
       lda temp19
       sta temp8
       lda temp20
       sta temp9
       sec
       lda temp7
       sbc temp3
       sta temp19
       lda #$00
       sbc #$00
       sta temp20
       jsr 9$
       sta temp13
       jsr 13$
       lda temp19
       sta temp10
       lda temp8
       sta temp14
       lda temp9
       sta temp15
       lda temp10
       sta temp16
       lda #$00
       sta temp17
4$  
  lda temp1
       sta $58
       lda temp2
       sta $59
       lda temp3
       sta $57
       jsr lnloop; line sprite move
       lda temp2
       cmp temp6
       bne 6$
       lda temp1
       cmp temp5
       bne 6$
       lda temp3
       cmp temp7
       bne 6$
       rts
6$  
  jsr 7$
       bcc 5$
       lda temp16
       clc
       adc temp10
       sta temp16
       lda temp17
       adc #$00
       sta temp17
       lda temp1
       clc
       adc temp11
       sta temp1
       lda temp2
       adc temp12
       sta temp2
       jsr 7$
       beq 5$
       bcs 4$
5$  
  lda temp14
       clc
       adc temp8
       sta temp14
       lda temp15
       adc temp9
       sta temp15
       lda temp3
       clc
       adc temp13
       sta temp3
       jmp 4$
7$  
  lda temp15
       cmp temp17
       bne 8$
       lda temp14
       cmp temp16
8$  
  rts
9$  
  lda temp20
       bmi 12$
       beq 11$
10$  
  lda #$01
       rts
11$  
  lda temp19
       bne 10$
       rts
12$  
  lda #$ff
       rts
13$  
  lda temp20
       bpl 14$
       eor #$ff
       sta temp20
       lda temp19
       eor #$ff
       sta temp19
       inc temp19
       bne 14$
       inc temp20
14$  
  rts
