equal
deleted
inserted
replaced
359 |
359 |
360 PauseTexture:= RenderStringTex(trmsg[sidPaused], $FFFF00, fntBig); |
360 PauseTexture:= RenderStringTex(trmsg[sidPaused], $FFFF00, fntBig); |
361 ConfirmTexture:= RenderStringTex(trmsg[sidConfirm], $FFFF00, fntBig); |
361 ConfirmTexture:= RenderStringTex(trmsg[sidConfirm], $FFFF00, fntBig); |
362 SyncTexture:= RenderStringTex(trmsg[sidSync], $FFFF00, fntBig); |
362 SyncTexture:= RenderStringTex(trmsg[sidSync], $FFFF00, fntBig); |
363 |
363 |
|
364 AddProgress; |
|
365 |
364 for ai:= Low(TAmmoType) to High(TAmmoType) do |
366 for ai:= Low(TAmmoType) to High(TAmmoType) do |
365 with Ammoz[ai] do |
367 with Ammoz[ai] do |
366 begin |
368 begin |
367 tmpsurf:= TTF_RenderUTF8_Blended(Fontz[fnt16].Handle, Str2PChar(trAmmo[NameId]), $FFFFFF); |
369 tmpsurf:= TTF_RenderUTF8_Blended(Fontz[fnt16].Handle, Str2PChar(trAmmo[NameId]), $FFFFFF); |
368 NameTex:= Surface2Tex(tmpsurf, false); |
370 NameTex:= Surface2Tex(tmpsurf, false); |
375 CountTexz[i]:= Surface2Tex(tmpsurf, false); |
377 CountTexz[i]:= Surface2Tex(tmpsurf, false); |
376 SDL_FreeSurface(tmpsurf) |
378 SDL_FreeSurface(tmpsurf) |
377 end; |
379 end; |
378 |
380 |
379 {$IFDEF DUMP} |
381 {$IFDEF DUMP} |
380 SDL_SaveBMP_RW(LandSurface, SDL_RWFromFile('LandSurface.bmp', 'wb'), 1); |
382 //not working anymore, where are LandSurface and StoreSurface defined? |
381 SDL_SaveBMP_RW(StoreSurface, SDL_RWFromFile('StoreSurface.bmp', 'wb'), 1); |
383 //SDL_SaveBMP_RW(LandSurface, SDL_RWFromFile('LandSurface.bmp', 'wb'), 1); |
|
384 //SDL_SaveBMP_RW(StoreSurface, SDL_RWFromFile('StoreSurface.bmp', 'wb'), 1); |
382 {$ENDIF} |
385 {$ENDIF} |
383 AddProgress; |
386 AddProgress; |
384 end; |
387 end; |
385 |
388 |
386 procedure DrawFromRect(X, Y: LongInt; r: PSDL_Rect; SourceTexture: PTexture); |
389 procedure DrawFromRect(X, Y: LongInt; r: PSDL_Rect; SourceTexture: PTexture); |