Создание Игры "Тир"

@HelloInside · Регистрация: 31.10.2011

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

Пытаюсь создать игру "Тир".
И такой вопрос вот есть у меня мишень, и возможно ли как то сделать что бы при попадании в мишень очки добавлялись в label. (Тоисть попал в 9, 9 занеслась в label, попал в 5, в label к 9 дадется 5 и сумируется =14).

@volvo · 09.12.2013, 20:00

C++
1
    Label1->Caption = IntToStr(Label1->Caption.ToInt() + score); // score - количество баллов за последний выстрел

Это надо было?

@HelloInside · 09.12.2013, 20:06 **[ТС]**

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

C++
1
    Label1->Caption = IntToStr(Label1->Caption.ToInt() + score); // score - количество баллов за последний выстрел

Это надо было?

Ну мишень у меня идет же как картинка.
Нужно на image создать OnClick и область для очков.. не розберусь как можно сделать...

@Selot · 09.12.2013, 20:29

Лучше OnMouseDown. А там писать:

C++
1
2
3
4
5
6
void __fastcall TForm1::Image1MouseDown(TObject *Sender,
      TMouseButton Button, TShiftState Shift, int X, int Y)
{
        Edit1->Text = IntToStr(X);
        Edit2->Text = IntToStr(Y);
}

Тут в эдиты выводятся соответствующие координаты. Добавляешь свои условия на обработку этих координат и профит.

@HelloInside · 09.12.2013, 20:46 **[ТС]**

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

Лучше OnMouseDown. А там писать:

C++
1
2
3
4
5
6
void __fastcall TForm1::Image1MouseDown(TObject *Sender,
      TMouseButton Button, TShiftState Shift, int X, int Y)
{
        Edit1->Text = IntToStr(X);
        Edit2->Text = IntToStr(Y);
}

Тут в эдиты выводятся соответствующие координаты. Добавляешь свои условия на обработку этих координат и профит.

Хм.. а каким же образом я создам обработку етих координат?

@Selot · 09.12.2013, 21:01

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

Хм.. а каким же образом я создам обработку етих координат?

У тебя есть картинка. Тебе надо узнать в каких координатах этого Image располагается мишень. Например, самый центр мишени - это 10 очков, вот ты тыкаешь мышкой в самый центр, у тебя в эдитах появляются координаты этого центра. Дальше можешь отталкиваться от этих координат и посчитать радиус круга, за который дается 10 очков. Допустим, центр у тебя находится по координатам (100; 100), верхняя граница этого кружка находится по координатам (100; 105), получается радиус этого кружка = 5. Значит все "выстрелы", которые попадают в этот радиус будут давать 10 очков. Создаешь некую изначальную базу таких координат и соответствующие им очки, затем при выстрелах просто проверяешь условиями куда именно было попадание и сколько за это дается очков. Такая вот идея...

@HelloInside · 10.12.2013, 01:34 **[ТС]**

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

У тебя есть картинка. Тебе надо узнать в каких координатах этого Image располагается мишень. Например, самый центр мишени - это 10 очков, вот ты тыкаешь мышкой в самый центр, у тебя в эдитах появляются координаты этого центра. Дальше можешь отталкиваться от этих координат и посчитать радиус круга, за который дается 10 очков. Допустим, центр у тебя находится по координатам (100; 100), верхняя граница этого кружка находится по координатам (100; 105), получается радиус этого кружка = 5. Значит все "выстрелы", которые попадают в этот радиус будут давать 10 очков. Создаешь некую изначальную базу таких координат и соответствующие им очки, затем при выстрелах просто проверяешь условиями куда именно было попадание и сколько за это дается очков. Такая вот идея...

Да но... вот радиус кола с "10 очками" например 5.
А вот радиус кола с "9 очками" например 10.
И если же я буду сторелять в "10" то радиус предыдущего кола тоисть "9" будет перекрывать радиус "10". Тоисть если оформить все так до еденицы, то в любом случае когда буду стрелять в мишень буду получать 1.

@SatanaXIII · 10.12.2013, 09:17

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

тоисть "9" будет перекрывать радиус "10"

Используйте вычитание.

