Покритикуйте код "Змейки" - C++/CLI WinForms - Ответ 6349139

#pragma once
 
namespace snake {
 
    using namespace System;
    using namespace System::ComponentModel;
    using namespace System::Collections;
    using namespace System::Collections::Generic;
    using namespace System::Windows::Forms;
    using namespace System::Data;
    using namespace System::Drawing;
 
    /// <summary>
    /// Summary for mf
    /// </summary>
    public ref class mf : public System::Windows::Forms::Form
    {
    public:
        mf(void)
        {
            InitializeComponent();
        }
 
    protected:
        /// <summary>
        /// Clean up all resources being used.
        /// </summary>
        ~mf()
        {
            if (components)
            {
                delete components;
            }
        }
    private: System::Windows::Forms::Timer^  timer1;
    private: System::Windows::Forms::StatusStrip^  statusStrip1;
    private: System::Windows::Forms::ToolStripStatusLabel^  toolStripStatusLabel1;
    private: System::Windows::Forms::ToolStripStatusLabel^  cwidth;
    private: System::Windows::Forms::ToolStripStatusLabel^  toolStripStatusLabel3;
    private: System::Windows::Forms::ToolStripStatusLabel^  cheight;
    private: System::Windows::Forms::ToolStripStatusLabel^  toolStripStatusLabel5;
    private: System::Windows::Forms::ToolStripStatusLabel^  score;
    private: System::Windows::Forms::ToolStripStatusLabel^  toolStripStatusLabel7;
    private: System::Windows::Forms::ToolStripStatusLabel^  speed;
    private: System::Windows::Forms::ToolStripStatusLabel^  toolStripStatusLabel2;
    private: System::Windows::Forms::ToolStripStatusLabel^  lmouse;
    private: System::Windows::Forms::ToolStripStatusLabel^  toolStripStatusLabel4;
    private: System::Windows::Forms::ToolStripStatusLabel^  ldir;
 
    private: System::ComponentModel::IContainer^  components;
 
    private:
        /// <summary>
        /// Required designed variable.
        /// </summary>
 
 
#pragma region Windows Form Designer generated code
        /// <summary>
        /// Required method for Designer support - do not modify
        /// contents of this method with the code editor.
        /// </summary>
        void InitializeComponent(void)
        {
            this->components = (gcnew System::ComponentModel::Container());
            this->timer1 = (gcnew System::Windows::Forms::Timer(this->components));
            this->statusStrip1 = (gcnew System::Windows::Forms::StatusStrip());
            this->toolStripStatusLabel1 = (gcnew System::Windows::Forms::ToolStripStatusLabel());
            this->cwidth = (gcnew System::Windows::Forms::ToolStripStatusLabel());
            this->toolStripStatusLabel3 = (gcnew System::Windows::Forms::ToolStripStatusLabel());
            this->cheight = (gcnew System::Windows::Forms::ToolStripStatusLabel());
            this->toolStripStatusLabel5 = (gcnew System::Windows::Forms::ToolStripStatusLabel());
            this->score = (gcnew System::Windows::Forms::ToolStripStatusLabel());
            this->toolStripStatusLabel7 = (gcnew System::Windows::Forms::ToolStripStatusLabel());
            this->speed = (gcnew System::Windows::Forms::ToolStripStatusLabel());
            this->toolStripStatusLabel2 = (gcnew System::Windows::Forms::ToolStripStatusLabel());
            this->lmouse = (gcnew System::Windows::Forms::ToolStripStatusLabel());
            this->toolStripStatusLabel4 = (gcnew System::Windows::Forms::ToolStripStatusLabel());
            this->ldir = (gcnew System::Windows::Forms::ToolStripStatusLabel());
            this->statusStrip1->SuspendLayout();
            this->SuspendLayout();
            // 
            // timer1
            // 
            this->timer1->Enabled = true;
            // 
            // statusStrip1
            // 
            this->statusStrip1->BackColor = System::Drawing::Color::White;
            this->statusStrip1->Items->AddRange(gcnew cli::array< System::Windows::Forms::ToolStripItem^  >(12) {
                this->toolStripStatusLabel1,
                    this->cwidth, this->toolStripStatusLabel3, this->cheight, this->toolStripStatusLabel5, this->score, this->toolStripStatusLabel7,
                    this->speed, this->toolStripStatusLabel2, this->lmouse, this->toolStripStatusLabel4, this->ldir
            });
            this->statusStrip1->Location = System::Drawing::Point(0, 371);
            this->statusStrip1->Name = L"statusStrip1";
            this->statusStrip1->Size = System::Drawing::Size(620, 22);
            this->statusStrip1->TabIndex = 0;
            this->statusStrip1->Text = L"statusStrip1";
            // 
            // toolStripStatusLabel1
            // 
            this->toolStripStatusLabel1->BackColor = System::Drawing::SystemColors::Control;
            this->toolStripStatusLabel1->Font = (gcnew System::Drawing::Font(L"Segoe UI", 9, System::Drawing::FontStyle::Regular, System::Drawing::GraphicsUnit::Point,
                static_cast<System::Byte>(204)));
            this->toolStripStatusLabel1->Name = L"toolStripStatusLabel1";
            this->toolStripStatusLabel1->Size = System::Drawing::Size(42, 17);
            this->toolStripStatusLabel1->Text = L"Width:";
            // 
            // cwidth
            // 
            this->cwidth->BackColor = System::Drawing::SystemColors::Control;
            this->cwidth->Name = L"cwidth";
            this->cwidth->Size = System::Drawing::Size(13, 17);
            this->cwidth->Text = L"1";
            // 
            // toolStripStatusLabel3
            // 
            this->toolStripStatusLabel3->BackColor = System::Drawing::SystemColors::Control;
            this->toolStripStatusLabel3->Name = L"toolStripStatusLabel3";
            this->toolStripStatusLabel3->Size = System::Drawing::Size(46, 17);
            this->toolStripStatusLabel3->Text = L"Height:";
            // 
            // cheight
            // 
            this->cheight->BackColor = System::Drawing::SystemColors::Control;
            this->cheight->Name = L"cheight";
            this->cheight->Size = System::Drawing::Size(13, 17);
            this->cheight->Text = L"1";
            // 
            // toolStripStatusLabel5
            // 
            this->toolStripStatusLabel5->BackColor = System::Drawing::SystemColors::Control;
            this->toolStripStatusLabel5->Name = L"toolStripStatusLabel5";
            this->toolStripStatusLabel5->Size = System::Drawing::Size(39, 17);
            this->toolStripStatusLabel5->Text = L"Score:";
            // 
            // score
            // 
            this->score->BackColor = System::Drawing::SystemColors::Control;
            this->score->Name = L"score";
            this->score->Size = System::Drawing::Size(13, 17);
            this->score->Text = L"0";
            // 
            // toolStripStatusLabel7
            // 
            this->toolStripStatusLabel7->BackColor = System::Drawing::SystemColors::Control;
            this->toolStripStatusLabel7->Name = L"toolStripStatusLabel7";
            this->toolStripStatusLabel7->Size = System::Drawing::Size(42, 17);
            this->toolStripStatusLabel7->Text = L"Speed:";
            // 
            // speed
            // 
            this->speed->BackColor = System::Drawing::SystemColors::Control;
            this->speed->Name = L"speed";
            this->speed->Size = System::Drawing::Size(13, 17);
            this->speed->Text = L"1";
            // 
            // toolStripStatusLabel2
            // 
            this->toolStripStatusLabel2->Name = L"toolStripStatusLabel2";
            this->toolStripStatusLabel2->Size = System::Drawing::Size(46, 17);
            this->toolStripStatusLabel2->Text = L"Mouse:";
            // 
            // lmouse
            // 
            this->lmouse->Name = L"lmouse";
            this->lmouse->Size = System::Drawing::Size(33, 17);
            this->lmouse->Text = L"False";
            // 
            // toolStripStatusLabel4
            // 
            this->toolStripStatusLabel4->Name = L"toolStripStatusLabel4";
            this->toolStripStatusLabel4->Size = System::Drawing::Size(58, 17);
            this->toolStripStatusLabel4->Text = L"Direction:";
            // 
            // ldir
            // 
            this->ldir->Name = L"ldir";
            this->ldir->Size = System::Drawing::Size(0, 17);
            // 
            // mf
            // 
            this->AutoScaleDimensions = System::Drawing::SizeF(6, 13);
            this->AutoScaleMode = System::Windows::Forms::AutoScaleMode::Font;
            this->BackColor = System::Drawing::Color::White;
            this->ClientSize = System::Drawing::Size(620, 393);
            this->Controls->Add(this->statusStrip1);
            this->DoubleBuffered = true;
            this->KeyPreview = true;
            this->MaximizeBox = false;
            this->Name = L"mf";
            this->StartPosition = System::Windows::Forms::FormStartPosition::CenterScreen;
            this->Text = L"Snake";
            this->Load += gcnew System::EventHandler(this, &mf::mf_Load);
            this->statusStrip1->ResumeLayout(false);
            this->statusStrip1->PerformLayout();
            this->ResumeLayout(false);
            this->PerformLayout();
 
        }
#pragma endregion
 
    private: void mf_Load(System::Object^  sender, System::EventArgs^  e);
    private: void addHandlers();
    private: void paint(Object^ sender, PaintEventArgs^ e);
    private: void tick(Object^ sender, EventArgs^ e);
    private: void key_press(Object^ sender, KeyEventArgs^ e);
    private: void resize(Object^ sender, EventArgs^ e);
    private: void resize_ref(Object^ sender, EventArgs^ e);
    private: void mouse_move(Object^ sender, MouseEventArgs^ e);
 
    private: int SmartRandom(int min, int max, int multiplier);
    private: void checkCollision();
    private: void placeApple();
    private: void newGame();
    private: void gameOver();
    private: void findPath(int x, int y);
 
    private: Byte dir; //0 - left, 1 - up, 2 - right, 3 - down
    private: List<Point>^ snake = gcnew List<Point>();
    private: List<int>^ moves = gcnew List<int>(3);
    private: int distance = 2;
    private: int step = 10;
    private: int stp = step + distance;
    private: Pen^ pen = gcnew Pen(Color::Blue);
    private: Pen^ iPen = gcnew Pen(Color::LimeGreen);
    private: Random^ rnd = gcnew Random();
    private: Point apple;
    private: int vscore = 0;
    private: int vspeed = 1;
    private: bool game_over = false;
    private: bool mouse = false;
    private: bool filled = false;
    private: List<Point>^ path = gcnew List<Point>();
 
    };
 
