extern _rtcsv;

/* data reader */
_drtext(fname = "")
{
        /* setup */
        _rtcsv = 0;

        /* gui */
        pdc(3011);
}