рисунок на футбольную тему в модуле grapf

@kvas91 · Регистрация: 30.07.2010

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

люди добрые, помогите нарисовать с помощью модуля grapf в паскалюшке футбольное поле с воротами парочкой футболистов мячиком и таблом) можно еще болельщиков засунуть. ато что-то время поджимает а у меня коряво как-то получается)

@Puporev · 08.08.2010, 13:24

kvas91, А ты можешь сам такое например в Пайнте нарисовать?

@kvas91 · 08.08.2010, 18:22 **[ТС]**

в паинте смогу) там надо ж не так уж чтоб красиво) было б похоже)) с графом туго у меня совсем просто

@arch-vile · 08.08.2010, 18:38

Кхм - я с этим модулем в паскале не работал, но в других средах программирования есть такая штука как ввод графических объектов (линии и простейшие фигуры) по координатам, набросайте в графическом редакторе с координатной сеткой рисунок (а лучше это сделать на бумаге в клеточку или миллиметровке), а потом по координатам из наброска рисуйте линии в вашей программе...
З.Ы. Системы координат на вашем рисунке и должна совпадать с системой координат в паскале...

@Puporev · 08.08.2010, 18:43

Я например умею работать с модулем Graph, но рисовать в Паскале батальные картины в стиле Верещагина, извините.

@yamilramilev · 08.08.2010, 19:42

kvas91, пойдет такой рисунок

@yamilramilev · 08.08.2010, 19:42

Если да, то перенесу на паскаль)))))

@kvas91 · 08.08.2010, 22:40 **[ТС]**

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

kvas91, пойдет такой рисунок

пойдет конечно!!! примного благодарен)

@yamilramilev · 09.08.2010, 12:47

Вот

Pascal
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
program fooball;
uses graph;
var
   dr,mo:integer;
procedure chuvaki(x,y:integer; color:byte);
begin
     SetColor(15);
     SetFillStyle(1,14);
     FillEllipse(x,y-15,14,10);
     SetFillStyle(1,color);
     FillEllipse(x,y+15,10,20);
     SetFillStyle(1,0);
     FillEllipse(x-5,y-17,3,3);
     FillEllipse(x+5,y-17,3,3);
     SetColor(0);
     Line(x-5,y-10,x+5,y-10);
     {руки}
     Line(x+8,y,x+30,y+15);
     line(x-8,y,x-30,y+15);
     {ноги}
     line(x+8,y+30,x+15,y+50);
     line(x-8,y+30,x-15,y+50);
end;
 
 
begin
    InitGraph(dr,mo,'egavga.bgi');
  {границы поля}
  Setcolor(2);
  line(100,150,630,150);
  line(20,350,570,350);
  line(100,150,20,350);
  line(630,150,570,350);
  SetFillStyle(1,2);
  FloodFill(200,200,2);
  setColor(15);
 
  {левые ворота}
  line(90,310,90,240);
  line(110,230,110,160);
  line(90,240,110,160);
  line(90,310,110,230);
  line(90,240,50,310);
  line(110,160,80,230);
  line(50,310,80,230);
  line(50,310,90,310);
 
  {правые ворота}
  line(540,310,540,240);
  line(540,240,570,160);
  line(540,240,570,310);
  line(570,160,600,220);
  line(600,220,570,310);
  line(540,310,570,310);
 
 
  {Футоблисты}
  {Первая команда}
  chuvaki(220,250,1);
  chuvaki(150,200,1);
  chuvaki(270,180,1);
  {вторая команда}
  chuvaki(370,190,3);
  chuvaki(430,280,3);
  chuvaki(500,210,3);
 
  {мяч}
  SetFillStyle(3,11);
  FillEllipse(300,280,10,10);
  SetFillStyle(1,11);
  FloodFill(10,10,2);
  SetColor(15);
 
  {болельщики}
  Chuvaki(70,50,7);
  Chuvaki(130,70,7);
  Chuvaki(180,30,7);
  Chuvaki(230,80,7);
  Chuvaki(290,30,7);
  Chuvaki(360,40,7);
 
  {табло}
  rectangle(400,15,600,100);
  SetFillStyle(1,15);
  FloodFill(450,50,0);
  FillEllipse(450,50,10,25);
  FillEllipse(550,50,10,25);
  SetFillStyle(1,0);
  FillEllipse(500,40,3,3);
  FillEllipse(500,60,3,3);
  Line(500,100,500,150);
 
  readln;
  end.

, почти похож))

@kvas91 · 09.08.2010, 14:47 **[ТС]**

еееееее клева)) спасибо

