|
|
| version 1.2, 2003/12/10 14:56:17 | version 1.4, 2004/01/31 20:05:23 |
|---|---|
| Line 1 | Line 1 |
| .186 | |
| CODE SEGMENT | CODE SEGMENT |
| ASSUME CS:CODE,DS:nothing,ES:nothing,SS:nothing | ASSUME CS:CODE,DS:nothing,ES:nothing,SS:nothing |
| Line 6 CODE SEGMENT | Line 5 CODE SEGMENT |
| FIXCS equ 2eh | FIXCS equ 2eh |
| START: mov cx, 1000h | START: jmp short main |
| mov bx, 8000h | nop |
| mov ss, cx | nop |
| mov sp, bx | db "IPL1", 0, 0, 0, 01eh |
| add bh, 20h | |
| mov es, bx | main: mov ax, 0a04h |
| int 18h | |
| xor di, di | mov ah, 16h |
| mov dx, 0e120h | |
| int 18h | |
| cli | |
| cld | cld |
| lea ax, [di + 20h] | mov ax, 0a000h |
| rep stosw | mov es, ax |
| mov al, 0e1h | |
| mov cx, 1fe0h | |
| atrclr: stosb | |
| inc di | |
| loop atrclr | |
| mov si, offset nosysmsg | mov si, offset nosysmsg |
| xor di, di | xor di, di |
| call putmsg | call putmsg |
| mov di, 160 | mov di, 160 |
| call putmsg | call putmsg |
| mine: cli | mine: hlt |
| hlt | jmp short mine |
| jmp mine | |
| putmsg: db FIXCS | putmsg: db FIXCS |
| lodsw | lodsw |