#msg Vulcan Mech
#config scanner=4
#config weapon=3
#def x
#def y
!begin1
	out 11,100	;run
	out 17,9
	ipo 7,x
	cmp x,1700
	ja !turn1

!fire
	ipo 2 ax
	cmp ax,50
	ja !turn1
	int 4
	out 15,-1
	out 15,0
	out 15,1
	int 4
!endfire

!turn1	
	out 14,6
	out 13,128

!begin2	
	out 11,100	;run
	out 17,9
	ipo 7,x
	cmp x,1700
	ja !turn2

!fire2
	ipo 2 ax
	cmp ax,50
	ja !turn2
	int 4
	out 15,-1
	out 15,0
	out 15,1
	int 4
!endfire2

!turn2	
	out 14,6
	out 13,64

!begin3
	out 11,100	;run
	out 17,9
	ipo 7,x
	cmp x,1700
	ja !turn3

!fire3
	ipo 2 ax
	cmp ax,50
	ja !turn3
	int 4
	out 15,-1
	out 15,0
	out 15,1
	int 4
!endfire3

!turn3	
	out 14,6
	out 13,192
	
!begin4
	out 11,100	;run
	out 17,9
	ipo 7,x
	cmp x,1700
	ja !turn4

!fire4
	ipo 2 ax
	cmp ax,50
	ja !turn4
	int 4
	out 15,-1
	out 15,0
	out 15,1
	int 4
!endfire4


!turn4	
	out 14,6
	out 13,0
!endturn
jmp !begin1