NAME
    DGetChar - get a character from the parallel port

SYNOPSIS
    char = DGetChar()
    D0

FUNCTION
    get the next character from the parallel port.