public CBGR24 gr_palette_amicus[COLORS_NUM] = {
0x0, 0x1A4883, 0x8D2E75, 0xFFA995, 0xA10000, 0xE5B3FF, 0x8B5858, 0xB2B6AF, 0x555753, 0xB7AA, 0x82BC49, 0x8ABEE1, 0xDF2100, 0xD138D1, 0xFFFFFF, 0x969696
};
public U0 PaletteSetAmicus(Bool persistent=TRUE)
{
    GrPaletteSet(gr_palette_amicus);
    LFBFlush;
    if (persistent)
        fp_set_std_palette = &PaletteSetAmicus;
}