FEDERAL - Center Block

//Code developed by Federal#5752 (discord contact);

UNSET(#transformed_yaw);
UNSET(#frozen_pitch;
UNSET(#untransformed_yaw);
UNSET(#i_align);
UNSET(#result_yaw);
UNSET(#yaw);
UNSET(&axe_align);
UNSET(equal);
UNSET(#pos_align);
UNSET(#hitpos_align);
UNSET(&moving);
UNSET(#loops_counter);
WAIT(200ms);
#transformed_yaw=%YAW%-180;
IF(%YAW%<180);
	#transformed_yaw=%YAW%+180;
ENDIF;
#frozen_pitch=%PITCH%;
#untransformed_yaw=%#transformed_yaw%-180;
IF(#transformed_yaw<180);
	#untransformed_yaw=%#transformed_yaw%+180;
ENDIF;
FOR(#i_align,0,1);
	#yaw=%#i_align%*90;
	#result_yaw=%#yaw%-180;
	IF(#yaw<180);
		#result_yaw=%#yaw%+180;
	ELSEIF(#result_yaw>=360);
		DEC(#result_yaw,360);
	ENDIF;
	DO(10);
		LOOK(%#yaw%,72,0.1);
		WAIT(10ms);
	UNTIL((%YAW%==%#result_yaw%) || (KEY_END));
	SET(&axe_align,"X");
	IFMATCHES(%DIRECTION%,"N");
		SET(&axe_align,"Z");
	ENDIF;
	SET(&hitlabel,"HIT%&axe_align%");
	SET(&poslabel,"%&axe_align%POS");
	SET(#hitpos_align,"%%&hitlabel%%");
	SET(#pos_align,"%%&poslabel%%");
	UNSET(equal);
	SET(&moving,"BACK");
	IF(#pos_align==#hitpos_align);
		SET(equal);
		SET(&moving,"FORWARD");
	ENDIF;
	KEYDOWN(SNEAK);
	DO(10);
		KEYDOWN(%&moving%);
		WAIT(1ms);
		KEYUP(%&moving%);
		WAIT(100ms);
		SET(#hitpos_align,"%%&hitlabel%%");
		SET(#pos_align,"%%&poslabel%%");
		INC(#loops_counter);
	UNTIL(((equal) && (#pos_align!=#hitpos_align)) || ((equal==0) && (#pos_align==#hitpos_align)) || (KEY_END));
	KEYUP(SNEAK);
NEXT;
DO(10);
	LOOK(%#transformed_yaw%,%#frozen_pitch%,0.1);
	WAIT(10ms);
UNTIL((%YAW%==%#untransformed_yaw%) || (KEY_END));