skyeye-1-3-1_rc1.tar.gz

00001 ! 1 00002 ! 1 # 1 "_rombiosl_.c" 00003 ! 1 #asm 00004 !BCC_ASM 00005 0000 .rom 00006 0000 .org 0x0000 00007 use16 386 00008 MACRO HALT 00009 ;; the HALT macro is called with the line number of the HALT call. 00010 ;; The line number is then sent to the 0x400, causing Bochs/Plex 00011 ;; to print a BX_PANIC message. This will normally halt the simulation 00012 ;; with a message such as "BIOS panic at rombios.c, line 4091". 00013 ;; However, users can choose to make panics non-fatal and continue. 00014 mov dx,#0x400 00015 mov ax,#?1 00016 out dx,ax 00017 MEND 00018 MACRO JMP_AP 00019 db 0xea 00020 dw ?2 00021 dw ?1 00022 MEND 00023 MACRO SET_INT_VECTOR 00024 mov ax, ?3 00025 mov ?1*4, ax 00026 mov ax, ?2 00027 mov ?1*4+2, ax 00028 MEND 00029 ! 26 endasm 00030 !BCC_ENDASM 00031 ! 27 typedef unsigned char Bit8u; 00032 !BCC_EOS 00033 ! 28 typedef unsigned short Bit16u; 00034 !BCC_EOS 00035 ! 29 typedef unsigned short bx_bool; 00036 !BCC_EOS 00037 ! 30 typedef unsigned long Bit32u; 00038 !BCC_EOS 00039 ! 31 void memsetb(seg,offset,value,count); 00040 !BCC_EOS 00041 ! 32 void memcpyb(dseg,doffset,sseg,soffset,count); 00042 !BCC_EOS 00043 ! 33 void memcpyd(dseg,doffset,sseg,soffset,count); 00044 !BCC_EOS 00045 ! 34 void 00046 ! 35 memsetb(seg,offset,value,count) 00047 ! 36 Bit16u seg; 00048 export _memsetb 00049 00000000 _memsetb: 00050 !BCC_EOS 00051 ! 37 Bit16u offset; 00052 !BCC_EOS 00053 ! 38 Bit16u value; 00054 !BCC_EOS 00055 ! 39 Bit16u count; 00056 !BCC_EOS 00057 ! 40 { 00058 ! 41 #asm 00059 !BCC_ASM 00060 00000008 _memsetb.count set 8 00061 00000002 _memsetb.seg set 2 00062 00000006 _memsetb.value set 6 00063 00000004 _memsetb.offset set 4 00064 0000 55 push bp 00065 0001 89E5 mov bp, sp 00066 0003 50 push ax 00067 0004 51 push cx 00068 0005 06 push es 00069 0006 57 push di 00070 0007 8B4E 0A mov cx, 10[bp] ; count 00071 000A 85C9 test cx, cx 00072 000C 74 10 je memsetb_end 00073 000E 8B46 04 mov ax, 4[bp] ; segment 00074 0011 8EC0 mov es, ax 00075 0013 8B46 06 mov ax, 6[bp] ; offset 00076 0016 89C7 mov di, ax 00077 0018 8A46 08 mov al, 8[bp] ; value 00078 001B FC cld 00079 001C F3 rep 00080 001D AA stosb 00081 0000001E memsetb_end: 00082 001E 5F pop di 00083 001F 07 pop es 00084 0020 59 pop cx 00085 0021 58 pop ax 00086 0022 5D pop bp 00087 ! 65 endasm 00088 !BCC_ENDASM 00089 ! 66 } 00090 0023 C3 ret 00091 ! 67 void 00092 ! 68 memcpyb(dseg,doffset,sseg,soffset,count) 00093 ! 69 Bit16u dseg; 00094 export _memcpyb 00095 00000024 _memcpyb: 00096 !BCC_EOS 00097 ! 70 Bit16u doffset; 00098 !BCC_EOS 00099 ! 71 Bit16u sseg; 00100 !BCC_EOS 00101 ! 72 Bit16u soffset; 00102 !BCC_EOS 00103 ! 73 Bit16u count; 00104 !BCC_EOS 00105 ! 74 { 00106 ! 75 #asm 00107 !BCC_ASM 00108 0000000A _memcpyb.count set $A 00109 00000006 _memcpyb.sseg set 6 00110 00000008 _memcpyb.soffset set 8 00111 00000002 _memcpyb.dseg set 2 00112 00000004 _memcpyb.doffset set 4 00113 0024 55 push bp 00114 0025 89E5 mov bp, sp 00115 0027 50 push ax 00116 0028 51 push cx 00117 0029 06 push es 00118 002A 57 push di 00119 002B 1E push ds 00120 002C 56 push si 00121 002D 8