import random
from math import sin, cos, pi, log
from tkinter import *

CANVAS_WIDTH = 840   #画布的宽
CANVAS_HEIGHT = 680  #画布的高
CANVAS_CENTER_X = CANVAS_WIDTH / 2  #画布中心的X轴坐标
CANVAS_CENTER_Y = CANVAS_HEIGHT / 2  #画布中心的Y轴坐标
IMAGE_ENLARGE = 11  #放大比例
HEART_COLOR = "#EEAEEE" #引号内修改颜色！

def heart_function(t, shrink_ratio: float = IMAGE_ENLARGE):
    """爱心函数生成器"""
    #:param shrink_ratio:放大比例
    #:param t:参数
    #:return:坐标
    #基础函数
    x = 17 * (sin(t) ** 3)
    y = -(16 * cos(t) - 5 * cos(2 * t) - 2 * cos(3 * t) - cos(3 * t))
    #放大
    x *= IMAGE_ENLARGE
    y *= IMAGE_ENLARGE
    #移到画布中央
    x += CANVAS_CENTER_X
    y += CANVAS_CENTER_Y
    return int(x), int(y)

def scatter_inside(x, y, beta=0.15):
    ratio_x = - beta * log(random.random())
    ratio_y = - beta * log(random.random())
    dx = ratio_x * (x - CANVAS_CENTER_X)
    dy = ratio_y * (y - CANVAS_CENTER_Y)
    return x - dx, y - dy

def shrink(x, y, ratio):
    force = -1 / (((x - CANVAS_CENTER_X) ** 2 + (y - CANVAS_CENTER_Y) ** 2) ** 0.6)
    dx = ratio * force * (x - CANVAS_CENTER_X)
    dy = ratio * force * (y - CANVAS_CENTER_Y)
    return x - dx, y - dy

def curve(p):
    return 2 * (2 * sin(4 * p)) / (2 * pi)

class Heart:
    def __init__(self, generate_frame=20):
        self.points = set()
        self.edge_diffusion_points = set()
        self.center_diffusion_points = set()
        self.all_points = {}
        self.build(2000)
        self.random_halo = 1000
        self.generate_frame = generate_frame
        for frame in range(generate_frame):
            self.calc(frame)

    def build(self, number):
        for _ in range(number):
            t = random.uniform(0, 2 * pi)
            x, y = heart_function(t)
            self.points.add((x, y))
        for x,y in list(self.points):
            for _ in range(3):
                x,y = scatter_inside(x,y,0.05)
                self.edge_diffusion_points.add((x,y))
        point_list = list(self.points)
        for _ in range(4000):
            x,y = random.choice(point_list)
            x,y = scatter_inside(x,y,0.17)
            self.center_diffusion_points.add((x,y))

    @staticmethod
    def calc_position(x, y, ratio):
        force = 1 / (((x - CANVAS_CENTER_X) ** 2 + (y - CANVAS_CENTER_Y) ** 2) ** 0.420)
        dx = ratio * force * (x - CANVAS_CENTER_X) + random.randint(-1,1)
        dy = ratio * force * (y - CANVAS_CENTER_Y) + random.randint(-1,1)
        return x - dx, y - dy

    def calc(self, generate_frame):
        ratio = 10 * curve(generate_frame / 10 * pi)
        halo_radius = int(4 + 6 * (1 + curve(generate_frame / 10 * pi)))
        halo_number = int(3000 + 4000 * abs(curve(generate_frame / 10 * pi) ** 2))
        all_points = []
        heart_halo_point = set()
        for _ in range(halo_number):
            t = random.uniform(0, 2 * pi)
            x, y = heart_function(t, shrink_ratio=11.6)
            x, y = shrink(x, y, halo_radius)
            if (x,y) not in heart_halo_point:
                heart_halo_point.add((x,y))
                x += random.randint(-14,14)
                y += random.randint(-14,14)
                size = random.choice((1,2,2))
                all_points.append((x,y,size))
        for x,y in self.points:
            x,y = self.calc_position(x,y,ratio)
            size = 1
            all_points.append((x,y,size))
        for x,y in self.edge_diffusion_points:
            x,y = self.calc_position(x,y,ratio)
            size = 2
            all_points.append((x,y,size))
        for x,y in self.center_diffusion_points:
            x,y = self.calc_position(x,y,ratio)
            size = 1
            all_points.append((x,y,size))
        self.all_points[generate_frame] = all_points

    def render(self, render_canvas, render_frame):
        for x,y,size in self.all_points[render_frame % self.generate_frame]:
            render_canvas.create_rectangle(x, y, x+size, y+size, width=0, fill=HEART_COLOR)

def draw(main: Tk, render_canvas: Canvas, render_heart: Heart, render_frame=0):
    render_canvas.delete('all')
    render_heart.render(render_canvas, render_frame)
    main.after(160, draw, main, render_canvas, render_heart, render_frame+1)

if __name__ == '__main__':
    root = Tk()
    root.title("Heart")
    canvas = Canvas(root, bg='black', height=CANVAS_HEIGHT, width=CANVAS_WIDTH)
    canvas.pack()
    heart = Heart()
    draw(root, canvas, heart)
    root.mainloop()