changeset 2803 | 1f446fc5c8ec |
parent 2786 | 85f6425a4d74 |
child 2839 | 95977f876122 |
2802:28cd5b87bce9 | 2803:1f446fc5c8ec |
---|---|
357 var i, t: LongInt; |
357 var i, t: LongInt; |
358 r: TSDL_Rect; |
358 r: TSDL_Rect; |
359 tdx, tdy: Double; |
359 tdx, tdy: Double; |
360 grp: TCapGroup; |
360 grp: TCapGroup; |
361 s: string[15]; |
361 s: string[15]; |
362 highlight: Boolean; |
362 highlight: Boolean; |
363 offset: LongInt; |
363 offset, offsetX, offsetY: LongInt; |
364 scale: GLfloat; |
364 scale: GLfloat; |
365 begin |
365 begin |
366 if ZoomValue < zoom then |
366 if ZoomValue < zoom then |
367 begin |
367 begin |
368 zoom:= zoom - 0.002 * Lag; |
368 zoom:= zoom - 0.002 * Lag; |
449 {$ENDIF} |
449 {$ENDIF} |
450 SetScale(scale); |
450 SetScale(scale); |
451 |
451 |
452 |
452 |
453 // Turn time |
453 // Turn time |
454 {$IFDEF IPHONEOS} |
|
455 offset:= 313; |
|
456 {$ELSE} |
|
454 offset:= 48; |
457 offset:= 48; |
458 {$ENDIF} |
|
455 if TurnTimeLeft <> 0 then |
459 if TurnTimeLeft <> 0 then |
456 begin |
460 begin |
457 i:= Succ(Pred(TurnTimeLeft) div 1000); |
461 i:= Succ(Pred(TurnTimeLeft) div 1000); |
458 if i>99 then t:= 112 |
462 if i>99 then t:= 112 |
459 else if i>9 then t:= 96 |
463 else if i>9 then t:= 96 |
514 end; |
518 end; |
515 {$ENDIF} |
519 {$ENDIF} |
516 |
520 |
517 // Captions |
521 // Captions |
518 {$IFDEF IPHONEOS} |
522 {$IFDEF IPHONEOS} |
519 offset:= 49; |
523 offset:= 40; |
520 {$ELSE} |
524 {$ELSE} |
521 if ((TrainingFlags and tfTimeTrial) <> 0) and (TimeTrialStartTime > 0) then offset:= 48 |
525 if ((TrainingFlags and tfTimeTrial) <> 0) and (TimeTrialStartTime > 0) then offset:= 48 |
522 else offset:= 8; |
526 else offset:= 8; |
523 {$ENDIF} |
527 {$ENDIF} |
524 |
528 |
576 // Lag alert |
580 // Lag alert |
577 if isInLag then DrawSprite(sprLag, 32 - (cScreenWidth shr 1), 32, (RealTicks shr 7) mod 12); |
581 if isInLag then DrawSprite(sprLag, 32 - (cScreenWidth shr 1), 32, (RealTicks shr 7) mod 12); |
578 |
582 |
579 // Wind bar |
583 // Wind bar |
580 {$IFDEF IPHONEOS} |
584 {$IFDEF IPHONEOS} |
581 offset:= 305; |
585 offsetX:= 305; |
586 offsetY:= 315; |
|
582 {$ELSE} |
587 {$ELSE} |
583 offset:= 30; |
588 offsetX:= 30; |
589 offsetY:= 180; |
|
584 {$ENDIF} |
590 {$ENDIF} |
585 DrawSprite(sprWindBar, (cScreenWidth shr 1) - 180, cScreenHeight - offset, 0); |
591 DrawSprite(sprWindBar, (cScreenWidth shr 1) - offsetY, cScreenHeight - offsetX, 0); |
586 if WindBarWidth > 0 then |
592 if WindBarWidth > 0 then |
587 begin |
593 begin |
588 {$WARNINGS OFF} |
594 {$WARNINGS OFF} |
589 r.x:= 8 - (RealTicks shr 6) mod 8; |
595 r.x:= 8 - (RealTicks shr 6) mod 8; |
590 {$WARNINGS ON} |
596 {$WARNINGS ON} |
591 r.y:= 0; |
597 r.y:= 0; |
592 r.w:= WindBarWidth; |
598 r.w:= WindBarWidth; |
593 r.h:= 13; |
599 r.h:= 13; |
594 DrawSpriteFromRect(sprWindR, r, (cScreenWidth shr 1) - 103, cScreenHeight - offset + 2, 13, 0); |
600 DrawSpriteFromRect(sprWindR, r, (cScreenWidth shr 1) - offsetY + 77, cScreenHeight - offsetX + 2, 13, 0); |
595 end else |
601 end else |
596 if WindBarWidth < 0 then |
602 if WindBarWidth < 0 then |
597 begin |
603 begin |
598 {$WARNINGS OFF} |
604 {$WARNINGS OFF} |
599 r.x:= (WindBarWidth + RealTicks shr 6) mod 8; |
605 r.x:= (WindBarWidth + RealTicks shr 6) mod 8; |
600 {$WARNINGS ON} |
606 {$WARNINGS ON} |
601 r.y:= 0; |
607 r.y:= 0; |
602 r.w:= - WindBarWidth; |
608 r.w:= - WindBarWidth; |
603 r.h:= 13; |
609 r.h:= 13; |
604 DrawSpriteFromRect(sprWindL, r, (cScreenWidth shr 1) - 106 + WindBarWidth, cScreenHeight - offset + 2, 13, 0); |
610 DrawSpriteFromRect(sprWindL, r, (cScreenWidth shr 1) - offsetY + 74 + WindBarWidth, cScreenHeight - offsetX + 2, 13, 0); |
605 end; |
611 end; |
606 |
612 |
607 // AmmoMenu |
613 // AmmoMenu |
608 if (AMxShift < 210) or bShowAmmoMenu then ShowAmmoMenu; |
614 if (AMxShift < 210) or bShowAmmoMenu then ShowAmmoMenu; |
609 |
615 |
624 DrawCentered(0, (cScreenHeight shr 1) + 100, missionTex); |
630 DrawCentered(0, (cScreenHeight shr 1) + 100, missionTex); |
625 end; |
631 end; |
626 |
632 |
627 // fps |
633 // fps |
628 {$IFDEF IPHONEOS} |
634 {$IFDEF IPHONEOS} |
629 offset:= 40; |
635 offset:= 300; |
630 {$ELSE} |
636 {$ELSE} |
631 offset:= 10; |
637 offset:= 10; |
632 {$ENDIF} |
638 {$ENDIF} |
633 inc(Frames); |
639 inc(Frames); |
634 if cShowFPS then |
640 if cShowFPS then |