    public enum class Directions {
        Left, Up, Right, Down
    };
}

#include "mf.h"
 
using namespace snake;
 
int main(array<String^>^ arg) {
    Application::EnableVisualStyles();
    Application::SetCompatibleTextRenderingDefault(false);
    mf form;
    Application::Run(%form);
 
    return 0;
}
 
void mf::mf_Load(Object^ sender, EventArgs^ e) {
    resize(this, gcnew EventArgs());
    placeApple();
    dir = rnd->Next(3);
 
    for (int a = 0; a < 3; a++)
        snake->Add(Point(Math::Round(this->ClientRectangle.Width / (2*stp))*stp, Math::Round(this->ClientRectangle.Height / (2*stp))*stp));
    
    ldir->Text = ((Directions)dir).ToString();
    addHandlers();
    Refresh();
}
 
void mf::addHandlers() {
    this->Paint += gcnew System::Windows::Forms::PaintEventHandler(this, &snake::mf::paint);
    timer1->Tick += gcnew System::EventHandler(this, &snake::mf::tick);
    this->KeyUp += gcnew System::Windows::Forms::KeyEventHandler(this, &snake::mf::key_press);
    this->ResizeEnd += gcnew EventHandler(this, &snake::mf::resize);
    this->Resize += gcnew EventHandler(this, &snake::mf::resize_ref);
    this->MouseMove += gcnew System::Windows::Forms::MouseEventHandler(this, &snake::mf::mouse_move);
}
 
