C	DEFAULT PARAMETER FILE FOR PDP-12 TRAINING PROGRAM
C
C	LAST EDIT:	17-FEB-1989	18:00:00	CJL
C
C	TO BE USED WITH TRAIN1... FILES PASSED TO FOCAL.
C
C	USAGE:
C
C	.R	FOCAL,8PATCH,TPATCH,TPARM1,TPARM2,TPTSK1,TPTSK2,TRAIN1,TRAIN2,
C					TRAIN3,TRAIN4,TRAIN5,TRAIN6	(GN)
C
C	WHERE TPARM1,TPARM2  IS  THIS  FILE.    TPTSK1,TPTSK2  ARE SEPARATE FILES
C	CONTAINING X AND Y VALUES AND FIXATION TIMES FOR EACH SEGMENT IN THE TASK
C	GROUPS.
C
C	WINDOW PARAMETERS.
C
C	N.B. WINDOW PARAMETERS ARE IN A-D UNITS (1024 UNITS=+/- 1.0 VOLTS)
C
C	PRIMARY WINDOW PARAMETERS.
C
SET	D=FWRD(4,-125)	;C	LEFT-HAND WINDOW LIMIT
SET	D=FWRD(5,125)	;C	RIGHT-HAND WINDOW LIMIT
SET	D=FWRD(6,125)	;C	UPPER WINDOW LIMIT
SET	D=FWRD(7,-125)	;C	LOWER WINDOW LIMIT
C
C	SECONDARY WINDOW PARAMETERS.
C
SET	D=FWRD(8,-150)	;C	LEFT-HAND WINDOW LIMIT
SET	D=FWRD(9,150)	;C	RIGHT-HAND WINDOW LIMIT
SET	D=FWRD(10,150)	;C	UPPER WINDOW LIMIT
SET	D=FWRD(11,-150)	;C	LOWER WINDOW LIMIT
C
C	REWARD PULSE DURATION.
C
C	THE  REWARD  PULSE  DURATION  IS  DETERMINED BY MULTIPLYING THE  TIME  IN
C	SECONDS BY THE INTERNAL CLOCK TICK RATE (CURRENTLY 200 PER  SECOND  OR  5
C	MS/TICK).  OTHER TIME PARAMETERS ARE SET SIMILARLY.
C
SET	D=FWRD(14,.1*200);C	REWARD DURATION
C
C	INTER-TRIAL INTERVAL DURATIONS.
C
C	SUCCESSFUL INTER-TRIAL DURATION.
C
SET	D=FWRD(17,2.0*200);C	SUCCESSFUL INTER-TRIAL DURATION
C
C	FAILING INTER-TRIAL DURATION.
C
SET	D=FWRD(18,2.5*200);C	FAILING INTER-TRIAL DURATION
C
C	ACQUISITION DELAY TIMES.
C
C	DISREGARDS ANIMAL'S  EYE POSITION AT ONSET OF SEGMENT OF TRIAL TO ACCOUNT
C	FOR JITTER IN  ANALOG  READINGS  AT  EDGE  OF  TARGET  WINDOW.  TRANSIENT
C	IN-WINDOW READINGS COULD CANCEL TRIAL WITHOUT THIS DELAY VARIABLE.
C
C	PRIMARY ACQUISITION DELAY TIME.
C
SET	D=FWRD(19,.075*200);C	PRIMARY ACQUISITION DELAY TIME
C
C	SECONDARY ACQUISITION DELAY TIME.
C
SET	D=FWRD(20,.075*200);C	SECONDARY ACQUISITION DELAY TIME
C
C	GALVO MOVE DELAY TIME.
C
C	WAITS UNTIL LIGHT IS  EXTINGUISHED  (BY  MOVING  THE SHUTTER INTO PATH OF
C	LIGHT BEAM) BEFORE MOVING THE  GALVO FOR THE NEXT TRIAL SEGMENT.  FAILURE
C	TO DELAY A SUFFICIENT TIME CAUSES  A  STREAK  OF LIGHT (OR WORSE) BETWEEN
C	TARGET POSITIONS.
C
SET	D=FWRD(36,.06*200);C	GALVO MOVE DELAY TIME
C
C	TARGET LIGHT TURNON DELAY TIME.
C
C	DELAYS TARGET LIGHT TURNON (BY MOVING SHUTTER  OUT OF LIGHT BEAM PATH) TO
C	ALLOW GALVO MIRROR SUFFICIENT SETTLING TIME (AFTER MOVING).    FAILURE TO
C	DELAY A SUFFICIENT TIME CAUSES THE MIRROR OVERSHOOT TO  DEFLECT THE LIGHT
C	BEAM.   THIS PARAMETER MUST ALWAYS BE LONGER THAN THE  GALVO  MOVE  DELAY
C	TIME  AS THEY ARE BOTH REFERENCED TO THE START OF THE  ACQUISITION  DELAY
C	TIME.  THUS THE GALVO MOVE DELAY VALUE IS A SUBSET OF THIS PARAMETER.
C
SET	D=FWRD(35,.11*200);C	TARGET LIGHT TURNON DELAY TIME
C
C	ACQUISITION TIMERS.
C
C	MAXIMUM  TIME  ALLOWED  FOR  MONKEY  TO  FIND THE TARGET, I.E.,  FOR  EYE
C	POSITION TO BE WITHIN WINDOW OF TARGET POSITION.  IN-WINDOW FIXATION TIME
C	BEGINS  AS  SOON  AS  THE MONKEY ENTERS THE TARGET WINDOW TERMINATING THE
C	ACQUISITION TIMER.  FAILURE  TO  ACQUIRE  WINDOW WITHIN ACQUISITION TIMER
C	TERMINATES THE TRIAL WITHOUT REWARD.
C
C	PRIMARY ACQUISITION TIMER (INITIAL FIXATION POINT).
C
SET	D=FWRD(33,2.5*200);C	PRIMARY ACQUISITION TIMER
C
C	SECONDARY ACQUISITION TIMER (ALL SUBSEQUENT FIXATION POINTS).
C
SET	D=FWRD(34,5*200);C	SECONDARY ACQUISITION TIMER
C
C	DISPLAY SCALE FACTOR.
C
C	IF ZERO, THE DISPLAY IS OF NORMAL  SIZE.  IF ONE, THE DISPLAY IS EXPANDED
C	BY A FACTOR OF TWO.  WARNING:   WHEN  EXPANDED,  THE  DISPLAY  WILL "WRAP
C	AROUND" IF POSITIONS EXCEED HALF-SCALE.
C
SET	D=FWRD(38,0)	;C	SET NORMAL DISPLAY
C
C	TASK COUNT CONTROL VARIABLE.
C
C	IF FWRD(12) IS ZERO, TASKS ARE CHOSEN AT RANDOM  FROM  THE  TASK  LIST IN
C	FWRD(64)  THROUGH FWRD(79) DISREGARDING ZERO VALUES.  GENERALLY THE TASKS
C	THEMSELVES ARE  SPECIFIED  IN BLOCKS OF UP TO SIXTEEN NUMBERS STARTING AT
C	FWRD(256).  WARNING:   ALL NON-ZERO VALUES FROM FWRD(64) THROUGH FWRD(79)
C	MUST CONTAIN VALID REFERENCES TO TASK GROUPS STARTING AT APPROPRIATE FWRD
C	ADDRESSES (GENERALLY FROM 256 ONWARD).
C
C	IF FWRD(12) IS NON-ZERO, TASKS ARE  TAKEN SEQUENTIALLY FROM THE TASK LIST
C	STARTING  AT FWRD(64).  THE LENGTH OF  THE  TASK  LIST  IS  SPECIFIED  BY
C	FWRD(12).    THE  MAXIMUM  VALUE IS SIXTEEN.   IF  THE  NUMBER  OF  TASKS
C	SPECIFIED  BY FWRD(12) IS LESS THAN SIXTEEN, ANY ADDITIONAL  FWRD  VALUES
C	ABOVE  THIS NUMBER ARE IGNORED (I.E., 64+FWRD(12) THROUGH 79).   WARNING:
C	FWRDS  FROM  64  ONWARD  (AS  SPECIFIED  BY  FWRD(12)) MUST CONTAIN VALID
C	REFERENCES  TO  TASK   GROUPS  STARTING  AT  APPROPRIATE  FWRD  ADDRESSES
C	(GENERALLY FROM 256 ONWARD).    IF FWRD(12) IS ONE, ONLY A SINGLE TASK AT
C	FWRD(64) WILL BE ACTIVATED.   IF  FWRD(12)  IS TWO, TASKS AT FWRD(64) AND
C	FWRD(65) WILL BE ACTIVATED, ETC.
C
SET	D=FWRD(12,1)	;C	SINGLE TASK IN SEQUENTIAL MODE
C
C	INITIALIZE  ALL  TASK  GROUP WORDS TO  ZERO  BEFORE  DEFINING  ADDITIONAL
C	VALUES.
C
FOR	I=192,511;SET	D=FWRD(I,0)
C
C	INITIALIZE  ALL POINTER FWRDS TO POINT TO THE CORRESPONDING LIST ELEMENTS
C	AS A DEFAULT CONDITION.
C
FOR	I=1,16;SET	D=FWRD(64+I-1,((I-1)*16)+256)
C
C	TASK ELEMENTS FOLLOW.
C
                                                                                        