;-	-	-	-	-	-	-	-	-
;	EXPO5
;	By: Henrik Hansson
;	E-mail: henrik@idgar.nu
;
;	Not as good as the fsf-bots, but close enough.
;
;	With this bot my learning period is over, so there will be
;	no more Expo (=Experiment) bots. From now on I'll only make
;	"real" bots. :)
;
;-	-	-	-	-	-	-	-	-

#config	scanner=3	;+2
#config	weapon=3	;-1
#config	armor=2		;0
#config	engine=3	;-1
#config	heatsinks=1	;0

opo	11	100
mov	ax	1
int	3

!drive
cmp	ax	3
jae	!1
opo	22	20
inc	ax
!1
int	19
ipo	3	dx
int	2
cmp	ex	fx
jb	!2
cmp	fx	200
jbe	!north
cmp	ex	800
jae	!east
jb	!safe
!2
cmp	ex	200
jbe	!west
cmp	fx	800
jae	!south
jb	!safe

!west
mov	bx	36
jbe	!turn

!north
mov	bx	100
jbe	!turn

!east
mov	bx	164
jae	!turn

!south
mov	bx	228

!turn
ipo	3	cx
sub	bx	cx
opo	14	bx

!safe
opo	11	100
cmp	@9	40
ja	!drive
opo	17	64
opo	12	128
ipo	7	dx
cmp	dx	1500
ja	!safe

!zoom1
cmp	@3	0
je	!zoom2
mov	bx	@3
shl	bx	1
add	bx	@3
shl	bx	3
opo	12	bx

!zoom2
opo	17	18
ipo	7	dx
cmp	dx	1500
ja	!safe
cmp	@3	0
je	!track
mov	bx	@3
shl	bx	3
sub	bx	@3
opo	12	bx

!track
opo	14	32
opo	17	5
ipo	7	dx
cmp	dx	1500
ja	!safe
cmp	@3	0
je	!arm
mov	bx	@3
shl	bx	1
opo	12	bx

!arm
ipo	2	ex
cmp	ex	150
ja	!track
opo	17	2

!fire
ipo	7	dx
opo	12	@3
opo	15
cmp	ex	100
ja	!track
opo	15
opo	15
jbe	!track

#end