FIT SKJ cashmax v2

#!/bin/awk -f
NF==2 && $2 ~ /^(0|-?([1-9][0-9]*|0)(\.[0-9]*)?)$/{
    pole[$1]=pole[$1]+$2
    l=$1
}
END {
    max=pole[l]
    for (i in pole)
        if (max<pole[i])
            max=pole[i]

    n=asorti(pole,arr)
    for (i=0;i<=n;i++)
        if (max==pole[arr[i]] && max !="")
            print arr[i],pole[arr[i]]
    exit 0
}