text: #include "graphic.h"
  #include "io.h"
  #include "sheet.h"
  
  void init_palette(void) {
    static unsigned char table_rgb[16 * 3] = {
        0x00, 0x00, 0x00, // 黑色
        0xff, 0x00, 0x00, // 亮红色
        0x00, 0xff, 0x00, // 亮绿色
        0xff, 0xff, 0x00, // 亮黄色
        0x00, 0x00, 0xff, // 亮蓝色
        0xff, 0x00, 0xff, // 亮紫色
        0x00, 0xff, 0xff, // 浅亮蓝色
        0xff, 0xff, 0xff, // 白色
        0xc6, 0xc6, 0xc6, // 亮灰色
        0x84, 0x00, 0x00, // 暗红色
        0x00, 0x84, 0x00, // 暗绿色
        0x84, 0x84, 0x00, // 暗黄色
        0x00, 0x00, 0x84, // 暗蓝色
        0x84, 0x00, 0x84, // 暗紫色
        0x00, 0x84, 0x84, // 浅暗蓝色
        0x84, 0x84, 0x84  // 暗灰色
    };
    set_palette(0, 15, table_rgb);
  
    unsigned char table2[216 * 3];
  
    for (int b = 0; b < 6; b++) {
      for (int g = 0; g < 6; g++) {
        for (int r = 0; r < 6; r++) {
          table2[(r + g * 6 + b * 36) * 3 + 0] = r * 51;
          table2[(r + g * 6 + b * 36) * 3 + 1] = g * 51;
          table2[(r + g * 6 + b * 36) * 3 + 2] = b * 51;
        }
      }
    }
  
    set_palette(16, 231, table2);
  }
  
  void set_palette(int start, int end, unsigned char *rgb) {
    int eflags = io_load_eflags(); // 记录标志
  
    io_cli(); // 禁止中断
  
    io_out8(0x03c8, start);
    for (int i = start; i <= end; i++) {
      io_out8(0x03c9, rgb[0] / 4);
      io_out8(0x03c9, rgb[1] / 4);
      io_out8(0x03c9, rgb[2] / 4);
      rgb += 3;
    }
  
    io_store_eflags(eflags);
  }
  
  void box_fill8(unsigned char *vram, int xsize, unsigned char c, int x0, int y0,
                 int x1, int y1) {
    for (int y = y0; y <= y1; y++) {
      for (int x = x0; x <= x1; x++) {
        vram[y * xsize + x] = c;
      }
    }
  }
  
  void init_screen8(unsigned char *vram, int x, int y) {
    box_fill8(vram, x, COL8_008484, 0, 0, x - 1, y - 29);
    box_fill8(vram, x, COL8_C6C6C6, 0, y - 28, x - 1, y - 28);
    box_fill8(vram, x, COL8_FFFFFF, 0, y - 27, x - 1, y - 27);
    box_fill8(vram, x, COL8_C6C6C6, 0, y - 26, x - 1, y - 1);
  
    box_fill8(vram, x, COL8_FFFFFF, 3, y - 24, 59, y - 24);
    box_fill8(vram, x, COL8_FFFFFF, 2, y - 24, 2, y - 4);
    box_fill8(vram, x, COL8_848484, 3, y - 4, 59, y - 4);
    box_fill8(vram, x, COL8_848484, 59, y - 23, 59, y - 5);
    box_fill8(vram, x, COL8_000000, 2, y - 4, 59, y - 3);
    box_fill8(vram, x, COL8_000000, 60, y - 24, 60, y - 3);
  
    box_fill8(vram, x, COL8_848484, x - 47, y - 24, x - 4, y - 24);
    box_fill8(vram, x, COL8_848484, x - 47, y - 23, x - 47, y - 4);
    box_fill8(vram, x, COL8_FFFFFF, x - 47, y - 3, x - 4, y - 3);
    box_fill8(vram, x, COL8_FFFFFF, x - 3, y - 24, x - 3, y - 3);
  }
  
  void put_font8(unsigned char *vram, int xsize, int x, int y, char c,
                 char *font) {
    unsigned char *p;
    char d;
  
    for (int i = 0; i < 16; i++) {
      p = vram + (y + i) * xsize + x;
      d = font[i];
  
      if ((d & 0x80) != 0) {
        p[0] = c;
      }
      if ((d & 0x40) != 0) {
        p[1] = c;
      }
      if ((d & 0x20) != 0) {
        p[2] = c;
      }
      if ((d & 0x10) != 0) {
        p[3] = c;
      }
      if ((d & 0x08) != 0) {
        p[4] = c;
      }
      if ((d & 0x04) != 0) {
        p[5] = c;
      }
      if ((d & 0x02) != 0) {
        p[6] = c;
      }
      if ((d & 0x01) != 0) {
        p[7] = c;
      }
    }
  }
  
  void put_fonts8_asc(unsigned char *vram, int xsize, int x, int y, char c,
                      char *s) {
    extern char hankaku[4096];
  
    for (; *s != '\0'; s++) {
      put_font8(vram, xsize, x, y, c, hankaku + *s * 16);
      x += 8;
    }
  }
  
  void init_mouse_cursor8(unsigned char *mouse, char bc) {
    static char cursor[16][16] = {
        "**************..",
        "*OOOOOOOOOOO*...",
        "*OOOOOOOOOO*....",
        "*OOOOOOOOO*.....",
        "*OOOOOOOO*......",
        "*OOOOOOO*.......",
        "*OOOOOOO*.......",
        "*OOOOOOOO*......",
        "*OOOO**OOO*.....",
        "*OOO*..*OOO*....",
        "*OO*....*OOO*...",
        "*O*......*OOO*..",
        "**........*OOO*.",
        "*..........*OOO*",
        "............*OO*",
        ".............***"};
  
    for (int y = 0; y < 16; y++) {
      for (int x = 0; x < 16; x++) {
        if (cursor[y][x] == '*') {
          mouse[y * 16 + x] = COL8_000000;
        }
  
        if (cursor[y][x] == 'O') {
          mouse[y * 16 + x] = COL8_FFFFFF;
        }
  
        if (cursor[y][x] == '.') {
          mouse[y * 16 + x] = bc;
        }
      }
    }
  }
  
  void put_block8_8(unsigned char *vram, int vxsize, int pxsize, int pysize,
                    int px0, int py0, char *buf, int bxsize) {
    for (int y = 0; y < pysize; y++) {
      for (int x = 0; x < pxsize; x++) {
        vram[(py0 + y) * vxsize + (px0 + x)] = buf[y * bxsize + x];
      }
    }
  }
  
  void put_fonts8_asc_sht(struct Sheet *sht, int x, int y, int c, int b, char *s,
                          int l) {
    box_fill8(sht->buf, sht->bxsize, b, x, y, x + l * 8 - 1, y + 15);
    put_fonts8_asc(sht->buf, sht->bxsize, x, y, c, s);
    sheet_refresh(sht, x, y, x + l * 8, y + 16);
  }
  