; TITCH_RT (Titch Returns)
; An old bot of mine with a few tweaks
; Should work well against the current light top5

; Author: Lawrence Steele (lawrence.steele@ntlworld.com)

mov	dx,	64	;set initial scanarc of 64
mov	bx,	5	;initialize vars for later use
opo	17,	dx	
mov	ax,	1	

#config scanner=4
#config weapon=2
#config engine=3
#config armor=2
#config heatsinks=1

#msg :)

int	3		;keepshift on

!flip
opo	12,	 128

!scan
opo	11,	100	;start moving

ipo	7,	ax	;scanning stuff
cmp	ax,	2000
jgr	!none

mov	fx,	@3	;turret turning stuff
shl	fx,	bx
opo	12,	fx

mov	ex,	@2	;steering stuff
add	ex,	32
opo	14,	ex

ipo	2,	ax
cmp	ax,	200	;heat checking and firing stuff
jgr	!scan
opo	15,	@3

cmp	dx,	4	;scan arc tightening stuff
jeq	!scan		;dont tighten if scanarc is 4
sub	bx,	1
shr	dx,	1
opo	17,	dx


jmp	!scan		;loop

!none			;nothing found?
cmp	dx,	64	
jeq	!flip		;flip if scanarc is 64
shl	dx,	1	;otherwise widen
add	bx,	1
opo	17,	dx
jmp	!scan