import random
import pygame
import sys
from pygame.locals import *
 
Snakespeed = 17
Window_Width = 800
Window_Height = 500
Cell_Size = 20 # Width and height of the cells
# Ensuring that the cells fit perfectly in the window. eg if cell size was
# 10 and window width or windowheight were 15 only 1.5 cells would
# fit.
assert Window_Width % Cell_Size == 0, "Window width must be a multiple of cell size."
# Ensuring that only whole integer number of cells fit perfectly in the window.
assert Window_Height % Cell_Size == 0, "Window height must be a multiple of cell size."
Cell_W = int(Window_Width / Cell_Size) # Cell Width
Cell_H = int(Window_Height / Cell_Size) # Cellc Height
 
 
White = (255, 255, 255)
Black = (0, 0, 0)
Red = (255, 0, 0) # Defining element colors for the program.
Green = (0, 255, 0)
DARKGreen = (0, 155, 0)
DARKGRAY = (40, 40, 40)
YELLOW = (255, 255, 0)
Red_DARK = (150, 0, 0)
BLUE = (0, 0, 255)
BLUE_DARK = (0, 0, 150)
 
 
BGCOLOR = Black # Background color
 
 
UP = 'up'
DOWN = 'down' # Defining keyboard keys.
LEFT = 'left'
RIGHT = 'right'
 
HEAD = 0 # Syntactic sugar: index of the snake's head
 
 
def main():
 global SnakespeedCLOCK, DISPLAYSURF, BASICFONT
 
 pygame.init()
 SnakespeedCLOCK = pygame.time.Clock()
 DISPLAYSURF = pygame.display.set_mode((Window_Width, Window_Height))
 BASICFONT = pygame.font.Font('freesansbold.ttf', 18)
 pygame.display.set_caption('Snake')
 
 showStartScreen()
 while True:
 runGame()
 showGameOverScreen()
 
 
def runGame():
 # Set a random start point.
 startx = random.randint(5, Cell_W - 6)
 starty = random.randint(5, Cell_H - 6)
 wormCoords = [{'x': startx, 'y': starty},
   {'x': startx - 1, 'y': starty},
   {'x': startx - 2, 'y': starty}]
 direction = RIGHT
 
 # Start the apple in a random place.
 apple = getRandomLocation()
 
 while True: # main game loop
 for event in pygame.event.get(): # event handling loop
  if event.type == QUIT:
  terminate()
  elif event.type == KEYDOWN:
  if (event.key == K_LEFT) and direction != RIGHT:
   direction = LEFT
  elif (event.key == K_RIGHT) and direction != LEFT:
   direction = RIGHT
  elif (event.key == K_UP) and direction != DOWN:
   direction = UP
  elif (event.key == K_DOWN) and direction != UP:
   direction = DOWN
  elif event.key == K_ESCAPE:
   terminate()
 
 # check if the Snake has hit itself or the edge
 if wormCoords[HEAD]['x'] == -1 or wormCoords[HEAD]['x'] == Cell_W or wormCoords[HEAD]['y'] == -1 or wormCoords[HEAD]['y'] == Cell_H:
  return # game over
 for wormBody in wormCoords[1:]:
  if wormBody['x'] == wormCoords[HEAD]['x'] and wormBody['y'] == wormCoords[HEAD]['y']:
  return # game over
 
 # check if Snake has eaten an apply
 if wormCoords[HEAD]['x'] == apple['x'] and wormCoords[HEAD]['y'] == apple['y']:
  # don't remove worm's tail segment
  apple = getRandomLocation() # set a new apple somewhere
 else:
  del wormCoords[-1] # remove worm's tail segment
 
 # move the worm by adding a segment in the direction it is moving
 if direction == UP:
  newHead = {'x': wormCoords[HEAD]['x'],
   'y': wormCoords[HEAD]['y'] - 1}
 elif direction == DOWN:
  newHead = {'x': wormCoords[HEAD]['x'],
   'y': wormCoords[HEAD]['y'] + 1}
 elif direction == LEFT:
  newHead = {'x': wormCoords[HEAD][
  'x'] - 1, 'y': wormCoords[HEAD]['y']}
 elif direction == RIGHT:
  newHead = {'x': wormCoords[HEAD][
  'x'] + 1, 'y': wormCoords[HEAD]['y']}
 wormCoords.insert(0, newHead)
 DISPLAYSURF.fill(BGCOLOR)
 drawGrid()
 drawWorm(wormCoords)
 drawApple(apple)
 drawScore(len(wormCoords) - 3)
 pygame.display.update()
 SnakespeedCLOCK.tick(Snakespeed)
 
 
