from tkinter import messagebox as msgbox
import tkinter as tk
import webbrowser
import random
 
class Lifes:
    def __init__(self, rows=38, cols=38):
        self.row = rows
        self.col = cols
        self.items = [[0]*self.col for _ in range(self.row)]
        self.histroy = []
        self.histroySize = 30
        self.running = False
        self.runningSpeed = 100
        
    def rndinit(self, rate=0.1):
        self.histroy = []
        for i in range(self.row):
            for j in range(self.col):
                rnd = random.random()
                if rnd > 1-rate:
                    self.items[i][j]=1
 
    def reproduce(self):
        new = [[0]*self.col for _ in range(self.row)]
        self.add_histroy()
        if len(self.histroy) > self.histroySize:
            self.histroy.pop(0)
        for i in range(self.row):
            for j in range(self.col):
                if i*j==0 or i==self.row-1 or j==self.col-1:
                    new[i][j]=0
                else:
                    lifes=0
                    for m in range(i-1,i+2):
                        for n in range(j-1,j+2):
                            if m==i and n==j:
                                continue
                            lifes += self.items[m][n]
                    if self.items[i][j]:
                        if lifes==2 or lifes==3:
                            new[i][j]=1
                        else:
                            new[i][j]=0
                    else:
                        if lifes==3:
                            new[i][j]=1
        for idx,narray in enumerate(new):
            self.items[idx] = narray
 
    def is_stable(self):
        if len(self.histroy)<self.histroySize:
            return False
        arr = []
        for i in self.histroy:
            if i not in arr:
                arr.append(i)
        if len(arr)<10:
            return True
 
    def add_histroy(self, Items=None):
        arr = []
        if Items==None:
            Items=self.items[:]
        for item in Items:
            b = 0
            for i,n in enumerate(item[::-1]):
                b += n*2**i
            arr.append(b)
        self.histroy.append(arr)
 
 
def drawCanvas():
    global tv,rect
    tv = tk.Canvas(win, width=win.winfo_width(), height=win.winfo_height())
    tv.pack(side = "top")
    for i in range(36):
        coord = 40, 40, 760, i*20 + 40
        tv.create_rectangle(coord)
        coord = 40, 40, i*20 + 40, 760
        tv.create_rectangle(coord)
    coord = 38, 38, 760, 760
    tv.create_rectangle(coord,width=2)
    coord = 39, 39, 760, 760
    tv.create_rectangle(coord,width=2)
    coord = 38, 38, 762, 762
    tv.create_rectangle(coord,width=2)
    R,XY = 8,[50+i*20 for i in range(36)]
    rect = [[0]*36 for _ in range(36)]
    for i,x in enumerate(XY):
        for j,y in enumerate(XY):
            rect[i][j] = tv.create_rectangle(x-R,y-R,x+R,y+R,tags=('imgButton1'))
            tv.itemconfig(rect[i][j],fill='lightgray',outline='lightgray')
    tv.tag_bind('imgButton1','<Button-1>',on_Click)
 
