Support Forum / Форум поддержки

Фант wrote: Для начала жду оптимальный алгоритм по созданию лабиринта и его решение!

Я до этого еще не доросла... "Учиться, учиться и еще раз учиться!" (с)

Подскажите, я хоть в правильном направлении двигаюсь: надо создать функцию, двумерный массив, спрайт, использовать команду data, все это соединить и будет мне счастье :lol: ? Способов может быть много, то есть нет одного правильного пути решения. Самое главное - решить каким вы видите лабиринт и пр...

Подскажите, я хоть в правильном направлении двигаюсь: надо создать функцию, двумерный массив, спрайт, использовать команду data, все это соединить и будет мне счастье ?

DmitryiS wrote:Спасибо! Работает. Цвет соответствует таблице.

graphics
fill color 1,168/255,18/255
fill rect 100,100 to 400,400

А если вставить 205,0,205 то тоже цвет аналогичен таблице, а с остальными не получается(правда, не все попробовала )

DmitryiS wrote: https://ru.wikipedia.org/wiki/%D0%A1%D0 ... 0%BE%D0%B2
Если значения каждой из трех позиций могут быть от 0 до 255, а в документации к программе сказано, что эти значения могут быть от 0 до 1.

Спасибо. Теперь играюсь с цветом.

Флаг это не сложно. graphics fill color 1,1,1 fill rect 100,100 to 700,200 fill color 0,0,1 fill rect 100,200 to 700,300 fill color 1,0,0 fill rect 100,300 to 700,400 Или так: GRAPHICS maxx = screen_width() maxy = screen_height() fill color 1,1,1 fill rect 0,0 to maxx,maxy/3 fill color 0,0,1 fill r...

Эх, времени нет серьезно обдумать, как сделать. Еще подсказали бы хоть с чего начать, было бы вообще хорошо. Хотя не надо. Интересно самой додуматься. Вроде, наметки уже есть...

GRAPHICS RANDOMIZE DEF LR if maxy <> screen_height() then graphics clear 0,0,0 maxx = screen_width() maxy = screen_height() x1 = rnd(maxx) y1 = rnd(maxy) x2 = rnd(maxx) y2 = rnd(maxy) r = rnd(1) g = rnd(1) b = rnd(1) rad = rnd(7) siz = rnd(7) END DEF LABEL1: LR GET ORIENTATION P IF P = 1 or P = 3 t...

Спасибо, за подсказку.
Изменила graphics clear. Теперь все на черном экране, спасибо еще раз. Тест прошел нормально, раз 10 переворачивала IPad, все нормально и с кругами и с линиями...

Ура!!! Получилось. Код: graphics graphics clear randomize GET ORIENTATION P LABEL1: IF P = 1 or P = 3 then graphics clear maxx = screen_width() maxy = screen_height() LABEL2: x1 = rnd(maxx) y1 = rnd(maxy) x2 = rnd(maxx) y2 = rnd(maxy) draw color rnd(1), rnd(1), rnd(1) draw size rnd(7) draw line x1, ...