721 i:= i div 10 |
721 i:= i div 10 |
722 end; |
722 end; |
723 DrawSprite(sprFrame, -(cScreenWidth shr 1) + t - 4 + offsetY, cScreenHeight - offsetX, 0); |
723 DrawSprite(sprFrame, -(cScreenWidth shr 1) + t - 4 + offsetY, cScreenHeight - offsetX, 0); |
724 end; |
724 end; |
725 |
725 |
726 {$IFNDEF IPHONEOS} |
|
727 // Timetrial |
|
728 if ((TrainingFlags and tfTimeTrial) <> 0) and (TimeTrialStartTime > 0) then |
|
729 begin |
|
730 if TimeTrialStopTime = 0 then i:= RealTicks - TimeTrialStartTime else i:= TimeTrialStopTime - TimeTrialStartTime; |
|
731 t:= 272; |
|
732 // right frame |
|
733 DrawSprite(sprFrame, -cScreenWidth div 2 + t, 8, 1); |
|
734 dec(t, 32); |
|
735 // 1 ms |
|
736 DrawSprite(sprBigDigit, -cScreenWidth div 2 + t, 8, i mod 10); |
|
737 dec(t, 32); |
|
738 i:= i div 10; |
|
739 // 10 ms |
|
740 DrawSprite(sprBigDigit, -cScreenWidth div 2 + t, 8, i mod 10); |
|
741 dec(t, 32); |
|
742 i:= i div 10; |
|
743 // 100 ms |
|
744 DrawSprite(sprBigDigit, -cScreenWidth div 2 + t, 8, i mod 10); |
|
745 dec(t, 16); |
|
746 // Point |
|
747 DrawSprite(sprBigDigit, -cScreenWidth div 2 + t, 8, 11); |
|
748 dec(t, 32); |
|
749 i:= i div 10; |
|
750 // 1 s |
|
751 DrawSprite(sprBigDigit, -cScreenWidth div 2 + t, 8, i mod 10); |
|
752 dec(t, 32); |
|
753 i:= i div 10; |
|
754 // 10s |
|
755 DrawSprite(sprBigDigit, -cScreenWidth div 2 + t, 8, i mod 6); |
|
756 dec(t, 16); |
|
757 // Point |
|
758 DrawSprite(sprBigDigit, -cScreenWidth div 2 + t, 8, 10); |
|
759 dec(t, 32); |
|
760 i:= i div 6; |
|
761 // 1 m |
|
762 DrawSprite(sprBigDigit, -cScreenWidth div 2 + t, 8, i mod 10); |
|
763 dec(t, 32); |
|
764 i:= i div 10; |
|
765 // 10 m |
|
766 DrawSprite(sprBigDigit, -cScreenWidth div 2 + t, 8, i mod 10); |
|
767 // left frame |
|
768 DrawSprite(sprFrame, -cScreenWidth div 2 + t - 4, 8, 0); |
|
769 end; |
|
770 {$ENDIF} |
|
771 |
|
772 // Captions |
726 // Captions |
773 DrawCaptions; |
727 DrawCaptions; |
774 |
728 |
775 // Teams Healths |
729 // Teams Healths |
776 for t:= 0 to Pred(TeamsCount) do |
730 for t:= 0 to Pred(TeamsCount) do |