A
Andamanski
Guest
Ta bit štetje kode ideja je bila, vzel iz chip design (VHDL), ljudi in izvajajo v ST za štetje števila aktivnih stikalo (urediti v 16 bitov besedo) ali za odkrivanje co-stikala incident.To je hitra, ni zanka, popoln v enotnem skandirati ciklu.Lahko spreminja za podporo manj ali več bitov.
FUNCTION_BLOCK BIT_CNT
VAR_INPUT
_w: Word; (* vložek 16 * stiki)
END_VAR
VAR_OUTPUT
_cnt: INT; (* število aktivnih stikov *)
END_VAR
VAR
END_VAR
_w: = (_w IN 16 # 5555) (SHR (_w, 1) IN 16 # 5555);
_w: = (_w IN 16 # 3333) (SHR (_w, 2) IN 16 # 3333);
_w: = (_w IN 16 # 0F0F) (SHR (_w, 4) in 16 # 0F0F);
_w: = (_w IN 16 # 00FF) (SHR (_w, 8) in 16 # 00FF);
_cnt: = WORD_TO_INT (_w);
END_FUNCTION_BLOCK
FUNCTION_BLOCK BIT_CNT
VAR_INPUT
_w: Word; (* vložek 16 * stiki)
END_VAR
VAR_OUTPUT
_cnt: INT; (* število aktivnih stikov *)
END_VAR
VAR
END_VAR
_w: = (_w IN 16 # 5555) (SHR (_w, 1) IN 16 # 5555);
_w: = (_w IN 16 # 3333) (SHR (_w, 2) IN 16 # 3333);
_w: = (_w IN 16 # 0F0F) (SHR (_w, 4) in 16 # 0F0F);
_w: = (_w IN 16 # 00FF) (SHR (_w, 8) in 16 # 00FF);
_cnt: = WORD_TO_INT (_w);
END_FUNCTION_BLOCK