Jede MOD aktion für zB: PlayerB Rateing wird einfach ignoriert aber das Win/Loss ohne probleme ausgeführt... warum?
das script funktionierte wunderbar die letzten paar Monate, was ist passiert?
mod "Nickname==$PlayerB",["Rateing","$Rateing1B", "Loss","$Loss1"],"/scLadder/JSL1on1/register";
<perl>
get "Id==$Id sort=-Date range=0,01","/scLadder/JSL1on1/matchups";
if ( $ResultA eq "1" && $ResultB eq "0" && $RankA == $RankB && $RateingA == $RateingB)
{
get "Nickname==$PlayerA range=0,01","/scLadder/JSL1on1/register";
$Rateing1A=$Rateing+$WinCalcA;
$Win1=$Win+1;
mod "Nickname==$PlayerA",["Rateing","$Rateing1A", "Win","$Win1"],"/scLadder/JSL1on1/register";
#mod "Nickname==$PlayerA",["LMID","$PlayerB"],"/scLadder/JSL1on1/register"; #Last Match Played
out" <br>He Wins $WinCalcA<br>";
get "Nickname==$PlayerB range=0,01","/scLadder/JSL1on1/register";
$Rateing1B=$Rateing-$WinCalcB;
$Loss1=$Loss+1;
mod "Nickname==$PlayerB",["Rateing","$Rateing1B", "Loss","$Loss1"],"/scLadder/JSL1on1/register";
#mod "Nickname==$PlayerB",["LAID","$PlayerA"],"/scLadder/JSL1on1/register"; #Last Match Played
out" <br>You loose $LossCalcA<br>";
out" <td align=center bgcolor=ffffff><small>$WinCalcA / $LossCalcA</small> 1</td>";
}
elsif ( $ResultA eq "0" && $ResultB eq "1" && $RankA == $RankB && $RateingA == $RateingB)
{
get "Nickname==$PlayerA range=0,01","/scLadder/JSL1on1/register";
$Rateing2A=$Rateing-$WinCalcB;
$Loss1=$Loss+1;
mod "Nickname==$PlayerA",["Rateing","$Rateing2A", "Loss","$Loss1"],"/scLadder/JSL1on1/register";
#mod "Nickname==$PlayerA",["LMID","$PlayerB"],"/scLadder/JSL1on1/register"; #Last Match Played
#get "Nickname==$PlayerB range=0,01","/scLadder/JSL1on1/register";
$Rateing2B=$Rateing+$WinCalcA;
$Win1=$Win+1;
mod "Nickname==$PlayerB",["Rateing","$Rateing2B", "Win","$Win1"],"/scLadder/JSL1on1/register";
mod "Nickname==$PlayerB",["LAID","$PlayerA"],"/scLadder/JSL1on1/register"; #Last Match Played
out" <br>He Looses $LossCalcA <br>";
out" <br>You win $WinCalcA<br>";
out" <td align=center bgcolor=ffffff><small>$LossCalcA / $WinCalcA</small> 2</td>";
#############################################################################
}
elsif ($ResultA eq "1" && $ResultB eq "0" && $RankA > $RankB && $RateingA > $RateingB)
{
get "Nickname==$PlayerA range=0,01","/scLadder/JSL1on1/register";
$Rateing3A=$Rateing+$WinCalcA;
$Win1=$Win+1;
mod "Nickname==$PlayerA",["Rateing","$Rateing3A", "Win","$Win1"],"/scLadder/JSL1on1/register";
#mod "Nickname==$PlayerA",["LMID","$PlayerB"],"/scLadder/JSL1on1/register"; #Last Match Played
out" <br>He Wins $WinCalcA<br>";
get "Nickname==$PlayerB range=0,01","/scLadder/JSL1on1/register";
$Rateing3B=$Rateing-$WinCalcA;
$Loss1=$Loss+1;
mod "Nickname==$PlayerB",["Rateing","$Rateing3B", "Loss","$Loss1"],"/scLadder/JSL1on1/register";
#mod "Nickname==$PlayerB",["LAID","$PlayerA"],"/scLadder/JSL1on1/register"; #Last Match Played
out" <br>You loose $LossCalcB<br>";
out" <td align=center bgcolor=ffffff><small>$WinCalcA / $LossCalcB</small> 3</td>";
elsif ($ResultA eq "0" && $ResultB eq "1" && $RankA > $RankB && $RateingA > $RateingB)
{
get "Nickname==$PlayerA range=0,01","/scLadder/JSL1on1/register";
$Rateing4A=$Rateing-$WinCalcA;
$Loss1=$Loss+1;
mod "Nickname==$PlayerA",["Rateing","$Rateing4A", "Loss","$Loss1"],"/scLadder/JSL1on1/register";
#mod "Nickname==$PlayerA",["LMID","$PlayerB"],"/scLadder/JSL1on1/register"; #Last Match Played
out" <br>He Looses $LossCalcA<br>";
get "Nickname==$PlayerB range=0,01","/scLadder/JSL1on1/register";
$Rateing4B=$Rateing+WinCalcB;
$Win1=$Win+1;
mod "Nickname==$PlayerB",["Rateing","$Rateing4B", "Win","$Win1"],"/scLadder/JSL1on1/register";
#mod "Nickname==$PlayerB",["LAID","$PlayerA"],"/scLadder/JSL1on1/register"; #Last Match Played
out" <br>You Win $WinCalcB<br>";
out" <td align=center bgcolor=ffffff><small>$LossCalcA / $WinCalcB</small> 4</td>";
################################################################
elsif ($ResultA eq "1" && $ResultB eq "0" && $RankA < $RankB && $RateingA < $RateingB)
{
get "Nickname==$PlayerA range=0,01","/scLadder/JSL1on1/register";
$Rateing5A=$Rateing+$WinCalcA;
$Win1=$Win+1;
mod "Nickname==$PlayerA",["Rateing","$Rateing5A", "Win","$Win1"],"/scLadder/JSL1on1/register";
#mod "Nickname==$PlayerA",["LMID","$PlayerB"],"/scLadder/JSL1on1/register"; #Last Match Played
out" <br>He Wins $WinCalcA<br>";
get "Nickname==$PlayerB range=0,01","/scLadder/JSL1on1/register";
$Rateing5B=$Rateing-$WinCalcA;
$Loss1=$Loss+1;
mod "Nickname==$PlayerB",["Rateing","$Rateing5B", "Loss","$Loss1"],"/scLadder/JSL1on1/register";
#mod "Nickname==$PlayerB",["LAID","$PlayerA"],"/scLadder/JSL1on1/register"; #Last Match Played
out" <br>You Loose $LossCalcB<br>";
out" <td align=center bgcolor=ffffff><small>$WinCalcA / $LossCalcB</small> 5</td>";
elsif ($ResultA eq "0" && $ResultB eq "1" && $RankA < $RankB && $RateingA < $RateingB)
{
get "Nickname==$PlayerA range=0,01","/scLadder/JSL1on1/register";
$Rateing6A=$Rateing-$WinCalcB;
$Loss1=$Loss+1;
mod "Nickname==$PlayerA",["Rateing","$Rateing6A", "Loss","$Loss1"],"/scLadder/JSL1on1/register";
#mod "Nickname==$PlayerA",["LMID","$PlayerB"],"/scLadder/JSL1on1/register"; #Last Match Played
out" <br>He Looses $LossCalcA<br>";
get "Nickname==$PlayerB range=0,01","/scLadder/JSL1on1/register";
$Rateing6B=$Rateing+$WinCalcB;
$Win1=$Win+1;
mod "Nickname==$PlayerB",["Rateing","$Rateing6B", "Win","$Win1"],"/scLadder/JSL1on1/register";
#mod "Nickname==$PlayerB",["LAID","$PlayerA"],"/scLadder/JSL1on1/register"; #Last Match Played
out" <br>You Win $WinCalcB<br>";
out" <td align=center bgcolor=ffffff><small>$LossCalcA / $WinCalcB 6</small> 6</td>";
#############################
#############################
elsif ( $ResultA eq "1" && $ResultB eq "1" )
{
out" <br>Sorry, no Ladder result possible $PlayerA and $PlayerB Claim Win!<br>";
elsif ( $ResultA eq "0" && $ResultB eq "0" )
{
out" <br>Ladder result marked as Canceled<br>";
}
elsif ( $ResultA eq "c" && $ResultB eq "0" )
{
out" <br>Ladder result marked as Canceled by $PlayerA!<br>";
}
elsif ( $ResultA eq "0" && $ResultB eq "c" )
{
out" <br>Ladder result marked as Canceled by you!<br>";
}
elsif ( $ResultA eq "c" && $ResultB eq "c" )
{
out" <br>Ladder result marked as Canceled by both Players!<br>";
}
else
{
out" <td align=center bgcolor=ffffff><small>no result! False RANK/Rateing conditions! Relog and make your claims!</small></td>";
}
</perl>