def drawPressKeyMsg():
 pressKeySurf = BASICFONT.render('Press a key to play.', True, White)
 pressKeyRect = pressKeySurf.get_rect()
 pressKeyRect.topleft = (Window_Width - 200, Window_Height - 30)
 DISPLAYSURF.blit(pressKeySurf, pressKeyRect)
 
 
def checkForKeyPress():
 if len(pygame.event.get(QUIT)) > 0:
 terminate()
 keyUpEvents = pygame.event.get(KEYUP)
 if len(keyUpEvents) == 0:
 return None
 if keyUpEvents[0].key == K_ESCAPE:
 terminate()
 return keyUpEvents[0].key
 
 
def showStartScreen():
 titleFont = pygame.font.Font('freesansbold.ttf', 100)
 titleSurf1 = titleFont.render('Snake!', True, White, DARKGreen)
 degrees1 = 0
 degrees2 = 0
 while True:
 DISPLAYSURF.fill(BGCOLOR)
 rotatedSurf1 = pygame.transform.rotate(titleSurf1, degrees1)
 rotatedRect1 = rotatedSurf1.get_rect()
 rotatedRect1.center = (Window_Width / 2, Window_Height / 2)
 DISPLAYSURF.blit(rotatedSurf1, rotatedRect1)
 
 drawPressKeyMsg()
 
 if checkForKeyPress():
  pygame.event.get() # clear event queue
  return
 pygame.display.update()
 SnakespeedCLOCK.tick(Snakespeed)
 degrees1 += 3 # rotate by 3 degrees each frame
 degrees2 += 7 # rotate by 7 degrees each frame
 
 
def terminate():
 pygame.quit()
 sys.exit()
 
 
def getRandomLocation():
 return {'x': random.randint(0, Cell_W - 1), 'y': random.randint(0, Cell_H - 1)}
 
 
def showGameOverScreen():
 gameOverFont = pygame.font.Font('freesansbold.ttf', 100)
 gameSurf = gameOverFont.render('Game', True, White)
 overSurf = gameOverFont.render('Over', True, White)
 gameRect = gameSurf.get_rect()
 overRect = overSurf.get_rect()
 gameRect.midtop = (Window_Width / 2, 10)
 overRect.midtop = (Window_Width / 2, gameRect.height + 10 + 25)
 
 DISPLAYSURF.blit(gameSurf, gameRect)
 DISPLAYSURF.blit(overSurf, overRect)
 drawPressKeyMsg()
 pygame.display.update()
 pygame.time.wait(500)
 checkForKeyPress() # clear out any key presses in the event queue
 
 while True:
 if checkForKeyPress():
  pygame.event.get() # clear event queue
  return
 
 
def drawScore(score):
 scoreSurf = BASICFONT.render('Score: %s' % (score), True, White)
 scoreRect = scoreSurf.get_rect()
 scoreRect.topleft = (Window_Width - 120, 10)
 DISPLAYSURF.blit(scoreSurf, scoreRect)
 
 
def drawWorm(wormCoords):
 for coord in wormCoords:
 x = coord['x'] * Cell_Size
 y = coord['y'] * Cell_Size
 wormSegmentRect = pygame.Rect(x, y, Cell_Size, Cell_Size)
 pygame.draw.rect(DISPLAYSURF, DARKGreen, wormSegmentRect)
 wormInnerSegmentRect = pygame.Rect(
  x + 4, y + 4, Cell_Size - 8, Cell_Size - 8)
 pygame.draw.rect(DISPLAYSURF, Green, wormInnerSegmentRect)
 
 
