Qsys: UART AVALON SLAVE

Guys,

I'm approachinng to Qsys and I take a project from David H. and I added the UART AVALON SLAVE.

https://mail.google.com/mail/u/0/?ui=2&ik=08b9ee9ee4&view=fimg&th=150b404900d57f1a&attid=0.2&disp=emb&realattid=ii_150b3dbc1eb0f5e1&attbid=ANGjdJ-4yv904mDS8rcJ3fVJue_uzMrw9w5QZCtg9H0Xcg3tr2ziJNhqOUR_7A6sW73IqJ1EHue-92TdCnc8DKmiR81rH6JZybO9rtitG0TKFSqLIsiE9a_jTomhnfI&sz=w1126-h364&ats=1446133358540&rm=150b404900d57f1a&zw&atsh=1

I would use the "jtag_master" to test the "uart_0".

My first goal is able to send to terminal some characters thru System Console inside Qsys.

I open the UART AVALON Datasheet and look at the register Mapping:

https://mail.google.com/mail/u/0/?ui=2&ik=08b9ee9ee4&view=fimg&th=150b404900d57f1a&attid=0.1&disp=emb&realattid=ii_150b3db0af5a7b5c&attbid=ANGjdJ8Y046GJ096iWlYcCG0JHwkRFRk4io_6fdWSpa_vN95jZX0GeU-HH5h8hrOq5W2fs9Z3KPl-Rq4NEaEtuAymi1jLUFSlJysjMexS5gPpaT-pcJNmKML9pjLrD8&sz=w1126-h500&ats=1446133358540&rm=150b404900d57f1a&zw&atsh=1

and I add this code inside tcl script:

proc uart_test {{len 0x2F}} {
    puts 
    for {set i 0} {$i < $len} {incr i} {
        set addr 0x02000001
        
        set data 
        
        puts "Info: write at $addr, $data!"
        jtag_write $addr $data
    }
    return
}

But I have no success to send some byte to my serial port.

I think it could be a good "debug" system and for newbee like me very usefull to start.

Best Regards,

Alessandro