| |
mhindsbo
Account closed
Registered: Dec 2014
Posts: 50 |
ROL'in a byte onto itself
What is the fastest and/or shortest code for rolling a pattern through a byte? I use it to trigger an action following a certain pattern. I came up with (18 cycles worst case / 12 bytes):
clc
lda pattern
bpl no_carry
sec
no_carry rol pattern
bcs take_action
if your pattern ends on a 1 (bit 0 = 1) then you could also do (17 cycles worst case / 13 bytes)
lda pattern
bne @cont
lda #%00110101 ; restore pattern
@cont asl
sta pattern
bcs take_action
any other variations? |
|
| |
chatGPZ
Registered: Dec 2001
Posts: 11100 |
ldx pattern
lda table,x
sta pattern
|
| |
mhindsbo
Account closed
Registered: Dec 2014
Posts: 50 |
Like it. 15 cycles (once you add the branch to take action) and 19 bytes (incl. branch and 8 byte table) if I am correct. If you have different patterns then full page table. |
| |
ChristopherJam
Registered: Aug 2004
Posts: 1370 |
Should be able to replace the first version with this?
lda pattern
asl a
rol pattern
bcs take_action
|
| |
mhindsbo
Account closed
Registered: Dec 2014
Posts: 50 |
indeed ... now why did I miss that ;-) |
| |
Oswald
Registered: Apr 2002
Posts: 5017 |
my 2 cents:
cmp #$80 will put highest bit into carry aswell. useful if you dont want to destroy a. |
| |
JackAsser
Registered: Jun 2002
Posts: 1987 |
Quote: my 2 cents:
cmp #$80 will put highest bit into carry aswell. useful if you dont want to destroy a.
Was just about to write it!! |
| |
Hoogo
Registered: Jun 2002
Posts: 102 |
asl pattern
bcc no_action
inc pattern |
| |
Peiselulli
Registered: Oct 2006
Posts: 81 |
asl
adc #$00 |
| |
ChristopherJam
Registered: Aug 2004
Posts: 1370 |
Hoogo wins \O/ |
| |
ChristopherJam
Registered: Aug 2004
Posts: 1370 |
I do like that (with a change of how the state is encoded) Groepaz' solution gives you arbitrary length sequences (as long as there are no more than 128 ones and no more than 128 zeros).
The table is contiguous, tooa fact that eluded me before I realised you could use a run of numbers ending with 127 for the zero states, and from 128 up for the ones (eg. use 128,125,126,129,127 to represent the sequence 10010) |
| |
Oswald
Registered: Apr 2002
Posts: 5017 |
Quote: I do like that (with a change of how the state is encoded) Groepaz' solution gives you arbitrary length sequences (as long as there are no more than 128 ones and no more than 128 zeros).
The table is contiguous, tooa fact that eluded me before I realised you could use a run of numbers ending with 127 for the zero states, and from 128 up for the ones (eg. use 128,125,126,129,127 to represent the sequence 10010)
dont think groepaz has put so much thought into it :) |
| |
ChristopherJam
Registered: Aug 2004
Posts: 1370 |
Quoting Oswalddont think groepaz has put so much thought into it :)
I probably should have said groepaz' code, (with mhindsbo's BMI appended), rather than his solution ;-) |
| |
mhindsbo
Account closed
Registered: Dec 2014
Posts: 50 |
i like Hoogo's for both its speed and size and Groepaz if you have the mem and need the long patterns. this was good input. thanks all. |
| |
JackAsser
Registered: Jun 2002
Posts: 1987 |
Quote: asl pattern
bcc no_action
inc pattern
This is excellent. I never thought of it.
1) Smaller
2) Faster
3) Doesn't clobber any registers except Status.
=> Perfect optimization. 10/10 rating. |
| |
Oswald
Registered: Apr 2002
Posts: 5017 |
yup. +1 |
| |
Frantic
Registered: Mar 2003
Posts: 1627 |
Yes, very nice.
@Hoogo: I'd like to add this to codebase, but before doing so I just want to ask if you would rather prefer to do it yourself?
(A possible modification of this might be to use 0 as "take action flag" instead of 1, so that the inc is only performed when no particular action is to be taken, which might smoothen the averate cpu cycle consumtion each time the code is executed including the execution of the code for the "action".) |
| |
Oswald
Registered: Apr 2002
Posts: 5017 |
btw never thought of this, but RMW instructions work so, that the 6510 reads the byte into an 'inner' alu, so it can leave A alone ? |
| |
JackAsser
Registered: Jun 2002
Posts: 1987 |
Quote: btw never thought of this, but RMW instructions work so, that the 6510 reads the byte into an 'inner' alu, so it can leave A alone ?
Not quite. There is not a single ALU, there are increment unit, shift units etc. Each unit can be used by different sources. Check http://vignette1.wikia.nocookie.net/microchip/images/c/c9/MOS-6.. for more in-depth. |
| |
Bitbreaker
Registered: Oct 2002
Posts: 499 |
For a more readable version try this :-)
http://vignette1.wikia.nocookie.net/microchip/images/c/c9/MOS-6..
or:
http://www.weihenstephan.org/~michaste/pagetable/6502/6502.jpg |
| |
Oswald
Registered: Apr 2002
Posts: 5017 |
Quote: Not quite. There is not a single ALU, there are increment unit, shift units etc. Each unit can be used by different sources. Check http://vignette1.wikia.nocookie.net/microchip/images/c/c9/MOS-6.. for more in-depth.
;) |
| |
Hoogo
Registered: Jun 2002
Posts: 102 |
Quoting Frantic@Hoogo: I'd like to add this to codebase, but before doing so I just want to ask if you would rather prefer to do it yourself? Don't bother, just add it. I'm a little surprised by all this reaction... |
| |
Frantic
Registered: Mar 2003
Posts: 1627 |
Quote: Quoting Frantic@Hoogo: I'd like to add this to codebase, but before doing so I just want to ask if you would rather prefer to do it yourself? Don't bother, just add it. I'm a little surprised by all this reaction...
I guess nerdy coders like us find the simplicity of such small and simple tricks beautiful.
https://codebase64.org/doku.php?id=base:rotate_byte_and_act_on_..
(Couldn't come up with a sensible name for the article really, but hopefully it is comprehensible.) |
| |
Digger
Registered: Mar 2005
Posts: 421 |
What's could be a practical application for that? |
| |
mhindsbo
Account closed
Registered: Dec 2014
Posts: 50 |
I use it for an alternating fire pattern. This piece of code sits in the fire function and decides if it fires or not when called |
| |
Copyfault
Registered: Dec 2001
Posts: 466 |
Quoting Hoogoasl pattern
bcc no_action
inc pattern
Wow, that's true art!
Thanks for being (or better getting) active again, Frank ;) |
| |
Style
Registered: Jun 2004
Posts: 498 |
Quote: Quoting Hoogoasl pattern
bcc no_action
inc pattern
Wow, that's true art!
Thanks for being (or better getting) active again, Frank ;)
Id use
ASL mem
ADC #0 |
| |
Hoogo
Registered: Jun 2002
Posts: 102 |
Quoting StyleASL mem
ADC #0 It's easier, faster and shorter, but does not work :) Where's the Accu coming from, and where does it go? |
| |
chatGPZ
Registered: Dec 2001
Posts: 11100 |
Quote:It's easier, faster and shorter, but does not work
AEG would love it *g* |
| |
Style
Registered: Jun 2004
Posts: 498 |
Quote: Quoting StyleASL mem
ADC #0 It's easier, faster and shorter, but does not work :) Where's the Accu coming from, and where does it go?
Oh was that a prerequisite? :)
LDA groep
ASL
ADC #0
STA groep
There ;)
(wanders off to find copy of "coding drunk for beginners") |
| |
mhindsbo
Account closed
Registered: Dec 2014
Posts: 50 |
Yes the requirement was code that works (checking chapter 1 in "coding drunk for beginners" ;-) just need to add the branch to take action ;-)
All in all Hoogo's solution is both shortest and fastest. Part of the joy I get from coding on the C64 are finding elegant short, fast and clean solutions, within the constraints of the system, and I really like the aesthetics of this one :-) |
| |
Perplex
Registered: Feb 2009
Posts: 254 |
Edit: nevermind. |
| |
Oswald
Registered: Apr 2002
Posts: 5017 |
yeah hype it some more, most beautiful 3 lines of code I've ever seen. I mean, really! :) |
