DEFINITION MODULE Effect; FROM SYSTEM IMPORT BYTE; VAR Data : ARRAY[0..245] OF BYTE; PROCEDURE InitData(Tune : INTEGER); PROCEDURE effect; END Effect.