hedgewars/uWorld.pas
changeset 4647 20b982afbe6e
parent 4626 775f43e90383
child 4748 ce9b48de1f52
equal deleted inserted replaced
4588:5ef5415c4ee1 4647:20b982afbe6e
  1100     r.y:= icon * 32;
  1100     r.y:= icon * 32;
  1101     missionTex:= RenderHelpWindow(caption, subcaption, text, '', 0, MissionIcons, @r)
  1101     missionTex:= RenderHelpWindow(caption, subcaption, text, '', 0, MissionIcons, @r)
  1102     end
  1102     end
  1103 else
  1103 else
  1104     begin
  1104     begin
  1105     r.x:= ((-icon - 1) shr 5) * 32;
  1105     r.x:= ((-icon - 1) shr 4) * 32;
  1106     r.y:= ((-icon - 1) mod 32) * 32;
  1106     r.y:= ((-icon - 1) mod 16) * 32;
  1107     missionTex:= RenderHelpWindow(caption, subcaption, text, '', 0, SpritesData[sprAMAmmos].Surface, @r)
  1107     missionTex:= RenderHelpWindow(caption, subcaption, text, '', 0, SpritesData[sprAMAmmos].Surface, @r)
  1108     end;
  1108     end;
  1109 end;
  1109 end;
  1110 
  1110 
  1111 procedure HideMission;
  1111 procedure HideMission;