91黄动漫 I 欧美 日韩 国产 成人 在线 I a级成人毛片 I 农村黄色片 I 男生捅女生的肌肌 I 精品99一区二区三区 I 妃光莉av I 日日夜夜操操 I 性中国古装videossex I 久久不卡av I 美女高潮动态图 I 极品美女开粉嫩精品 I 牛牛精品一区二区 I 91精品福利视频 I 成人刺激视频 I 91国内精品视频 I 中国一级特黄毛片大片 I 校长狠狠挺进校花体内小说 I 欧美激情黄色片 I 欧美久久久一区 I 爱豆国产剧免费观看大全剧苏畅 I 麻豆国产人妻欲求不满谁演的 I 亚洲一区二区在线免费观看视频 I 国产超碰av人人做人人爽 I 精品国产第一国产综合精品 I 久久免费看av I 欧美一区二区三区白人 I 国产精品夫妻激情 I 校花被肉干高h潮不断 I 欧美最猛黑人xxxx黑人表情 I 国产欧美日韩一区二区搜索 I 极品女神露脸呻吟啪啪 I 人人天天久久 I 亚洲动漫在线 I 日本91福利区 I 五月天 桃色 开心 I av在线免费观看国产 I 男人添女人的免费视频 I 夜夜穞天天穞狠狠穞

//**********************************************************開始游戲
if start == true and snake_len == 0 then
   snake_pos_x[0] = 9
   snake_pos_y[0] = 9
   snake_len = 1
   //繪制小蛇
   for index = 0 to snake_len - 1
       snake_index = snake_pos_y[index] * 20 + snake_pos_x[index]
       SetData(ON, "Local HMI", LB, snake_index, 1)
   next
   SetData(ON, "Local HMI", LB, 2000, 1)
end if
//**********************************************************暫停游戲
if stop then
   SetData(OFF, "Local HMI", LB, 1001, 1)
   SetData(OFF, "Local HMI", LB, 1002, 1)
   start = false
end if
if snake_len > 0 and start == true then

   ////**********************************************************
   ////**********************************************小蛇向上移動
   ////**********************************************************
   if snake_UP == true and snake_DOWN == false then
      //清除小蛇
      for index = 0 to snake_len-1
          snake_index = snake_pos_y[index] * 20 + snake_pos_x[index]
          SetData(OFF, "Local HMI", LB, snake_index, 1)
      next
      
      //蛇頭撞墻
      if snake_pos_y[0] == 0 then
         game_over = true
         SetData(ON, "Local HMI", LB, 2010, 1)
      else
         snake_len1  = snake_len-1
         snake_tail_pos_x = snake_pos_x[snake_len1]
         snake_tail_pos_y = snake_pos_y[snake_len1]
         snake_head_pos_x = snake_pos_x[0]
         snake_head_pos_y = snake_pos_y[0] - 1