Вопрос к Фанту, программка про словарные слова - с чего начать?

[Flower]

Дело в том что когда я пыталась задать цвет фона 242,178, 103. ( бежевый)
Получалось color 0.004132,0.005618,0.009709 и рисует черный фон ;(

Вот и решила сделать палитру цветов.

[Flower]

Фант,
Не пойму как здесь фон задается

GRAPHICS ! GRAPHICS CLEAR
DRAW TEXT "In GRAPHICS view" AT 10,0
PAGE Pgr$ SET ! PAGE Ptx$ SET ! PAGE Pls$ SET

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

[Фант]

Ну теперь все понятно...
Пропорция цвета простая:
graphics
r=255
g=178
b=103
graphics clear r/255,g/255,b/255

[Фант]

Квадраты на весь экран:

graphics
nn=11
maxx=screen_width()
maxy=screen_height()
xm=maxx/nn
ym=maxy/nn
for i=1 to nn
for i1=1 to nn
draw rect xm*i1-xm/2,ym*i-ym/2 size xm/2,ym/2
next i1
next i

[Flower]

А как в графическом режиме написать числовое значение x или y ?

[Фант]

А как в графическом режиме написать числовое значение x или y ?

Draw text a$ at x,y
Пример:
graphics
OPTION TEXT POS CENTRAL
nn=11
maxx=screen_width()
maxy=screen_height()
kof=maxy/768
draw font size 10*kof
xm=maxx/nn
ym=maxy/nn
for i=1 to nn
for i1=1 to nn
x=xm*i1-xm/2
y=ym*i-ym/2
draw rect x,y size xm/2,ym/2
draw text x&","&y at x,y
next i1
next i

[Flower]

Красота, палитра получилась!!!
Спасибо большое.

А как теперь вписать в квадратики числовые значения ?
Подписать строчки.
Через print не получается ...

graphics
nn=11
maxx=screen_width()
maxy=screen_height()
xm=maxx/nn
ym=maxy/nn
for g1=1 to 11
g=(g1-1)/10
for i=1 to nn
for i1=1 to nn
fill color (i-1)/10,(i1-1)/10,g
fill rect xm*i1-xm/2,ym*i-ym/2 size xm/2,ym/2
next i1
next i
pause 1
next g1

[Фант]

Ну и отлично:)
Я постом выше показал как вписать координаты в клетки

[Flower]

Фант!
СПАСИБО большое! С Вашей помощью у меня получилась первая программа с палитрой цветов! Ура!



graphics
OPTION TEXT POS CENTRAL
nn=11
maxx=screen_width()
maxy=screen_height()
xm=maxx/nn
ym=maxy/nn

kof=maxy/768
draw font size 10*kof

for g1=1 to 11
g=(g1-1)/10
for i=1 to nn
for i1=1 to nn
fill color (i-1)/10,(i1-1)/10,g
fill rect xm*i1-xm/2,ym*i-ym/2 size xm/2,ym/2
draw text (i-1)/10 &","&(i1-1)/10&","&g at xm*i1-35,ym*i-25
pause 0.005

next i1
next i
pause 1
next g1

[Фант]

ну очень за Вас радостно! Ура!!!
kof=maxy/768-коэффициент для размера шрифта лучше подкорректировать. 768-количество точек по вертикали без тулбара для айпада. С тулбаром-724. Коэффициент в данном случае нужен для регулирования шрифта для разных устройств. если Вы работаете только на айпаде и только в одной ориентации (к примеру в ландшафте) -можно его не использовать вообще.
ну и можно привязать к ширине экрана..тогда коэффициент будет следующим: kof=maxx/1024