Форум программистов, компьютерный форум, киберфорум
C# Windows Forms
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.67/6: Рейтинг темы: голосов - 6, средняя оценка - 4.67
1 / 1 / 1
Регистрация: 28.09.2015
Сообщений: 126
1

Написать программу, которая рисует на экране кривую Гильберта (использовать рекурсию)

12.12.2015, 15:34. Просмотров 1140. Ответов 4
Метки нет (Все метки)

Здравствуйте. код написан на С++ но мне нужно чтобы он был написан на C# Windows Form. Заранее Спасибо.

Код Программы:
#include "stdafx.h"
#include <windows.h>
#include <iostream>
using namespace std;

int z;
void mylineTo(HDC hDC, bool c, int x, int y) {
HPEN pen = CreatePen(PS_SOLID, 1, c ? RGB(255, 255, 255) : RGB(0, 0, 0));
SelectObject(hDC, pen);
LineTo(hDC, x, y);
DeleteObject(pen);
}
void sq4(HDC hDC, int x, int y) {
int d[]={-1,0,1,0,-1};
MoveToEx(hDC, x-z, y, NULL);
for(int i=0; i<4; ++i) mylineTo(hDC, 1, x+z*d[i+1], y+z*d[i]);
}
void sqc(HDC hDC, int x, int y) {
int dx[]={-1,1,1,-1}, dy[]={-1,-1,1,1}, k[2][3]={{2*z,z,0},{z,2*z,3*z}};
MoveToEx(hDC, x-3*z, y, NULL);
for(int i=0; i<4; ++i) for(int j=0; j<3; ++j)
mylineTo(hDC, 1-j%2, x+dx[i]*k[i%2][j], y+dy[i]*k[1-i%2][j]);
}
void f(HDC hDC, int x, int y, int n) {
int d=4*z*(1<<(n-1)), dx[]={-1,-1,1,1}, dy[]={-1,1,-1,1};
for(int i=0; i<4; ++i)
if (n) f(hDC, x+d*dx[i], y+d*dy[i], n-1); else sq4(hDC, x+2*z*dx[i], y+2*z*dy[i]);
sqc(hDC, x, y);
}
int _tmain(int argc, _TCHAR* argv[])
{
HWND hW = GetConsoleWindow();
HDC hDC = GetDC(GetConsoleWindow());
setlocale(LC_ALL, "Russian");
unsigned int n,d;
while (1) {
system("cls");
cout<<"Увеличьте высоту консоли, введите порядок фрактала (0-5)\n"; //2 / 5
cout<<"и длину стороны меньшего элемента в пикселях (1-10): ";
cin>>n>>z; d=8*z*(1<<(n-1)); unsigned int size=2*d;
if (size>512) {
cout<<"Длина стороны будет "<<size<<" пикселей. Попробуйте другие данные.\n";
system("pause");
} else break;
}
f(hDC, d+5*z, d+5*z+30, n);
ReleaseDC(hW, hDC);
system("pause");
return 0;
}
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
12.12.2015, 15:34
Ответы с готовыми решениями:

Написать программу, которая рисует на экране шестиугольник
Ребята помогите с этим заданием, до этого не делал такие. Написать программу, которая рисует на...

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

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

Написать программу, которая рисует на экране трактор
Написать программу, которая рисует на экране трактор

4
Нарушитель
693 / 455 / 252
Регистрация: 19.12.2014
Сообщений: 1,748
13.12.2015, 09:06 2
Лучший ответ Сообщение было отмечено Fadjr как решение

Решение

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
using System;
using System.Drawing;
using System.Windows.Forms;
 
namespace КриваяГильберта
{
    public partial class Form1 : Form
    {
        private Graphics ex;
        private int CurX;
        private int CurY;
        private int z = 10;
 
        public Form1()
        {
            InitializeComponent();
            this.ClientSize = new System.Drawing.Size(450, 450);
        }
 
        private void Form1_Paint(object sender, PaintEventArgs e)
        {
            ex = e.Graphics;
            int n = 2;
            int d;
            d = 8 * z * 2;
            f(d + 5 * z, d + 5 * z + 30, n);
        }
 
        private void SetPos(int x, int y)
        {
            CurX = x;
            CurY = y;
        }
 
        private void mylineTo(bool c, int x, int y)
        {
            if (CurX == 0 || CurY == 0)
                throw new Exception();
            ex.DrawLine(c ? Pens.Black : Pens.WhiteSmoke, CurX, CurY, x, y);
            CurX = x;
            CurY = y;
        }
 
        private void sq4(int x, int y)
        {
            int[] d = { -1, 0, 1, 0, -1 };
            SetPos(x - z, y);
            for (int i = 0; i < 4; ++i)
                mylineTo(true, x + z * d[i + 1], y + z * d[i]);
        }
 
        private void sqc(int x, int y)
        {
            int[] dx = { -1, 1, 1, -1 };
            int[] dy = { -1, -1, 1, 1 };
            int[,] k = new int[2, 3] { { 2 * z, z, 0 }, { z, 2 * z, 3 * z } };
            SetPos(x - 3 * z, y);
            for (int i = 0; i < 4; ++i)
                for (int j = 0; j < 3; ++j)
                    mylineTo(j == 1 ? false : true, x + dx[i] * k[i % 2, j], y + dy[i] * k[1 - i % 2, j]);
        }
 
        private void f(int x, int y, int n)
        {
            int d = 4 * z * (1 << (n - 1));
            int[] dx = { -1, -1, 1, 1 };
            int[] dy = { -1, 1, -1, 1 };
            for (int i = 0; i < 4; ++i)
                if (n > 0)
                    f(x + d * dx[i], y + d * dy[i], n - 1);
                else
                    sq4(x + 2 * z * dx[i], y + 2 * z * dy[i]);
            sqc(x, y);
        }
    }
}
2
Нарушитель
693 / 455 / 252
Регистрация: 19.12.2014
Сообщений: 1,748
13.12.2015, 09:08 3
Вот что получается
1
Миниатюры
Написать программу, которая рисует на экране кривую Гильберта (использовать рекурсию)  
Нарушитель
693 / 455 / 252
Регистрация: 19.12.2014
Сообщений: 1,748
13.12.2015, 09:08 4
По теме:
Почему то Pens.Transparent не работает.
0
1 / 1 / 1
Регистрация: 28.09.2015
Сообщений: 126
13.12.2015, 13:07  [ТС] 5
Спасибо огромное всем откликнувшимся, если бы не вы я бы не получил 5 за это.....Дай вам бог мозгов побольше
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
13.12.2015, 13:07

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь.

Написать программу, которая рисует на экране паровоз
Написать программу, которая рисует на экране паровоз. Pascal ABC/Turbo Pascal

Написать программу, которая рисует на экране решётку.
Написать программу, которая рисует на экране решётку.

Написать программу, которая рисует на экране грустную рожицу
Помогите плиз!

Написать программу, которая рисует на экране грустную рожицу
Написать программу, которая рисует на экране грустную рожицу.


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
5
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2020, vBulletin Solutions, Inc.