HariboteOS/day25/graphic.c

#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);
}