; casl2 outl_call2.casl outl.casl MAIN START LAD GR1,#FFFF CALL OUTL RET END