Важная информация
Показано с 1 по 4 из 4

Тема: Помогите нарисовать рисунок.

  1. #1 Помогите нарисовать рисунок. 
    Разбирающийся
    Регистрация
    18.11.2011
    Сообщений
    27
    Сказал(а) спасибо
    15
    Поблагодарили 0 раз(а) в 0 сообщениях
    [Ссылки могут видеть только зарегистрированные пользователи. ]
    Нарисуйте в SCREEN 12,а у меня только получается без цвета. Если в цвете то всё сливается.
    Ответить с цитированием  
     

  2. #2  
    Супер модератор Аватар для Kakos_nonos
    Регистрация
    07.01.2011
    Адрес
    Кубань
    Сообщений
    1,531
    Сказал(а) спасибо
    126
    Поблагодарили 428 раз(а) в 291 сообщениях
    Записей в блоге
    6
    А покажите, пожалуйста, ваш результат без цвета.
    [Ссылки могут видеть только зарегистрированные пользователи. ]
    Ответить с цитированием  
     

  3. #3  
    Разбирающийся
    Регистрация
    18.11.2011
    Сообщений
    27
    Сказал(а) спасибо
    15
    Поблагодарили 0 раз(а) в 0 сообщениях
    SCREEN 12
    LINE (240, 120)-(440, 120)
    LINE (240, 120)-(160, 180)
    LINE (160, 180)-(160, 220)
    LINE (160, 220)-(440, 220)
    LINE (440, 220)-(440, 120)
    CIRCLE (230, 220), 30
    CIRCLE (400, 220), 30
    CIRCLE (230, 220), 10
    CIRCLE (400, 220), 10
    LINE (250, 130)-(290, 130)
    LINE (290, 130)-(290, 150)
    LINE (250, 130)-(250, 150)
    LINE (250, 150)-(290, 150)
    CIRCLE (270, 120), 10, 2, pi / 2,
    Ответить с цитированием  
     

  4. #4  
    Профи Аватар для Dimon012
    Регистрация
    09.02.2011
    Адрес
    Владивосток
    Сообщений
    850
    Сказал(а) спасибо
    29
    Поблагодарили 130 раз(а) в 108 сообщениях
    Записей в блоге
    3
    Чтобы был цвет его надо в операторах рисования указывать.
    Ну вот где-то так
    Код :
    SCREEN 12
    PAINT (240, 120), 7
    LINE (240, 120)-(440, 120),15
    LINE (240, 120)-(160, 180),15
    LINE (160, 180)-(160, 220),15
    LINE (160, 220)-(440, 220),15
    LINE (440, 220)-(440, 120),15
    PAINT (250, 130), 15, 15
    CIRCLE (230, 220), 30, 0
    CIRCLE (400, 220), 30, 0
    CIRCLE (230, 220), 10, 0
    CIRCLE (400, 220), 10, 0
    PAINT (230, 231), 0, 0
    PAINT (400, 231), 0, 0
     
    LINE (250, 130)-(290, 150), 1, BF
     
    LINE (340, 130)-(350, 160), 4, BF
    LINE (330, 140)-(360, 150), 4, BF
     
    CIRCLE (270, 120), 10, 4, 0, 3
    LINE (260, 120)-(280, 120), 4
    PAINT (270, 115), 4, 4
    Последний раз редактировалось Dimon012; 14.12.2011 в 05:01.
    Ответить с цитированием  
     

  5. Пользователь сказал cпасибо:

    Дмитрий 1993 (14.12.2011)

Информация о теме
Пользователи, просматривающие эту тему

Эту тему просматривают: 1 (пользователей: 0 , гостей: 1)

Похожие темы

  1. Ответов: 7
    Последнее сообщение: 12.03.2012, 16:59
  2. Помогите нарисовать рисунок в QBasic
    от Дмитрий 1993 в разделе QBasic
    Ответов: 11
    Последнее сообщение: 05.12.2011, 20:31
  3. Ответов: 3
    Последнее сообщение: 20.11.2011, 12:13
  4. Нарисовать рисунок
    от Luydvig в разделе QBasic
    Ответов: 6
    Последнее сообщение: 25.05.2011, 16:42
Ваши права
  • Вы не можете создавать новые темы
  • Вы не можете отвечать в темах
  • Вы не можете прикреплять вложения
  • Вы не можете редактировать свои сообщения
  •