Как организовать движение объекта к цели

@smsgeorge · Регистрация: 03.06.2011

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

Всем, Здравствуйте! Интересует такой вопрос. Как организовать движение объекта (обьект , двигается вперед, но может поворачивать на определенный угол и снова едет вперед) к цели С, из A в B цель передвинулась, я получил координаты из них стороны и углы треугольника (через аркосинус), полученного вершинами, начала , куда передвинулся обьект и целью, Дальше нужно организовать перемещение , вернее , надо как то проверять условия, чтобы обьект , через определённые промежутки времени, опять проверял направление и снова двигался к цели. Уже 3 дня бьюсь над этой задачей. Не знаю как организовать проверку и правильный поворот. То есть цель , сама должна поворачиваться, потом двигаться , проверять и так далее) Помогите пожалуйста!

@smsgeorge · 24.09.2014, 17:03 **[ТС]**

The trick, Напиши подробнее пожалуйста куда мне вставлять мой угол и как ты его получил, у меня угол будет (2350(млс)/360*на угол) , как я понял для нахождения угла ты не использовал аркосинус?

Добавлено через 4 минуты
The trick,Что это будет у меня, как это применить?

Visual Basic
1
Private Const IncAngle  As Single = 3.14 / 180 * 5 ' инкримент поворота в радианах

@The trick · 24.09.2014, 17:06

smsgeorge, зачем мне знать величину угла?
У тебя поворот объекта всегда на фиксированную величину при нажатии кнопки. Нужно знать лишь отклонение и ориентацию.

@smsgeorge · 24.09.2014, 17:08 **[ТС]**

The trick, для чего это? что делает

Visual Basic
1
2
 'норма  
vec.X = vec.X / siz: vec.Y = vec.Y / siz

@The trick · 24.09.2014, 17:13

Сообщение от smsgeorge

The trick, для чего это? что делает

Нормировка вектора между объектом и целью, чтобы найти далее косинус угла (скалярное произведение) между вектором направления объекта и этим вектором.

Добавлено через 1 минуту

Сообщение от smsgeorge

The trick,Что это будет у меня, как это применить?

При нажатии кнопки поворота у тебя объект поворачивается на определенный угол, это есть величина этого угла в радианах.

@smsgeorge · 24.09.2014, 17:29 **[ТС]**

The trick,а как я буду поворачивать если я могу определить координаты только если по цвету пикселя, я не могу взять и прибавить к примеру к Х + 20, так как для этого надо передвинуться, а передвигатьтсяя я могу только клавишами

Visual Basic
1
2
3
4
' поворачиваем вектор
    vec = src.d
    src.d.X = vec.X * Cos(dir) - vec.Y * Sin(dir)
    src.d.Y = vec.X * Sin(dir) + vec.Y * Cos(dir)

@The trick · 24.09.2014, 17:42

Сообщение от smsgeorge

The trick,а как я буду поворачивать если я могу определить координаты только если по цвету пикселя, я не могу взять и прибавить к примеру к Х + 20, так как для этого надо передвинуться, а передвигатьтсяя я могу только клавишами

Где ты увидел у меня прибавление X + 20? В моем примере объект перемещается вперед относительно своего направления вот тут:

Visual Basic
1
2
3
4
5
If ang > 0.707 Then
    ' Сюда вставляй свое нажатие на клавишу "W"
    src.p.X = src.p.X + src.d.X * IncDist
    src.p.Y = src.p.Y + src.d.Y * IncDist
End If

Поворот делается тут:

Visual Basic
1
2
3
' Определяем направление
If (vec.X * src.d.Y - vec.Y * src.d.X) < 0 Then dir = IncAngle Else dir = -IncAngle
' Если меньше нуля, то к примеру клавиша A иначе клавиша D

@smsgeorge · 24.09.2014, 17:46 **[ТС]**

The trick, Во , а куда повороты налево направо и нужно ли вставлять налево прямо , направо прямо и куда , и где я должен буду снова определять координаты чтобы их вносить, так как у меня все время не показываются они, мне приходится делать поиск по цвету.

@The trick · 24.09.2014, 17:48

smsgeorge, я тебе нормально пояснил.

@smsgeorge · 24.09.2014, 17:57 **[ТС]**

