XPERIMENT SEGMENT        ; Using One Segment for Everything
	ASSUME CS:XPERIMENT, DS:XPERIMENT, ES:XPERIMENT, SS:XPERIMENT

VIDINT    EQU 010h       ; BIOS Video Interrupt
VIDWRITE  EQU 009h       ; Write Attribute/Byte at Cursor Position

        org 0
START:
        mov AH, VIDWRITE ; Write...
        mov AL, 'H'
        mov BH, 0        ; onto Video Page 0
        mov BL, 7        ; using Grey on Black
        mov CX, 1        ; ... 1 Character
        int VIDINT

OneMore:                 ; Endless Loop
        jmp SHORT OneMore

XPERIMENT ENDS
        END START