Quantcast
Channel: MCS Electronics Forum
Viewing all articles
Browse latest Browse all 20717

BASCOM-AVR : Lookup for non-standard data types : REPLY

$
0
0
Hi for_ro, Thanks for your message. Did you mean something like follows?: [code:1:e775ef746f]Dim B1 As Byte Dim B2 As Byte Dim W1 As Word Dim W2 As Word Dim B3 As Byte Dim R(7) As Byte At B1 Overlay Dim Index As Byte Index = 1 Dim W As Word W = Index * 9 Dim B As Byte Dim Rptr As Iram Word At 8 Overlay Rptr = Loadlabel(datastr) 'Incr Rptr <- Error 218 'Rptr = Rptr + W <- Error 31 For B = 1 To 9 Read R(b) Next B Do Loop $data Datastr: Data 1 , 2 , 3 , 4 , 5 , 6 , 7 , 0 Data 8 , 9 , 10 , 11 , 12 , 13 , 14 , 0 Data 15 , 16 , 17 , 18 , 19 , 20 , 21 , 0 [/code:1:e775ef746f] Because that doesn't work either. I just can't find it, but there is another topic in the forum about that problem. You can load the label, but you can't add an offset to it (see the two commented lines). I guess I could add my offset using $asm and potter about the registers - but hell! let's stay with basic. [b:e775ef746f]Maybe mcselec could fix that bug, too? :)[/b:e775ef746f]

Viewing all articles
Browse latest Browse all 20717

Latest Images

Trending Articles



Latest Images

<script src="https://jsc.adskeeper.com/r/s/rssing.com.1596347.js" async> </script>