The trick, Извини , что навязчиво, просто я еще в этом всем как ребенок, нужно ткнуть пальцем, мне тяжело сразу освоить весь код. Если ты мне еще чуть-чуть уделишь внимание и досконально обьяснишь, все вопросы у меня отпадут, гемороя) мне еще хватит , так как придется это все делать в другой программе. Я очень тебе благодарен за отзывчивость! И вообще все здесь молодцы ребята. Помогают друг другу! Спасибо!

@The trick · 24.09.2014, 18:04

smsgeorge, читай этот пост до просветления.

@smsgeorge · 25.09.2014, 10:59 **[ТС]**

The trick, Но куда вставлять, все стирать и вставлять W ? в каких местах еще ставить проверку по координатам. и все, отстану!

Добавлено через 9 минут
The trick, C W разобрался , осталось только понять где проверять координаты (по цвету) и фух.... ребята, благодарю, что вытерпели меня!)

Добавлено через 16 часов 29 минут
вот мой код в программе переведенный

Visual Basic
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
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
//16711680
#ps2_keyboard
$edpov=2350/360
$minras=10
 
 
 
mmm: IF(iskeydown(1)=0)
 
IF(iskeydown(1)=1)
   $xc=$_xmouse
   $yc=$_ymouse
   goto(nnn)
END_IF
END_IF
goto(mmm)
nnn:
                         
 
LCLICK(692,211)  // 5740204
m1:
GETSCREEN
IF_PIXEL_IN(241,35, 1037,717, 255 )
$x0=$_return1
$y0=$_return2
// move($_return1, $_return2)
WAITMS(50)
 