def drawApple(coord):
 x = coord['x'] * Cell_Size
 y = coord['y'] * Cell_Size
 appleRect = pygame.Rect(x, y, Cell_Size, Cell_Size)
 pygame.draw.rect(DISPLAYSURF, Red, appleRect)
 
 
def drawGrid():
 for x in range(0, Window_Width, Cell_Size): # draw vertical lines
 pygame.draw.line(DISPLAYSURF, DARKGRAY, (x, 0), (x, Window_Height))
 for y in range(0, Window_Height, Cell_Size): # draw horizontal lines
 pygame.draw.line(DISPLAYSURF, DARKGRAY, (0, y), (Window_Width, y))
 
 
if __name__ == '__main__':
 try:
 main()
 except SystemExit:
 pass

#coding: utf-8
import pygame,sys,time,random
from pygame.locals import *
# 定義顏色變量
redColour = pygame.Color(255,0,0)
blackColour = pygame.Color(0,0,0)
whiteColour = pygame.Color(255,255,255)
greenColour = pygame.Color(0,255,0)
headColour = pygame.Color(0,119,255)

#注意：在下面所有的除法中，為了防止pygame輸出偏差，必須取除數(//)而不是單純除法(/)

# 蛇運動的場地長寬，因為第0行，HEIGHT行，第0列，WIDTH列為圍墻，所以實際是13*13
HEIGHT = 15
WIDTH = 15
FIELD_SIZE = HEIGHT * WIDTH
# 蛇頭位于snake數組的第一個元素
HEAD = 0

# 用數字代表不同的對象，由于運動時矩陣上每個格子會處理成到達食物的路徑長度，
# 因此這三個變量間需要有足夠大的間隔(>HEIGHT*WIDTH)來互相區分
# 小寫一般是坐標，大寫代表常量
FOOD = 0
UNDEFINED = (HEIGHT + 1) * (WIDTH + 1)
SNAKE = 2 * UNDEFINED

# 由于snake是一維數組，所以對應元素直接加上以下值就表示向四個方向移動
LEFT = -1
RIGHT = 1
UP = -WIDTH#一維數組，所以需要整個寬度都加上才能表示上下移動
DOWN = WIDTH 

# 錯誤碼
ERR = -2333

# 用一維數組來表示二維的東西
# board表示蛇運動的矩形場地
# 初始化蛇頭在(1,1)的地方
# 初始蛇長度為1
board = [0] * FIELD_SIZE #[0,0,0,……]
snake = [0] * (FIELD_SIZE+1)
snake[HEAD] = 1*WIDTH+1
snake_size = 1
# 與上面變量對應的臨時變量，蛇試探性地移動時使用
tmpboard = [0] * FIELD_SIZE
tmpsnake = [0] * (FIELD_SIZE+1)
tmpsnake[HEAD] = 1*WIDTH+1
tmpsnake_size = 1

# food:食物位置初始在(4, 7)
# best_move: 運動方向
food = 4 * WIDTH + 7
best_move = ERR

# 運動方向數組，游戲分數(蛇長)
mov = [LEFT, RIGHT, UP, DOWN]           
score = 1 

# 檢查一個cell有沒有被蛇身覆蓋，沒有覆蓋則為free，返回true
def is_cell_free(idx, psize, psnake):
 return not (idx in psnake[:psize]) 

# 檢查某個位置idx是否可向move方向運動
def is_move_possible(idx, move):
 flag = False
 if move == LEFT:
  #因為實際范圍是13*13,[1,13]*[1,13],所以idx為1時不能往左跑，此時取余為1所以>1
  flag = True if idx%WIDTH > 1 else False
 elif move == RIGHT:
  #這里的<WIDTH-2跟上面是一樣的道理
  flag = True if idx%WIDTH < (WIDTH-2) else False
 elif move == UP:
  #這里向上的判斷畫圖很好理解，因為在[1,13]*[1,13]的實際運動范圍外，還有個
  #大框是圍墻，就是之前說的那幾個行列，下面判斷向下運動的條件也是類似的
  flag = True if idx > (2*WIDTH-1) else False
 elif move == DOWN:
  flag = True if idx < (FIELD_SIZE-2*WIDTH) else False
 return flag
