subroutine plots(imode,ires,ilun) C C subroutine to initialize HP device C C imode,ires(integer) are dummy args retained for compatibility C with other CALCOMP routines C ilun(integer) = the logical unit to which all REGIS commands are C to be written C I have usually set it to 6. Then, before running C any programs using this code I issue a monitor C SET DEV: 6 where device might be PL: for direct C output or DK: if I want the commands stored C in a file. C C C call bdata(ilun) write(ilun,10) 10 format(' IN;SP1;PA0,0;') return end