Тема: id клетки
Показать сообщение отдельно
Старый 23.01.2010, 16:44   #16
G.A.D
Разработчик
 
Регистрация: 28.02.2009
Сообщений: 434
Написано 44 полезных сообщений
(для 96 пользователей)
Ответ: id клетки

Для карты нужно)
Local stream:TStream = WriteStream("map.n")
Local LevMap:Int[] =[1, 1, 1, 1, 1, 1, 1, 1, 1, 1, ..
1, 0, 0, 0, 0, 0, 0, 0, 0, 0, ..
1, 0, 0, 0, 0, 0, 0, 0, 0, 1, ..
1, 0, 0, 0, 0, 0, 0, 0, 0, 1, ..
1, 0, 0, 0, 0, 0, 0, 0, 0, 1, ..
1, 0, 0, 0, 0, 0, 0, 0, 0, 1, ..
1, 0, 0, 0, 0, 0, 0, 0, 0, 1, ..
1, 0, 0, 0, 0, 0, 0, 0, 0, 1, ..
1, 0, 0, 0, 0, 0, 0, 0, 0, 1, ..
1, 1, 1, 1, 1, 1, 1, 1, 1, 1]
Local mwidth = 10
stream.WriteInt(mheight)
stream.WriteInt(mwidth)
For y = 0 To mwidth - 1
For x=0 to mheight-1
stream.WriteByte(levmap[x, y])
Next
Next
К сожалению не работает(
(Offline)
 
Ответить с цитированием