# 重置board
# board_BFS后，UNDEFINED值都變為了到達食物的路徑長度
# 如需要還原，則要重置它
def board_reset(psnake, psize, pboard):
 for i in range(FIELD_SIZE):
  if i == food:
   pboard[i] = FOOD
  elif is_cell_free(i, psize, psnake): # 該位置為空
   pboard[i] = UNDEFINED
  else: # 該位置為蛇身
   pboard[i] = SNAKE
 
# 廣度優先搜索遍歷整個board，
# 計算出board中每個非SNAKE元素到達食物的路徑長度
def board_BFS(pfood, psnake, pboard):
 queue = []
 queue.append(pfood)
 inqueue = [0] * FIELD_SIZE
 found = False
 # while循環結束后，除了蛇的身體，
 # 其它每個方格中的數字為從它到食物的曼哈頓間距
 while len(queue)!=0: 
  idx = queue.pop(0)#初始時idx是食物的坐標 
  if inqueue[idx] == 1: continue
  inqueue[idx] = 1
  for i in range(4):#左右上下
   if is_move_possible(idx, mov[i]):
    if idx + mov[i] == psnake[HEAD]:
     found = True
    if pboard[idx+mov[i]] < SNAKE: # 如果該點不是蛇的身體
     if pboard[idx+mov[i]] > pboard[idx]+1:#小于的時候不管，不然會覆蓋已有的路徑數據
      pboard[idx+mov[i]] = pboard[idx] + 1
     if inqueue[idx+mov[i]] == 0:
      queue.append(idx+mov[i])
 return found

# 從蛇頭開始，根據board中元素值，
# 從蛇頭周圍4個領域點中選擇最短路徑
def choose_shortest_safe_move(psnake, pboard):
 best_move = ERR
 min = SNAKE
 for i in range(4):
  if is_move_possible(psnake[HEAD], mov[i]) and pboard[psnake[HEAD]+mov[i]]<min:
   #這里判斷最小和下面的函數判斷最大，都是先賦值，再循環互相比較
   min = pboard[psnake[HEAD]+mov[i]]
   best_move = mov[i]
 return best_move

# 從蛇頭開始，根據board中元素值，
# 從蛇頭周圍4個領域點中選擇最遠路徑
def choose_longest_safe_move(psnake, pboard):
 best_move = ERR
 max = -1
 for i in range(4):
  if is_move_possible(psnake[HEAD], mov[i]) and pboard[psnake[HEAD]+mov[i]]<UNDEFINED and pboard[psnake[HEAD]+mov[i]]>max:
   max = pboard[psnake[HEAD]+mov[i]]
   best_move = mov[i]
 return best_move

# 檢查是否可以追著蛇尾運動，即蛇頭和蛇尾間是有路徑的
# 為的是避免蛇頭陷入死路
# 虛擬操作，在tmpboard,tmpsnake中進行
def is_tail_inside():
 global tmpboard, tmpsnake, food, tmpsnake_size
 tmpboard[tmpsnake[tmpsnake_size-1]] = 0 # 虛擬地將蛇尾變為食物(因為是虛擬的，所以在tmpsnake,tmpboard中進行)
 tmpboard[food] = SNAKE # 放置食物的地方，看成蛇身
 result = board_BFS(tmpsnake[tmpsnake_size-1], tmpsnake, tmpboard) # 求得每個位置到蛇尾的路徑長度
 for i in range(4): # 如果蛇頭和蛇尾緊挨著，則返回False。即不能follow_tail，追著蛇尾運動了
  if is_move_possible(tmpsnake[HEAD], mov[i]) and tmpsnake[HEAD]+mov[i]==tmpsnake[tmpsnake_size-1] and tmpsnake_size>3:
   result = False
 return result

