mirror of
https://github.com/mist-devel/mist-board.git
synced 2026-05-04 15:26:25 +00:00
27 lines
402 B
ArmAsm
27 lines
402 B
ArmAsm
AREA |main|, CODE, READONLY
|
|
EXPORT _start
|
|
|
|
ORG &1000
|
|
_start
|
|
;; setup the carry for the test
|
|
;; could do this in program.cpp but
|
|
;; doing this makes the test repeatable
|
|
;; on a real Archie from BASIC V.
|
|
MOV R0,#0
|
|
SUB R1,R0,#1
|
|
ADDS R1,R1,#1
|
|
;;Do the test
|
|
MOV R0,#0
|
|
MOV R0,R0,RRX
|
|
EXIT
|
|
;; clean exit path so that R15 will match up
|
|
NOP
|
|
NOP
|
|
|
|
SWI &FFFFFF
|
|
|
|
NOP
|
|
NOP
|
|
|
|
END
|