#config scanner=5
#config engine=2
#config weapon=0
#config heatsinks=3
#config armor=2
#config mines=0

!init
	mov ax, 1
	int I_KEEPSHIFT
	opo P_ARC, 4
!scan
	opo P_TROTATE, 12
!track
	cmp [0], 100
	jeq !noacc
	opo P_THROTTLE, 100	
!noacc
	opo P_STEERING, 6

	ipo P_SCAN, ax
	cmp ax, 1500
	ja !scan	

	mov dx, @3
	sal dx, 1
	opo P_TROTATE, dx		

	opo P_FIRE, 0	
	jmp !track