]> rtime.felk.cvut.cz Git - arc.git/blob - tools/t32/term.cmm
Initial ARM port
[arc.git] / tools / t32 / term.cmm
1 winclear my_term\r
2 WinPOS 50% 50% 50% 50% 1. 1. my_term\r
3 term.size 80. 300.\r
4 term.scroll on\r
5 term.mode ASCII\r
6 \r
7 IF CPUFAMILY()=="ARM"\r
8 (\r
9   term.METHOD SE e:address.offset(v.address(t32_outport)) e:0\r
10   term.view\r
11 )\r
12 ELSE\r
13 (\r
14   term.view e:address.offset(v.address(t32_outport)) e:0\r
15   term.write e:address.offset(v.address(t32_outport))  hoppsan.log \r
16 )\r
17 \r
18 enddo\r
19 \r
20 \r
21 \r
22 \r
23 \r
24 \r
25 \r
26 \r
27 \r
28 \r