else
KEYDOWN(#A)
WAITMS(500)
KEYUP(#A)
goto(m1)
END_IF
GETSCREEN
IF_PIXEL_IN(241,35, 1037,717, 16711680)
$xb=$_return1
$yb=$_return2
// move($_return1, $_return2)
WAITMS(50)
else
KEYDOWN(#A)
WAITMS(500)
KEYUP(#A)
goto(m1)
END_IF
m2:
 
 
 
 
 
print(" peremeshenie ", $xb,"   ", $yb)
print(" obect  ",  $x0,"   ", $y0)
print(" celi  ",  $xc,"   ",$yc)
 
 
$vecX=$xc-$x0
$vecY=$yc-$y0
print(" vec  ",  $vecX,"   ",$vecY)
 
$rast=DIST($xc,$yc,$x0,$y0)
if($rast<$minras)
print("celi dostignuta")
end_if
 
$vecx=$vecx/$rast
$vecy=$vecy/$rast
 
$ang=$vecx*$xb+$vecy*$yb
 
if($vecx*$yb-$vecy*$xb)<0
$dir=$ugol
KEYDOWN(#d)
WAITMS(50)
KEYDOWN(#d)
else
$dir=-$ugol
KEYDOWN(#a)
WAITMS(50)
KEYDOWN(#a)
end_if
 
$vecx=$xb
$vecy=$yb
 
$xb=$vecx*cos($dir)-$vecy*sin($dir)
$yb=$vecx*sin($dir)-$vecy*cos($dir)
 
if ($ang>0.707)
KEYDOWN(#w)
WAITMS(50)
KEYDOWN(#w)
 
 
print($rast)
 
 
 
 
 
 
 
 
halt

Добавлено через 6 минут
The trick, Здравствуй! не дали отредактировать(
1)не знаю как определиться с углом, я делил время полного оборота на 360 $edpov=2350/360

2)также не понял что делает это условие ?

Visual Basic
1
2
3
4
if ($ang>0.707)
KEYDOWN(#w)
WAITMS(50)
KEYDOWN(#w)

поясни в своем коде пожалуйста что делает это и правильно ли я это использую?

Visual Basic
1
2
3
4
  'поворачиваем вектор
    vec = src.d
    src.d.X = vec.X * Cos(dir) - vec.Y * Sin(dir)
    src.d.Y = vec.X * Sin(dir) + vec.Y * Cos(dir)

вот твой код, переведенный на мой язык.

Visual Basic
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
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
#ps2_keyboard
$edpov=2350/360
$minras=10
 
 
 
mmm: IF(iskeydown(1)=0)
 
IF(iskeydown(1)=1)
   $xc=$_xmouse
   $yc=$_ymouse
   goto(nnn)
END_IF
END_IF
goto(mmm)
nnn:
                         
 
LCLICK(692,211)  // 5740204
m1:
GETSCREEN
IF_PIXEL_IN(241,35, 1037,717, 255 )
$x0=$_return1
$y0=$_return2
// move($_return1, $_return2)
WAITMS(50)
 
else
KEYDOWN(#A)
WAITMS(500)
KEYUP(#A)
goto(m1)
END_IF
GETSCREEN
IF_PIXEL_IN(241,35, 1037,717, 16711680)
$xb=$_return1
$yb=$_return2
// move($_return1, $_return2)
WAITMS(50)
else
KEYDOWN(#A)
WAITMS(500)
KEYUP(#A)
goto(m1)
END_IF
m2:
 
 
 
 
 
print(" peremeshenie ", $xb,"   ", $yb)
print(" obect  ",  $x0,"   ", $y0)
print(" celi  ",  $xc,"   ",$yc)
 
 
$vecX=$xc-$x0
$vecY=$yc-$y0
print(" vec  ",  $vecX,"   ",$vecY)
 
$rast=DIST($xc,$yc,$x0,$y0)
if($rast<$minras)
print("celi dostignuta")
end_if
 
$vecx=$vecx/$rast
$vecy=$vecy/$rast
 
$ang=$vecx*$xb+$vecy*$yb
 
if($vecx*$yb-$vecy*$xb)<0
$dir=$ugol
KEYDOWN(#d)
WAITMS(50)
KEYDOWN(#d)
else
$dir=-$ugol
KEYDOWN(#a)
WAITMS(50)
KEYDOWN(#a)
end_if
 
$vecx=$xb
$vecy=$yb
 
$xb=$vecx*cos($dir)-$vecy*sin($dir)
$yb=$vecx*sin($dir)-$vecy*cos($dir)
 
if ($ang>0.707)
KEYDOWN(#w)
WAITMS(50)
KEYDOWN(#w)
 
 
print($rast)
 
 
 
 
 
 
 
 
halt

@The trick · 25.09.2014, 11:05

Сообщение от smsgeorge

также не понял что делает это условие ?

Чтобы вперед двигался если отклонение от курса ±45° (≈0.707 в радианах).

Сообщение от smsgeorge

поясни в своем коде пожалуйста что делает это и правильно ли я это использую?

Там все написано что этот код делает. Правильно ли ты его используешь - известно только тебе.

@smsgeorge · 25.09.2014, 13:23 **[ТС]**

The trick, нажимаю ему куда идти, а он крутится начинает. http://youtu.be/pSEYdJaHxAs.

PureBasic
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
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
#ps2_keyboard
 
$minras=10
$ugol=5 *2350/360*3.14 / 180
$pov=round( 5*2350/360 ,0)
 
mmm: IF(iskeydown(1)=0)
 
IF(iskeydown(1)=1)
   $xc=$_xmouse
   $yc=$_ymouse
   goto(nnn)
END_IF
END_IF
goto(mmm)
nnn:
                         
 
 
 
mstart:
m1:
GETSCREEN
IF_PIXEL_IN(241,35, 1037,717, 255 )
$x0=$_return1
$y0=$_return2
// move($_return1, $_return2)
WAITMS(50)
 
else
KEYDOWN(#A)
WAITMS(500)
KEYUP(#A)
goto(m1)
END_IF
GETSCREEN
IF_PIXEL_IN(241,35, 1037,717, 16711680)
$xb=$_return1
$yb=$_return2
// move($_return1, $_return2)
WAITMS(50)
else
KEYDOWN(#A)
WAITMS(500)
KEYUP(#A)
goto(m1)
END_IF
m2:
 
print(" peremeshenie ", $xb,"   ", $yb)
print(" obect  ",  $x0,"   ", $y0)
print(" celi  ",  $xc,"   ",$yc)
 
 
$vecX=$xc-$x0
$vecY=$yc-$y0
print(" vec  ",  $vecX,"   ",$vecY)
 
$rast=DIST($xc,$yc,$x0,$y0)
if($rast<$minras)
print("celi dostignuta")
goto(mkonec)
end_if
 
$vecx=$vecx/$rast
$vecy=$vecy/$rast
 
$ang=$vecx*$xb+$vecy*$yb
if($vecx*$yb-$vecy*$xb)<0
 
$dir=$ugol
KEYDOWN(#a)
WAITMS($pov)
KEYDOWN(#a)
 
else
 KEYDOWN(#d)
WAITMS($pov)
KEYDOWN(#d)
$dir=-$ugol
 end_if
 
$vecx=$xb
$vecy=$yb
$xb=$vecx*|!REG3XP3!>cos($dir)-$vecy*|!REG3XP3!>sin($dir)
$yb=$vecx*|!REG3XP3!>sin($dir)-$vecy*|!REG3XP3!>cos($dir)
 
if ($ang>0.707)
KEYDOWN(#w)
WAITMS(50)
KEYDOWN(#w)
 end_if
 
goto(mstart)
 
mkonec:
 
halt

Комментарий модератора

Пользуйся тегами! И не нужно делать цветным текст, для этого есть специальные теги, например [BASIC]

@Апострофф · 25.09.2014, 13:40

Сообщение от smsgeorge

а он крутится начинает

На орбиту вышел, наверно

@Pro_grammer · 25.09.2014, 13:41

Сообщение от smsgeorge

переведенный на мой язык.

Это что за язык, конструктор игр какой то?

@Апострофф · 25.09.2014, 14:04

Если крутится вокруг цели, то это не шутка.
Попробуйте уменьшить скорость и(ли) увеличить инкремент угла.

@Alex77755 · 25.09.2014, 14:38

а он крутится начинает

Вот именно поэтому я и говорил, что прежде чем шагать нужно определить направление на цель.

@smsgeorge · 25.09.2014, 14:53 **[ТС]**

Но тут то все работает( друзья пожалуйста не издевайтесь, помогите, я уже 4 день бьюсь над вопросом, встаю в 8 и до 2 ночи( Вы опытнее меня, помогите пожалуйста.

Visual Basic
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
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
Option Explicit
 
Private Type vec
    X As Single
    Y As Single
End Type
Private Type player
    p As vec        ' Ïîçèöèÿ
    d As vec        ' Íàïðàâëåíèå
End Type
 
Dim WithEvents tmr  As Timer
Dim dst             As vec
Dim src             As player
 
Private Const IncAngle  As Single = 3.14 / 180 * 5 ' Èíêðåìåíò ïîâîðîòà â ðàäèàíàõ
Private Const IncDist   As Single = 4              ' Èíêðåìåíò ðàññòîÿíèÿ â ïèêñåëÿõ
 
Private Sub Form_Load()
    ScaleMode = vbPixels
    Set tmr = Me.Controls.Add("VB.Timer", "tmr")
    tmr.Interval = 32
    src.p.X = Scalewidht / 2
    src.p.Y = ScaleHeight / 2
    src.d.X = 0
    src.d.Y = -1
End Sub
 
Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
    dst.X = X: dst.Y = Y
End Sub
 
Private Sub tmr_Timer()
    Dim ang As Single
    Dim siz As Single
    Dim vec As vec
    Dim dir As Single
    ' Íàõîäèì âåêòîð
    vec.X = dst.X - src.p.X
    vec.Y = dst.Y - src.p.Y
    ' Íàõîäèì ðàññòîÿíèå
    siz = Sqr(vec.X * vec.X + vec.Y * vec.Y)
    ' Åñëè ðàññòîÿíèå ìåíüøå èíêðåìåíòà òî çíà÷èò öåëü íàñòèãíóòà
    If siz < IncDist Then
        Caption = "Íàéäåí"
        Exit Sub
    Else: Caption = ""
    End If
    ' Íîðìà
    vec.X = vec.X / siz: vec.Y = vec.Y / siz
    ' Êîñèíóñ óãëà
    ang = vec.X * src.d.X + vec.Y * src.d.Y
    ' Îïðåäåëÿåì íàïðàâëåíèå
    If (vec.X * src.d.Y - vec.Y * src.d.X) < 0 Then dir = IncAngle Else dir = -IncAngle
    ' Ïîâîðà÷èâàåì âåêòîð
    vec = src.d
    src.d.X = vec.X * Cos(dir) - vec.Y * Sin(dir)
    src.d.Y = vec.X * Sin(dir) + vec.Y * Cos(dir)
    ' Åñëè íàïðàâëåíèå â îäíó ñòðîðîíó äâèãàåì (+-45 Ãðàäóñîâ)
    If ang > 0.707 Then
        src.p.X = src.p.X + src.d.X * IncDist
        src.p.Y = src.p.Y + src.d.Y * IncDist
    End If
    Draw
End Sub
 
Private Sub Draw()
    Cls
    Line (src.p.X, src.p.Y)-Step(src.d.X * 15, src.d.Y * 15)
    Circle (src.p.X, src.p.Y), 3
    Circle (dst.X, dst.Y), 3, vbRed
End Sub

Добавлено через 2 минуты
Pro_grammer, да сборка такая. как понял, программа состоит из нескольких языков, но это ничего не меняет.

Добавлено через 1 минуту
Alex77755, Алекс, помоги, вот я выложил 2 кода , один из VB другой в моей программе, они похожи, так как я делал по шаблону из VB, запусти VB оно там норм работает, а у меня не хочет(

@The trick · 25.09.2014, 15:01

smsgeorge, нужно включать голову. Тебе дали готовый алгоритм, разжевали. Там все элементарно.

@smsgeorge · 25.09.2014, 15:10 **[ТС]**

The trick, Благодарю за Алгоритм! Так и помоги, чего мучать то, дали алгоритм, где цель передвигается по координатам, я не могу к х прибавить какую нубудь величину, я могу повернуться и пойти прямо, в твоей программе все движется по координатам, у меня нету такого, считай я двигаюсь в пространстве где нет координат. Я даже твою программу расписал на листочке, в клеточку с реальными координатами, но это не помогло мне понять как реализовать у меня, так как у тебя координаты , а у меня их нет( Ты 11-классник, а я 3-классник.

Добавлено через 2 минуты
The trick, Ты даже код наверно мой не посмотрел( Все, что пока я мог сделал, если ты меня хочешь научить, то уж тогда давай с намеками, типа вот это тут не тот , тебе надо сделать это. У меня нет такого опыта, как у тебя. Я и так сколько сделал, за неделю освоил. Не все же сразу.

Новые блоги и статьи Все статьи Все блоги /
Установка ChatGPT (Codex) на Windows без использования Microsoft Store Fabien159 28.10.2026 Здравствуйте всем читающим! Опишу процесс установки ChatGPT (Codex) на Windows, если по каким-то причинам у вас не получается устанавить его через Microsoft Store. И так: 1. Скачиваем с. . .	Программное добавление префикса в нумерацию документов Maks 27.10.2026 Реализация из решения ниже выполнена в самописной конфигурации на БСП (помощь начинающему коллеге). Задача: Программно добавить префикс в нумерацию документов. Решение: В модуле объекта. . .	После закрытия оутлука продолжает висеть процесс в диспетчере задач Maks 27.10.2026 С недавнего времени в продакшене возникла проблема: при закрытии оутлука в диспетчере задач продолжал висеть процесс outlook. exe. Проблема возникла после установки MS Office 2021 LTSC на машинах, под. . .	Baragoz - DPS/HPS бот для WoW 3.3.5a, многоязычный AmbA 26.10.2026 Хотите ещё ботов? У меня есть один! А я пока отдохну от него. https:/ / www. cyberforum. ru/ blog_attachment. php?attachmentid=12062&stc=1&d=1793007952 Инструкция внутри. https:/ / youtu. be/ VpfFZSUDGnQ. . .
Особенности gif сгенерированных в Си russiannick 21.10.2026 Рассмотрим генерацию gif файлов, которые в Си имеют свои особенности. Gif представляет собой графический формат популярный в интернете. Посмотрим на палитру. Gif файл сгенерированный в си отличается. . .	FPS контроллер с анимированными Y-Bot и 3D-звуком miniaudio (Box3D, Recast, BehaviorTree.CPP, ozz-animation, ImGui, OpenGL и SDL3) 8Observer8 18.10.2026 Содержание блога \| English Version Полное мультиплатформенное руководство по стартовому проекту с FPS-контроллером игрока, анимированными роботами Y-Bot с 4-слойным блендингом, 3D-физикой Box3D,. . .	Локальный http сервер Argus19 17.10.2026 Локальный http сервер На работе, на двух локальных компьютерах круглосуточно работают программы опроса приборов с записью в книги Excel,которые раз в сутки записываются на сервер компании. Т. к. . . .	Копировать Windows на новый диск на UEFI damix 17.10.2026 https:/ / uriesk. wordpress. com/ 2016/ 11/ 01/ move-window-10-to-ssd-on-a-uefi-dualboot-system-with-basic-linux-tools/ TL DR Вставляем диск, а старый подключаем через переходник, грузимся с лайва. . .

@smsgeorge -1 / 0 / 0 Регистрация: 03.06.2011 Сообщений: 106

	Как организовать движение объекта к цели 23.09.2014, 18:33. Показов 9049. Ответов 129 Метки нет (Все метки) Всем, Здравствуйте! Интересует такой вопрос. Как организовать движение объекта (обьект , двигается вперед, но может поворачивать на определенный угол и снова едет вперед) к цели С, из A в B цель передвинулась, я получил координаты из них стороны и углы треугольника (через аркосинус), полученного вершинами, начала , куда передвинулся обьект и целью, Дальше нужно организовать перемещение , вернее , надо как то проверять условия, чтобы обьект , через определённые промежутки времени, опять проверял направление и снова двигался к цели. Уже 3 дня бьюсь над этой задачей. Не знаю как организовать проверку и правильный поворот. То есть цель , сама должна поворачиваться, потом двигаться , проверять и так далее) Помогите пожалуйста! Миниатюры 0

@The trick Модератор 10068 / 3913 / 886 Регистрация: 22.02.2013 Сообщений: 5,863 Записей в блоге: 79
	24.09.2014, 17:06
	smsgeorge, зачем мне знать величину угла? У тебя поворот объекта всегда на фиксированную величину при нажатии кнопки. Нужно знать лишь отклонение и ориентацию. 0

@smsgeorge -1 / 0 / 0 Регистрация: 03.06.2011 Сообщений: 106
	24.09.2014, 17:46 [ТС]
	The trick, Во , а куда повороты налево направо и нужно ли вставлять налево прямо , направо прямо и куда , и где я должен буду снова определять координаты чтобы их вносить, так как у меня все время не показываются они, мне приходится делать поиск по цвету. 0

@The trick Модератор 10068 / 3913 / 886 Регистрация: 22.02.2013 Сообщений: 5,863 Записей в блоге: 79
	24.09.2014, 17:48
	smsgeorge, я тебе нормально пояснил. 0

@smsgeorge -1 / 0 / 0 Регистрация: 03.06.2011 Сообщений: 106
	24.09.2014, 17:57 [ТС]
	The trick, Извини , что навязчиво, просто я еще в этом всем как ребенок, нужно ткнуть пальцем, мне тяжело сразу освоить весь код. Если ты мне еще чуть-чуть уделишь внимание и досконально обьяснишь, все вопросы у меня отпадут, гемороя) мне еще хватит , так как придется это все делать в другой программе. Я очень тебе благодарен за отзывчивость! И вообще все здесь молодцы ребята. Помогают друг другу! Спасибо! 0

@The trick Модератор 10068 / 3913 / 886 Регистрация: 22.02.2013 Сообщений: 5,863 Записей в блоге: 79
	24.09.2014, 18:04
	smsgeorge, читай этот пост до просветления. 0

@Апострофф 9912 / 3935 / 743 Регистрация: 11.10.2011 Сообщений: 5,916
	25.09.2014, 14:04
	Если крутится вокруг цели, то это не шутка. Попробуйте уменьшить скорость и(ли) увеличить инкремент угла. 0

@The trick Модератор 10068 / 3913 / 886 Регистрация: 22.02.2013 Сообщений: 5,863 Записей в блоге: 79
	25.09.2014, 15:01
	smsgeorge, нужно включать голову. Тебе дали готовый алгоритм, разжевали. Там все элементарно. 0

@smsgeorge -1 / 0 / 0 Регистрация: 03.06.2011 Сообщений: 106
	25.09.2014, 15:10 [ТС]
	The trick, Благодарю за Алгоритм! Так и помоги, чего мучать то, дали алгоритм, где цель передвигается по координатам, я не могу к х прибавить какую нубудь величину, я могу повернуться и пойти прямо, в твоей программе все движется по координатам, у меня нету такого, считай я двигаюсь в пространстве где нет координат. Я даже твою программу расписал на листочке, в клеточку с реальными координатами, но это не помогло мне понять как реализовать у меня, так как у тебя координаты , а у меня их нет( Ты 11-классник, а я 3-классник. Добавлено через 2 минуты The trick, Ты даже код наверно мой не посмотрел( Все, что пока я мог сделал, если ты меня хочешь научить, то уж тогда давай с намеками, типа вот это тут не тот , тебе надо сделать это. У меня нет такого опыта, как у тебя. Я и так сколько сделал, за неделю освоил. Не все же сразу. 0