-- Plays against TitForTat players.
-- Try for extra point at end.
function HandleTitForTat return Move is
begin
if MN = 1 then
return Cooperate;
elsif MN = TotalNofMoves then
return Defect;
else
return OL;
end if;
end HandleTitForTat;