Hi Ron Avery, hope you are having a nice day
RA> I did too, pretty cool looking core dump on my machine!
Yeah, pretty cool.
RA> seg_a segment byte public
RA> assume cs:seg_a; ds:seg_a
RA> org 100h
RA> main: jmp start
RA> b_msg db 'Loading OS...', 0
RA> start: mov ax, 0B800h ; Point to CGA screen
RA> mov es, ax
RA> mov si, offset b_msg ; Point to b_msg string
RA> xor bx, bx ; Clear BX
RA> msg_l: mov dl, byte ptr [si] ; Get a character
RA> cmp dl, 0 ; See if it is NULL
RA> je msg_e ; If it is, end
RA> mov dh, 2 ; I think green is cool
RA> mov word ptr es:[bx], dx ; Send the char/attr
air
RA> inc si ; Increment the pointers
RA> inc bx
RA> inc bx
RA> jmp msg_l ; Next character
RA> msg_e: ret
RA> seg_a ends
RA> end main
Thank you very much.
RA> You could expand on this routine and offer users of the OS a
RA> wide range of screen functions... Sort of like DOS, but don't make them
RA> so bad to use!
No no, i will make it verry good.
Matija.
... And the Cartoon menace was no more....
--- Terminate 5.00/Pro
---------------
* Origin: Don't know. (2:292/8139.3)
|