; naskfunc
; TAB=4
[FORMAT "WCOFF"] ;
[INSTRSET "i486p"]
[BITS 32] ; 32bit指令
;
[FILE "naskfunc.nas"] ; 源程序文件名
; 函数实体
GLOBAL _io_hlt, _io_cli, _io_sti, _io_stihlt
GLOBAL _write_mem8
GLOBAL _io_load_eflags, _io_store_eflags
GLOBAL _io_in8, _io_in16, _io_in32
GLOBAL _io_out8, _io_out16, _io_out32
[SECTION .text]
_io_hlt: ; void io_hlt(void);
HLT
RET
_io_cli: ; void io_cli(void);
CLI
RET
_io_sti: ; void io_sti(void);
STI
RET
_io_stihlt: ; void io_stihlt(void);
STI
HLT
RET
_write_mem8: ; void write_mem8(int addr, int data);
MOV ECX,[ESP+4] ; [ESP+4]第一个参数
MOV AL,[ESP+8] ; [ESP+8]第二个参数
MOV [ECX],AL
RET
_io_load_eflags: ; int io_load_eflags(void);
PUSHFD ; PUSH EFLAGS
POP EAX
RET
_io_store_eflags: ; void io_store_eflags(int eflags);
MOV EAX,[ESP+4]
PUSH EAX
POPFD ; POP EFLAGS
RET
_io_in8: ; int io_in8(int port);
MOV EDX,[ESP+4] ; port
MOV EAX,0 ;io_in8,io_in16 大家仔细想想是有区别的,参数值一个是8bit,一个16bit
IN AL,DX
RET
_io_in16: ; int io_in16(int port);
MOV EDX,[ESP+4] ; port
MOV EAX,0
IN AX,DX
RET
_io_in32: ; int io_in32(int port);
MOV EDX,[ESP+4] ; port
IN EAX,DX
RET
_io_out8: ; void io_out8(int port, int data);
MOV EDX,[ESP+4] ; port
MOV AL,[ESP+8] ; data
OUT DX,AL
RET
_io_out16: ; void io_out16(int port, int data);
MOV EDX,[ESP+4] ; port
MOV EAX,[ESP+8] ; data
OUT DX,AX
RET
_io_out32: ; void io_out32(int port, int data);
MOV EDX,[ESP+4] ; port
MOV EAX,[ESP+8] ; data
OUT DX,EAX
RET
void io_hlt(void);
void io_cli(void);
void write_mem8(int addr, int data);
int io_load_eflags(void);
void io_store_eflags(int eflags);
void io_out8(int port, int data);
void init_palette(void);
void set_palette(int start, int end, unsigned char *rgb);
void boxfill8(unsigned char *vram, int xsize, unsigned char c, int x0, int y0, int x1, int y1);
#define COL8_000000 0
#define COL8_FF0000 1
#define COL8_00FF00 2
#define COL8_FFFF00 3
#define COL8_0000FF 4
#define COL8_FF00FF 5
#define COL8_00FFFF 6
#define COL8_FFFFFF 7
#define COL8_C6C6C6 8
#define COL8_840000 9
#define COL8_008400 10
#define COL8_848400 11
#define COL8_000084 12
#define COL8_840084 13
#define COL8_008484 14
#define COL8_848484 15
void HariMain(void)
{
int i = 0;
char *p = (char *)0xa0000;
char *vram;
int xsize, ysize;
init_palette(); //定义调色板
vram = (char *) 0xa0000;
xsize = 320;
ysize = 200;
boxfill8(vram, xsize, COL8_008484, 0, 0, xsize - 1, ysize - 29);
boxfill8(vram, xsize, COL8_C6C6C6, 0, ysize - 28, xsize - 1, ysize - 28);
boxfill8(vram, xsize, COL8_FFFFFF, 0, ysize - 27, xsize - 1, ysize - 27);
boxfill8(vram, xsize, COL8_C6C6C6, 0, ysize - 26, xsize - 1, ysize - 1);
boxfill8(vram, xsize, COL8_FFFFFF, 3, ysize - 24, 59, ysize - 24);
boxfill8(vram, xsize, COL8_FFFFFF, 2, ysize - 24, 2, ysize - 4);
boxfill8(vram, xsize, COL8_848484, 3, ysize - 4, 59, ysize - 4);
boxfill8(vram, xsize, COL8_848484, 59, ysize - 23, 59, ysize - 5);
boxfill8(vram, xsize, COL8_000000, 2, ysize - 3, 59, ysize - 3);
boxfill8(vram, xsize, COL8_000000, 60, ysize - 24, 60, ysize - 3);
boxfill8(vram, xsize, COL8_848484, xsize - 47, ysize - 24, xsize - 4, ysize - 24);
boxfill8(vram, xsize, COL8_848484, xsize - 47, ysize - 23, xsize - 47, ysize - 4);
boxfill8(vram, xsize, COL8_FFFFFF, xsize - 47, ysize - 3, xsize - 4, ysize - 3);
boxfill8(vram, xsize, COL8_FFFFFF, xsize - 3, ysize - 24, xsize - 3, ysize - 3);
fin:
io_hlt();
goto fin;
}
void init_palette(void)
{
static unsigned char table_rgb[16 * 3] = {
0x00, 0x00, 0x00, /* 0:黒 */
0xff, 0x00, 0x00, /* 1:明赤 */
0x00, 0xff, 0x00, /* 2:明緑 */
0xff, 0xff, 0x00, /* 3:明黄色 */
0x00, 0x00, 0xff, /* 4:明青 */
0xff, 0x00, 0xff, /* 5:明紫 */
0x00, 0xff, 0xff, /* 6:明水色 */
0xff, 0xff, 0xff, /* 7:白 */
0xc6, 0xc6, 0xc6, /* 8:明灰色 */
0x84, 0x00, 0x00, /* 9:暗赤 */
0x00, 0x84, 0x00, /* 10:暗緑 */
0x84, 0x84, 0x00, /* 11:暗黄色 */
0x00, 0x00, 0x84, /* 12:暗青 */
0x84, 0x00, 0x84, /* 13:暗紫 */
0x00, 0x84, 0x84, /* 14:暗水色 */
0x84, 0x84, 0x84 /* 15:暗灰色 */
};
set_palette(0, 15, table_rgb);
return;
}
/*
调色板的访问步骤:
①首先中断屏蔽(比如cli)
②将想要设定的调色板号码写入0x03c8,紧接着,按R,G,B的顺序写入0x03c9。如果还想继续设定下一个调色板,则省略调色板号码,再按照RGB的顺序写入0x03c9就行。
③如果想要读出当前调色板的状态,首先要将调色板号码写入0x03c7,再从0x03c9读取3次。读出的顺序就是,R,G,B.如果要继续读出下一个调色板。同样也是省略调色板号码的设定。按RGB的顺序读出。
④如果最初执行了cli,那么最后要执行stl
*/
void set_palette(int start, int end, unsigned char *rgb){
int i, eflags;
eflags = io_load_eflags(); //关中断前先保存eflags中的值 eflag s 32bit register
io_cli(); //关中断
io_out8(0x03c8, start); //将想要设定的调色板号码写入0x03c8
for (i = start; i <= end; i++) { //为什么要用io_out8呢? 原因很简单 rgb[] 元素的单位char
io_out8(0x03c9, rgb[0] / 4); //为什么要/4? 我想了很久,也实验了很多方法都没解释通因为看者能种合理解释
io_out8(0x03c9, rgb[1] / 4);
io_out8(0x03c9, rgb[2] / 4);
rgb += 3;
}
io_store_eflags(eflags); //没什么没有执行stl,因为我们是先保存了eflags再关中断,执行store_eflage时eflags是关闭中断前的值
//如果是先关中断->存储eflags 那么恢复时顺序 store_eflage ->stl
return ;
}
void boxfill8(unsigned char *vram, int xsize, unsigned char c, int x0, int y0, int x1, int y1)
{
int x, y;
for (y = y0; y <= y1; y++) {
for (x = x0; x <= x1; x++)
vram[y * xsize + x] = c;
}
return;
}
; haribote-ipl
; TAB=4
CYLS EQU 10 ; 柱面 10
ORG 0x7c00 ; 指明程序的转载地址
JMP entry
;以下是标准fat12格式软盘专用的代码
DB 0x90
DB "HARIBOTE" ; 启动区的名称可以是任意的字符串(8字节)
DW 512 ;每个扇区(sector)的大小(必须是512字节)
DB 1 ; 簇(cluster) 的大小(必须是1个扇区)
DW 1 ; FAT的起始位置(一般从第一个扇区开始)
DB 2 ; FAT的个数(必须是2)
DW 224 ; 根目录的大小(一般是244项)
DW 2880 ; 磁盘的大小(必须是2880扇区)
DB 0xf0 ; 磁盘的种类(必须是0xf0)
DW 9 ; FAT的长度(必须是9扇区)
DW 18 ; 1个磁道(track)有几个扇区(必须是18)
DW 2 ; 磁头数(必须是2)
DD 0 ; 不用分区,必须是0
DD 2880 ; 重写一次磁盘大小
DB 0,0,0x29 ; 意义不明,固定
DD 0xffffffff ; (可能是)卷标号码
DB "HARIBOTEOS " ; 磁盘的名称(11字节)
DB "FAT12 " ;磁盘格式名称(8字节)
RESB 18 ; 先空出18字节
;程序核心
entry:
MOV AX,0 ; 初始化寄存器
MOV SS,AX
MOV SP,0x7c00
MOV DS,AX
; 读磁盘
MOV AX,0x0820
MOV ES,AX
MOV CH,0 ; 柱面0
MOV DH,0 ; 磁头0
MOV CL,2 ; 扇区2
readloop:
MOV SI,0 ; 记录失败次数的寄存器
retry:
MOV AH,0x02 ; AH=0x02 读磁盘
MOV AL,1 ; 1个扇区
MOV BX,0
MOV DL,0x00 ; A驱动器
INT 0x13 ;bios 中断
JNC next ; 没有出错跳转到next
ADD SI,1 ; SI+1
CMP SI,5 ; SI与5比较
JAE error ; SI >= 5 时跳转next
MOV AH,0x00
MOV DL,0x00 ; A驱动器
INT 0x13 ; 重置驱动器
JMP retry
next:
MOV AX,ES ; 内存地址后移0x200
ADD AX,0x0020
MOV ES,AX ; ADD ES,0x020因为没有add es,0x200指令
ADD CL,1 ; CL+1
CMP CL,18 ; CL与18比较
JBE readloop ; CL <= 18 跳转至readloop
MOV CL,1
ADD DH,1
CMP DH,2
JB readloop ; DH < 2 跳转至readloop
MOV DH,0
ADD CH,1
CMP CH,CYLS
JB readloop ; CH < CYLS 跳转至readloop
;注意我们的系统移动36.5k所以读入180k完全够用
;程序说加载 地址0x8000+ 0x4200 但是我们是把磁盘加载到0x8200 做实验必须是0xc200比较郁闷<pre name="code" class="cpp">
;程序跳转
mov [0x0ff0],ch
JMP 0xc200
error:
MOV SI,msg
putloop:
MOV AL,[SI]
ADD SI,1 ; SI+1
CMP AL,0
JE fin
MOV AH,0x0e ; 显示一个文字
MOV BX,15 ;指定字符颜色
INT 0x10 ; 调用显卡bios
JMP putloop
fin:
hlt
jmp fin
msg:
DB 0x0a, 0x0a ; 换行2次
DB "load error"
DB 0x0a ; 换行
DB 0
RESB 0x7dfe-$ ; 填写0x00,知道0x1fe
DB 0x55, 0xaa