# 讓蛇頭朝著蛇尾運行一步
# 不管蛇身阻擋，朝蛇尾方向運行
def follow_tail():
 global tmpboard, tmpsnake, food, tmpsnake_size
 tmpsnake_size = snake_size
 tmpsnake = snake[:]
 board_reset(tmpsnake, tmpsnake_size, tmpboard) # 重置虛擬board
 tmpboard[tmpsnake[tmpsnake_size-1]] = FOOD # 讓蛇尾成為食物
 tmpboard[food] = SNAKE # 讓食物的地方變成蛇身
 board_BFS(tmpsnake[tmpsnake_size-1], tmpsnake, tmpboard) # 求得各個位置到達蛇尾的路徑長度
 tmpboard[tmpsnake[tmpsnake_size-1]] = SNAKE # 還原蛇尾
 return choose_longest_safe_move(tmpsnake, tmpboard) # 返回運行方向(讓蛇頭運動1步)

# 在各種方案都不行時，隨便找一個可行的方向來走(1步),
def any_possible_move():
 global food , snake, snake_size, board
 best_move = ERR
 board_reset(snake, snake_size, board)
 board_BFS(food, snake, board)
 min = SNAKE

 for i in range(4):
  if is_move_possible(snake[HEAD], mov[i]) and board[snake[HEAD]+mov[i]]<min:
   min = board[snake[HEAD]+mov[i]]
   best_move = mov[i]
 return best_move
 
#轉換數組函數
def shift_array(arr, size):
 for i in range(size, 0, -1):
  arr[i] = arr[i-1]

