' *** PALETLOW.LST *** 2nd GFA-Manual, page 20-26 > PROCEDURE palet_low ' ' *** Install new palette for Low resolution from DATA-lines ' ' *** Standard: setcolor&() ' LOCAL i,col$ RESTORE low.new.data FOR i=0 TO 15 READ col$ SETCOLOR setcolor(i),VAL("&H"+col$) NEXT i ' ' *** Enter new RGB-values (use Overwrite-mode) low.new.data: DATA 777,000,XXX,XXX,XXX,XXX,XXX,XXX,XXX,XXX,XXX,XXX,XXX,XXX,XXX,XXX RETURN ' ********* '