tb_uart.vhw

一种实现计算机接口rs232与FPGA通信的基于VHDL语言设计的一段非常简洁的程序

                WAIT FOR 200 ns;
                txdbuf_in <= "00010101";
                -- -------------------------------------
                -- -------------  Current Time:  4485ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00010110";
                -- -------------------------------------
                -- -------------  Current Time:  4685ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00010111";
                -- -------------------------------------
                -- -------------  Current Time:  4885ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00011000";
                -- -------------------------------------
                -- -------------  Current Time:  5085ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00011001";
                -- -------------------------------------
                -- -------------  Current Time:  5285ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00011010";
                -- -------------------------------------
                -- -------------  Current Time:  5485ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00011011";
                -- -------------------------------------
                -- -------------  Current Time:  5685ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00011100";
                -- -------------------------------------
                -- -------------  Current Time:  5885ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00011101";
                -- -------------------------------------
                -- -------------  Current Time:  6085ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00011110";
                -- -------------------------------------
                -- -------------  Current Time:  6285ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00011111";
                -- -------------------------------------
                -- -------------  Current Time:  6485ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00100000";
                -- -------------------------------------
                -- -------------  Current Time:  6685ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00100001";
                -- -------------------------------------
                -- -------------  Current Time:  6885ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00100010";
                -- -------------------------------------
                -- -------------  Current Time:  7085ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00100011";
                -- -------------------------------------
                -- -------------  Current Time:  7285ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00100100";
                -- -------------------------------------
                -- -------------  Current Time:  7485ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00100101";
                -- -------------------------------------
                -- -------------  Current Time:  7685ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00100110";
                -- -------------------------------------
                -- -------------  Current Time:  7885ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00100111";
                -- -------------------------------------
                -- -------------  Current Time:  8085ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00101000";
                -- -------------------------------------
                -- -------------  Current Time:  8285ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00101001";
                -- -------------------------------------
                -- -------------  Current Time:  8485ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00101010";
                -- -------------------------------------
                -- -------------  Current Time:  8685ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00101011";
                -- -------------------------------------
                -- -------------  Current Time:  8885ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00000000";
                -- -------------------------------------
                -- -------------  Current Time:  9085ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00000001";
                -- -------------------------------------
                -- -------------  Current Time:  9285ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00000010";
                -- -------------------------------------
                -- -------------  Current Time:  9485ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00000011";
                -- -------------------------------------
                -- -------------  Current Time:  9685ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00000100";
                -- -------------------------------------
                -- -------------  Current Time:  9885ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00000101";
                -- -------------------------------------
                -- -------------  Current Time:  10085ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00000110";
                -- -------------------------------------
                -- -------------  Current Time:  10285ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00000111";
                -- -------------------------------------
                -- -------------  Current Time:  10485ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00001000";
                -- -------------------------------------
                -- -------------  Current Time:  10685ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00001001";
                -- -------------------------------------
                -- -------------  Current Time:  10885ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00001010";
                -- -------------------------------------
                -- -------------  Current Time:  11085ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00001011";
                -- -------------------------------------
                -- -------------  Current Time:  11285ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00001100";
                -- -------------------------------------
                -- -------------  Current Time:  11485ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00001101";
                -- -------------------------------------
                -- -------------  Current Time:  11685ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00001110";
                -- -------------------------------------
                -- -------------  Current Time:  11885ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00001111";
                -- -------------------------------------
                -- -------------  Current Time:  12085ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00010000";
                -- -------------------------------------
                -- -------------  Current Time:  12285ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00010001";
                -- -------------------------------------
                -- -------------  Current Time:  12485ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00010010";
                -- -------------------------------------
                -- -------------  Current Time:  12685ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00010011";
                -- -------------------------------------
                -- -------------  Current Time:  12885ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00010100";
                -- -------------------------------------
                -- -------------  Current Time:  13085ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00010101";
                -- -------------------------------------
                -- -------------  Current Time:  13285ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00010110";
                -- -------------------------------------
                -- -------------  Current Time:  13485ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00010111";
                -- -------------------------------------
                -- -------------  Current Time:  13685ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00011000";
                -- -------------------------------------
                -- -------------  Current Time:  13885ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00011001";
                -- -------------------------------------
                -- -------------  Current Time:  14085ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00011010";
                -- -------------------------------------
                -- -------------  Current Time:  14285ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00011011";
                -- -------------------------------------
                -- -------------  Current Time:  14485ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00011100";
                -- -------------------------------------
                -- -------------  Current Time:  14685ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00011101";
                -- -------------------------------------
                -- -------------  Current Time:  14885ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00011110";
                -- -------------------------------------
                -- -------------  Current Time:  15085ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00011111";
                -- -------------------------------------
                -- -------------  Current Time:  15285ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00100000";
                -- -------------------------------------
                -- -------------  Current Time:  15485ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00100001";
                -- -------------------------------------
                -- -------------  Current Time:  15685ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00100010";
                -- -------------------------------------
                -- -------------  Current Time:  15885ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00100011";
                -- -------------------------------------
                -- -------------  Current Time:  16085ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00100100";
                -- -------------------------------------
                -- -------------  Current Time:  16285ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00100101";
                -- -------------------------------------
                -- -------------  Current Time:  16485ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00100110";
                -- -------------------------------------
                -- -------------  Current Time:  16685ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00100111";
                -- -------------------------------------
                -- -------------  Current Time:  16885ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00101000";
                -- -------------------------------------
                -- -------------  Current Time:  17085ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00101001";
                -- -------------------------------------
                -- -------------  Current Time:  17285ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00101010";
                -- -------------------------------------
                -- -------------  Current Time:  17485ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00101011";
                -- -------------------------------------
                -- -------------  Current Time:  17685ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00101100";
                -- -------------------------------------
                -- -------------  Current Time:  17885ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00101101";
                -- -------------------------------------
                -- -------------  Current Time:  18085ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00101110";
                -- -------------------------------------
                -- -------------  Current Time:  18285ns