Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

массив в массиве [Delphi, Windows]


new developer ©   (2004-08-07 19:59:00) 

Пишу типа рпг игру, карта клеточная, но она будет из мелких клетов состоять чтобы не было заметно кривизны разной которая бывает из аз этого.

TCell=record
   Land:Integer;
   Obj:Integer;
   Block:Boolean;
это ячейка щас такая, тип земли, номер обьекта в ячейке и проходима ли она.
TMap = array[0..32,0..32]of TCell ; // это массив уже карта игры

Мне нужно чтобы в каждой клетке было по 4 клетки поменьше, подскажите как оформляеться это все дело.


new developer   (2004-08-09 19:10:00) [1]

ланграф - глупый ты еще...


Zer0_no_pass   (2004-08-08 21:26:00) [2]

гм... это навреное тест на iq =)

если нет, то почему сразу не удвоить размер массива?

TMap = array[0..63,0..63]of TCell;

кстати можно сделать реальную оптимизацию c учетом того что y*64 = y shl 6
example

type
TMap = array[0..64*64-1]of TCell;
var
map : TMap
...
if map[x+y shl 6].block then
...


Ландграф Павел   (2004-08-08 16:39:00) [3]

>но она будет из мелких клетов состоять чтобы не было заметно кривизны разной которая бывает из аз этого...
Кривизны чего, кривизны рук?


ferr   (2004-08-07 23:09:00) [4]

Не понял о чём речь, посмотрел на название, может this..
type
TCell=record
  Land:Integer;
  Obj:Integer;
  Block:Boolean;
end;
TFourCell=array[0..3] of TCell;
TMap = array[0..32,0..32]of TFourCell;


cyborg   (2004-08-07 22:16:00) [5]

это тебе поиск пути нужно сделать чтоли, на крупные объекты и помельче? ;)


Наверх

Титульная страница Поиск, карта сайта Написать письмо