;Robot's name		: SSBot
;Author      		: (c) Olger Oeselg
;Author's Country  	: Estonia
;Author's E-mail	: olger_o@hotmail.com
;Date of completion	: 10/March/2001
;Make avail. for public	: ONLY LOCKed version!!
;Class			: Heavy Weight
;Tournament		: Made for Heavy Weight tournaments!
;			  Also for those exiting RUMBLE battles...
;Version		: v1.7
;Comment		: I'm a copy of your AT-Robot!
;Code			: ca. 124 lines
;******************************************************************************
	;Targeting system	: Complex
	;Firing system		: Complex
	;Moving system		: 4 Lines + throttle control!
	;Killing ability	: Bretty good, it's manuverable!
	;Surviving ability	: Good enough to make some wins in RUMBLE btls!
;******************************************************************************
;Style:			It tries to copy movement of an enemy it scans and
;			fires upon it's enemy. Fire control is based on the
;			distance of it's enemy, bretty effective.
;******************************************************************************
;[[[ DON'T EXPECT ANY PERFECT SOLUTIONS ]]]
;******************************************************************************
;NB! The whole code is packed into xx lines!!!
;******************************************************************************
#config scanner=3
#config weapon=3
#config armor=2
#config engine=2
#config heatsinks=2
;******************************************************************************
#MSG	I'm accurate!
;******************************************************************************
#def scanrng
#def arc
#def v_kaugus
#def poora
#def heading
#def amount
#def heat
#def gaas
#def kau
#def kesk
;******************************************************************************
	set	scanrng	1500
	set	arc	64
	set	gaas	100
	set	kau	500
	set	kesk	200
;******************************************************************************
	opo	17	arc
	set	ax	1
	int	3
	opo	11	gaas
!start1
	opo	17	arc
	ipo	7	v_kaugus
	jmp	!sihi
!start11
	cmp	arc	64
	jae	!flip
	jb	!start12
!flip
	opo	12	128
!start12
	cmp	v_kaugus scanrng
	jbe	!start2
	cmp	arc	64
	jae	!start2
	shl	arc	2
!start2	
	ipo	3	heading
	set	ax	@6
	sub	ax	heading
	opo	14	ax
	cmp	@0	0
	jne	!start1
!tagurpidi
	neg	gaas
	opo	11	gaas
	jmp	!start1
!sihi
	cmp	v_kaugus scanrng
	ja	!start11
	cmp	@3	0
	ja	!sihi2
	jb	!sihi3
	je	!sihi4
!sihi2
	cmp	@3	2
	je	!sihi21
	jne	!sihi22
!sihi21
	set	poora	arc
	opo	12	poora
	jmp	!sihi4
!sihi22
	set	poora	arc
	shr	poora	1
	opo	12	poora
	jmp	!sihi4
!sihi3
	cmp	@3	-2
	je	!sihi31
	jne	!sihi32
!sihi31
	set	poora	arc
	neg	poora
	opo	12	poora
	jmp	!sihi4
!sihi32
	set	poora	arc
	shr	poora	1
	neg	poora
	opo	12	poora
!sihi4
	cmp	arc	4
	jbe	!prelase
	shr	arc	2
	jmp	!start11
!prelase
	cmp	arc	1
	jbe	!lase
	shr	arc	2
!lase
	set	ax	@6
	set	bx	@2
	sub	ax	bx
	cmp	ax	128
	ja	!lase11
	jb	!lase12
	je	!lase13
!lase11
	set	ax	-2
	cmp	@7	0
	ja	!lase111
	neg	ax
!lase111
	opo	12	ax
	ja	!lase14
!lase12
	set	ax	2
	cmp	@7	0
	ja	!lase122
	neg	ax
!lase122
	opo	12	ax
	ja	!lase14
!lase13
	set	ax	0
	ja	!lase14
!lase14
	ipo	2	heat
	cmp	heat	150
	jb	!lase2
	jmp	!start11
!lase2
	cmp	v_kaugus kau
	jae	!lasekau
	cmp	v_kaugus kesk
	jae	!lasekesk
	jb	!laseluh
!laseluh
	opo	15	ax
	opo	15	ax
	jmp	!start11
!lasekesk
	opo	15	ax
	sub	ax	1
	opo	15	ax
	add	ax	2
	opo	15	ax
	jmp	!start11
!lasekau
	opo	15	ax
	sub	ax	2
	opo	15	ax
	add	ax	4
	opo	15	ax
	jmp	!start11