#config engine=2
#config armor=2
#config weapon=2
#config heatsinks=1
#config scanner=5

#def RANGE
#def SCANARC

	opo P_OVERBURN, 1

!STARTUP
	opo P_THROTTLE, 100

	cmp [0], 100
	jeq !STARTUP

	mov SCANARC, 64
	opo P_ARC, SCANARC

!SCAN
	ipo P_SCAN, dx
	cmp dx, 1500
	jb !FOUND

	cmp SCANARC, 64
	jeq !FLIP

	shl SCANARC, 1
	opo P_ARC, SCANARC
	jne !SCAN
!FLIP
	opo P_TROTATE, 128
	jeq !SCAN
!FOUND
	cmp SCANARC, 2
	jeq !FIRE

	shr scanarc, 1
	mov bx, scanarc
	mpy bx, @03

	opo P_ARC, SCANARC
	opo P_TROTATE, bx	
	jne !SCAN

!FIRE
	cmp @13, 40
	ja !SCAN

	opo P_FIRE, @3
	opo P_FIRE, @3
	jbe !SCAN