alias ranking {
inc $+(%,silver,.,$1)
if $($+(%,silver,.,$1),2) > 3 { set $+(%,silver,.,$1) 1 | inc $+(%,bronze,.,$1) }
if $($+(%,bronze,.,$1),2) > 3 { set $+(%,bronze,.,$1) 1 | inc $+(%,gold,.,$1) }
if $read(ranking.html,s,$1) { write -dl $+ $readn ranking.html }
write -il $+ $readn ranking.html $1 $iif($($+(%,gold,.,$1),2), $str(<img src="C14-027.jpg" width="15" height="12">,$($+(%,gold,.,$1),2))) $iif($($+(%,bronze,.,$1),2), $str(<img src="C14-029.jpg" width="15" height="12">,$($+(%,bronze,.,$1),2))) $str(<img src="C14-028.jpg" width="15" height="12">,$($+(%,silver,.,$1),2)) </br>
}