Чтение файла
 

Вопрос:
Как прочитать текстовий файл с такой начинкой.

1 2 2 2 2 2 2 2 2 1
1 2 1 1 1 1 1 1 2 1
1 2 1 1 1 1 1 1 2 1
1 2 2 2 2 2 2 2 2 1

чтоб каждая цифра имела свою переменую. Зарание благодарен.

Ответ: Чтение файла
 

Массив вам поможет

Ответ: Чтение файла
 

dim a(100)

filein = ReadFile("mydata.dat")

for i=1 to 10
a(i) = readbyte(filein)
next

Ответ: Чтение файла
 

не труЪ бо всякие там переходы на другую строку тоже прочитаются

Ответ: Чтение файла
 

ReadLine и потом каждый нечетный символ вытаскивать)

Ответ: Чтение файла
 

Почему чтение байта а не строки ?

Ответ: Чтение файла
 

Воть я тебе написал немножко =)
http://forum.boolean.name/showthread...663#post107663

Ответ: Чтение файла
 

А как сделать чтобы считывало числа больше 9. Оно считывает числа 1234567890 а если надо считать 10,11,.....,100 как с этим быть :''(( пробовал сам но с этим пока туговато у меня.

Ответ: Чтение файла
 

юзай тогда чтение сразу в две цифры AB или в три цифры или больше))
А - десятки
В - единицы
А+В=Число :-D

Ответ: Чтение файла
 

тогда возьми пробел за разделитель !! или другой символ !!
ищи по форуму тему: Нарезка строки по разделителю !! Товарисч Импер писал помойму !! тебе должно помочь !!

UP: http://forum.boolean.name/showthread.php?t=3713&highlight=%CD%E0%F0%E5%E7%EA %E0+%F1%F2%F0%EE%EA%E8+%EF%EE+%F0%E0%E7%E4%E5%EB%E 8%F2%E5%EB%FE

Ответ: Чтение файла
 

mapfile = ReadFile("Level\Level_1.lvl")
For YY=1 To 8
CurLi$ = ReadLine$(mapfile)
CurrentLine$=LSet$(CurLi$,8)
;Ten=
For XX=1 To 8
CurrentSymbol$=Mid$(CurrentLine$,XX,1)
Select CurrentSymbol$
Case "1"
Map(XX,YY)=1
Case "2"
Map(XX,YY)=2
Case "3"
Map(XX,YY)=3
Case "4"
Map(XX,YY)=4
Case "5"
Map(XX,YY)=5
Case "6"
Map(XX,YY)=6
Case "7"
Map(XX,YY)=7
Case "8"
Map(XX,YY)=8
Case "9"
Map(XX,YY)=9
End Select
Next
Next
Вот я взял этот код из этой ссилки http://forum.boolean.name/showthread...663#post107663
Чувствую что сдесь решит проблему одна или две строски

Ответ: Чтение файла
 

Petrofan а какая разница, как называется переменная, Х или ХХ, осознаёте?

Даю подсказку...
For X=1 To 8 step 2
CurrentSymbol$=Mid$(CurrentLine$,X,2)

Ответ: Чтение файла
 

Если делать step 2 тогда берет 10...19 числа но пропускает 1...9

Ответ: Чтение файла
 

Хм... должно работать, вы тестировали?,думаю стоит писать новый файл загрузки с нулями или пробелами, также возможно потребуется обработчик.
01 02 03 04 05 06 07 08 09


Может для ваших целей подойдет другое решение?
Чтение цвета пикселей с bmp картинки или сделать простенький свой формат уровня?

Ответ: Чтение файла
 

Карта это текстовый файл с набором чисел проще формата я незнаю вот и хочу использовать. Если бы он читался 010203...101112 было бы круто