как задать для каждой стрелки свой период?

16.12.2012, 11:31. Показов 703. Ответов 0

Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам

Python
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
from math import cos, sin, pi
 
def rotate(x0, y0, R, a):
   
   a = 6*3.14/180*a
   b = 7*3.14/180*a
   x = x0 + R*cos(a)
   y = y0 + R*sin(a)
   t = t1 + R*cos(a)
   r = r1 + R*sin(a)
   return [x,y]
   return [t,r]
 
root =Tk()
w = Canvas(root, width = 640, height = 480)
w.pack()
 
cycle_period = 30
 
a1 = 0
a2 = 360
x0 = 170
x1 = 160
y0 = 140
y1 = 130
R = 100
 
while True:
    for a in range(a1, a2, 1):
        crd = rotate(x0, y0, R, a)
        x = crd[0]
        y = crd[1]
        w.create_line(x0, y0, x, y, width=3,fill='black')
        w.create_oval(x-5, y-5, x+5, y+5,fill='blue')
        w.create_oval(50, 20, 290, 260)
        
        w.create_line(x1, y1, t, r, width=3, fill='black')
        w.create_oval(x-7, y-7, x+7, y+7, fill='red')
        w.create_oval(50, 20, 290, 260)
        w.update()
        w.after(30)
        w.delete(ALL)
    
root.mainloop()

cpp_developer

Эксперт

20123 / 5690 / 1417

Регистрация: 09.04.2010

Сообщений: 22,546

Блог

16.12.2012, 11:31

Ответы с готовыми решениями:

Как задать для каждой страницы свой фон?
на всех страницах стоит одна картинка,а как на определенных страницах менять фон на другую картинку? body { ...

Как для каждой поверхности задать свой цвет?
Нужно на одном рисунке вывести несколько сфер, каждую своим цветом. У меня все они окрашиваются в цвет последней, т.е. по последней...

Задать каждой подстроке свой цвет
Приветствую и прошу помощи. На C# нужен код, который в веденной строке отыщет подстроки разделенные пробелами или знаками препинания и...

Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.

raxper

Эксперт

30234 / 6612 / 1498

Регистрация: 28.12.2010

Сообщений: 21,154

Блог

16.12.2012, 11:31

Помогаю со студенческими работами здесь

Свой компонент от ListBox. Не могу задать свой тип для Items
День добрый господа. Нуждаюсь в вашей помощи. Суть такова, что я желаю создать свой компонент на базе ListBox. На данный момент меня...

Как задать свой цвет для Panel?
Здарова, работяги, подскажите мне как изменить цвет заливки элемента Panel не из стандартных а свой который выбрали в...

Как задать свой масштаб для графика ZedGraph?
Здравствуйте, подскажите пожалуйста как задать свой масштаб для графика zedgraph (график все время отображается от 0 до 1.2 по х и у с...

Как сделать чтобы у каждой строки был свой список. Например, есть маршрутка, у каждой из нее есть свой список
Как сделать чтобы у каждой строки был свой список. Например, есть маршрутка, у каждой из нее есть свой список остановок. Остановки не...

Свой ComboBox. Как узнать положение стрелки?
Всем доброго времени суток! Пишу свой ComboBox с возможностью выравнивания текста. Подскажите как узнать положение (начало) стрелки...

Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:

Новые блоги и статьи Все статьи Все блоги /
Функция установки текстового статуса в реквизите формы документа Maks 01.04.2026 Алгоритм из решения ниже реализован на нетиповом документе "ВыдачаОборудованияНаСпецтехнику" разработанного в конфигурации КА2, в дополнении к предыдущему решению. На форме документа создается. . .	К слову об оптимизации kumehtar 01.04.2026 Вспоминаю начало 2000-х, университет, когда я писал на Delphi. Тогда среди программистов на форумах активно обсуждали аккуратную работу с памятью: нужно было следить за переменными, вовремя. . .	Идея фильтра интернета (сервер = слой+фильтр). Hrethgir 31.03.2026 Суть идеи заключается в том, чтобы запустить свой сервер, о чём я если честно мечтал давно и давно приобрёл книгу как это сделать. Но не было причин его запускать. Очумелые учёные напечатали на. . .	Модель здравосоХранения 6. ESG-повестка и устойчивое развитие; углублённый анализ кадрового бренда anaschu 31.03.2026 В прикрепленном документе раздумья о том, как можно поменять модель в будущем
10 пpимет, которые всегда сбываются Maks 31.03.2026 1. Чтобы, наконец, пришла маршрутка, надо закурить. Если сигарета последняя, маршрутка придет еще до второй затяжки даже вопреки расписанию. 2. Нaдоели зима и снег? Не надо переезжать. Достаточно. . .	Перемещение выделенных строк ТЧ из одного документа в другой Maks 31.03.2026 Реализация из решения ниже выполнена на примере нетипового документа "ВыдачаОборудованияНаСпецтехнику" с единственной табличной частью "ОборудованиеИКомплектующие" разработанного в конфигурации КА2. . . .	Functional First Web Framework Suave DevAlt 30.03.2026 Sauve. IO Апнулись до NET10. Из зависимостей один пакет, работает одинаково хорошо как в режиме проекта так и в интерактивном режиме. из сложностей - чисто функциональный подход. Решил. . .	Автоматическое создание документа при проведении другого документа Maks 29.03.2026 Реализация из решения ниже выполнена на нетиповых документах, разработанных в конфигурации КА2. Есть нетиповой документ "ЗаявкаНаРемонтСпецтехники" и нетиповой документ "ПланированиеСпецтехники". В. . .

Наверх