9.07.2012 / 12:45 | |
da_Begemot Пользователь Сейчас: Offline
Имя: Егор Откуда: Новокузнецк Регистрация: 02.06.2011
| AHiLLA, Да, на Нокиях такая фигня идет. Не помню как исправить. Кажется версия на Нокию есть.
|
9.07.2012 / 12:50 | |
Vapigor Пользователь Сейчас: Offline
Регистрация: 15.03.2012
| AHiLLA, Но версия для нокиа куда хуже. Неудобная и нельзя сокращённо писать.
__________________
Делай шум! |
9.07.2012 / 12:51 | |
AHiLLA Пользователь Сейчас: Offline
Имя: Али Откуда: Махачкала Регистрация: 19.01.2010
| da_Begemot, Да, тут в загрузках есть. Щас на ней попробую. Но это пока я у бабушки, я все равно на компе буду писать, на телефоне неудобно
|
9.07.2012 / 12:54 | |
AHiLLA Пользователь Сейчас: Offline
Имя: Али Откуда: Махачкала Регистрация: 19.01.2010
| Vapigor, Блин как всегда нокиа крайняя. Хоть потестю там начальные команды
|
9.07.2012 / 13:24 | |
da_Begemot Пользователь Сейчас: Offline
Имя: Егор Откуда: Новокузнецк Регистрация: 02.06.2011
| Нашел тут на сайте парсер, но он вместо слов квадраты выводит. В чем дело? 10 open #0,"file:///e:/Other/MB/text.dat","input"
20 for a%=0 to 999999999
30 get #0,bite%
40 trap 60
50 next a%
60 close #0:open #0,"file:///e:/Other/MB/text.dat","input"
61 dim bite$(a%)
70 for b%=0 to a%-1
80 get #0,c%
90 bite$(b%)=chr$(c%)
100 next b%
101 close #0
110 for i%=0 to a%-1
120 if bite$(i%)="" then probil%=probil%+1
130 next i%
200 dim slova$(probil%+1)
201 for i%=0 to probil%
202 slova$(i%)=""
205 next i%
210 for i%=0 to a%-1
215 slova$(n%)=slova$(n%)+bite$(i%)
220 if bite$(i%)="" then n%=n%+1
230 next i%
240 for i%=0 to probil%
250 print slova$(i%)
260 next i%
|
9.07.2012 / 13:33 | |
mrEDitor Пользователь Сейчас: Offline
Имя: Эдуард Откуда: Новороссийск » Таганрог Регистрация: 13.03.2011
| da_Begemot, в кодировке дело, попробуй 85 if (c% > 190) с% = с% + 848
Изменено mrEDitor (9.07 / 13:33) (всего 1 раз) |
9.07.2012 / 13:35 | |
GOFMIDO Пользователь Сейчас: Offline
Имя: Вадим Откуда: Иркутск Регистрация: 06.07.2012
| У кого 1.8.6.2 напишите и соберите мне плиз такую прогу: 10 cls
20 Call "a.bas"
30 end
Зарание спасибо. Изменено GOFMIDO (9.07 / 13:36) (всего 1 раз) |
9.07.2012 / 13:41 | |
da_Begemot Пользователь Сейчас: Offline
Имя: Егор Откуда: Новокузнецк Регистрация: 02.06.2011
| GOFMIDO, Держи.
Прикрепленные файлы: bas.jar (35.65 кб.) Скачано 93 раза |
9.07.2012 / 13:44 | |
GOFMIDO Пользователь Сейчас: Offline
Имя: Вадим Откуда: Иркутск Регистрация: 06.07.2012
| da_Begemot, спс большое, будет нормальный экран хоть...
|
9.07.2012 / 14:00 | |
Vapigor Пользователь Сейчас: Offline
Регистрация: 15.03.2012
| AHiLLA, Да. Мы счастливые обладатели нокиа...
__________________
Делай шум! |