this way makes ext method 18 words less
Code:array var word[2] array_asbyte var byte ext @array_asbyte=_array inx var byte i var byte ADRESLO VAR BYTE ADRESHi VAR BYTE i=0 for inx=0 to 3 'array[inx]=(adreshi<<8)| adreslo array_asbyte[i]=ADRESLO i=1+1 array_asbyte[i]=ADRESHi i=1+1 next stop
Bookmarks