@Kulgar · 10.12.2013, 12:42

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

Используйте вычитание.

HelloInside, Вы вообще не по-русски сформулировали свой вопрос. Из 1го сообщения получается у Вас сложности с вынесением общего результата стрельбы в Label. На поверку оказывается у Вас не решена задача определения результата стрельбы. Кою я предлагаю вынести в функцию и реализовать последовательностью 10ти вложенных условий, где для каждого условия по ветке else будет стоять return score. Сущность условий, думаю, понятна.

@2ima · 10.12.2013, 19:47

уже подобное делал в игре
могу кинуть если надо

Добавлено через 21 минуту
C++ Builder 6

C++
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
106
107
108
109
110
111
112
113
//---------------------------------------------------------------------------
 
#include <vcl.h>
#pragma hdrstop
 
#include "t.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma link "acPNG"
#pragma link "sButton"
#pragma link "sGauge"
#pragma resource "*.dfm"
TForm22 *Form22;
int och=0;
//---------------------------------------------------------------------------
__fastcall TForm22::TForm22(TComponent* Owner)
        : TForm(Owner)
{
MediaPlayer1->Visible=false;
MediaPlayer2->Visible=false;
MediaPlayer3->Visible=false;
}
//---------------------------------------------------------------------------
 
void __fastcall TForm22::Image2MouseUp(TObject *Sender,
      TMouseButton Button, TShiftState Shift, int X, int Y)
{
Image2->Picture->LoadFromFile("snork_prostr.png");
MediaPlayer1->FileName=("dr.wav");
MediaPlayer1->Open();
MediaPlayer1->Play();
sGauge1->Progress=sGauge1->Progress+10;
och=och+10;
Label2->Caption=och;
}
//---------------------------------------------------------------------------
void __fastcall TForm22::sButton1Click(TObject *Sender)
{
Form22->Close();
MediaPlayer2->Stop();
}
//---------------------------------------------------------------------------
void __fastcall TForm22::FormKeyUp(TObject *Sender, WORD &Key,
      TShiftState Shift)
{
int iSpeed=20;
if(Key=='A'){Image3->Left-=iSpeed;}
if(Key=='D'){Image3->Left+=iSpeed;}
}
//---------------------------------------------------------------------------
void __fastcall TForm22::Image3MouseUp(TObject *Sender,
      TMouseButton Button, TShiftState Shift, int X, int Y)
{
Image3->Picture->LoadFromFile("snork_prostr.png");
Image2->Picture->LoadFromFile("snork.png");
Image4->Picture->LoadFromFile("snork.png");
Image5->Picture->LoadFromFile("snork.png");
MediaPlayer1->FileName=("dr.wav");
MediaPlayer1->Open();
MediaPlayer1->Play();
sGauge1->Progress=sGauge1->Progress+10;
och=och+10;
Label2->Caption=och;
}
//---------------------------------------------------------------------------
void __fastcall TForm22::Image5MouseUp(TObject *Sender,
      TMouseButton Button, TShiftState Shift, int X, int Y)
{
Image5->Picture->LoadFromFile("snork_prostr.png");
Image2->Picture->LoadFromFile("snork.png");
Image3->Picture->LoadFromFile("snork.png");
Image4->Picture->LoadFromFile("snork.png");
MediaPlayer1->FileName=("dr.wav");
MediaPlayer1->Open();
MediaPlayer1->Play();
sGauge1->Progress=sGauge1->Progress+10;
och=och+10;
Label2->Caption=och;
}
//---------------------------------------------------------------------------
void __fastcall TForm22::Image4MouseUp(TObject *Sender,
      TMouseButton Button, TShiftState Shift, int X, int Y)
{
Image4->Picture->LoadFromFile("snork_prostr.png");
Image2->Picture->LoadFromFile("snork.png");
Image3->Picture->LoadFromFile("snork.png");
Image5->Picture->LoadFromFile("snork.png");
MediaPlayer1->FileName=("dr.wav");
MediaPlayer1->Open();
MediaPlayer1->Play();
sGauge1->Progress=sGauge1->Progress+10;
och=och+10;
Label2->Caption=och;
if(och=200){MediaPlayer3->FileName=("champ.wav");
MediaPlayer3->Open();
MediaPlayer3->Play();}
}
//Доб. крут. муз.+еще тварей+оруж.(комната)
//---------------------------------------------------------------------------
 
 
 
 
 
