-- Use predefined pattern function PredefPattern return Move is begin if MoveSpecs(CurrentMoveSpecs).List(OpponentSpecs(CurrentOpponent).MatchNum,MN/32)/2**(MN mod 32) mod 2 = 1 then return Cooperate; else return Defect; end if; end PredefPattern;
Tillbaka till huvudsidan