void mf::paint(Object^ sender, PaintEventArgs^ e) {
    //rendering snake, apple and wall
    Graphics^ g = e->Graphics;
    g->DrawRectangle(gcnew Pen(Color::Black, 12), stp/2, stp/2, this->ClientRectangle.Width - stp, this->ClientRectangle.Height - 3*stp);
 
    if (game_over) return;
    Color clr = Color::Red;
 
    for (int a = 0; a < snake->Count; a++) {
        int x = snake[a].X;
        int y = snake[a].Y;
 
        if (a == 0) clr = Color::Red;
            else clr = Color::Blue;
 
        pen->Color = clr;
 
        if (filled) {
            g->FillRectangle(pen->Brush, x, y, step, step);
            g->FillRectangle(iPen->Brush, apple.X, apple.Y, step, step);
        }
        else {
            g->DrawRectangle(pen, x, y, step, step);
            g->DrawRectangle(iPen, apple.X, apple.Y, step, step);
        }
    }
}
 
void mf::tick(Object^ sender, EventArgs^ e) {
    //mouse mode
    if (mouse) {
        if (path->Count > 0) {
            for (int a = snake->Count - 1; a > 0; a--) {
                snake[a] = snake[a - 1];
            }
 
            snake[0] = path[0];
            path->RemoveAt(0);
        }
        checkCollision();
        Refresh();
        return;
    }
 
    //keyboard mode
    if (moves->Count == 0) moves->Add(dir);
 
    for (int a = snake->Count - 1; a > 0; a--) {
        snake[a] = snake[a - 1];
    }
 
    Point temp = snake[0];
 
    switch (moves[0]) {
        case 0: temp.X -= stp;
            break;
        case 1: temp.Y -= stp;
            break;
        case 2: temp.X += stp;
            break;
        case 3: temp.Y += stp;
            break;
    }
    moves->RemoveAt(0);
 
    snake[0] = temp;
    checkCollision();
    Refresh();
}
 
