tb_uart.vhw

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

                WAIT FOR 200 ns;
                txdbuf_in <= "00101111";
                -- -------------------------------------
                -- -------------  Current Time:  18485ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00110000";
                -- -------------------------------------
                -- -------------  Current Time:  18685ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00110001";
                -- -------------------------------------
                -- -------------  Current Time:  18885ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00110010";
                -- -------------------------------------
                -- -------------  Current Time:  19085ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00110011";
                -- -------------------------------------
                -- -------------  Current Time:  19285ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00110100";
                -- -------------------------------------
                -- -------------  Current Time:  19485ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00110101";
                -- -------------------------------------
                -- -------------  Current Time:  19685ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00110110";
                -- -------------------------------------
                -- -------------  Current Time:  19885ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00110111";
                -- -------------------------------------
                -- -------------  Current Time:  20085ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00111000";
                -- -------------------------------------
                -- -------------  Current Time:  20285ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00111001";
                -- -------------------------------------
                -- -------------  Current Time:  20485ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00111010";
                -- -------------------------------------
                -- -------------  Current Time:  20685ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00111011";
                -- -------------------------------------
                -- -------------  Current Time:  20885ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00111100";
                -- -------------------------------------
                -- -------------  Current Time:  21085ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00111101";
                -- -------------------------------------
                -- -------------  Current Time:  21285ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00111110";
                -- -------------------------------------
                -- -------------  Current Time:  21485ns
                WAIT FOR 200 ns;
                txdbuf_in <= "00111111";
                -- -------------------------------------
                -- -------------  Current Time:  21685ns
                WAIT FOR 200 ns;
                txdbuf_in <= "01000000";
                -- -------------------------------------
                -- -------------  Current Time:  21885ns
                WAIT FOR 200 ns;
                txdbuf_in <= "01000001";
                -- -------------------------------------
                -- -------------  Current Time:  22085ns
                WAIT FOR 200 ns;
                txdbuf_in <= "01000010";
                -- -------------------------------------
                -- -------------  Current Time:  22285ns
                WAIT FOR 200 ns;
                txdbuf_in <= "01000011";
                -- -------------------------------------
                -- -------------  Current Time:  22485ns
                WAIT FOR 200 ns;
                txdbuf_in <= "01000100";
                -- -------------------------------------
                -- -------------  Current Time:  22685ns
                WAIT FOR 200 ns;
                txdbuf_in <= "01000101";
                -- -------------------------------------
                -- -------------  Current Time:  22885ns
                WAIT FOR 200 ns;
                txdbuf_in <= "01000110";
                -- -------------------------------------
                -- -------------  Current Time:  23085ns
                WAIT FOR 200 ns;
                txdbuf_in <= "01000111";
                -- -------------------------------------
                -- -------------  Current Time:  23285ns
                WAIT FOR 200 ns;
                txdbuf_in <= "01001000";
                -- -------------------------------------
                -- -------------  Current Time:  23485ns
                WAIT FOR 200 ns;
                txdbuf_in <= "01001001";
                -- -------------------------------------
                -- -------------  Current Time:  23685ns
                WAIT FOR 200 ns;
                txdbuf_in <= "01001010";
                -- -------------------------------------
                -- -------------  Current Time:  23885ns
                WAIT FOR 200 ns;
                txdbuf_in <= "01001011";
                -- -------------------------------------
                -- -------------  Current Time:  24085ns
                WAIT FOR 200 ns;
                txdbuf_in <= "01001100";
                -- -------------------------------------
                -- -------------  Current Time:  24285ns
                WAIT FOR 200 ns;
                txdbuf_in <= "01001101";
                -- -------------------------------------
                -- -------------  Current Time:  24485ns
                WAIT FOR 200 ns;
                txdbuf_in <= "01001110";
                -- -------------------------------------
                -- -------------  Current Time:  24685ns
                WAIT FOR 200 ns;
                txdbuf_in <= "01001111";
                -- -------------------------------------
                -- -------------  Current Time:  24885ns
                WAIT FOR 200 ns;
                txdbuf_in <= "01010000";
                -- -------------------------------------
                -- -------------  Current Time:  25085ns
                WAIT FOR 200 ns;
                txdbuf_in <= "01010001";
                -- -------------------------------------
                -- -------------  Current Time:  25285ns
                WAIT FOR 200 ns;
                txdbuf_in <= "01010010";
                -- -------------------------------------
                -- -------------  Current Time:  25485ns
                WAIT FOR 200 ns;
                txdbuf_in <= "01010011";
                -- -------------------------------------
                -- -------------  Current Time:  25685ns
                WAIT FOR 200 ns;
                txdbuf_in <= "01010100";
                -- -------------------------------------
                -- -------------  Current Time:  25885ns
                WAIT FOR 200 ns;
                txdbuf_in <= "01010101";
                -- -------------------------------------
                -- -------------  Current Time:  26085ns
                WAIT FOR 200 ns;
                txdbuf_in <= "01010110";
                -- -------------------------------------
                -- -------------  Current Time:  26285ns
                WAIT FOR 200 ns;
                txdbuf_in <= "01010111";
                -- -------------------------------------
                -- -------------  Current Time:  26485ns
                WAIT FOR 200 ns;
                txdbuf_in <= "01011000";
                -- -------------------------------------
                -- -------------  Current Time:  26685ns
                WAIT FOR 200 ns;
                txdbuf_in <= "01011001";
                -- -------------------------------------
                -- -------------  Current Time:  26885ns
                WAIT FOR 200 ns;
                txdbuf_in <= "01011010";
                -- -------------------------------------
                -- -------------  Current Time:  27085ns
                WAIT FOR 200 ns;
                txdbuf_in <= "01011011";
                -- -------------------------------------
                -- -------------  Current Time:  27285ns
                WAIT FOR 200 ns;
                txdbuf_in <= "01011100";
                -- -------------------------------------
                -- -------------  Current Time:  27485ns
                WAIT FOR 200 ns;
                txdbuf_in <= "01011101";
                -- -------------------------------------
                -- -------------  Current Time:  27685ns
                WAIT FOR 200 ns;
                txdbuf_in <= "01011110";
                -- -------------------------------------
                -- -------------  Current Time:  27885ns
                WAIT FOR 200 ns;
                txdbuf_in <= "01011111";
                -- -------------------------------------
                -- -------------  Current Time:  28085ns
                WAIT FOR 200 ns;
                txdbuf_in <= "01100000";
                -- -------------------------------------
                -- -------------  Current Time:  28285ns
                WAIT FOR 200 ns;
                txdbuf_in <= "01100001";
                -- -------------------------------------
                -- -------------  Current Time:  28485ns
                WAIT FOR 200 ns;
                txdbuf_in <= "01100010";
                -- -------------------------------------
                -- -------------  Current Time:  28685ns
                WAIT FOR 200 ns;
                txdbuf_in <= "01100011";
                -- -------------------------------------
                -- -------------  Current Time:  28885ns
                WAIT FOR 200 ns;
                txdbuf_in <= "01100100";
                -- -------------------------------------
                -- -------------  Current Time:  29085ns
                WAIT FOR 200 ns;
                txdbuf_in <= "01100101";
                -- -------------------------------------
                -- -------------  Current Time:  29285ns
                WAIT FOR 200 ns;
                txdbuf_in <= "01100110";
                -- -------------------------------------
                -- -------------  Current Time:  29485ns
                WAIT FOR 200 ns;
                txdbuf_in <= "01100111";
                -- -------------------------------------
                -- -------------  Current Time:  29685ns
                WAIT FOR 200 ns;
                txdbuf_in <= "01101000";
                -- -------------------------------------
                -- -------------  Current Time:  29885ns
                WAIT FOR 200 ns;
                txdbuf_in <= "01101001";
                -- -------------------------------------
                -- -------------  Current Time:  30085ns
                WAIT FOR 200 ns;
                txdbuf_in <= "01101010";
                -- -------------------------------------
                -- -------------  Current Time:  30285ns
                WAIT FOR 200 ns;
                txdbuf_in <= "01101011";
                -- -------------------------------------
                -- -------------  Current Time:  30485ns
                WAIT FOR 200 ns;
                txdbuf_in <= "01101100";
                -- -------------------------------------
                -- -------------  Current Time:  30685ns
                WAIT FOR 200 ns;
                txdbuf_in <= "01101101";
                -- -------------------------------------
                -- -------------  Current Time:  30885ns
                WAIT FOR 200 ns;
                txdbuf_in <= "01101110";
                -- -------------------------------------
                -- -------------  Current Time:  31085ns
                WAIT FOR 200 ns;
                txdbuf_in <= "01101111";
                -- -------------------------------------
                -- -------------  Current Time:  31285ns
                WAIT FOR 200 ns;
                txdbuf_in <= "01110000";
                -- -------------------------------------
                -- -------------  Current Time:  31485ns
                WAIT FOR 200 ns;
                txdbuf_in <= "01110001";
                -- -------------------------------------
                -- -------------  Current Time:  31685ns
                WAIT FOR 200 ns;
                txdbuf_in <= "01110010";
                -- -------------------------------------
                -- -------------  Current Time:  31885ns
                WAIT FOR 200 ns;
                txdbuf_in <= "01110011";
                -- -------------------------------------
                -- -------------  Current Time:  32085ns
                WAIT FOR 200 ns;
                txdbuf_in <= "01110100";
                -- -------------------------------------
                -- -------------  Current Time:  32285ns