:: initKik
<<set $here = 'initKik'>>
<<set $ARGS = $location_var[$here]>>
<<set $init = $pc.skillLevel("agility") + $pc.skillLevel("reaction")>>
<<set $initKoef = $init * 20 / 100>>
<<set $initi = rand(init - initKoef, init + initKoef)>>
<<set $initV = $pc.speedV + $reactV>>
<<set $initKoefV = $initV * 20 / 100>>
<<set $initiV = rand(initV - initKoefV, initV + initKoefV)>>
<<if $initi > $initiV and getvar("$hodtime") < 3 and getvar("$ionce") == 0 or getvar("$hodtimeV") >= 3 and getvar("$ionce") == 0>>
	<<set $hod = 0>>
	<<set $hodtime += 1>>
	<<if getvar("$hodtimeV") >= 3>>
		<<set $hodtimeV = 0>>

	<</if>>
	<font color="green">You take the initiative.</font>
	<<set $ionce = 1>>
<<elseif $initi < $initiV and getvar("$hodtimeV") < 3 and getvar("$ionce") == 0 or getvar("$hodtime") >= 3 and getvar("$ionce") == 0>>
	<<set $hod = 1>>
	<<set $hodtimeV += 1>>
	<<if getvar("$hodtime") >= 3>>
		<<set $hodtime = 0>>

	<</if>>
	<font color="red"><<$boydesc>> took the initiative.</font>
	<<set $ionce = 1>>
<<elseif $initi == $initiV and getvar("$hodtime") < 3 and getvar("$hodtimeV") < 3 and getvar("$ionce") == 0>>
	<<set $ionce = 1>>
	<<set $inrand = rand(0, 1)>>
	<<if getvar("$inrand") == 0>>
		<<set $hod = 0>>
		<<set $hodtime += 1>>
		<font color="green">You take the initiative.</font>
	<<else>>
		<<set $hod = 1>>
		<<set $hodtimeV += 1>>
		<font color="red"><<$boydesc>> took the initiative.</font>
	<</if>>
<<elseif $initi == $initiV and getvar("$hodtime") >= 3 and getvar("$ionce") == 0 or $initi == $initiV and getvar("$hodtimeV") >= 3 and getvar("$ionce") == 0>>
	<<set $hodtime = 0>>
	<<set $hodtimeV = 0>>
	<<set $ionce = 1>>
	<<set $inrand = rand(0, 1)>>
	<<if getvar("$inrand") == 0>>
		<<set $hod = 0>>
		<<set $hodtime += 1>>
		<font color="green">You take the initiative.</font>
	<<else>>
		<<set $hod = 1>>
		<<set $hodtimeV += 1>>
		<font color="red"><<$boydesc>> took the initiative.</font>
	<</if>>
<</if>>
