;S-1 MSLock
;Shockfrost
;
;MSLock is a showcase bot for a new scan component, the MS-Lock Trajectory-adaptive 
;Tracker/Targeter. The weapon fires without additional firing mechanisms. However if 
;supplied, the module will do a decent job of tracking the target. It generates plenty of
;fire and heat, so watch its use! This bot has no motion circuit, just stationary-style
;target-and-fire system. A fight with any mobile target will show his prediction skills,
;but with no defenses and a slow weapon, he will lose almost any battle.

#CONFIG Shield=0
#CONFIG Scanner=5
#CONFIG Weapon=5
#CONFIG Armor=0
#CONFIG Engine=0
#CONFIG Heatsinks=2
#CONFIG Mines=0



#MSG =S1=MSLock=Online!==



;INIT / PRIMARY FUNCTION - Softpoint 1
;Initialization

;Primary Code
;Module Comments:
; S-1 MSLock is just to showcase the MSLock component.
; Note the adjustment to a 6-degree radii, that works best with this component.

opo 17 6

:1
jmp 2
:12    ;Return gate for Scan Mechanism


jmp 1  ;Loop closure




;SCANNING / TARGETING MECHANISM - Softpoint 2
;Module Comments:

; --(MS-LOCK Targeting Component)--
; Specifically designed to adapt to the trajectory of enemy vehicles and appropriately
; lead, follow, or just GUN DOWN a target.
; Does not account for speed or range. 6 degree radii is best.
; Generally finicky and bulky component.
;
;IMPORTANT NOTE -- FIRING MECHANISM IS BUILT-IN! EXTERNAL FIRING MECHANISMS MAY OR MAY
;  NOT INFERFERE! TESTING IS THE BEST ANSWER! THIS MODULE FIRES A LOT OF BULLETS!
;

#Def TTraj
#Def Firemode
:2
ipo 17 ax
add ax ax
opo 12 ax
ipo 7 ax
cmp ax 1500
jgr 12
int 9
set TTraj ex
ipo 2 ax
cmp ax 150
jgr 260
cmp TTraj 16
jls 231
cmp TTraj 48
jls 232
cmp TTraj 80
jls 233
cmp TTraj 112
jls 234
cmp TTraj 144
jls 235
cmp TTraj 176
jls 236
cmp TTraj 208
jls 237
cmp TTraj 240
jls 238


:231
set Firemode 0
jmp 240
:232
set firemode 1
jmp 240
:233
set firemode 2
jmp 240
:234
set firemode 3
jmp 240
:235
set firemode 4
jmp 240
:236
set firemode 5
jmp 240
:237
set firemode 6
jmp 240
:238
set firemode 7


:240
ipo 8 ax
add ax ax
add ax ax
opo 12 ax
cmp Firemode 0
jeq 250
cmp Firemode 1
jeq 251
cmp Firemode 2
jeq 252
cmp Firemode 3
jeq 253
cmp Firemode 4
jeq 254
cmp Firemode 5
jeq 255
cmp Firemode 6
jeq 256
cmp Firemode 7
jeq 257
jmp 12

:250
opo 15
opo 15 2
opo 15 -2
opo 15 4
opo 15 -4
jmp 260

:251
opo 12 4
opo 15 4
opo 15 2
opo 12 -4
opo 15 4
opo 15 2
opo 15
jmp 260

:252
opo 12 4
opo 15 4
opo 15 -4
opo 15 2
opo 15 -2
opo 15
opo 12 -4
jmp 260

:253
opo 15
opo 15 2
opo 15 4
opo 12 4
opo 15 2
opo 15 4
opo 12 -4
jmp 260

:254
opo 15
opo 15 2
opo 15 -2
opo 15 4
opo 15 -4
jmp 260

:255
opo 15
opo 15 -2
opo 15 -4
opo 12 -4
opo 15 -2
opo 15 -4
opo 12 4
jmp 260

:256
opo 12 -4
opo 15 -4
opo 15 4
opo 15 -2
opo 15 2
opo 15
opo 12 4
jmp 260

:257
opo 12 -4
opo 15 -4
opo 15 -2
opo 12 4
opo 15 -4
opo 15 -2
opo 15
jmp 260

:260
opo 12 -12
jmp 12