|
|
| version 1.1, 2003/12/10 13:15:18 | version 1.4, 2004/01/31 20:05:23 |
|---|---|
| Line 1 | Line 1 |
| .186 | |
| CODE SEGMENT | CODE SEGMENT |
| ASSUME CS:CODE,DS:CODE,ES:CODE,SS:CODE | ASSUME CS:CODE,DS:nothing,ES:nothing,SS:nothing |
| ORG 0000H | ORG 0000H |
| FIXCS equ 2eh | FIXCS equ 2eh |
| START: mov ax, 1000h | START: jmp short main |
| mov bx, 8000h | nop |
| mov ss, ax | nop |
| mov sp, bx | db "IPL1", 0, 0, 0, 01eh |
| mov ax, cs | main: mov ax, 0a04h |
| mov ds, ax | int 18h |
| mov ah, 16h | |
| mov dx, 0e120h | |
| int 18h | |
| cli | |
| cld | |
| mov ax, 0a000h | mov ax, 0a000h |
| mov es, ax | mov es, ax |
| mov cx, 1000h | |
| mov ax, 0020h | |
| xor di, di | |
| cld | |
| rep stosw | |
| 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: jmp mine | mine: hlt |
| jmp short mine | |
| putmsg: db FIXCS | putmsg: db FIXCS |
| lodsw | lodsw |
| test ax, ax | test ax, ax |
| je short putmsgend | je short putmsgend |
| stosw | stosw |
| add di, 2 | inc di |
| inc di | |
| jmp short putmsg | jmp short putmsg |
| putmsgend: ret | putmsgend: ret |
| Line 55 nosysmsg dw 3304h,4e04h,4f05h,3c01h,4905 | Line 49 nosysmsg dw 3304h,4e04h,4f05h,3c01h,4905 |
| dw 7204h,5e21h,7e26h,6518h,2401h,6a05h,3b05h,4305h | dw 7204h,5e21h,7e26h,6518h,2401h,6a05h,3b05h,4305h |
| dw 4805h,3704h,4604h,3c12h,3504h,2404h,2501h,0 | dw 4805h,3704h,4604h,3c12h,3504h,2404h,2501h,0 |
| CODE ENDS | CODE ENDS |
| END START | END START |