// license:BSD-3-Clause // copyright-holders:Ryan Holtz /* * nld_74165.cpp * */ #include "nld_74165.h" #include "netlist/nl_base.h" #include "nlid_system.h" namespace netlist { namespace devices { NETLIB_OBJECT(74165) { NETLIB_CONSTRUCTOR(74165) , m_DATA(*this, {{ "H", "G", "F", "E", "D", "C", "B", "A" }}) , m_SER(*this, "SER") , m_SH_LDQ(*this, "SH_LDQ") , m_CLK(*this, "CLK") , m_CLKINH(*this, "CLKINH") , m_QH(*this, "QH") , m_QHQ(*this, "QHQ") , m_shifter(*this, "m_shifter", 0) , m_last_CLK(*this, "m_last_CLK", 0) , m_power_pins(*this) { } NETLIB_RESETI(); NETLIB_UPDATEI(); protected: object_array_t m_DATA; logic_input_t m_SER; logic_input_t m_SH_LDQ; logic_input_t m_CLK; logic_input_t m_CLKINH; logic_output_t m_QH; logic_output_t m_QHQ; state_var m_shifter; state_var m_last_CLK; nld_power_pins m_power_pins; }; NETLIB_OBJECT_DERIVED(74165_dip, 74165) { NETLIB_CONSTRUCTOR_DERIVED(74165_dip, 74165) { register_subalias("1", m_SH_LDQ); register_subalias("2", m_CLK); register_subalias("3", m_DATA[4]); register_subalias("4", m_DATA[5]); register_subalias("5", m_DATA[6]); register_subalias("6", m_DATA[7]); register_subalias("7", m_QHQ); register_subalias("8", "GND"); register_subalias("9", m_QH); register_subalias("10", m_SER); register_subalias("11", m_DATA[0]); register_subalias("12", m_DATA[1]); register_subalias("13", m_DATA[2]); register_subalias("14", m_DATA[3]); register_subalias("15", m_CLKINH); register_subalias("16", "VCC"); } }; NETLIB_RESET(74165) { m_shifter = 0; m_last_CLK = 0; } // FIXME: Timing NETLIB_UPDATE(74165) { netlist_sig_t old_qh = m_QH.net().Q(); netlist_sig_t qh = 0; if (!m_SH_LDQ()) { m_shifter = 0; for (std::size_t i=0; i<8; i++) m_shifter |= (m_DATA[i]() << i); } else if (!m_CLK() || m_CLKINH()) { // FIXME: qh is overwritten below? qh = old_qh; } else if (!m_last_CLK) { unsigned high_bit = m_SER() ? 0x80 : 0; m_shifter = high_bit | (m_shifter >> 1); } qh = m_shifter & 1; m_last_CLK = m_CLK(); m_QH.push(qh, NLTIME_FROM_NS(20)); // FIXME: Timing } NETLIB_DEVICE_IMPL(74165, "TTL_74165", "+CLK,+CLKINH,+SH_LDQ,+SER,+A,+B,+C,+D,+E,+F,+G,+H,@VCC,@GND") NETLIB_DEVICE_IMPL(74165_dip, "TTL_74165_DIP", "") } //namespace devices } // namespace netlist