Gedanke zwischendurch:
pro angefangene 100 gesammelte Kilos gibt´s 10 kg draufgepackt.
Team hat 870 kg gesammelt = 80 kg next Race
Team hat 1120 kg gesammelt = 110 kg next Race
Team hat über 1200 kg gesammelt = 120 kg (maximal)
Team hat 57 kg = 0 kg next Race
Rückschritte sind nicht möglich
Das ist gar nicht so kompliziert und relativ leicht durchschaubar!
Anderer Gedanke, ich habe da mal was vorbereitet:
würde man für die 8 bereits gefahrenen Rennen die Abstufung verfeinern, sähe das Ganze so aus:
www.pilsbierbude.de/images/stories/event...results/xx_team.html
Man sieht, dass es dabei auch auf den unteren Plätzen immer noch zu sehr spannenden Positionskämpfen kommen kann
Die Verteilung ist dabei noch abhängig von der Anzahl der Server, die Gewichtsabstufung aber wesentlich feiner, je weiter nach hinten es geht!
In diesem Beispiel habe ich folgende Einteilung gewählt :
If Data1.Recordset("POS") <= ANZ_SERV * 25 Then KILO = 1
If Data1.Recordset("POS") <= ANZ_SERV * 24 Then KILO = 2
If Data1.Recordset("POS") <= ANZ_SERV * 23 Then KILO = 3
If Data1.Recordset("POS") <= ANZ_SERV * 22 Then KILO = 4
If Data1.Recordset("POS") <= ANZ_SERV * 21 Then KILO = 5
If Data1.Recordset("POS") <= ANZ_SERV * 20 Then KILO = 6
If Data1.Recordset("POS") <= ANZ_SERV * 19 Then KILO = 8
If Data1.Recordset("POS") <= ANZ_SERV * 18 Then KILO = 10
If Data1.Recordset("POS") <= ANZ_SERV * 17 Then KILO = 12
If Data1.Recordset("POS") <= ANZ_SERV * 16 Then KILO = 15
If Data1.Recordset("POS") <= ANZ_SERV * 15 Then KILO = 18
If Data1.Recordset("POS") <= ANZ_SERV * 14 Then KILO = 21
If Data1.Recordset("POS") <= ANZ_SERV * 13 Then KILO = 24
If Data1.Recordset("POS") <= ANZ_SERV * 12 Then KILO = 28
If Data1.Recordset("POS") <= ANZ_SERV * 11 Then KILO = 32
If Data1.Recordset("POS") <= ANZ_SERV * 10 Then KILO = 36
If Data1.Recordset("POS") <= ANZ_SERV * 9 Then KILO = 40
If Data1.Recordset("POS") <= ANZ_SERV * 8 Then KILO = 45
If Data1.Recordset("POS") <= ANZ_SERV * 7 Then KILO = 50
If Data1.Recordset("POS") <= ANZ_SERV * 6 Then KILO = 55
If Data1.Recordset("POS") <= ANZ_SERV * 5 Then KILO = 60
If Data1.Recordset("POS") <= ANZ_SERV * 4 Then KILO = 65
If Data1.Recordset("POS") <= ANZ_SERV * 3 Then KILO = 70
If Data1.Recordset("POS") <= ANZ_SERV * 2 Then KILO = 75
If Data1.Recordset("POS") <= ANZ_SERV * 1 Then KILO = 80
Data1.Recordset("POS") ist dabei die Platzierung in der Gesamtauswertung.
Wie gesagt, ist nur ein Beispiel, aber so oder so ähnlich könnte es aussehen!
Edit: wieso kommt denn da überall ein
??
LOL!