;=======°°===============****===]   
;=/\/\==()==/\/\==/\/\===*==**==] 
;(====)=()=(====)=\========**===]
;=\==/==()==\==/==/¯======**====]
; ~~~~~~~~~~~~~~~|\/\/===*****==]
;================~~~~~===*****==]
;
;	THE NEW MIME IS ABLE TO DO VARIOUS
;	THINGS NOW IT CHASES THE ENEMY, THANKS 
;	TO MOLE, HOWEVER MIME 2 TRACKS FASTER
;	AND HE KILLS FASTER. HIS NEW CONFIGURATION
; 	GIVES HIM MORE ACCURACY AND SAFER SPEED
;	NOW IT'S TACTICS ARE:
;
;	1) MOVE SEARCHING THE OPPONENT  
;	   WITH HIS RADAR.
;	2) ARC=64 THEN TIGHTEN TO 6 AND
;	   DON'T LOSE ENEMY
;	3) DON'T DARE TO GET CLOSER OR
;	   YOU WILL SEE MY POWER!!
;	4) IF RECIEVED TOO MANY HITS THEN
;	   OVERBURN=ON
;	
;
;	Another production from
;
;	JOFEGO.2000/THE MAD SCIENTIST
;	jofego99@mad.scientist.com or jofego@loquesea.com
;	
;	version 2.00


#CONFIG	WEAPON=2
#CONFIG SCANNER=1
#CONFIG	ENGINE=5
#CONFIG HEATSINKS=1
#CONFIG	ARMOR=2

#MSG ??????????????????

#DEF	DES
#DEF	TRG
MOV	TRG	192

#DEF	SPEED
MOV	SPEED	16
MOV	AX	1
INT	3

opo	18	0

!START
IPO	6	AX
CMP	AX	20
JA	!O
OPO	18	1
!O
OPO	13	0

OPO	11	100

IPO	1	AX
CMP	AX	0
JE	!REV

IPO	9	AX
CMP	AX	350
JBE	!PREPARE

CMP	BX	AX
JA	!W
OPO	14	SPEED
MOV	BX	AX
JMP	!START

!W
MOV	BX	AX
JMP	!START



;AMMMMMMMMMMIIIIIIIIIIIIIIBBBBBBBBBBBLLLLLLLLLLLLLIIIIIIIIIIIINNNNNNNNNNNDDDDD?
!PREPARE
OPO	11	100
OPO	17	64

IPO	7	AX
CMP	AX	2000
JBE	!ADJUST

OPO	13	64

IPO	7	AX
CMP	AX	2000
JBE	!ADJUST

OPO	13	128

IPO	7	AX
CMP	AX	2000
JBE	!ADJUST

OPO	13	192

IPO	7	AX
CMP	AX	2000
JBE	!ADJUST
JMP	!START


;EEEEEEEEENNNNNNNNNNNNNNNNNNNGGGGGAAAAAAAAARRRRRRRRRRDDDDDDDDEEEEEE
!ADJUST
OPO	11	100
!A
IPO	8	BX
SHL	BX	5

OPO	12	BX
OPO	17	16

IPO	7	AX
CMP	AX	2000
JA	!START

OPO	14	@2

!B
IPO	8	BX
SHL	BX	2

OPO	12	BX
OPO	17	6

IPO	7	AX
CMP	AX	2000
JA	!START

;ATTTTTTTTTTTTTTTTTAAAAAAAAAAAAACKKKKKKKKKKKKKKKKKK
!ZULU_@3
OPO	11	100

IPO	2	AX
CMP	AX	200
JAE	!START

IPO	8	BX
SHL	BX	2
OPO	12	BX
OPO	15	BX

OPO	14	@2

CMP	@3	0
JE	!F

:9
IPO	7	AX
CMP	AX	150
JBE	!TOO_BAD


CMP	AX	2000
JBE	!ZULU_@3

OPO	14	@2
JGR	!START

;HAHAHAHAHAHAHAHAHAHAHAHAHAHAHAHAHAHHAHAHAHAHA
!U
OPO	11	-100
!TOO_BAD

IPO	8	BX
SHL	BX	1
OPO	12	BX

IPO	7	AX
CMP	AX	250
JA	!START

CMP	@3 	0
JNE	!TOO_BAD

IPO	2	AX
CMP	AX	50
JAE	!START


!G
OPO	18	1
OPO	15
OPO	15
OPO	15
OPO	15
OPO	15
OPO	15
OPO	15
OPO	15
OPO	15
OPO	15
OPO	15
OPO	15
OPO	18	0
JMP	!START

!F
IPO	7	AX
CMP	AX	250
JA	!START

OPO	18	1
MOV	AX	@3
SHL	AX	2
OPO	15	AX
OPO	15	AX
OPO	15	AX
OPO	18	0
JMP	!START



;rrrrrrrrrrrrrrrrrrrrrR
!REV
neg	speed
OPO	11	-100
IPO	7	AX
CMP	AX	200
JBE	!F
OPO	14	128
!K
IPO	3	AX
CMP	AX	@1
JNE	!K
OPO	11	100
JMP	!START