def drawLifes():
    R,XY = 8,[50+i*20 for i in range(36)]
    if Life.running:
        for i,x in enumerate(XY):
            for j,y in enumerate(XY):
                if Life.items[i+1][j+1]:
                    tv.itemconfig(rect[i][j],fill='green',outline='green')
                else:
                    tv.itemconfig(rect[i][j],fill='lightgray',outline='lightgray')
        tv.update()
        Life.reproduce()
        if Life.is_stable():
            Life.running = False
            if sum(sum(Life.items,[])):
                msgbox.showinfo('Message','生命繁殖與湮滅進(jìn)入穩(wěn)定狀態(tài)！?。?)
            else:
                msgbox.showinfo('Message','生命全部湮滅，進(jìn)入死亡狀態(tài)！??！')
    win.after(Life.runningSpeed, drawLifes)
 
def StartLife():
    if sum(sum(Life.items,[])):
        Life.histroy = []
        Life.running = True
    else:
        msgbox.showinfo('Message','請(qǐng)點(diǎn)擊小方塊填入生命細(xì)胞，或者使用隨機(jī)功能！')
 
def BreakLife():
    Life.running = not Life.running
    if Life.running:
        Life.histroy.clear()
        Life.add_histroy()
 
def RandomLife():
    Life.rndinit()
    Life.running = True
 
def ClearLife():
    Life.running = False
    Life.histroy = []
    Life.items = [[0]*38 for _ in range(38)]
    for x in range(36):
        for y in range(36):
            tv.itemconfig(rect[x][y],fill='lightgray',outline='lightgray')
 
def on_Enter(event):
    tCanvas.itemconfig(tVisit, fill='magenta')
 
def on_Leave(event):
    tCanvas.itemconfig(tVisit, fill='blue')
 
def on_Release(event):
    url = 'https://blog.csdn.net/boysoft2002?type=blog'
    webbrowser.open(url, new=0, autoraise=True)
 
def on_Click(event):
    x,y = (event.x-40)//20,(event.y-40)//20
    if not Life.running:
        if Life.items[x+1][y+1]:
            tv.itemconfig(rect[x][y],fill='lightgray',outline='lightgray')
        else:
            tv.itemconfig(rect[x][y],fill='red',outline='red')
        Life.items[x+1][y+1] = not Life.items[x+1][y+1]
 
def on_Close():
    if msgbox.askokcancel("Quit","Do you want to quit?"):
        Life.running = False
        print(Copyright())
        win.destroy()
 
def Introduce():
    txt = '''【生命游戲】\n\n生存定律：
    (1)當(dāng)前細(xì)胞為湮滅狀態(tài)時(shí)，當(dāng)周?chē)校硞€(gè)存活細(xì)胞時(shí)，則迭代后該細(xì)胞變成存活狀態(tài)(模擬繁殖)。
    (2)當(dāng)前細(xì)胞為存活狀態(tài)時(shí)，當(dāng)周?chē)泥従蛹?xì)胞少于２個(gè)存活時(shí)，該細(xì)胞變成湮滅狀態(tài)(數(shù)量稀少)。
    (3)當(dāng)前細(xì)胞為存活狀態(tài)時(shí)，當(dāng)周?chē)校硞€(gè)以上的存活細(xì)胞時(shí)，該細(xì)胞變成湮滅狀態(tài)(數(shù)量過(guò)多)。
    (4)當(dāng)前細(xì)胞為存活狀態(tài)時(shí)，當(dāng)周?chē)校矀€(gè)或３個(gè)存活細(xì)胞時(shí)，該細(xì)胞保持原樣。'''
    return txt
 
def Copyright():
    return 'Lifes Game Ver1.0\nWritten by HannYang, 2022/08/01.'
 
 
if __name__ == '__main__':
 
    win = tk.Tk()
    X,Y = win.maxsize()
    W,H = 1024,800
    winPos = f'{W}x{H}+{(X-W)//2}+{(Y-H)//2}'
    win.geometry(winPos)
    win.resizable(False, False)
    win.title('生命游戲 Ver1.0')
    win.update()
    drawCanvas()
    Life = Lifes()
    drawLifes()
 
    tLabel = tk.Label(win, width=30, height=20, background='lightgray')
    tLabel.place(x=780, y=38)
    tLabel.config(text='\n\n\n'.join((Introduce(),Copyright())))
    tLabel.config(justify=tk.LEFT,anchor="nw",borderwidth=10,wraplength=210)
 
    bX,bY,dY = 835, 458, 50
    tButton0 = tk.Button(win, text=u'開(kāi)始', command=StartLife)
    tButton0.place(x=bX, y=bY+dY*0 ,width=120,height=40)     
    tButton1 = tk.Button(win, text=u'暫停', command=BreakLife)
    tButton1.place(x=bX, y=bY+dY*1 ,width=120,height=40) 
    tButton2 = tk.Button(win, text=u'隨機(jī)', command=RandomLife)
    tButton2.place(x=bX, y=bY+dY*2 ,width=120,height=40)
    tButton3 = tk.Button(win, text=u'清空', command=ClearLife)
    tButton3.place(x=bX, y=bY+dY*3 ,width=120,height=40)
 
    tCanvas = tk.Canvas(win, width=200, height=45)
    tCanvas.place(x=800,y=716)
    tVisit = tCanvas.create_text((88, 22), text=u"點(diǎn)此訪問(wèn)Hann's CSDN主頁(yè)!")
    tCanvas.itemconfig(tVisit, fill='blue', tags=('btnText'))
    tCanvas.tag_bind('btnText','<Enter>',on_Enter)
    tCanvas.tag_bind('btnText','<Leave>',on_Leave)
    tCanvas.tag_bind('btnText','<ButtonRelease-1>',on_Release)
    win.protocol("WM_DELETE_WINDOW", on_Close)
    win.mainloop()