Kalter, я кароч тока что дин фпс как в рескрафте захреначил смари
n:=getRelativeTimeMs-savtime;
if n<30 then delayfps:=delayfps+1;
if n>30 then delayfps:=delayfps-1;
if delayfps<0 then delayfps:=0;
savtime:=getRelativeTimeMs;
SetColor(0,0,0);
drawtext(''+delayfps,2,1);
код агонь гарантирую, автор сжог
Патом в игровом цикле просто пишешь Delay(delayfps); после репаинта кароч и фсе