void mf::key_press(Object^ sender, KeyEventArgs^ e) {
    //pause or resume game
    if (e->KeyCode == Keys::P) timer1->Enabled = !timer1->Enabled;
 
    //new game
    if (e->KeyCode == Keys::N) {
        newGame();
    }
 
    //switch mouse control
    if (e->KeyCode == Keys::M) {
        mouse = !mouse;
        lmouse->Text = mouse.ToString();
    }
 
    if (e->KeyCode == Keys::F) {
        filled = !filled;
        Refresh();
    }
 
    //exit function if mouse control is switched ob
    if (mouse) return;
 
    //changing direction
    int val = e->KeyValue;
    if (val >= 37 && val <= 40)
        if (Math::Abs(dir - val + 37) != 2)
            if (moves->Count < 3) {
                moves->Add(val - 37);
                dir = val - 37;
            }
            else {
                moves->RemoveAt(0);
                moves->Add(val - 37);
                dir = val - 37;
            }
 
    ldir->Text = ((Directions)dir).ToString();
}
 
int mf::SmartRandom(int min, int max, int multiplier) {
    //get random number, which is a multiple of 'multiplier'
    int lowBound = (int)Math::Ceiling(min / (double)multiplier);
    int highBound = (int)Math::Floor(max / (double)multiplier);
 
    return (rnd->Next(highBound - lowBound + 1) + lowBound) * multiplier;
}
 
void mf::checkCollision() {
    //checking collision with an apple or a wall or a snake
    Point head = snake[0];
    if (apple == head) {
        placeApple();
        vscore += 10;
        if (vspeed < 100)
        vspeed += 5;
        timer1->Interval = 102 - vspeed;
 
        score->Text = vscore.ToString();
        speed->Text = vspeed.ToString();
 
        snake->Add(snake[snake->Count - 1]);
    }
 
    if (snake->LastIndexOf(head) != 0 && !mouse) {
        gameOver();
    }
 
    if (head.X >= this->ClientRectangle.Width - stp || head.X < stp || head.Y >= this->ClientRectangle.Height - 3 * stp || head.Y < stp) {
        gameOver();
    }
}
 
