317 lines
12 KiB
C
317 lines
12 KiB
C
/********************************************************************
|
|
* Berry class `Leds_animator`
|
|
*
|
|
*******************************************************************/
|
|
#include "be_constobj.h"
|
|
|
|
#ifdef USE_WS2812
|
|
|
|
/********************************************************************
|
|
** Solidified function: set_bri
|
|
********************************************************************/
|
|
be_local_closure(set_bri, /* name */
|
|
be_nested_proto(
|
|
2, /* nstack */
|
|
2, /* argc */
|
|
0, /* varg */
|
|
0, /* has upvals */
|
|
NULL, /* no upvals */
|
|
0, /* has sup protos */
|
|
NULL, /* no sub protos */
|
|
1, /* has constants */
|
|
( &(const bvalue[ 1]) { /* constants */
|
|
/* K0 */ be_nested_string("bri", 2112284244, 3),
|
|
}),
|
|
(be_nested_const_str("set_bri", -1505848517, 7)),
|
|
((bstring*) &be_const_str_input),
|
|
( &(const binstruction[ 2]) { /* code */
|
|
0x90020001, // 0000 SETMBR R0 K0 R1
|
|
0x80000000, // 0001 RET 0
|
|
})
|
|
)
|
|
);
|
|
/*******************************************************************/
|
|
|
|
|
|
/********************************************************************
|
|
** Solidified function: clear
|
|
********************************************************************/
|
|
be_local_closure(clear, /* name */
|
|
be_nested_proto(
|
|
3, /* nstack */
|
|
1, /* argc */
|
|
0, /* varg */
|
|
0, /* has upvals */
|
|
NULL, /* no upvals */
|
|
0, /* has sup protos */
|
|
NULL, /* no sub protos */
|
|
1, /* has constants */
|
|
( &(const bvalue[ 3]) { /* constants */
|
|
/* K0 */ be_nested_string("stop", -883741979, 4),
|
|
/* K1 */ be_nested_string("strip", -48555823, 5),
|
|
/* K2 */ be_nested_string("clear", 1550717474, 5),
|
|
}),
|
|
(be_nested_const_str("clear", 1550717474, 5)),
|
|
((bstring*) &be_const_str_input),
|
|
( &(const binstruction[ 6]) { /* code */
|
|
0x8C040100, // 0000 GETMET R1 R0 K0
|
|
0x7C040200, // 0001 CALL R1 1
|
|
0x88040101, // 0002 GETMBR R1 R0 K1
|
|
0x8C040302, // 0003 GETMET R1 R1 K2
|
|
0x7C040200, // 0004 CALL R1 1
|
|
0x80000000, // 0005 RET 0
|
|
})
|
|
)
|
|
);
|
|
/*******************************************************************/
|
|
|
|
|
|
/********************************************************************
|
|
** Solidified function: get_bri
|
|
********************************************************************/
|
|
be_local_closure(get_bri, /* name */
|
|
be_nested_proto(
|
|
3, /* nstack */
|
|
2, /* argc */
|
|
0, /* varg */
|
|
0, /* has upvals */
|
|
NULL, /* no upvals */
|
|
0, /* has sup protos */
|
|
NULL, /* no sub protos */
|
|
1, /* has constants */
|
|
( &(const bvalue[ 1]) { /* constants */
|
|
/* K0 */ be_nested_string("bri", 2112284244, 3),
|
|
}),
|
|
(be_nested_const_str("get_bri", 2041809895, 7)),
|
|
((bstring*) &be_const_str_input),
|
|
( &(const binstruction[ 2]) { /* code */
|
|
0x88080100, // 0000 GETMBR R2 R0 K0
|
|
0x80040400, // 0001 RET 1 R2
|
|
})
|
|
)
|
|
);
|
|
/*******************************************************************/
|
|
|
|
|
|
/********************************************************************
|
|
** Solidified function: every_50ms
|
|
********************************************************************/
|
|
be_local_closure(every_50ms, /* name */
|
|
be_nested_proto(
|
|
3, /* nstack */
|
|
1, /* argc */
|
|
0, /* varg */
|
|
0, /* has upvals */
|
|
NULL, /* no upvals */
|
|
0, /* has sup protos */
|
|
NULL, /* no sub protos */
|
|
1, /* has constants */
|
|
( &(const bvalue[ 2]) { /* constants */
|
|
/* K0 */ be_nested_string("running", 343848780, 7),
|
|
/* K1 */ be_nested_string("animate", -409180496, 7),
|
|
}),
|
|
(be_nested_const_str("every_50ms", -1911083288, 10)),
|
|
((bstring*) &be_const_str_input),
|
|
( &(const binstruction[ 5]) { /* code */
|
|
0x88040100, // 0000 GETMBR R1 R0 K0
|
|
0x78060001, // 0001 JMPF R1 #0004
|
|
0x8C040101, // 0002 GETMET R1 R0 K1
|
|
0x7C040200, // 0003 CALL R1 1
|
|
0x80000000, // 0004 RET 0
|
|
})
|
|
)
|
|
);
|
|
/*******************************************************************/
|
|
|
|
|
|
/********************************************************************
|
|
** Solidified function: stop
|
|
********************************************************************/
|
|
be_local_closure(stop, /* name */
|
|
be_nested_proto(
|
|
2, /* nstack */
|
|
1, /* argc */
|
|
0, /* varg */
|
|
0, /* has upvals */
|
|
NULL, /* no upvals */
|
|
0, /* has sup protos */
|
|
NULL, /* no sub protos */
|
|
1, /* has constants */
|
|
( &(const bvalue[ 1]) { /* constants */
|
|
/* K0 */ be_nested_string("running", 343848780, 7),
|
|
}),
|
|
(be_nested_const_str("stop", -883741979, 4)),
|
|
((bstring*) &be_const_str_input),
|
|
( &(const binstruction[ 3]) { /* code */
|
|
0x50040000, // 0000 LDBOOL R1 0 0
|
|
0x90020001, // 0001 SETMBR R0 K0 R1
|
|
0x80000000, // 0002 RET 0
|
|
})
|
|
)
|
|
);
|
|
/*******************************************************************/
|
|
|
|
|
|
/********************************************************************
|
|
** Solidified function: remove
|
|
********************************************************************/
|
|
be_local_closure(remove, /* name */
|
|
be_nested_proto(
|
|
4, /* nstack */
|
|
1, /* argc */
|
|
0, /* varg */
|
|
0, /* has upvals */
|
|
NULL, /* no upvals */
|
|
0, /* has sup protos */
|
|
NULL, /* no sub protos */
|
|
1, /* has constants */
|
|
( &(const bvalue[ 2]) { /* constants */
|
|
/* K0 */ be_nested_string("tasmota", 424643812, 7),
|
|
/* K1 */ be_nested_string("remove_driver", 1030243768, 13),
|
|
}),
|
|
(be_nested_const_str("remove", -611183107, 6)),
|
|
((bstring*) &be_const_str_input),
|
|
( &(const binstruction[ 5]) { /* code */
|
|
0xB8060000, // 0000 GETNGBL R1 K0
|
|
0x8C040301, // 0001 GETMET R1 R1 K1
|
|
0x5C0C0000, // 0002 MOVE R3 R0
|
|
0x7C040400, // 0003 CALL R1 2
|
|
0x80000000, // 0004 RET 0
|
|
})
|
|
)
|
|
);
|
|
/*******************************************************************/
|
|
|
|
|
|
/********************************************************************
|
|
** Solidified function: start
|
|
********************************************************************/
|
|
be_local_closure(start, /* name */
|
|
be_nested_proto(
|
|
2, /* nstack */
|
|
1, /* argc */
|
|
0, /* varg */
|
|
0, /* has upvals */
|
|
NULL, /* no upvals */
|
|
0, /* has sup protos */
|
|
NULL, /* no sub protos */
|
|
1, /* has constants */
|
|
( &(const bvalue[ 1]) { /* constants */
|
|
/* K0 */ be_nested_string("running", 343848780, 7),
|
|
}),
|
|
(be_nested_const_str("start", 1697318111, 5)),
|
|
((bstring*) &be_const_str_input),
|
|
( &(const binstruction[ 3]) { /* code */
|
|
0x50040200, // 0000 LDBOOL R1 1 0
|
|
0x90020001, // 0001 SETMBR R0 K0 R1
|
|
0x80000000, // 0002 RET 0
|
|
})
|
|
)
|
|
);
|
|
/*******************************************************************/
|
|
|
|
|
|
/********************************************************************
|
|
** Solidified function: init
|
|
********************************************************************/
|
|
be_local_closure(init, /* name */
|
|
be_nested_proto(
|
|
5, /* nstack */
|
|
2, /* argc */
|
|
0, /* varg */
|
|
0, /* has upvals */
|
|
NULL, /* no upvals */
|
|
0, /* has sup protos */
|
|
NULL, /* no sub protos */
|
|
1, /* has constants */
|
|
( &(const bvalue[ 7]) { /* constants */
|
|
/* K0 */ be_nested_string("strip", -48555823, 5),
|
|
/* K1 */ be_nested_string("bri", 2112284244, 3),
|
|
/* K2 */ be_nested_string("running", 343848780, 7),
|
|
/* K3 */ be_nested_string("pixel_count", -1855836553, 11),
|
|
/* K4 */ be_nested_string("clear", 1550717474, 5),
|
|
/* K5 */ be_nested_string("tasmota", 424643812, 7),
|
|
/* K6 */ be_nested_string("add_driver", 1654458371, 10),
|
|
}),
|
|
(be_nested_const_str("init", 380752755, 4)),
|
|
((bstring*) &be_const_str_input),
|
|
( &(const binstruction[15]) { /* code */
|
|
0x90020001, // 0000 SETMBR R0 K0 R1
|
|
0x540A0031, // 0001 LDINT R2 50
|
|
0x90020202, // 0002 SETMBR R0 K1 R2
|
|
0x50080000, // 0003 LDBOOL R2 0 0
|
|
0x90020402, // 0004 SETMBR R0 K2 R2
|
|
0x8C080303, // 0005 GETMET R2 R1 K3
|
|
0x7C080200, // 0006 CALL R2 1
|
|
0x90020602, // 0007 SETMBR R0 K3 R2
|
|
0x8C080104, // 0008 GETMET R2 R0 K4
|
|
0x7C080200, // 0009 CALL R2 1
|
|
0xB80A0A00, // 000A GETNGBL R2 K5
|
|
0x8C080506, // 000B GETMET R2 R2 K6
|
|
0x5C100000, // 000C MOVE R4 R0
|
|
0x7C080400, // 000D CALL R2 2
|
|
0x80000000, // 000E RET 0
|
|
})
|
|
)
|
|
);
|
|
/*******************************************************************/
|
|
|
|
|
|
/********************************************************************
|
|
** Solidified function: animate
|
|
********************************************************************/
|
|
be_local_closure(animate, /* name */
|
|
be_nested_proto(
|
|
1, /* nstack */
|
|
1, /* argc */
|
|
0, /* varg */
|
|
0, /* has upvals */
|
|
NULL, /* no upvals */
|
|
0, /* has sup protos */
|
|
NULL, /* no sub protos */
|
|
0, /* has constants */
|
|
NULL, /* no const */
|
|
(be_nested_const_str("animate", -409180496, 7)),
|
|
((bstring*) &be_const_str_input),
|
|
( &(const binstruction[ 1]) { /* code */
|
|
0x80000000, // 0000 RET 0
|
|
})
|
|
)
|
|
);
|
|
/*******************************************************************/
|
|
|
|
|
|
/********************************************************************
|
|
** Solidified class: Leds_animator
|
|
********************************************************************/
|
|
be_local_class(Leds_animator,
|
|
4,
|
|
NULL,
|
|
be_nested_map(13,
|
|
( (struct bmapnode*) &(const bmapnode[]) {
|
|
{ be_nested_key("set_bri", -1505848517, 7, 9), be_const_closure(set_bri_closure) },
|
|
{ be_nested_key("clear", 1550717474, 5, -1), be_const_closure(clear_closure) },
|
|
{ be_nested_key("running", 343848780, 7, -1), be_const_var(3) },
|
|
{ be_nested_key("get_bri", 2041809895, 7, -1), be_const_closure(get_bri_closure) },
|
|
{ be_nested_key("every_50ms", -1911083288, 10, -1), be_const_closure(every_50ms_closure) },
|
|
{ be_nested_key("bri", 2112284244, 3, 0), be_const_var(2) },
|
|
{ be_nested_key("stop", -883741979, 4, 11), be_const_closure(stop_closure) },
|
|
{ be_nested_key("remove", -611183107, 6, 1), be_const_closure(remove_closure) },
|
|
{ be_nested_key("start", 1697318111, 5, 3), be_const_closure(start_closure) },
|
|
{ be_nested_key("strip", -48555823, 5, -1), be_const_var(0) },
|
|
{ be_nested_key("pixel_count", -1855836553, 11, -1), be_const_var(1) },
|
|
{ be_nested_key("init", 380752755, 4, -1), be_const_closure(init_closure) },
|
|
{ be_nested_key("animate", -409180496, 7, 4), be_const_closure(animate_closure) },
|
|
})),
|
|
(be_nested_const_str("Leds_animator", 142168673, 13))
|
|
);
|
|
/*******************************************************************/
|
|
|
|
void be_load_Leds_animator_class(bvm *vm) {
|
|
be_pushntvclass(vm, &be_class_Leds_animator);
|
|
be_setglobal(vm, "Leds_animator");
|
|
be_pop(vm, 1);
|
|
}
|
|
|
|
#endif // USE_WS2812
|