for {set y 1} {$y <= [array size $sortafter]} {incr y} { 
# the line under is my prob... i want $sortafter's value put into the var, like i tried to explain down here ;)
        if {$download == ${[set $sortafter]($y)}} {
        set allup($y)       [format %.1f [expr $allup($y) / 1024.0 / 1024.0]]
        set alldn($y)       [format %.1f [expr $alldn($y) / 1024.0 / 1024.0]]
        set wkdn($y)        [format %.1f [expr $wkdn($y) / 1024.0 / 1024.0]]
        set wkup($y)        [format %.1f [expr $wkup($y) / 1024.0 / 1024.0]]
        set monthdn($y)     [format %.1f [expr $monthdn($y) / 1024.0 / 1024.0]]
        set monthup($y)     [format %.1f [expr $monthup($y) / 1024.0 / 1024.0]]

        set all_all_up          [expr $all_all_up + $allup($y)]
        set all_all_dn          [expr $all_all_dn + $alldn($y)]
        set all_wk_up           [expr $all_wk_up + $wkup($y)]
        set all_wk_dn           [expr $all_wk_dn + $wkdn($y)]
        set all_month_up        [expr $all_month_up + $monthup($y)]
        set all_month_dn        [expr $all_month_dn + $monthdn($y)]

        set username($y)        [makeline " " "$pre(in_nick)" "[string length "$username($y)@$group($y)"]" "left" "$username($y)@$group($y)"]
        set allup($y)           [makeline " " "$pre(in_all)" "[string length "$allup($y)   "]" "right" "$allup($y)\GB"]
        set alldn($y)           [makeline " " "$pre(in_all)" "[string length "$alldn($y)   "]" "right" "$alldn($y)\GB"]
        set wkdn($y)            [makeline " " "$pre(in_week)" "[string length "$wkdn($y)   "]" "right" "$wkdn($y)\GB"]
        set wkup($y)            [makeline " " "$pre(in_week)" "[string length "$wkup($y)   "]" "right" "$wkup($y)\GB"]
        set monthdn($y)         [makeline " " "$pre(in_month)" "[string length "$monthdn($y)   "]" "right" "$monthdn($y)\GB"]
        set monthup($y)         [makeline " " "$pre(in_month)" "[string length "$monthup($y)   "]" "right" "$monthup($y)\GB"]

        puts "$pre(left)$username($y)$pre(splitter)$alldn($y)$pre(splitter)$allup($y)$pre(splitter)$wkdn($y)$pre(splitter)$wkup($y)$pre(splitter)$monthdn($y)$
}
}
