[ross]

    WORD copperList[] = {
	0x01fc, 0x0000, 0x008e, 0x2c81, 0x0090, 0x2cc1,
	0x0092, 0x0038, 0x0094, 0x00d0,	// change it for scroll screen

	// wait for top of screen
	0x2b07, 0xfffe,
	0x0102, 0x0000, 0x0108, 0x0000, 0x010a, 0x0000,	// change it if needed
	BPLCON0, COLORON | 4,				// 4 bit planes

        BPL1PTH, NULL,
        BPL1PTL, NULL,
        BPL2PTH, NULL,
        BPL2PTL, NULL,
        BPL3PTH, NULL,
        BPL3PTL, NULL,
        BPL4PTH, NULL,
        BPL4PTL, NULL,

        COLOR00, 0x000, // Black
        COLOR01, 0x8ce, // Sky Blue
        COLOR02, 0xdb8, // Tan
        COLOR03, 0x282, // Forest Green
        COLOR04, 0xfff, // White
        COLOR05, 0xaaa, // Lightest Grey
        COLOR06, 0x999, // Light Grey
        COLOR07, 0x777, // Medium Grey
        COLOR08, 0x555, // Dark Grey
        COLOR09, 0x444, // Darkest Grey
        COLOR10, 0xf00, // Red
        COLOR11, 0x800, // Dark Red
        COLOR12, 0xf80, // Dark Orange
        COLOR13, 0xfdb, // Wheat
        COLOR14, 0x682, // Olive Drab
        COLOR15, 0x59a, // Cadet Blue

	// wait for middle of screen
	0xabd7, 0xfffe,
	0x0102, 0x0000, 0x0108, 0x0000, 0x010a, 0x0000,	// change it if needed
	BPLCON0, COLORON | 3,				// 3 bit planes

        BPL1PTH, NULL,
        BPL1PTL, NULL,
        BPL2PTH, NULL,
        BPL2PTL, NULL,
        BPL3PTH, NULL,
        BPL3PTL, NULL,

        COLOR00, 0x000, // Black
        COLOR01, 0xfff, // White
        COLOR02, 0x999, // Light Grey
        COLOR03, 0x777, // Medium Grey
        COLOR04, 0x555, // Dark Grey
        COLOR05, 0xf00, // Red
        COLOR06, 0x0f0, // Green
        COLOR07, 0x0f7, // Orange

	0xffff, 0xfffe	// end
    };

Feel free to ask for clarification.

Cheers.

EDIT: only C