TASK\WRITE IN$
TASK\WRITE OUT$
TASK\WRITE DO_RES$
SIC\IF (DO_RES$) THEN
TASK\WRITE RES$
SIC\ENDIF
TASK\WRITE MAX_INT$
TASK\WRITE X_POS$
TASK\WRITE Y_POS$
TASK\WRITE MAJOR$
TASK\WRITE MINOR$
TASK\WRITE POSANG$
TASK\WRITE BLC$
TASK\WRITE TRC$
TASK\WRITE SIGMA$
TASK\GO
