! Utilities for people who are mixing EDWIN + GIMMS plotting.

%external %routine %spec OPTION (%string (255) string)
%external %routine %spec SSFOFF

%external %routine BEGIN PLOTS (%string (255) s)
   option ("SEARCHDIR=ECSLIB.EDWINDIR")
%end

%external %routine END PLOTS (%string (255) s)
   ssfoff
   option ("REMOVEDIR=ECSLIB.EDWINDIR")
%end

%external %routine HAZELTINE INIT (%string (255) s)
   print ch (27);   print ch ('?');   newline
   ! Disables the auxiliary port on the Hazeltine
%end

%end %of %file