Eine Möglichkeit
Code:
DIM Wert as byte
DIM index as byte
DIM array(65) as byte

    index = 23
    loadadr array(index) , X       ' addresse nach X
    $asm
    LD r24, X                         ' tabellen wert nach R24
    sts  {Wert}, r24                ' speichern
    $end asm
Ich muß nur sagen, daß Bascom bei
Code:
   Wert = array(index)
auch nicht viel mehr macht, also wenn nicht weitere Tricks dazukommen, bringt's der Assembler da auch nicht wirklich