void mf::newGame() {
    moves->Clear();
    dir = rnd->Next(3);
    snake->Clear();
    int px = Math::Round(this->ClientRectangle.Width / 24) * stp;
    int py = Math::Round(this->ClientRectangle.Height / (2 * stp)) * stp;
    for (int a = 0; a < 3; a++)
        snake->Add(Point(px, py));
 
    vscore = 0;
    vspeed = 1;
    timer1->Interval = 102 - vspeed;
    score->Text = "0";
    speed->Text = vspeed.ToString();
    game_over = false;
    placeApple();
    findPath(px, py);
    timer1->Enabled = true;
}
 
void mf::gameOver() {
    //you lose
    timer1->Enabled = false;
    game_over = true;
    MessageBox::Show("Game over", "Snake", MessageBoxButtons::OK, MessageBoxIcon::Exclamation);
}
 
void mf::placeApple() {
    //place apple to random point
    int w = this->ClientRectangle.Width - 2*stp;
    int h = this->ClientRectangle.Height - 4*stp;
    apple = Point(SmartRandom(stp, w, stp), SmartRandom(stp, h, stp));
}
 
void mf::resize(Object^ sender, EventArgs^ e) {
    //adjustment size of window after resizing
    Rectangle rect = this->ClientRectangle;
    int cw = Math::Round(rect.Width / stp) * stp;
    int ch = (Math::Round(22 + rect.Height / stp) - 22) * stp;
 
    cwidth->Text = cw.ToString();
    cheight->Text = ch.ToString();
 
    this->ClientSize = Drawing::Size(cw, ch);
}
 
void mf::resize_ref(Object^ sender, EventArgs^ e) {
    //redraw all elemnts during window resizing
    Refresh();
}
 
void mf::mouse_move(Object^ sender, MouseEventArgs^ e) {
    findPath(e->Location.X, e->Location.Y);
}
 
void mf::findPath(int x, int y) {
    //algorithm of finding path from snake's head to mouse point
    if (!mouse) return;
 
    path->Clear();
    Point final_destination = Point(Math::Round(x / 12) * 12, Math::Round(y / 12) * 12);
    Point start = snake[0];
 
    if (final_destination == start) return;
 
    int w = Math::Abs(final_destination.X - start.X);
    int h = Math::Abs(final_destination.Y - start.Y);
 
    int signx = 0;
    int signy = 0;
 
    if (final_destination.X - start.X > 0) signx = 1;
    else signx = -1;
    if (final_destination.Y - start.Y > 0) signy = -1;
    else signy = 1;
 
    Point p;
    if (w > h)
        p = Point(start.X + 12 * signx, start.Y);
    else
        p = Point(start.X, start.Y - 12 * signy);
 
    path->Add(p);
 
    while (p != final_destination) {
        if (w == h) {
            //##########
            int w1 = Math::Abs(final_destination.X - p.X);
            int h1 = Math::Abs(final_destination.Y - p.Y);
 
            if (w1 == h1) {
                p.Y -= 12 * signy;
                path->Add(p);
            }
            else {
                p.X += 12 * signx;
                path->Add(p);
            }
            //##########
        }
        else {
            //##########
            if (p.X == final_destination.X) {
                p.Y -= 12 * signy;
                path->Add(p);
            }
            else if (p.Y == final_destination.Y) {
                p.X += 12 * signx;
                path->Add(p);
            }
            else if (Math::Abs(p.X - final_destination.X) == Math::Abs(p.Y - final_destination.Y)) {
                if (w > h)
                    p.Y -= 12 * signy;
                else
                    p.X += 12 * signx;
 
                path->Add(p);
            }
            else {
                if (w > h)
                    p.X += 12 * signx;
                else
                    p.Y -= 12 * signy;
 
                path->Add(p);
            }
            //##########
        }
    }
}