Rasterbars

[Mcquade]

is it possible to read Rasterdatas(Colors)(Copperbars)
from a DATA Field ?

i want to use the Colordata from a REAL C64...

any ideas ?

mfg Mcq

[Shockwave]

Yes, sure.
Just set up your colours in your data statements and read them into an array, you can do whatever you like with them then.

[Clyde]

real C64 colours in correct order.

Code Select Expand


dim shared as uinteger raster_colours( 0 to 15 )

initialize_demo()

sub initialize_demo()
   
    dim as integer a
   
    restore c64_hex_colours
   
    for a=0 to 15
        read raster_colours( a )
    next

end sub   



c64_hex_colours:
data &h000000
data &hffffff
data &h68372b
data &h70a4b2
data &h6f3d86
data &h588d43
data &h352879
data &hb8c76f
data &h6f4f25
data &h433900
data &h9a6759
data &h444444
data &h6c6c6c
data &h9ad284
data &h6c5eb5
data &h959595


[Clyde]

Is this the info you were after Dude?

[Mcquade]

YES !

MANY THX !