def new_food():#隨機函數生成新的食物
 global food, snake_size
 cell_free = False
 while not cell_free:
  w = random.randint(1, WIDTH-2)
  h = random.randint(1, HEIGHT-2)
  food = WIDTH*h + w
  cell_free = is_cell_free(food, snake_size, snake)
 pygame.draw.rect(playSurface,redColour,Rect(18*(food//WIDTH), 18*(food%WIDTH),18,18))

# 真正的蛇在這個函數中，朝pbest_move走1步
def make_move(pbest_move):
 global snake, board, snake_size, score
 shift_array(snake, snake_size)
 snake[HEAD] += pbest_move
 p = snake[HEAD]
 for body in snake:#畫蛇，身體，頭，尾
  pygame.draw.rect(playSurface,whiteColour,Rect(18*(body//WIDTH), 18*(body%WIDTH),18,18))
 pygame.draw.rect(playSurface,greenColour,Rect(18*(snake[snake_size-1]//WIDTH),18*(snake[snake_size-1]%WIDTH),18,18))
 pygame.draw.rect(playSurface,headColour,Rect(18*(p//WIDTH), 18*(p%WIDTH),18,18))
 #下面一行是把初始情況會出現的第一個白塊bug填掉
 pygame.draw.rect(playSurface,(255,255,0),Rect(0,0,18,18))
 # 刷新pygame顯示層
 pygame.display.flip() 
 
 # 如果新加入的蛇頭就是食物的位置
 # 蛇長加1，產生新的食物，重置board(因為原來那些路徑長度已經用不上了)
 if snake[HEAD] == food:
  board[snake[HEAD]] = SNAKE # 新的蛇頭
  snake_size += 1
  score += 1
  if snake_size < FIELD_SIZE: new_food()
 else: # 如果新加入的蛇頭不是食物的位置
  board[snake[HEAD]] = SNAKE # 新的蛇頭
  board[snake[snake_size]] = UNDEFINED # 蛇尾變為UNDEFINED，黑色
  pygame.draw.rect(playSurface,blackColour,Rect(18*(snake[snake_size]//WIDTH),18*(snake[snake_size]%WIDTH),18,18))
  # 刷新pygame顯示層
  pygame.display.flip() 

# 虛擬地運行一次，然后在調用處檢查這次運行可否可行
# 可行才真實運行。
# 虛擬運行吃到食物后，得到虛擬下蛇在board的位置
def virtual_shortest_move():
 global snake, board, snake_size, tmpsnake, tmpboard, tmpsnake_size, food
 tmpsnake_size = snake_size
 tmpsnake = snake[:] # 如果直接tmpsnake=snake，則兩者指向同一處內存
 tmpboard = board[:] # board中已經是各位置到達食物的路徑長度了，不用再計算
 board_reset(tmpsnake, tmpsnake_size, tmpboard)
 
 food_eated = False
 while not food_eated:
  board_BFS(food, tmpsnake, tmpboard) 
  move = choose_shortest_safe_move(tmpsnake, tmpboard)
  shift_array(tmpsnake, tmpsnake_size)
  tmpsnake[HEAD] += move # 在蛇頭前加入一個新的位置
  # 如果新加入的蛇頭的位置正好是食物的位置
  # 則長度加1，重置board，食物那個位置變為蛇的一部分(SNAKE)
  if tmpsnake[HEAD] == food:
   tmpsnake_size += 1
   board_reset(tmpsnake, tmpsnake_size, tmpboard) # 虛擬運行后，蛇在board的位置
   tmpboard[food] = SNAKE
   food_eated = True
  else: # 如果蛇頭不是食物的位置，則新加入的位置為蛇頭，最后一個變為空格
   tmpboard[tmpsnake[HEAD]] = SNAKE
   tmpboard[tmpsnake[tmpsnake_size]] = UNDEFINED

# 如果蛇與食物間有路徑，則調用本函數
def find_safe_way():
 global snake, board
 safe_move = ERR
 # 虛擬地運行一次，因為已經確保蛇與食物間有路徑，所以執行有效
 # 運行后得到虛擬下蛇在board中的位置，即tmpboard
 virtual_shortest_move() # 該函數唯一調用處
 if is_tail_inside(): # 如果虛擬運行后，蛇頭蛇尾間有通路，則選最短路運行(1步)
  return choose_shortest_safe_move(snake, board)
 safe_move = follow_tail() # 否則虛擬地follow_tail 1步，如果可以做到，返回true
 return safe_move


#初始化pygame
pygame.init()
#定義一個變量用來控制游戲速度
fpsClock = pygame.time.Clock()
# 創建pygame顯示層
playSurface = pygame.display.set_mode((270,270))
pygame.display.set_caption('貪吃蛇')
# 繪制pygame顯示層
playSurface.fill(blackColour)
#初始化食物
pygame.draw.rect(playSurface,redColour,Rect(18*(food//WIDTH), 18*(food%WIDTH),18,18))

while True:
 for event in pygame.event.get():#循環監聽鍵盤和退出事件
  if event.type == QUIT:#如果點了關閉
   print(score)#游戲結束后打印分數
   pygame.quit()
   sys.exit()
  elif event.type == KEYDOWN:#如果esc鍵被按下
   if event.key==K_ESCAPE:
    print(score)#游戲結束后打印分數
    pygame.quit()
    sys.exit()
 # 刷新pygame顯示層
 pygame.display.flip() 
 #畫圍墻，255,255,0是黃色，邊框是36是因為，pygame矩形是以邊為初始，向四周填充邊框
 pygame.draw.rect(playSurface,(255,255,0),Rect(0,0,270,270),36)
 # 重置距離
 board_reset(snake, snake_size, board)
 # 如果蛇可以吃到食物，board_BFS返回true
 # 并且board中除了蛇身(=SNAKE)，其它的元素值表示從該點運動到食物的最短路徑長
 if board_BFS(food, snake, board):
  best_move = find_safe_way() # find_safe_way的唯一調用處
 else:
  best_move = follow_tail()
 if best_move == ERR:
  best_move = any_possible_move()
 # 上面一次思考，只得出一個方向，運行一步
 if best_move != ERR: make_move(best_move)
 else:
  print(score)#游戲結束后打印分數
  break
 # 控制游戲速度
 fpsClock.tick(20)#20看上去速度正好