hedgewars/uWorld.pas
changeset 6692 029c27660dd2
parent 6691 79c96abd06d6
child 6695 32de8965c62c
equal deleted inserted replaced
6691:79c96abd06d6 6692:029c27660dd2
   243 
   243 
   244 with arrowLeft do
   244 with arrowLeft do
   245     begin
   245     begin
   246     show:= true;
   246     show:= true;
   247     sprite:= sprArrowLeft;
   247     sprite:= sprArrowLeft;
   248     x:= -(cScreenWidth shr 1);
   248     x:= -(cScreenWidth shr 1) + Round(spritesData[sprite].Texture^.h*buttonScale * 0.25);
   249     y:= -Round(spritesData[sprite].Texture^.h*buttonScale) + cScreenHeight  - Round(spritesData[sprite].Texture^.h*buttonScale);
   249     y:= -Round(spritesData[sprite].Texture^.h*buttonScale) + cScreenHeight  - Round(spritesData[sprite].Texture^.h*buttonScale *0.5);
   250     width:= Round(spritesData[sprite].Texture^.h * buttonScale);
   250     width:= Round(spritesData[sprite].Texture^.h * buttonScale);
   251     height:= Round(spritesData[sprite].Texture^.h * buttonScale);
   251     height:= Round(spritesData[sprite].Texture^.h * buttonScale);
   252     hOffset:= 0;
   252     hOffset:= 0;
   253     vOffset:= 0;
   253     vOffset:= 0;
   254     end;
   254     end;
   255 with arrowRight do
   255 with arrowRight do
   256     begin
   256     begin
   257     show:= true;
   257     show:= true;
   258     sprite:= sprArrowRight;
   258     sprite:= sprArrowRight;
   259     x:= -(cScreenWidth shr 1)+ Round(spritesData[sprite].Texture^.h * buttonScale);
   259     x:= -(cScreenWidth shr 1) + Round(spritesData[sprite].Texture^.h * buttonScale *1.5);
   260     y:= -Round(spritesData[sprite].Texture^.h*buttonScale) + cScreenHeight - Round(spritesData[sprite].Texture^.h*buttonScale);
   260     y:= -Round(spritesData[sprite].Texture^.h*buttonScale) + cScreenHeight - Round(spritesData[sprite].Texture^.h*buttonScale * 0.5);
   261     width:= Round(spritesData[sprite].Texture^.w * buttonScale);
   261     width:= Round(spritesData[sprite].Texture^.w * buttonScale);
   262     height:= Round(spritesData[sprite].Texture^.h * buttonScale);
   262     height:= Round(spritesData[sprite].Texture^.h * buttonScale);
   263     hOffset:= 0;
   263     hOffset:= 0;
   264     vOffset:= 0;
   264     vOffset:= 0;
   265     with moveAnim do
       
   266         begin
       
   267         targetToX:= arrowRight.x;
       
   268         targetToY:= arrowRight.y;
       
   269         targetFromX:= arrowRight.x + Round(spritesData[sprArrowUp].Texture^.h * buttonScale);
       
   270         targetFromY:= arrowRight.y;
       
   271         end;
       
   272     end;
   265     end;
   273 
   266 
   274 with arrowUp do
   267 with arrowUp do
   275     begin
   268     begin
   276     show:= false;
   269     show:= false;
   277     sprite:= sprArrowUp;
   270     sprite:= sprArrowUp;
   278     x:= -(cScreenWidth shr 1) + Round(spritesData[sprite].Texture^.h * buttonScale);
   271     x:= (cScreenWidth shr 1) - Round(spritesData[sprite].Texture^.w * buttonScale *2);
   279     y:= arrowRight.y;
   272     y:= backjump.y -Round(spritesData[sprite].Texture^.h * buttonScale*2.25);
   280     width:= Round(spritesData[sprite].Texture^.w * buttonScale);
   273     width:= Round(spritesData[sprite].Texture^.w * buttonScale);
   281     height:= Round(spritesData[sprite].Texture^.h * buttonScale);
   274     height:= Round(spritesData[sprite].Texture^.h * buttonScale);
   282     hOffset:= 0;
   275     hOffset:= 0;
   283     vOffset:= 0;
   276     vOffset:= 0;
   284     with moveAnim do
   277     with moveAnim do
   285          begin
   278          begin
   286          targetToX:= arrowUp.x;
   279          targetToX:= arrowUp.x;
   287          targetToY:= arrowUp.y;
   280          targetToY:= arrowUp.y;
   288          targetFromX:= arrowUp.x;
   281          targetFromX:= arrowUp.x - Round(spritesData[sprite].Texture^.w * buttonScale *0.75);
   289          targetFromY:= -Round(spritesData[sprite].Texture^.h*buttonScale) + cScreenHeight - Round(spritesData[sprite].Texture^.h*buttonScale*2);
   282          targetFromY:= arrowUp.y;
   290          end;
   283          end;
   291     end;
   284     end;
   292 
   285 
   293 with arrowDown do
   286 with arrowDown do
   294     begin
   287     begin
   295     show:= false;
   288     show:= false;
   296     sprite:= sprArrowDown;
   289     sprite:= sprArrowDown;
   297     x:= -(cScreenWidth shr 1) + Round(spritesData[sprArrowUp].Texture^.h * buttonScale);
   290     x:= (cScreenWidth shr 1) - Round(spritesData[sprite].Texture^.w * buttonScale * 2);
   298     y:= arrowRight.y;
   291     y:= backjump.y -Round(spritesData[sprite].Texture^.h * buttonScale *2.25);
   299     width:= Round(spritesData[sprArrowDown].Texture^.w * buttonScale);
   292     width:= Round(spritesData[sprite].Texture^.w * buttonScale);
   300     height:= Round(spritesData[sprArrowDown].Texture^.h * buttonScale);
   293     height:= Round(spritesData[sprite].Texture^.h * buttonScale);
   301     hOffset:= 0;
   294     hOffset:= 0;
   302     vOffset:= 0;
   295     vOffset:= 0;
   303     with moveAnim do
   296     with moveAnim do
   304         begin
   297         begin
   305         targetToX:= arrowDown.x;
   298         targetToX:= arrowDown.x;
   306         targetToY:= arrowDown.y;
   299         targetToY:= arrowDown.y;
   307         targetFromX:= arrowDown.x;
   300         targetFromX:= arrowDown.x + Round(spritesData[sprite].Texture^.w * buttonScale *0.75);
   308         targetFromY:= -Round(spritesData[sprArrowDown].Texture^.h*buttonscale) + cScreenHeight;
   301         targetFromY:= arrowDown.y;
   309         end;
   302         end;
   310     end;
   303     end;
   311 
   304 
   312 pauseButton.x:= cScreenWidth div 2 - Round(spritesData[sprPauseButton].Texture^.w * buttonscale);
   305 pauseButton.x:= cScreenWidth div 2 - Round(spritesData[sprPauseButton].Texture^.w * buttonscale);
   313 pauseButton.y:= 0; //-Round(spritesData[sprPauseButton].Texture^.h * buttonscale);
   306 pauseButton.y:= 0; //-Round(spritesData[sprPauseButton].Texture^.h * buttonscale);
   623                     begin
   616                     begin
   624                     if not(arrowUp.show) then
   617                     if not(arrowUp.show) then
   625                         begin
   618                         begin
   626                         animateWidget(@arrowUp, true, true);
   619                         animateWidget(@arrowUp, true, true);
   627                         animateWidget(@arrowDown, true, true);
   620                         animateWidget(@arrowDown, true, true);
   628                         animateWidget(@arrowRight, false, true);
       
   629                         end;
   621                         end;
   630                     end
   622                     end
   631                 else
   623                 else
   632                     if arrowUp.show then
   624                     if arrowUp.show then
   633                         begin
   625                         begin
   634                         animateWidget(@arrowUp, true, false);
   626                         animateWidget(@arrowUp, true, false);
   635                         animateWidget(@arrowDown, true, false);
   627                         animateWidget(@arrowDown, true, false);
   636                         animateWidget(@arrowRight, false, true);
       
   637                         end;
   628                         end;
   638 {$ENDIF}
   629 {$ENDIF}
   639 
   630 
   640                 exit
   631                 exit
   641                 end;
   632                 end;