import tkinter
import random

index = 0
timer = 0
score = 0
hisc = 1000
difficulty = 0
tsugi = 0

cursor_x = 0
cursor_y = 0
mouse_x = 0
mouse_y = 0
mouse_c = 0

def mouse_move(e):
    global mouse_x, mouse_y
    mouse_x = e.x
    mouse_y = e.y

def mouse_press(e):
    global mouse_c
    mouse_c = 1

cat = []
check = []

for i in range(10):
    cat.append([0, 0, 0, 0, 0, 0, 0, 0])
    check.append([0, 0, 0, 0, 0, 0, 0, 0])

def draw_cat():
    cvs.delete('cat')
    for y in range(10):
        for x in range(8):
            if cat[y][x] > 0:
                cvs.create_image(x * 72 + 60, y * 72 + 60, image = img_cat[cat[y][x]], tag = 'cat')

def check_cat():
    for y in range(10):
        for x in range(8):
            check[y][x] = cat[y][x]

    for y in range(1, 9):
        for x in range(8):
            if check[y][x] > 0:
                if check[y - 1][x] == check[y][x] and check[y + 1][x] == check[y][x]:
                    cat[y - 1][x] = 7
                    cat[y][x] = 7
                    cat[y + 1][x] = 7

    for y in range(10):
        for x in range(1, 7):
            if check[y][x] > 0:
                if check[y][x - 1] == check[y][x] and check[y][x + 1] == check[y][x]:
                    cat[y][x - 1] = 7
                    cat[y][x] = 7
                    cat[y][x + 1] = 7

    for y in range(1, 9):
        for x in range(1, 7):
            if check[y][x] > 0:
                if check[y - 1][x - 1] == check[y][x] and check[y + 1][x + 1] == check[y][x]:
                    cat[y - 1][x - 1] = 7
                    cat[y][x] = 7
                    cat[y + 1][x + 1] = 7
                if check[y + 1][x - 1] == check[y][x] and check[y - 1][x + 1] == check[y][x]:
                    cat[y + 1][x - 1] = 7
                    cat[y][x] = 7
                    cat[y - 1][x + 1] = 7

def sweep_cat():
    num = 0
    for y in range(10):
        for x in range(8):
            if cat[y][x] == 7:
                cat[y][x] = 0
                num = num + 1
    return num

def drop_cat():
    flg = False
    for y in range(8, -1, -1):
        for x in range(8):
            if cat[y][x] != 0 and cat[y + 1][x] == 0:
                cat[y + 1][x] = cat[y][x]
                cat[y][x] = 0
                flg = True
    return flg

def over_cat():
    for x in range(8):
        if cat[0][x] > 0:
            return True
    return False

def set_cat():
    for x in range(8):
        cat[0][x] = random.randint(0, difficulty)

def draw_txt(txt, x, y, siz, col, tg):
    fnt = ('Times New Roman', siz, 'bold')
    cvs.create_text(x + 2, y + 2, text = txt, fill = 'black', font = fnt, tag = tg)
    cvs.create_text(x, y, text = txt, fill = col, font = fnt, tag = tg)

