_unit = _this select 0;
_target = _this select 1;
_b1 = 0;
_b2 = 0;
T attachTo [pl, [0,0,0]]
pl setcaptive true;
#tr
_a = floor(random 2);
_a = _a + 1;
?(v == 1): _unit setdammage 0;
v = 0;
_unit removeaction _rt;
_target doMove getpos _unit;
?(_target in List T && alive _target && alive _unit): _unit dowatch _target; _target dowatch _unit;
?(_target in List T && _b1 < 0.75 && _b2 < 0.75 && _a == 1): _target switchmove "AmelPercMstpSnonWnonDnon_zasah3hard";
?(_target in List T && _b1 < 0.75 && _b2 < 0.75 && _a == 1): _unit switchmove "AmelPercMstpSlowWrflDnon_StrokeGun";
?(_target in List T && _b1 < 0.75 && _b2 < 0.75 && _a == 1): _target setDammage getDammage _target + 0.25;
?(_target in List T && _b1 < 0.75 && _b2 < 0.75 && _a == 1): _b1 = _b1 + 0.25;
?(_target in List T && _b1 < 0.75 && _b2 < 0.75 && _a == 2): _target switchmove "AmelPercMstpSnonWnonDnon_amaterUder1";
?(_target in List T && _b1 < 0.75 && _b2 < 0.75 && _a == 2): _unit switchmove "AmelPercMstpSnonWnonDnon_zasah4";
?(_target in List T && _b1 < 0.75 && _b2 < 0.75 && _a == 2): _unit setDammage getDammage _unit + 0.25;
?(_target in List T && _b1 < 0.75 && _b2 < 0.75 && _a == 2): _b2 = _b2 + 0.25;
?(_target in List T && _b1 < 0.75 && _b2 < 0.75 && _a == 3): _target switchmove "AmelPercMstpSnonWnonDnon_amaterUder2";
?(_target in List T && _b1 < 0.75 && _b2 < 0.75 && _a == 3): _unit switchmove "AmelPercMstpSnonWnonDnon_amaterUder3";
?(_b2 == 0.75): _unit switchmove "AinjPpneMstpSnonWnonDnon_rolltofront"; hint format ["%1", v]
?(_b1 == 0.75): _target switchmove "AinjPpneMstpSnonWnonDnon_rolltofront";
?(_b2 == 0.75): _rt = _unit addaction ["medic", "DOC.sqs"];
~3
goto "tr"