Новые блоги и статьи Все статьи Все блоги /
Как дизайн сайта влияет на конверсию: 7 решений, которые реально повышают заявки Neotwalker 08.03.2026 Многие до сих пор воспринимают дизайн сайта как “красивую оболочку”. На практике всё иначе: дизайн напрямую влияет на то, оставит человек заявку или уйдёт через несколько секунд. Даже если у вас. . .	Модульная разработка через nuget packages DevAlt 07.03.2026 Сложившийся в . Net-среде способ разработки чаще всего предполагает монорепозиторий в котором находятся все исходники. При создании нового решения, мы просто добавляем нужные проекты и имеем. . .	Модульный подход на примере F# DevAlt 06.03.2026 В блоге дяди Боба наткнулся на такое определение: В этой книге («Подход, основанный на вариантах использования») Ивар утверждает, что архитектура программного обеспечения — это структуры,. . .	Управление камерой с помощью скрипта OrbitControls.js на Three.js: Вращение, зум и панорамирование 8Observer8 05.03.2026 Содержание блога Финальная демка в браузере работает на Desktop и мобильных браузерах. Итоговый код: orbit-controls-threejs-js. zip. Сканируйте QR-код на мобильном. Вращайте камеру одним пальцем,. . .
SDL3 для Web (WebAssembly): Синхронизация спрайтов SDL3 и тел Box2D 8Observer8 04.03.2026 Содержание блога Финальная демка в браузере. Итоговый код: finish-sync-physics-sprites-sdl3-c. zip На первой гифке отладочные линии отключены, а на второй включены:. . .	SDL3 для Web (WebAssembly): Идентификация объектов на Box2D v3 - использование userData и событий коллизий 8Observer8 02.03.2026 Содержание блога Финальная демка в браузере. Итоговый код: finish-collision-events-sdl3-c. zip Сканируйте QR-код на мобильном и вы увидите, что появится джойстик для управления главным героем. . . .	Реалии Hrethgir 01.03.2026 Нет, я не закончил до сих пор симулятор. Эта задача сложнее. Не получилось уйти в плавсостав, но оно и к лучшему, возможно. Точнее получалось - но сварщиком в палубную команду, а это значит, в моём. . .	Ритм жизни kumehtar 27.02.2026 Иногда приходится жить в ритме, где дел становится всё больше, а вовлечения в происходящее — всё меньше. Плотный график не даёт вниманию закрепиться ни на одном событии. Утро начинается с быстрых,. . .

@kvas91 1 / 1 / 0 Регистрация: 30.07.2010 Сообщений: 18

	рисунок на футбольную тему в модуле grapf 08.08.2010, 12:54. Показов 2532. Ответов 9 Метки нет (Все метки) люди добрые, помогите нарисовать с помощью модуля grapf в паскалюшке футбольное поле с воротами парочкой футболистов мячиком и таблом) можно еще болельщиков засунуть. ато что-то время поджимает а у меня коряво как-то получается) 0

@Puporev Почетный модератор 64315 / 47611 / 32743 Регистрация: 18.05.2008 Сообщений: 115,167
	08.08.2010, 13:24
	kvas91, А ты можешь сам такое например в Пайнте нарисовать? 0

@kvas91 1 / 1 / 0 Регистрация: 30.07.2010 Сообщений: 18
	08.08.2010, 18:22 [ТС]
	в паинте смогу) там надо ж не так уж чтоб красиво) было б похоже)) с графом туго у меня совсем просто 0

@arch-vile 3215 / 774 / 26 Регистрация: 12.07.2009 Сообщений: 3,184
	08.08.2010, 18:38
	Кхм - я с этим модулем в паскале не работал, но в других средах программирования есть такая штука как ввод графических объектов (линии и простейшие фигуры) по координатам, набросайте в графическом редакторе с координатной сеткой рисунок (а лучше это сделать на бумаге в клеточку или миллиметровке), а потом по координатам из наброска рисуйте линии в вашей программе... З.Ы. Системы координат на вашем рисунке и должна совпадать с системой координат в паскале... 0

@Puporev Почетный модератор 64315 / 47611 / 32743 Регистрация: 18.05.2008 Сообщений: 115,167
	08.08.2010, 18:43
	Я например умею работать с модулем Graph, но рисовать в Паскале батальные картины в стиле Верещагина, извините. 0

@yamilramilev 267 / 258 / 47 Регистрация: 08.10.2009 Сообщений: 554
	08.08.2010, 19:42
	kvas91, пойдет такой рисунок Миниатюры 0

@yamilramilev 267 / 258 / 47 Регистрация: 08.10.2009 Сообщений: 554
	08.08.2010, 19:42
	Если да, то перенесу на паскаль))))) 1

@kvas91 1 / 1 / 0 Регистрация: 30.07.2010 Сообщений: 18
	09.08.2010, 14:47 [ТС]
	еееееее клева)) спасибо 0