mirror of
https://github.com/hsoft/collapseos.git
synced 2024-11-23 18:28:06 +11:00
avra: make CLR work properly
This commit is contained in:
parent
20861767e6
commit
2652c81519
@ -129,6 +129,8 @@ instrNames:
|
||||
; AVR's mnemonics has those args reversed for more consistency
|
||||
; (destination is always the first arg). The goal of this flag is to
|
||||
; allow this kind of syntactic sugar with minimal complexity.
|
||||
;
|
||||
; Bit 6: Second arg is a copy of the first
|
||||
|
||||
; In the same order as in instrNames
|
||||
instrTbl:
|
||||
@ -136,7 +138,7 @@ instrTbl:
|
||||
.db 0x02, 0b00011100, 0x00 ; ADC
|
||||
.db 0x02, 0b00001100, 0x00 ; ADD
|
||||
.db 0x02, 0b00100000, 0x00 ; AND
|
||||
.db 0x02, 0b00100100, 0x00 ; CLR
|
||||
.db 0x41, 0b00100100, 0x00 ; CLR (Rr copies Rd)
|
||||
.db 0x02, 0b00010100, 0x00 ; CP
|
||||
.db 0x02, 0b00000100, 0x00 ; CPC
|
||||
.db 0x02, 0b00010000, 0x00 ; CPSE
|
||||
@ -291,6 +293,8 @@ parseInstruction:
|
||||
; InstrID is E
|
||||
bit 7, (ix)
|
||||
call nz, .swapHL ; Bit 7 set, swap H and L again!
|
||||
bit 6, (ix)
|
||||
call nz, .cpHintoL ; Bit 6 set, copy H into L
|
||||
ld a, e ; InstrID
|
||||
cp I_ANDI
|
||||
jr c, .spitRd5Rr5
|
||||
@ -474,6 +478,10 @@ parseInstruction:
|
||||
ld l, a
|
||||
ret
|
||||
|
||||
.cpHintoL:
|
||||
ld l, h
|
||||
ret
|
||||
|
||||
; Argspecs: two bytes describing the arguments that are accepted. Possible
|
||||
; values:
|
||||
;
|
||||
|
@ -25,7 +25,7 @@ main:
|
||||
ori r16, 0x05 ; CS00 + CS02 = 1024 prescaler
|
||||
out TCCR0B, r16
|
||||
|
||||
;clr r1
|
||||
clr r1
|
||||
|
||||
loop:
|
||||
in r16, TIFR ; TIFR0
|
||||
|
@ -1 +1 @@
|
||||
å
¿à¿·`¿·ýÐüÏà¿”þ•
|
||||
å
¿à¿·`¿$·ýÐüÏà¿”þ•
|
Loading…
Reference in New Issue
Block a user