mirror of
https://github.com/wfjm/w11.git
synced 2026-01-28 13:09:42 +00:00
- interim release w11a_V0.57 (untagged)
- new C++ and Tcl based backend server supports now RK11 handling - w11a systems operate with rlink over USB on nexsy2 and nexsy3 boards. See w11a_os_guide.txt for details
This commit is contained in:
@@ -1,4 +1,4 @@
|
||||
# $Id: test_w11a_dsta_flow.tcl 502 2013-04-02 19:29:30Z mueller $
|
||||
# $Id: test_w11a_dsta_flow.tcl 510 2013-04-26 16:14:57Z mueller $
|
||||
#
|
||||
# Copyright 2013- by Walter F.J. Mueller <W.F.J.Mueller@gsi.de>
|
||||
# License disclaimer see LICENSE_gpl_v2.txt in $RETROBASE directory
|
||||
@@ -51,20 +51,20 @@ data: .blkw 2*7.
|
||||
.word 177777
|
||||
}
|
||||
|
||||
rw11a::asmrun $cpu sym [list r0 $sym(sub00) \
|
||||
r1 $sym(sub10) \
|
||||
r2 $sym(psub2) \
|
||||
r3 [expr {$sym(sub30)+2}] \
|
||||
r4 $sym(psub4e) \
|
||||
r5 $sym(data) ]
|
||||
rw11a::asmwait $cpu sym 1.0
|
||||
rw11a::asmtreg $cpu [list r0 $sym(sub00) \
|
||||
rw11::asmrun $cpu sym [list r0 $sym(sub00) \
|
||||
r1 $sym(sub10) \
|
||||
r2 $sym(psub2) \
|
||||
r3 [expr {$sym(sub30)+2}] \
|
||||
r4 $sym(psub4e) \
|
||||
r5 $sym(data) ]
|
||||
rw11::asmwait $cpu sym 1.0
|
||||
rw11::asmtreg $cpu [list r0 $sym(sub00) \
|
||||
r1 [expr {$sym(sub10)+2}] \
|
||||
r2 [expr {$sym(psub2)+4}] \
|
||||
r3 $sym(sub30) \
|
||||
r4 $sym(psub4) \
|
||||
r5 [expr {$sym(data) + 7*2*2}] ]
|
||||
rw11a::asmtmem $cpu $sym(data) [list \
|
||||
rw11::asmtmem $cpu $sym(data) [list \
|
||||
0100 $sym(start:100$) \
|
||||
0110 $sym(start:110$) \
|
||||
0120 $sym(start:120$) \
|
||||
@@ -105,17 +105,17 @@ data: .blkw 2*5.
|
||||
.word 177777
|
||||
}
|
||||
|
||||
rw11a::asmrun $cpu sym [list r0 [expr {$sym(sub00)-020}] \
|
||||
rw11::asmrun $cpu sym [list r0 [expr {$sym(sub00)-020}] \
|
||||
r1 [expr {$sym(psub10)-040}] \
|
||||
r5 $sym(data) ]
|
||||
rw11a::asmwait $cpu sym 1.0
|
||||
rw11a::asmtreg $cpu [list r0 [expr {$sym(sub00)-020}] \
|
||||
r1 [expr {$sym(psub10)-040}] \
|
||||
r2 0 \
|
||||
r3 0 \
|
||||
r4 0 \
|
||||
r5 [expr {$sym(data) + 5*2*2}] ]
|
||||
rw11a::asmtmem $cpu $sym(data) [list \
|
||||
rw11::asmwait $cpu sym 1.0
|
||||
rw11::asmtreg $cpu [list r0 [expr {$sym(sub00)-020}] \
|
||||
r1 [expr {$sym(psub10)-040}] \
|
||||
r2 0 \
|
||||
r3 0 \
|
||||
r4 0 \
|
||||
r5 [expr {$sym(data) + 5*2*2}] ]
|
||||
rw11::asmtmem $cpu $sym(data) [list \
|
||||
01100 $sym(start:1100$) \
|
||||
01110 $sym(start:1110$) \
|
||||
01120 $sym(start:1120$) \
|
||||
|
||||
@@ -1,4 +1,4 @@
|
||||
# $Id: test_w11a_dstm_word_flow.tcl 502 2013-04-02 19:29:30Z mueller $
|
||||
# $Id: test_w11a_dstm_word_flow.tcl 510 2013-04-26 16:14:57Z mueller $
|
||||
#
|
||||
# Copyright 2013- by Walter F.J. Mueller <W.F.J.Mueller@gsi.de>
|
||||
# License disclaimer see LICENSE_gpl_v2.txt in $RETROBASE directory
|
||||
@@ -38,20 +38,20 @@ pdata5: .word data5,data5+2
|
||||
pdat5e:
|
||||
}
|
||||
|
||||
rw11a::asmrun $cpu sym [list r0 010 \
|
||||
r1 $sym(data1) \
|
||||
r2 $sym(data2) \
|
||||
r3 $sym(pdata3) \
|
||||
r4 $sym(data4e) \
|
||||
r5 $sym(pdat5e) ]
|
||||
rw11a::asmwait $cpu sym 1.0
|
||||
rw11a::asmtreg $cpu [list r0 011 \
|
||||
r1 $sym(data1) \
|
||||
r2 [expr {$sym(data2) + 4}] \
|
||||
r3 [expr {$sym(pdata3) + 4}] \
|
||||
r4 [expr {$sym(data4e) - 4}] \
|
||||
r5 [expr {$sym(pdat5e) - 4}] ]
|
||||
rw11a::asmtmem $cpu $sym(data1) {021 031 032 041 042 051 052 061 062}
|
||||
rw11::asmrun $cpu sym [list r0 010 \
|
||||
r1 $sym(data1) \
|
||||
r2 $sym(data2) \
|
||||
r3 $sym(pdata3) \
|
||||
r4 $sym(data4e) \
|
||||
r5 $sym(pdat5e) ]
|
||||
rw11::asmwait $cpu sym 1.0
|
||||
rw11::asmtreg $cpu [list r0 011 \
|
||||
r1 $sym(data1) \
|
||||
r2 [expr {$sym(data2) + 4}] \
|
||||
r3 [expr {$sym(pdata3) + 4}] \
|
||||
r4 [expr {$sym(data4e) - 4}] \
|
||||
r5 [expr {$sym(pdat5e) - 4}] ]
|
||||
rw11::asmtmem $cpu $sym(data1) {021 031 032 041 042 051 052 061 062}
|
||||
|
||||
|
||||
rlc log " nn(r0),@nn(r0),var,@var,@#var (mode=6,7,67,77,37)"
|
||||
@@ -74,7 +74,7 @@ pdata1: .word data1
|
||||
pdata3: .word data3
|
||||
}
|
||||
|
||||
rw11a::asmrun $cpu sym [list r0 [expr {$sym(data0)-020}] \
|
||||
r1 [expr {$sym(pdata1)-040}] ]
|
||||
rw11a::asmwait $cpu sym 1.0
|
||||
rw11a::asmtmem $cpu $sym(data0) {0201 0211 0221 0231 0241}
|
||||
rw11::asmrun $cpu sym [list r0 [expr {$sym(data0)-020}] \
|
||||
r1 [expr {$sym(pdata1)-040}] ]
|
||||
rw11::asmwait $cpu sym 1.0
|
||||
rw11::asmtmem $cpu $sym(data0) {0201 0211 0221 0231 0241}
|
||||
|
||||
@@ -1,4 +1,4 @@
|
||||
# $Id: test_w11a_dstw_word_flow.tcl 502 2013-04-02 19:29:30Z mueller $
|
||||
# $Id: test_w11a_dstw_word_flow.tcl 510 2013-04-26 16:14:57Z mueller $
|
||||
#
|
||||
# Copyright 2013- by Walter F.J. Mueller <W.F.J.Mueller@gsi.de>
|
||||
# License disclaimer see LICENSE_gpl_v2.txt in $RETROBASE directory
|
||||
@@ -38,19 +38,19 @@ pdata5: .word data5,data5+2
|
||||
pdat5e:
|
||||
}
|
||||
|
||||
rw11a::asmrun $cpu sym [list r1 $sym(data1) \
|
||||
rw11::asmrun $cpu sym [list r1 $sym(data1) \
|
||||
r2 $sym(data2) \
|
||||
r3 $sym(pdata3) \
|
||||
r4 $sym(data4e) \
|
||||
r5 $sym(pdat5e) ]
|
||||
rw11a::asmwait $cpu sym 1.0
|
||||
rw11a::asmtreg $cpu [list r0 0100 \
|
||||
r1 $sym(data1) \
|
||||
r2 [expr {$sym(data2) + 4}] \
|
||||
r3 [expr {$sym(pdata3) + 4}] \
|
||||
r4 [expr {$sym(data4e) - 4}] \
|
||||
r5 [expr {$sym(pdat5e) - 4}] ]
|
||||
rw11a::asmtmem $cpu $sym(data1) {0110 0120 0121 0130 0131 0140 0141 0150 0151}
|
||||
rw11::asmwait $cpu sym 1.0
|
||||
rw11::asmtreg $cpu [list r0 0100 \
|
||||
r1 $sym(data1) \
|
||||
r2 [expr {$sym(data2) + 4}] \
|
||||
r3 [expr {$sym(pdata3) + 4}] \
|
||||
r4 [expr {$sym(data4e) - 4}] \
|
||||
r5 [expr {$sym(pdat5e) - 4}] ]
|
||||
rw11::asmtmem $cpu $sym(data1) {0110 0120 0121 0130 0131 0140 0141 0150 0151}
|
||||
|
||||
|
||||
|
||||
@@ -74,7 +74,7 @@ pdata1: .word data1
|
||||
pdata3: .word data3
|
||||
}
|
||||
|
||||
rw11a::asmrun $cpu sym [list r0 [expr {$sym(data0)-020}] \
|
||||
r1 [expr {$sym(pdata1)-040}] ]
|
||||
rw11a::asmwait $cpu sym 1.0
|
||||
rw11a::asmtmem $cpu $sym(data0) {0200 0210 0220 0230 0240}
|
||||
rw11::asmrun $cpu sym [list r0 [expr {$sym(data0)-020}] \
|
||||
r1 [expr {$sym(pdata1)-040}] ]
|
||||
rw11::asmwait $cpu sym 1.0
|
||||
rw11::asmtmem $cpu $sym(data0) {0200 0210 0220 0230 0240}
|
||||
|
||||
@@ -1,4 +1,4 @@
|
||||
# $Id: test_w11a_inst_traps.tcl 502 2013-04-02 19:29:30Z mueller $
|
||||
# $Id: test_w11a_inst_traps.tcl 510 2013-04-26 16:14:57Z mueller $
|
||||
#
|
||||
# Copyright 2013- by Walter F.J. Mueller <W.F.J.Mueller@gsi.de>
|
||||
# License disclaimer see LICENSE_gpl_v2.txt in $RETROBASE directory
|
||||
@@ -62,13 +62,13 @@ data: .blkw 6.*5.
|
||||
.word 177777
|
||||
}
|
||||
|
||||
rw11a::asmrun $cpu sym [list r5 $sym(data) ]
|
||||
rw11a::asmwait $cpu sym 1.0
|
||||
rw11a::asmtreg $cpu [list r0 0 r1 0 r2 0 r3 0 \
|
||||
r5 [expr {$sym(data) + 6*5*2}] \
|
||||
sp $sym(start) ]
|
||||
rw11::asmrun $cpu sym [list r5 $sym(data) ]
|
||||
rw11::asmwait $cpu sym 1.0
|
||||
rw11::asmtreg $cpu [list r0 0 r1 0 r2 0 r3 0 \
|
||||
r5 [expr {$sym(data) + 6*5*2}] \
|
||||
sp $sym(start) ]
|
||||
# data: trap ps; trap id; stack-pc; stack-ps opcode
|
||||
rw11a::asmtmem $cpu $sym(data) \
|
||||
rw11::asmtmem $cpu $sym(data) \
|
||||
[list 000340 001014 $sym(start:350$) 000350 0000003 \
|
||||
000341 001020 $sym(start:351$) 000351 0000004 \
|
||||
000342 001030 $sym(start:352$) 000352 0104100 \
|
||||
|
||||
@@ -1,4 +1,4 @@
|
||||
# $Id: test_w11a_srcr_word_flow.tcl 502 2013-04-02 19:29:30Z mueller $
|
||||
# $Id: test_w11a_srcr_word_flow.tcl 510 2013-04-26 16:14:57Z mueller $
|
||||
#
|
||||
# Copyright 2013- by Walter F.J. Mueller <W.F.J.Mueller@gsi.de>
|
||||
# License disclaimer see LICENSE_gpl_v2.txt in $RETROBASE directory
|
||||
@@ -22,9 +22,9 @@ lpc: halt
|
||||
stop:
|
||||
}
|
||||
|
||||
rw11a::asmrun $cpu sym [list r0 01234]
|
||||
rw11a::asmwait $cpu sym 1.0
|
||||
rw11a::asmtreg $cpu [list r0 01234 \
|
||||
rw11::asmrun $cpu sym [list r0 01234]
|
||||
rw11::asmwait $cpu sym 1.0
|
||||
rw11::asmtreg $cpu [list r0 01234 \
|
||||
r1 01234 \
|
||||
r2 $sym(stack) \
|
||||
r3 $sym(lpc) \
|
||||
@@ -45,14 +45,14 @@ data: .word 1001
|
||||
.word 1002
|
||||
}
|
||||
|
||||
rw11a::asmrun $cpu sym [list r0 $sym(data)]
|
||||
rw11a::asmwait $cpu sym 1.0
|
||||
rw11a::asmtreg $cpu [list r0 $sym(data) \
|
||||
r1 001001 \
|
||||
r2 001001 \
|
||||
r3 001002 \
|
||||
r4 001002 \
|
||||
r5 001001]
|
||||
rw11::asmrun $cpu sym [list r0 $sym(data)]
|
||||
rw11::asmwait $cpu sym 1.0
|
||||
rw11::asmtreg $cpu [list r0 $sym(data) \
|
||||
r1 001001 \
|
||||
r2 001001 \
|
||||
r3 001002 \
|
||||
r4 001002 \
|
||||
r5 001001]
|
||||
|
||||
rlc log " @(r0)+,@-(r0) (mode=3,5)"
|
||||
$cpu ldasm -lst lst -sym sym {
|
||||
@@ -71,14 +71,14 @@ data0: .word 2001
|
||||
data1: .word 2002
|
||||
}
|
||||
|
||||
rw11a::asmrun $cpu sym [list r0 $sym(pdata)]
|
||||
rw11a::asmwait $cpu sym 1.0
|
||||
rw11a::asmtreg $cpu [list r0 $sym(pdata) \
|
||||
r1 002001 \
|
||||
r2 002002 \
|
||||
r3 [expr {$sym(pdata)+4}] \
|
||||
r4 002002 \
|
||||
r5 002001]
|
||||
rw11::asmrun $cpu sym [list r0 $sym(pdata)]
|
||||
rw11::asmwait $cpu sym 1.0
|
||||
rw11::asmtreg $cpu [list r0 $sym(pdata) \
|
||||
r1 002001 \
|
||||
r2 002002 \
|
||||
r3 [expr {$sym(pdata)+4}] \
|
||||
r4 002002 \
|
||||
r5 002001]
|
||||
|
||||
rlc log " nn(r0),@nn(r0) (mode=6,7)"
|
||||
$cpu ldasm -lst lst -sym sym {
|
||||
@@ -99,14 +99,14 @@ data0: .word 003002
|
||||
data1: .word 003004
|
||||
}
|
||||
|
||||
rw11a::asmrun $cpu sym [list r0 $sym(data)]
|
||||
rw11a::asmwait $cpu sym 1.0
|
||||
rw11a::asmtreg $cpu [list r0 $sym(data) \
|
||||
r1 003001 \
|
||||
r2 003002 \
|
||||
r3 003003 \
|
||||
r4 003004 \
|
||||
r5 0]
|
||||
rw11::asmrun $cpu sym [list r0 $sym(data)]
|
||||
rw11::asmwait $cpu sym 1.0
|
||||
rw11::asmtreg $cpu [list r0 $sym(data) \
|
||||
r1 003001 \
|
||||
r2 003002 \
|
||||
r3 003003 \
|
||||
r4 003004 \
|
||||
r5 0]
|
||||
|
||||
rlc log " #nn,@#nn,var,@var (mode=27,37,67,77)"
|
||||
$cpu ldasm -lst lst -sym sym {
|
||||
@@ -124,11 +124,11 @@ data3: .word 004003
|
||||
data4: .word 004004
|
||||
}
|
||||
|
||||
rw11a::asmrun $cpu sym {}
|
||||
rw11a::asmwait $cpu sym 1.0
|
||||
rw11a::asmtreg $cpu [list r0 0 \
|
||||
r1 004001 \
|
||||
r2 004002 \
|
||||
r3 004003 \
|
||||
r4 004004 \
|
||||
r5 0]
|
||||
rw11::asmrun $cpu sym {}
|
||||
rw11::asmwait $cpu sym 1.0
|
||||
rw11::asmtreg $cpu [list r0 0 \
|
||||
r1 004001 \
|
||||
r2 004002 \
|
||||
r3 004003 \
|
||||
r4 004004 \
|
||||
r5 0]
|
||||
|
||||
Reference in New Issue
Block a user