|
2D-программирование Вопросы, касающиеся двумерного программирования |
01.11.2012, 16:00
|
#1
|
ПроЭктировщик
Регистрация: 17.07.2009
Сообщений: 182
Написано 51 полезных сообщений (для 71 пользователей)
|
Полёт стрелы в 2d (сетке)
Может кто из вас делал подобное ,отпишитесь .
можно делиться идеями ,предложениями ну и конечно кодами ...
вот мой код:
Graphics 1024, 768
SetBuffer BackBuffer()
degree2# = 0
degree# = -45
speed# = 8
x#=200
y#=400
x0#=200
y0#=400
x1# = 600 : y1# = 600
While Not KeyHit(1)
Cls
mx#=MouseX():my#=MouseY()
dx#=(x1#)-(x#-ax#)
dy#=(y1#+ay#)-(y#-ay#) ;(my+ay)-(y#-ay)
d# = Sqr(dx#*dx# +dy#*dy#)
degree#=ATan2(dy,dx)
vx# =Sin(degree#)
vy# =Cos(degree#)
If d>5 Then
ay# = -(d#/5)
ax# = -(d#/5)
y# = y# + vx#*speed ; The Sin movement
x# = x# + vy#*speed ; The Cos movement
Color 200,200,200
Line x ,y,x-15*Sin(degree+90),y+15*Cos(degree+90)
Color 200,0,0
Oval x-2,y-2,4,4,1
EndIf
If KeyHit(57) Then
x#=x0#+5
y#=y0#-3
degree# = -45
EndIf
If MouseDown(1) Then
x1# = mx#
y1# = my#
x#=x0#+5
y#=y0#-3
degree# = -45
EndIf
Color 200,0,200
Rect x0-5,y0-10, 5,20
Color 20,120,20
Oval x0-3,y0-3,6,6,1
Oval x1-3,y1-3,6,6,1
Text 10,10,degree
Text 10,20,"dy "+d
Flip
Wend
End
|
(Offline)
|
|
01.11.2012, 16:03
|
#2
|
.
Регистрация: 05.08.2006
Сообщений: 10,429
Написано 3,454 полезных сообщений (для 6,863 пользователей)
|
Ответ: Полёт стрелы в 2d (сетке)
Уточни - 2D, Side Scroller или Top-Down или может Изометрия?
Все они очень отличаются..
|
(Offline)
|
|
01.11.2012, 16:12
|
#3
|
ПроЭктировщик
Регистрация: 17.07.2009
Сообщений: 182
Написано 51 полезных сообщений (для 71 пользователей)
|
Ответ: Полёт стрелы в 2d (сетке)
Сообщение от MoKa
Уточни - 2D, Side Scroller или Top-Down или может Изометрия?
Все они очень отличаются..
|
Уточняю в 2д сетке как в предыдущем посте (наклонённая сетка)
|
(Offline)
|
|
01.11.2012, 16:35
|
#4
|
.
Регистрация: 05.08.2006
Сообщений: 10,429
Написано 3,454 полезных сообщений (для 6,863 пользователей)
|
Ответ: Полёт стрелы в 2d (сетке)
Учитывая что это Top-Down, то тебе нужно симулировать всё как буд-то сетка просто нормальная (без перспективы).
А вот где начинается перспектива - так это только отрисовка.
Для логики перспектива абсолютно не учитывается.
|
(Offline)
|
|
01.11.2012, 17:03
|
#5
|
ПроЭктировщик
Регистрация: 17.07.2009
Сообщений: 182
Написано 51 полезных сообщений (для 71 пользователей)
|
Ответ: Полёт стрелы в 2d (сетке)
Уважаемый ,модератор ,если данная ссылка в коё-то мере не согласуется с правилами данного форума ,то оставляю за вами право удалить её
http://youtu.be/PBN4UGkR1tQ
Пытаюсь сделать нечто в этом роде
|
(Offline)
|
|
01.11.2012, 17:30
|
#6
|
.
Регистрация: 05.08.2006
Сообщений: 10,429
Написано 3,454 полезных сообщений (для 6,863 пользователей)
|
Ответ: Полёт стрелы в 2d (сетке)
Насчёт ссылок на ютуб, ты можешь даже постить их в специальном теге для ютуба. Тут проблем с этим нету, пока ссылки не ссылаются на порнуху, или что-то там с политикой или религиозностью, т.к. на нашем форуме они вызывают взрывоопасный баттхёрт у некоторых
Как уже говорил, реализуй математику и логику просчётов без учёта отрисовки, как если бы это был бы просто вид сверху.
Если я правильно понял, у тебя будет конкретная цель для стрелка, но стрела может попасть в кого-то по пути (верно?).
И как стрела у тебя будет лететь, по дуге (стреляется вперёд но под градусом в небо), или напрямую?
Если первый - то тут всегда одна цель в которую стреляешь, и всегда будет в неё лететь.
Если же второе, то тут нужно просчитывать, т.к. нужно учитывать есть стрела не попадёт в кого-то на пути. Таким образом тебе нужно провезти отрезок между целью и стрелком, и вычислить все ячейки через которые эта ячейка проходит. По пути вычисления начинать от стрелка, и двигаться к целе. Если по пути к цели какая-то из ячеек имеет противника на пути - то стрела попадёт в него а не в цель.
Движение простое - вычисляешь вектор между целью и стрелком, он вычисляется разницой в X и Y координат, затем вычисляешь дистанцию между стрелком и целью (теорема Пифагора), и затем полученные раньше разницы делишь на дистанцию. Таким образом ты получишь веткор длиной в 1. Далее тебе нужен параметр скорости (например 3). И чтобы двигать стрелу, нужно каждый цикл пока стрела не будет над ячейкой цели, прибавляй к позиции X, Y стрелы вектор X умноженный на скорость (3) и также для Y.
Стрела будет двигаться в направлении цели.
Ещё раз напоминаю - логика игры и полёта стрелы не имеет ничего общего с отображением. Поэтому делай вычисления как если это выглядело бы просто с видом сверху, а затем когда отрисовываешь делай дополнительные модификации данных для симуляции перспективы.
|
(Offline)
|
|
01.11.2012, 17:44
|
#7
|
ПроЭктировщик
Регистрация: 17.07.2009
Сообщений: 182
Написано 51 полезных сообщений (для 71 пользователей)
|
Ответ: Полёт стрелы в 2d (сетке)
в принципе ,то как я реализовал меня устраивает , просто думал может кто по другому сделал (краше что ли).
в основном цель для стрелы одна и по пути не в кого попадать не будет.
разве что при массовом обстреле сетки ячеек 3х3 ,для каждой ячейки будет своя стрела .
можете посмотреть код для одной цели в [оффтопе]
Graphics 1024, 768
SetBuffer BackBuffer()
degree2# = 0
degree# = -45
speed# = 8
x#=200
y#=400
x0#=200
y0#=400
x1# = 600 : y1# = 600
ClsColor 111,111,111
While Not KeyHit(1)
Cls
mx#=MouseX():my#=MouseY()
dx#=(x1#)-(x#-ax#)
dy#=(y1#+ay#)-(y#-ay#) ;(my+ay)-(y#-ay)
d# = Sqr(dx#*dx# +dy#*dy#)
degree#=ATan2(dy,dx)
vx# =Sin(degree#)
vy# =Cos(degree#)
If d>5 Then
ay# = -(d#/5)
ax# = -(d#/5)
y# = y# + vx#*speed ; The Sin movement
x# = x# + vy#*speed ; The Cos movement
Color 2,2,2
Line x ,y,x-15*Sin(degree+90),y+15*Cos(degree+90)
Color 150,150,255
Oval x-2,y-2,4,4,1
Color 2,2,2
Else
Color 2,2,2
; Line x0 ,y0,x0+15,y0-15
degree# = -45
Line x0 ,y0,x0+15*Sin(degree+90),y0-15*Cos(degree+90)
EndIf
Line x0+ 3 ,y0-12 + 0 , x0+ 5,y0-12+ 3
Line x0+ 5 ,y0-12+ 3 , x0+ 5.5,y0-12+ 6
Line x0+ 5.5 ,y0-12+ 6 ,x0+ 5.5,y0-12+ 9
Line x0+ 5.5, y0-12+ 9 ,x0+ 5,y0-12+ 12
Line x0+ 5 ,y0-12+ 12 , x0+ 3,y0-12+ 15
If KeyHit(57) Then
x#=x0#+5
y#=y0#-3
EndIf
If MouseDown(1) Then
x1# = mx#
y1# = my#
x#=x0#+5
y#=y0#-3
EndIf
Color 200,0,200
Rect x0-5,y0-10, 5,20
Color 20,120,20
Oval x0-2,y0-2,4,4,1
Oval x1-3,y1-3,6,6,1
Text 10,10,degree
Text 10,20,"dy "+d
Flip
Wend
End
мышью кликайте по экрану для получения новой цели
|
(Offline)
|
|
01.11.2012, 17:48
|
#8
|
ПроЭктировщик
Регистрация: 17.07.2009
Сообщений: 182
Написано 51 полезных сообщений (для 71 пользователей)
|
Ответ: Полёт стрелы в 2d (сетке)
желающим присоединиться к проекту ,писать в личку.
платить никому ничего не буду , а так пожалуйте.
цель : создать играбельную демо версию.
|
(Offline)
|
|
06.11.2012, 17:26
|
#9
|
ПроЭктировщик
Регистрация: 17.07.2009
Сообщений: 182
Написано 51 полезных сообщений (для 71 пользователей)
|
Ответ: Полёт стрелы в 2d (сетке)
|
(Offline)
|
|
Сообщение было полезно следующим пользователям:
|
|
Ваши права в разделе
|
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения
HTML код Выкл.
|
|
|
Часовой пояс GMT +4, время: 16:14.
|