Solace MUD Official Forum

#list gains clear

#alias {clear} {#list gains clear}

#act {%1 is DEAD!!$} {#var mob %1;get book}

#act {You earn %d experience points.}

{
        #math {gains[$mob][exp]} {$gains[$mob][exp] + %1};
        #math {gains[$mob][cnt]} {$gains[$mob][cnt] + 1}
}

#alias {rip}
{
        #showme {      Average Xp       Total Xp     #   Death List, R.I.P.};
        #showme {----------------------------------------------------------};

        #unvar {gains[final]};

        #foreach {$gains[]} {mob}
        {
                #echo {  %+14G %+14G %+5G   %s}
                        {$gains[$mob][exp] / $gains[$mob][cnt]}
                        {$gains[$mob][exp]}
                        {$gains[$mob][cnt]}
                        {$mob};

                #math gains[final][exp] $gains[final][exp] + $gains[$mob][exp];
                #math gains[final][cnt] $gains[final][cnt] + $gains[$mob][cnt]
        };
        #showme {----------------------------------------------------------};

        #math tmp {$gains[final][exp] / $gains[final][cnt]};

        #echo {  %+14G %+14G %+5G}
                {$tmp}
                {$gains[final][exp]}
                {$gains[final][cnt]}
}