! No APPLICON plotter on EMAS

%include "ECSC17.IMP77SPECS"

%external %integer %spec DEVICE

%record %format POINTF (%integer X, Y)

!!!%external %routine APPLICON (%integer COM, X, Y)
!!!   %return %if DEVICE#5
!!!   signal (14, 0, 'A')
!!!%end

%external %routine ABOX (%integer XL, YL, XU, YU)
   %return %if DEVICE#5
   signal (14, 0, 'A')
%end

%external %routine A POLYGON (%integer NE, %record(POINTF) %name P)
   %return %if DEVICE#5
   signal (14, 0, 'A')
%end

%end %of %file