DEFINITION MODULE CPCDosIO; TYPE MsgMode=(numbers,nonumbers); PROCEDURE Value(a: ARRAY OF CHAR): INTEGER; PROCEDURE InitCPCDosIO; PROCEDURE ReadMsg(m: MsgMode); PROCEDURE ReadWords(forcewords: BOOLEAN): INTEGER; PROCEDURE SaveData(); PROCEDURE LoadData(); PROCEDURE PrintSolution; PROCEDURE PrintPlainCross; PROCEDURE PrintFancyCross; PROCEDURE PrintTexCross; PROCEDURE PrintEpsonCross; END CPCDosIO.