Есть пару вопросов

[NetBuilding]

вот про настройку ФПС спрашиваю, а как узнать значение этого фпс через мидлет нигде найти не могу

[psih1]

Как сделать проверку столкновений изображений?

[NetBuilding]

Сообщение от psih1

Как сделать проверку столкновений изображений?

в этом посте VINT расказывает как оно делается через Lib_sprite

[cherepets]

читаем время в мс в начале цикла и в конце, находим разницу.
фпс=1000/разницу

[psih1]

как упростить загрузку массива?

im[0]:=Picker.GetImage(0); // Пример вырезания квадратной иконки по номеру
    im[1]:=Picker.GetImage(1);
    im[2]:=Picker.GetImage(2);
    im[3]:=Picker.GetImage(3);
    im[4]:=Picker.GetImage(4); 


[cherepets]

for i:=0 to 4 do im[i]:=Picker.GetImage(i);

[psih1]

как на тайловую карту добавать спрайт например?

[psih1]

есть предложения какие нибудь???

[odd]

Картинка примера очень мелкая. Из неё ничего нельзя понять что тебе нужно конкретно.

[psih1]

вот пример обекта больше чем тайл

[cherepets]

отрисовывай просто начиная от низа:
drawimage(img,x,y-getimageheight(img)+getimageheight(tile));

как-то так

[psih1]

Начал изучать работу с ресурсом обычную загрузку текста понял а как например вбить координаты и что считывались и картинка отрисовывалась

{
program res;
 var 
    res   : resource; 
    line  : string;
begin
  res := openResource('/data.txt'); 

    if (resourceAvailable(res)) then 
      begin
line := readLine(res);      
closeResource(res); 
      end; 
 
    
drawText('Hello world!'+line, 0, 0);
    repaint;    
    delay(2000000);
end.
}
program res;
 var 
    res   : resource; 
    line  : string;
begin
  res := openResource('/obj.txt'); 

    if (resourceAvailable(res)) then 
      begin
line := readLine(res);      
closeResource(res); 
      end; 
 
    
drawImage(loadImage('/icon.png'), 0, 0); 
repaint;    
delay(2000000);
end. 


[cherepets]

ну, смотри...
к примеру у тебя идет 2 символа координата по Х, потом пробел и 2 символа У. тогда делаешь так:

x:=stringtointeger(copy(line,0,2)));
y:=stringtointeger(copy(line,3,5)));

[psih1]

Вот можт пригодится кому

program res;
 var 
 x,y:integer;
    res   : resource; 
    line  : string;
begin
  res := openResource('/obj.txt'); 

    if (resourceAvailable(res)) then 
      begin   
line := readLine(res);
x:=stringtointeger(copy(line,0,2));
y:=stringtointeger(copy(line,3,5));      
closeResource(res); 
      end; 
    
drawImage(loadImage('/icon.png'), x, y); 
repaint;    
delay(2000000);
end. 


[psih1]

а упростит загрузку массивом можно?

x:=stringtointeger(copy(line,0,2));
y:=stringtointeger(copy(line,3,5));
z:=stringtointeger(copy(line,4,6));