{VARIABLE charge_pos 0}
    {VARIABLE continue_lookup yes}

    [while]
        {VARIABLE_NUMERICAL_LESS_THAN charge_pos $siege_charges.length}
        {VARIABLE_BOOLEAN_EQUALS continue_lookup yes}
        [do]
            [if]
                {VARIABLE_NUMERICAL_EQUALS siege_charges[$charge_pos].x ({_X})}
                {VARIABLE_NUMERICAL_EQUALS siege_charges[$charge_pos].y ({_Y})}
                [then]
                    {VARIABLE continue_lookup no}
                [/then]
                [else]
                    {VARIABLE_INC charge_pos}
                [/else]
            [/if]
        [/do]
    [/while]

    {CLEAR_VARIABLE continue_lookup}