subroutine endplt c c this routine ends plotting by deselecting the plotter and c dumping the buffer. For Houston Instruments HIPLOT DMPL's. c common /zgraph/ lunplt, iascr, ibscr, icscr, idscr, 1 xm, ym, dx, dy, dxb, dyb, ixcur, iycur, ixbond, iybond, 1 xslope, yslope, xconst, yconst, scrx, scry, ichar(5) c LOGICAL*1 ENDSTR(5) DATA ENDSTR /'U','H','P','0','@'/ C CALL PLTOUT(ENDSTR,5) CALL PLTOUT(ENDSTR,0) RETURN END