opo	22	10
opo	22	10

mov	ax	1
int	3

!sonar
ipo	16	ax
cmp	ax	0
ja	!sonarfound

!start
opo	11	100
opo	17	64
ipo	7	ax
cmp	ax	2000
jb	!found
opo	12	128
je	!start
jne	!start

!found
cmp	ax	250
jbe	!sonar
ipo	17	ax
cmp	ax	3
jbe	!shoot

!1
ipo	8	bx	
shl	bx	5
opo	12	bx
opo	17	16
ipo	7	ax
cmp	ax	2000
ja	!start

!2
ipo	8	bx
shl	bx	3
opo	12	bx
opo	17	4
ipo	7	ax
cmp	ax	2000
ja	!1

!3
ipo	8	bx
add	bx	bx
opo	12	bx
opo	17	2

je	!shoot
jne	!shoot

!sonarfound
opo	13	0
sub	ax	@1
opo	14	ax
opo	11	100
ipo	2	ax
cmp	ax	200
ja	!hot
opo	15	@3
!hot
ipo	16	ax
cmp	ax	0
jb	!start
opo	13	0
je	!sonarfound
jne	!sonarfound


!shoot
ipo	7	ax
cmp	ax	2000
ja	!2
ipo	2	ax
cmp	ax	200
ja	!hot
ipo	8	bx
shl	bx	1
opo	12	@3
opo	15	bx
opo	14	@2
je	!shoot
jne	!shoot