%externalroutine bells(%string(255)dummy)
%integer i
%cycle i=1,1,20
      printch    (7)
      spaces(4)
%repeat
%end
%endoffile