void __fastcall TForm22::Image1MouseUp(TObject *Sender,
      TMouseButton Button, TShiftState Shift, int X, int Y)
{
MediaPlayer1->FileName=("dr.wav");
MediaPlayer1->Open();
MediaPlayer1->Play();
sGauge1->Progress=sGauge1->Progress-10;
}
//---------------------------------------------------------------------------

Также в добавок к лабелу gauge

Добавлено через 22 минуты
отсюда Игра Weapon of The Future

Добавлено через 21 минуту
По теме тира меня интересует больше визуальная оружка в руках....

@Igor2929 · 13.01.2016, 23:22

HelloInside, можешь скинуть пример игры сам исходник?

@lolgood123 · 16.11.2016, 11:29

Привет, тоже парюсь по курсовику тир на с++, можешь ли скинуть исходники?

Новые блоги и статьи Все статьи Все блоги /
Мысли в слух. Про "навсегда". kumehtar 16.04.2026 Подумалось тут, что наверное очень глупо использовать во всяких своих установках понятие "навсегда". Это очень сильное понятие, и я только начинаю понимать край его смысла, не смотря на то что давно. . .	My Business CRM MaGz GoLd 16.04.2026 Всем привет, недавно возникла потребность создать CRM, для личных нужд. Собственно программа предоставляет из себя базу данных клиентов, в которой можно фиксировать звонки, стадии сделки, а также. . .	Знаешь почему 90% людей редко бывают счастливыми? kumehtar 14.04.2026 Потому что они ждут. Ждут выходных, ждут отпуска, ждут удачного момента. . . а удачный момент так и не приходит.	Фиксация колонок в отчете СКД Maks 14.04.2026 Фиксация колонок в СКД отчета типа Таблица. Задача: зафиксировать три левых колонки в отчете. Процедура ПриКомпоновкеРезультата(ДокументРезультат, ДанныеРасшифровки, СтандартнаяОбработка) / / . . .
Настройки VS Code Loafer 13.04.2026 { "cmake. configureOnOpen": false, "diffEditor. ignoreTrimWhitespace": true, "editor. guides. bracketPairs": "active", "extensions. ignoreRecommendations": true, . . .	Оптимизация кода на разграничение прав доступа к элементам формы Maks 13.04.2026 Алгоритм из решения ниже реализован на нетиповом документе, разработанного в конфигурации КА2. Задачи, как таковой, поставлено не было, проделанное ниже исключительно моя инициатива. Было так:. . .	Контроль заполнения и очистка дат в зависимости от значения перечислений Maks 12.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: реализовать контроль корректности заполнения дат назначения. . .	Архитектура слоя интернета для сервера-слоя. Hrethgir 11.04.2026 В продолжение https:/ / www. cyberforum. ru/ blogs/ 223907/ 10860. html Знаешь что я подумал? Раз мы все источники пишем в голове ветки, то ничего не мешает добавить в голову такой источник, который сам. . .

@HelloInside 8 / 8 / 13 Регистрация: 31.10.2011 Сообщений: 294

	Создание Игры "Тир" 09.12.2013, 19:44. Показов 4371. Ответов 11 Метки нет (Все метки) Пытаюсь создать игру "Тир". И такой вопрос вот есть у меня мишень, и возможно ли как то сделать что бы при попадании в мишень очки добавлялись в label. (Тоисть попал в 9, 9 занеслась в label, попал в 5, в label к 9 дадется 5 и сумируется =14). Миниатюры 0

@Igor2929 0 / 0 / 0 Регистрация: 13.01.2016 Сообщений: 1
	13.01.2016, 23:22
	HelloInside, можешь скинуть пример игры сам исходник? 0

@lolgood123 0 / 0 / 0 Регистрация: 06.11.2016 Сообщений: 1
	16.11.2016, 11:29
	Привет, тоже парюсь по курсовику тир на с++, можешь ли скинуть исходники? 0