Fillpolygon не работает.выход за пределы массива

сборник 130 .lis

seeker, Это новое? А то вроде в загрузках типа таких есть

SlenderManx, старый архив+новые файлы

seeker, скинь код. Должно всё работать.

Новая версия MobileBasic!
1. Пофиксена функция btsh$. На моих Nokia 6131 и Samsung GT-S5350 теперь Bluetooth идеально работает) Можете запустить Bluetooth.txt и проверить)
2. Добавлена работа с акселерометром.
3. Добавлены функции IMEI$(0) и GELMIRROR(GEL$).
4. Исправлены баги тригонометрических функций при градусных вычислениях (теперь если вы напишете "10 DEG : PRINT SIN(90) : REPAINT", будет выведено "1.0")
5. Немного пофиксена функция POLYGON.
6. Добавлена экранная клавиатура. Для того, чтобы её включить, необходимо в манифесте заменить "On-Screen-Keypad: no" на "On-Screen-Keypad: yes".
7. Исправлена и обновлена справка. В архиве Help.zip лежит программа Program1.pas, которая в PascalABC'е собирает текстовые файлы в бинарник.
Вроде, всё
Извините, что давно не появлялся.

Подробнее о новых функциях:

Открыть спойлер

Закрыть спойлер

BTSH$(ARG$,VAR$)
Работа с Bluetooth, где:
Если ARG$="server" или "s" - Ваш телефон создаёт сервер с именем VAR$. Если VAR$ - пустая строка, то создаётся сервер с именем телефона, который задан в настройках Bluetooth. Выводит строку с именем получившегося сервера.
Если ARG$="servers" или "ss", а VAR$="search" - ищет доступные серверы и выводит имя первого найденного сервера. Если выводит пустую строку, значит рядом с Вами нет доступных серверов.
Если ARG$="servers" или "ss", а VAR$="" - выводит имя следующего найденного сервера. Если выводит пустую строку, значит список найденных серверов закончился.
Если ARG$="clientname" или "cn" - устанавливает имя клиента VAR$, которое в дальнейшем будет использоваться при создании клиента. Если VAR$ - пустая строка, то будет создаваться клиент с именем телефона, который задан в настройках Bluetooth. Выводит пустую строку.
Если ARG$="client" или "c" - Ваш телефон создаёт клиента с заранее установленным именем и подключается к серверу, имеющему в списке найденных серверов порядковый номер VAR$ (нумерация с 0). Выводит строку с именем получившегося клиента.
Если ARG$="send" - отправляет серверу или клиентам сообщение с текстом VAR$. Выводит получившееся сообщение.
Если ARG$="receive" или "rec" - выводит сообщения, полученные от сервера или клиента.
Если ARG$="disconnect" или "d" - отключается от сервера или клиента. Выводит сообщения, которые Вы ещё не успели прочитать.

Сервер - это тот, кто рассылает сообщения, принимает и обрабатывает.
Клиент - принимает сообщение и шлёт серверу ответ.
В МБ можно быть или сервером, или клиентом.
К одному серверу можно подключить не более 8 клиентов.
Формат сообщений:
Если сообщение от сервера - [имя сервера]+":"+[текст сообщения]+CHR$(10) или "server is disconnected"+CHR$(10), если сервер отключился.
Если сообщение от клиента - [порядковый номер клиента]+";"+[имя клиента]+":"+[текст сообщения]+CHR$(10) или "client "+[порядковый номер клиента]+" is disconnected"+CHR$(10), если клиент отключился.

AXISX(0) - выводит значение ускорения телефона по оси X.

AXISY(0) - выводит значение ускорения телефона по оси Y.

AXISZ(0) - выводит значение ускорения телефона по оси Z.
Значения варьируются в диапазоне от -1024 до +1024.

IMEI$(0) - возвращает IMEI вашего телефона (может не на всех телефонах работать).

GELMIRROR GEL$,TYPE% - зеркально отражает гель. [сокращенная форма GM]
TYPE%=0 - по горизонтали
TYPE%=1 - по вертикали

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

RblSb, делай портал.

garfild63, Блин... Жесть. Классно конечно...
Но как слушать сервер и клиент будут друг друга?

Death, спойлер открой и почитай.