arr

// This source code is subject to the terms of the Mozilla Public License 2.0 at https://mozilla.org/MPL/2.0/
// © RicardoSantos

//@version=4
study("My Script")

f_array(_id, _length, _method, _in_index, _in_int, _in_float, _in_string)=>
    //  methods:
    //      "update"        // update rolls values every bar
    //      "set int"       // set integer value at index
    //      "get int"       // get integer value at index
    //
    int _int = na
    float _float = na
    string _string = na

    if _method == "update"
        if bar_index < _length
            label.set_y(id=_id, y=float(na))
            label.set_text(id=_id, text="")
        else
            for _i = 0 to _length-1
                float _previous = label.get_y(id=_id[_i+1])
                label.set_y(id=_id[_i], y=_previous)

    if _method == "set int"
        label.set_y(id=_id[_length - _in_index], y=_in_int)
    if _method == "set float"
        label.set_y(id=_id[_length - _in_index], y=_in_float)
    if _method == "set text"
        label.set_text(id=_id[_length - _in_index], text=_in_string)

    if _method == "get int"
        _int := int(label.get_y(id=_id[_length - _in_index]))
    if _method == "get float"
        _float := float(label.get_y(id=_id[_length - _in_index]))
    if _method == "get string"
        _string := string(label.get_text(id=_id[_length - _in_index]))

    [_int, _float, _string]

//
//

int array1_length = 10
label array1 = label.new(bar_index, 0, color=#00000000)
label.delete(id=array1[array1_length])

[_, _, _] = f_array(array1, array1_length, "update", int(na), int(na), float(na), string(na))

if bar_index % 10 == 3
    [_, _, _] = f_array(array1, array1_length, "set int", array1_length, int(bar_index), float(na), string(na))

[i0, _, _] = f_array(array1, array1_length, "get int", 0, int(na), float(na), string(na))
[i1, _, _] = f_array(array1, array1_length, "get int", 1, int(na), float(na), string(na))
[i2, _, _] = f_array(array1, array1_length, "get int", 2, int(na), float(na), string(na))
[i3, _, _] = f_array(array1, array1_length, "get int", 3, int(na), float(na), string(na))
[i4, _, _] = f_array(array1, array1_length, "get int", 4, int(na), float(na), string(na))
[i5, _, _] = f_array(array1, array1_length, "get int", 5, int(na), float(na), string(na))
[i6, _, _] = f_array(array1, array1_length, "get int", 6, int(na), float(na), string(na))
[i7, _, _] = f_array(array1, array1_length, "get int", 7, int(na), float(na), string(na))
[i8, _, _] = f_array(array1, array1_length, "get int", 8, int(na), float(na), string(na))
[i9, _, _] = f_array(array1, array1_length, "get int", 9, int(na), float(na), string(na))
[i10, _, _] = f_array(array1, array1_length, "get int", 10, int(na), float(na), string(na))


plot(i0)
plot(i1)
plot(i2)
plot(i3)
plot(i4)
plot(i5)
plot(i6)
plot(i7)
plot(i8)
plot(i9)
plot(i10)