; Esta Roca se mueve si le disparan

; Mobile Stone-bot
; By José Brox

#CONFIG ARMOR=5
#CONFIG SHIELD=5
#CONFIG HEATSINKS=2
#CONFIG SCANNER=0
#CONFIG WEAPON=0
#CONFIG ENGINE=0
#CONFIG MINES=0

#MSG MOBILE STONE-BOT

OPO	22		; Suelta mina

OPO	22		

!INICIO

OPO	24	1	; Conecta el escudo

OPO	11	0	; Apaga el motor

IPO	2	AX	; Temperatura actual a AX

CMP	AX	295	; La compara con 295

JGE	!DESCONEXION	; Si es mayor o igual, desconecta el escudo

INT	11		; Guarda en EX el tiempo desde que un disparo le impactó

CMP	EX	10	; Mira si es menor que 10 ciclos

JLE	!ESQUIVAR

JGR	!INICIO

!DESCONEXION

OPO 	24	0	; Desconexión de escudo

IPO	2	AX	

CMP	AX	10	; Ve si ha bajado la temperatura

JLE	!INICIO

OPO	14	32	; Giro de 32 (45) grados

JGR	!MOVIMIENTO

!MOVIMIENTO

OPO	11	100	; Se mueve

IPO	2	AX	

CMP	AX	50	; Chequea la temperatura

JGR	!MOVIMIENTO	; Si está entre 100 y 200 salta a !DESCONEXION,

JLE	!DESCONEXION	; si es mayor que 200 sigue en !MOVIMIENTO

!ESQUIVAR

INT	10		; Guarda en DX el número de robots en activo

CMP	DX	3	; Mira si hay más de dos oponentes

JGR	!INICIO		; Si los hay, ignora esquivar

OPO	14	16	; Giro de 16 (22.5) grados

DO	50

:1

OPO	11	100	; Líneas de movimiento

LOOP	1

OPO	14	16

DO	50

:2

OPO	11	100

LOOP	2

JLE	!INICIO

#END