All pastes #536364 Raw Edit

bewertung

public text v1 · immutable
·published 2007-06-04 11:07 UTC
rendered paste body
if Player = Player1 then

               --  Maximum
               if Loose > 0 and Win = 0 and Undecided = 0 then
                  Edge.Weight := '-';
               elsif Win > 0 then
                  Edge.Weight := '+';
               elsif Undecided > 0 and Win = 0 then
                  Edge.Weight := '=';
               end if;

            elsif Player = Player2 then

               --  Minimum
               if Loose > 0 then
                  Edge.Weight := '-';
               elsif Win > 0 and Loose = 0 and Undecided = 0 then
                  Edge.Weight := '+';
               elsif Undecided > 0 and Loose = 0 then
                  Edge.Weight := '=';
               end if;

            end if;