folkert/KEK
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Show progress

Browse source
This commit is contained in:
folkert van heusden 2022-03-13 22:00:48 +01:00
parent 4f0809ee42
commit 1b527c8c38
3 changed files with 77 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
tester-adc-sbc.mac
View file

@ -1,6 +1,9 @@
.EXTERN ALL .EXTERN ALL
test_adc: test_adc:
MOV #what_adc,R0
CALL print_start
; initial value ; initial value
MOV #32769.,R0 MOV #32769.,R0
; number of additions ; number of additions
@ -100,4 +103,8 @@ test_sbc_failed:
sbc_fail_text: sbc_fail_text:
.ASCII "SBC handling FAIL\r\n\x00" .ASCII "SBC handling FAIL\r\n\x00"
what_adc:
.ASCII "ADC/SBC test\r\n\x00"
.EVEN .EVEN

62
tester-addressing.mac
View file

@ -1,6 +1,9 @@
.EXTERN ALL .EXTERN ALL
test_addr_0: test_addr_0:
MOV #what_address,R0
CALL print_start
; address mode 0 ; address mode 0
; b1010101001010101 ; b1010101001010101
; 16 bit put/get ; 16 bit put/get
@ -27,6 +30,7 @@ test_addr_0b_ok:
JMP test_addr_fail JMP test_addr_fail
test_addr_0c_ok: test_addr_0c_ok:
test_addr_1:
; address mode 1 ; address mode 1
; indirect get 16 bit ; indirect get 16 bit
MOV #v1234,R0 MOV #v1234,R0
@ -55,6 +59,7 @@ test_addr_1b_ok:
JMP test_addr_fail JMP test_addr_fail
test_addr_1c_ok: test_addr_1c_ok:
test_addr_2:
; address mode 2 ; address mode 2
; value did not change ; value did not change
MOV #v1234,R0 MOV #v1234,R0
@ -91,6 +96,7 @@ test_addr_2b1_ok:
JMP test_addr_fail JMP test_addr_fail
test_addr_2b2_ok: test_addr_2b2_ok:
test_addr_3:
; verify contents of addr1234 first ; verify contents of addr1234 first
MOV addr1234,r0 MOV addr1234,r0
CMP #1234.,(R0) CMP #1234.,(R0)
@ -107,8 +113,59 @@ test_addr_3b_verify_ok:
JMP test_addr_fail JMP test_addr_fail
test_addr_3b2_ok: test_addr_3b2_ok:
test_addr_4:
; TODO
; address mode 4
; value did not change
MOV #v1234,R0
MOV -(R0),R1
CMP #4455.,R1
BEQ test_addr_4a1_ok
MOV #14.,R0
JMP test_addr_fail
;
test_addr_4a1_ok:
; address drecreased 2 bytes
MOV #v4455before,R2
CMP R0,R2
BEQ test_addr_4a2_ok
MOV #15.,R0
JMP test_addr_fail
test_addr_4a2_ok:
; value did not change
MOV #v1234,R0
MOVB -(R0),R1
CMPB #17.,R1
BEQ test_addr_4a3_ok
MOV #16.,R0
JMP test_addr_fail
test_addr_4a3_ok:
test_addr_5:
; TODO ; TODO
test_addr_6:
MOV #v1234,R0
MOV 2(R0),R1
CMP #4321.,R1
BEQ test_addr_6_ok
MOV #17.,R0
JMP test_addr_fail
test_addr_6_ok:
test_addr_7:
; index deferred
MOV #addr1234,R0
MOV @2(R0),R1
CMP #4321.,R1
BEQ test_addr_7_ok
MOV #18.,R0
JMP test_addr_fail
test_addr_7_ok:
RET RET
test_addr_fail: test_addr_fail:
@ -120,8 +177,13 @@ test_addr_fail:
test_addr_fail_txt: test_addr_fail_txt:
.ASCII "addressing handling FAIL\r\n\x00" .ASCII "addressing handling FAIL\r\n\x00"
what_address:
.ASCII "addressing tests\r\n\x00"
.EVEN .EVEN
v4455before: DW 4455.
v1234: DW 1234. v1234: DW 1234.
v1234after: DW 4321. v1234after: DW 4321.

7
tester-psw.mac
View file

@ -1,6 +1,9 @@
.EXTERN ALL .EXTERN ALL
psw_store_retrieve: psw_store_retrieve:
MOV #what_psw,R0
CALL print_start
; set PSW to all bits set ; set PSW to all bits set
MOV #65535,R1 MOV #65535,R1
MTPS R1 MTPS R1
@ -198,4 +201,8 @@ psw_store_retrieve_fail_text:
psw_trigger_fail_text: psw_trigger_fail_text:
.ASCII "PSW trigger fail\r\n\x00" .ASCII "PSW trigger fail\r\n\x00"
what_psw:
.ASCII "PSW handling test\r\n\x00"
.EVEN .EVEN