fn set_buffer_protocol(buffer_id, string) {
    let str = data::str("01234567" + string);
    li64(r10, buffer_id);
    str(r10, r0, str, 8);

    li64(r1, 3);
    li64(r2, 0);
    lra(r3, r0, str);
    li64(r4, str.len);
    eca();
}


set_buffer_protocol(1, "string");

tx();