def game_main():
    global index, timer, score, hisc, difficulty, tsugi
    global cursor_x, cursor_y, mouse_c
    
    if index == 0:    # 標題的標誌
        draw_txt('貓咪貓咪', 312, 240, 100, 'violet', 'TITLE')
        cvs.create_rectangle(168, 384, 456, 456, fill = 'skyblue', width = 0, tag = 'TITLE')
        draw_txt('Easy', 312, 420, 40, 'white', 'TITLE')
        cvs.create_rectangle(168, 528, 456, 600, fill = 'lightgreen', width = 0, tag = 'TITLE')
        draw_txt('Normal', 312, 564, 40, 'white', 'TITLE')
        cvs.create_rectangle(168, 672, 456, 744, fill = 'orange', width = 0, tag = 'TITLE')
        draw_txt('Hard', 312, 708, 40, 'white', 'TITLE')
        index = 1
        mouse_c = 0
    elif index == 1: # 標題畫面 等待遊戲開始
        difficulty = 0
        if mouse_c == 1:
            if 168 < mouse_x and mouse_x < 456 and 384 < mouse_y and mouse_y < 456:
                difficulty = 4
            if 168 < mouse_x and mouse_x < 456 and 528 < mouse_y and mouse_y < 600:
                difficulty = 5
            if 168 < mouse_x and mouse_x < 456 and 672 < mouse_y and mouse_y < 744:
                difficulty = 6                
        if difficulty > 0:
            for y in range(10):
                for x in range(8):
                    cat[y][x] = 0
            mouse_c = 0
            score = 0
            tsugi = 0
            cursor_x = 0
            cursor_y = 0
            set_cat()
            draw_cat()
            cvs.delete('TITLE')
            index = 2
    elif index == 2: # 貓咪落下
        if drop_cat() == False:
            index = 3
        draw_cat()
    elif index == 3: # 是否連成一線
        check_cat()
        draw_cat()
        index = 4
    elif index == 4:		# 消除連成一線的貓咪
        sc = sweep_cat()
        score = score + sc * difficulty * 2
        if score > hisc:
            hisc = score
        if sc > 0:
            index = 2
        else:
            if over_cat() == False:
                tsugi = random.randint(1, difficulty)
                index = 5
            else:
                index = 6
                timer = 0
        draw_cat()
    elif index == 5: # 等待玩家滑鼠輸入
        if 24 <= mouse_x and mouse_x < 24 + 72 * 8 and 24 <= mouse_y and mouse_y < 24 + 72 * 10:
            cursor_x = int((mouse_x - 24) / 72)
            cursor_y = int((mouse_y - 24) / 72)
            if mouse_c == 1:
                mouse_c = 0
                set_cat()
                cat[cursor_y][cursor_x] = tsugi
                tsugi = 0
                index = 2
        cvs.delete('CURSOR')
        cvs.create_image(cursor_x * 72 + 60, cursor_y * 72 + 60, image = cursor, tag = 'CURSOR')
        draw_cat()
    elif index == 6: # 遊戲結束
        timer = timer + 1
        if timer == 1:
            draw_txt('GAME OVER', 312, 348, 60, 'red', 'OVER')
        if timer == 50:
            cvs.delete('OVER')
            index = 0
    cvs.delete('INFO')
    draw_txt('SCORE ' + str(score), 160, 60, 32, 'blue', 'INFO')
    draw_txt('HISC ' + str(hisc), 450, 60, 32, 'yellow', 'INFO')
    if tsugi > 0:
        cvs.create_image(752, 128, image = img_cat[tsugi], tag = 'INFO')
    root.after(100, game_main)

root = tkinter.Tk()
root.title('掉落物拼圖「貓咪貓咪」')
root.resizable(False, False)
root.bind('<Motion>', mouse_move)
root.bind('<ButtonPress>', mouse_press)
cvs = tkinter.Canvas(root, width = 912, height = 768)
cvs.pack()

bg = tkinter.PhotoImage(file = 'images/cat_bg.png')
cursor = tkinter.PhotoImage(file = 'images/cat_cursor.png')
img_cat = [
    None,
    tkinter.PhotoImage(file = 'images/cat1.png'),
    tkinter.PhotoImage(file = 'images/cat2.png'),
    tkinter.PhotoImage(file = 'images/cat3.png'),
    tkinter.PhotoImage(file = 'images/cat4.png'),
    tkinter.PhotoImage(file = 'images/cat5.png'),
    tkinter.PhotoImage(file = 'images/cat6.png'),
    tkinter.PhotoImage(file = 'images/cat_paw.png')
]

cvs.create_image(456, 384, image = bg)
game_main()
root.mainloop()