Ответ: Flight
Слишком рано запостил.
Обычно проэкты на таких ранних стадиях дохнут как мухи. В профилактичеких целях не рекомендуется создавать тему которая в 85% случаев будет потом пустовать из-за того что проэкт заброшен. |
Ответ: Flight
В проектах лежит то, во что можно играть (ну как минимум есть что запустить/погонять).
|
Ответ: Flight
Graphics 0,0,32,1
SetBuffer BackBuffer() Type player Field x,px,deltax Field y,py,deltay End Type Global dmgC# Global x=100 Global y=100 Global speed#=3 Global zdorov#=100 Global speedc#=5 Global hp100=LoadImage("hp100.bmp") Global hp80=LoadImage("hp80.bmp") Global hp60=LoadImage("hp60.bmp") Global hp40=LoadImage("hp40.bmp") Global hp20=LoadImage("hp20.bmp") Global cursor=LoadImage("cursor.bmp") Global polosa=LoadImage("polosa.bmp") Global Endd=LoadImage("end.bmp") Global player=LoadImage("1.bmp") Global ground=LoadImage ("ground1.bmp") Global house1=LoadImage ("house1.bmp") Global bot=LoadImage("bot.bmp") Global car=LoadImage("car1.bmp") Global cy=Rand(1366) MaskImage hp100,255,255,255 MaskImage hp80,255,255,255 MaskImage hp60,255,255,255 MaskImage hp40,255,255,255 MaskImage hp20,255,255,255 MaskImage player,0,0,10 TileImage ground,0,0,0 Function updateplayer() DrawImage player,x,y MidHandle player DrawImage player,x,y DrawImage ground,0,0 DrawImage house1,300,400 DrawImage car,555,cy f=LoadFont ("courier",40,False,False,False) MaskImage cursor,255,255,255 px=x+speed*deltax py=y+speed*deltay DrawImage player,x,y If x<0 Then x = 1366 If x>1366 Then x = 0 If y<0 Then y = 768 If y>768 Then y = 0 cursorX=MouseX() cursorY=MouseY() DrawImage cursor,MouseX(),MouseY() px=x+speed#*deltax py=y+speed#*deltay If KeyDown(200) Or KeyDown(17) Then y=y-speed EndIf If KeyDown(208) Or KeyDown(31) y=y+speed EndIf If KeyDown(203) Or KeyDown(30) x=x-speed EndIf If KeyDown(205) Or KeyDown(32) x=x+speed EndIf If ImagesCollide(player,x,y,0,car,555,cy,0) Then zdorov#=zdorov#-2 If zdorov#>80 And zdorov#=<100 Then DrawImage hp100,5,5 If zdorov#>60 And zdorov#=<80 Then DrawImage hp80,5,5 If zdorov#>40 And zdorov#=<60 Then DrawImage hp60,5,5 If zdorov#>20 And zdorov#=<40 Then DrawImage hp40,5,5 If zdorov#>0 And zdorov#=<20 Then DrawImage hp20,5,5 If zdorov#<0 Then DrawImage endd,0,0 End Function While Not KeyDown(1) updateplayer() Flip Cls DrawImage polosa,538,83 If 1=1 Then cy=cy+speedc# If cy<0 Then cy = 768 If cy>768 Then cy = 0 If ImagesCollide(polosa,538,86,0,car,555,cy,0) Then speedc#=1 If Not ImagesCollide(polosa,538,86,0,car,555,cy,0) Then speedc#=5 Wend End |
Ответ: Flight
Не у всех есть Blitz3D чтобы просмотреть игру. А даже если и есть, то, я более чем уверен, у них не будет ресурсов, на которые ссылается код.
|
Ответ: Flight
Вложений: 1
вот первая версия игры. Только есть одна вещь, которая портит вид игры. Это то, что у ГГ справа непонятная полоска, и я не знаю, как ее убрать=(
помогите кто сможет |
Ответ: Flight
Интересно, а как горит код?
|
Ответ: Flight
|
Ответ: Flight
|
Ответ: Flight
Разведённый срач удалён. Жалобная книга для несогласных вы знаете где.
Автору темы: Продолжай, экспериментируй, копи опыт и главное не обращай внимания на тех, кто пытается самоутвердиться принижая тебя. Тот опыт который ты сейчас получаешь - бесценен. Успехов в разработке! По поводу полоски: 1) Попробуй делать MaskImage перед RotateImage 2) TFormFilter поставить 0 перед RotateImage (правда качество изображения будет хуже) |
Ответ: Flight
Опять проблема:( Я хочу сделать выстрел
for pyluaY=1 to5000 pulyaX=Tan (player_ungle)*pulyay drawimage pulya, pulyax, pulyay next... И не работает.подскажите, кто знает |
Ответ: Flight
У тебя сделано так, что пока летит пуля, ни фига больше не происходит. Даже флипа нет (flip), т.е. и drawimage впустую вызывается.
Обновление координат пули должно происходить в общем, главном цикле программы. Вроде: <главный цикл> --<обновляем все, что должно обновляться от пуль, до игрока> --<теперь рисуем все, что должно быть вообще нарисовано в кадре, по порядку> --<flip - вывели кадр на экран> <конец главного цикла, один кадр отрисован, возвращаемся к его началу> P.S. Совет. Русские слова латиницей - ужасно смотрятся в коде, и еще ужаснее читаются. Время на разбирание кода вырастает в разы. Полезная ссылка: http://translate.google.com/ Пуля по английски: bullet Угол игрока: player angle |
Ответ: Flight
нет. я сюда так написал pulya чтобы нагляднее было, а что касается angle - это моя опечатка))
|
Ответ: Flight
Очень нужна моделька дома(типо Пятиэтажки) сверху 2д. Размерами 150 на 440
|
Ответ: Flight
|
Ответ: Flight
Ну да, картинку:)
|
Часовой пояс GMT +4, время: 05:50. |
vBulletin® Version 3.6.5.
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Перевод: zCarot