Мне нужна помощь с изучением синтаксиса.

[Bobbymonte]

When I try the short program shone here all I get is a black snapshot?

[dimonnn777]

Не могу решить такую проблему:
В файле несколько строк.
Для определения того, что строка была использована хочу в конце строки писать 1, заранее задан 0.
Строки могут использоваться в разном порядке.
Как изменить последний символ в определенной строке в файле?

[Фант]

Привет! я бы сначала посчитал количество строк в файле и создал бы массив в котором хранил бы информацию 0-не читал,1-прочитал.

[dimonnn777]

А при новом запуске?
Это игра. Каждая строка содержит загаданное слово и подсказки.
При запуске 1: считывается количество строк - выводим кнопки с номерами заданий
Выбираем задание. Решаем. Если правильно то возвращаемся к 1
это уже работает, но не понятно, какие задания ты решал, а какие нет
Хочу добавить
Цвет кнопки зависит от того, решил ты эту загадку или нет
задач будет много, решаются по времени очень индивидуально - необходимо сохранять в файл была решена или нет.

[Фант]

Загоняйте все Ваши строки целиком в массив и делайте с этим массивом что хотите.
Чтобы сохранять результаты для каждого запуска программы-создавайте файл и туда записывайте все Ваши действия в игре, а при новом запуске считывайте записанную инфу из этого файла.
Тоесть Вам нужно создать три файла:
1. Текст самой программы.
2. Все Ваши задания.
3. Запись выполненных действий

[dimonnn777]

Хотел отделаться одним файлом с базой заданий. Если создавать ещё один, то проще в него записывать номера строк выполненных заданий, дописывать в конец файла вроде можно.

[Фант]

конечно можно сделать и так-как будет удобно. Только я бы поставил разделитель какойто после задания. Чтобы программа его определила и после считывания информации в массив с заданиями начала считывать номера решенных задач уже в другой массив.

[Tantrixx]

Добрый день. Нужна помощь в освоении работы draw poly x,y count n start s
Хочу нарисовать восьмиугольник с её помощью, но у меня вообще ничего не выходит, только ошибка.

[Mr. Kibernetik]

Добрый день. Нужна помощь в освоении работы draw poly x,y count n start s
Хочу нарисовать восьмиугольник с её помощью, но у меня вообще ничего не выходит, только ошибка.

Code: Select all

GRAPHICS
FOR i=0 TO 7
  x(i)=RND(200)
  y(i)=RND(200)
NEXT i
DRAW POLY x,y COUNT 8

[Tantrixx]

Спасибо.
Я на англоязычном нашёл пример, по его подобию сделал, но вроде перемудрил.
Можно проще сделать? Я принцип не совсем понял. Но конечная фигура у меня получилась. А через data можно сделать, чтоб меньше код получился?

GRAPHICS

h=8

DIM x1(h+1), y1(h+1), x2(h+1), y2(h+1), x3(h+1), y3(h+1), x4(h+1), y4(h+1), x5(h+1), y5(h+1), x6(h+1), y6(h+1), x7(h+1), y7(h+1), x8(h+1), y8(h+1)
FOR i=1 TO 8
trix(0)=x1(i)+20
triy(0)=y1(i)+20
trix(1)=x2(i)+40
triy(1)=y2(i)+20
trix(2)=x3(i)+45
triy(2)=y3(i)+25
trix(3)=x4(i)+45
triy(3)=y4(i)+45
trix(4)=x5(i)+40
triy(4)=y5(i)+50
trix(5)=x6(i)+20
triy(5)=y6(i)+50
trix(6)=x7(i)+15
triy(6)=y7(i)+45
trix(7)=x8(i)+15
triy(7)=y8(i)+25
DRAW COLOR 1,1,1
DRAW POLY trix,triy COUNT 8
NEXT i