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

Может кому понадобятся)
Function readmap(file_in$)
Local file = ReadFile(file_in)
Local dim:Int[]
Local dlin = ReadInt(file)
Print dlin
For i = 0 To dlin - 1
dim[i] = ReadInt(file)
Print dim[i]
Next
For b:Int = EachIn dim
Print b
Next
CloseFile(file)
End Function
Function writemap(file_out$,dlina:int,array:int[])
Local dim:Int[] =array
Local file = WriteFile(file_out$)
Local dlin = dlina
WriteInt(file, dlin)
For i = 0 To dlin - 1
WriteInt(file, dim[i])
Next
CloseFile(file)
End Function
что-то не понимаю как можно эти ф-ии,которые я написал приминить к карте(
(Offline)
 
Ответить с цитированием