贪吃蛇游戏源码 手动和自动两种模式分享

贪吃蛇核心代码    大佬勿喷    业余学习完   大家互相研究

1. .版本 2
   
2. 
   
3. .子程序 开火车
   
4. .局部变量 X, 整数型
   
5. 
   
6. 画板1.清除 (, , , )
   
7. 画板1.画板背景色 ＝ #透明
   
8. 火车2 ＝ 火车1
   
9. 火车1 [1].横向位置 ＝ 火车1 [1].横向位置 ＋ 30 × 方向1
   
10. 火车1 [1].纵向位置 ＝ 火车1 [1].纵向位置 ＋ 30 × 方向2
    
11. .如果 (食物位置.横向位置 ＝ 火车1 [1].横向位置 且 食物位置.纵向位置 ＝ 火车1 [1].纵向位置)
    
12.     加入成员 (火车1, 食物位置)
    
13.     加入成员 (火车2, 备用位置)
    
14.     食物生产 ()
    
15. .否则
    
16. 
    
17. .如果结束
    
18. 
    
19. .变量循环首 (2, 取数组成员数 (火车2), 1, X)
    
20.     火车1 [X] ＝ 火车2 [X － 1]
    
21. .变量循环尾 ()
    
22. 画板1.画图片 (图片号2, 食物位置.横向位置, 食物位置.纵向位置, 30, 30, 5)
    
23. 画火车 ()
    
24. .如果 (开始2)  ' ================取反开始不用赋值
    
25.     自动寻路 ()
    
26. .否则

复制代码

游客，如果您要查看本帖隐藏内容请回复

回复查看隐藏内容

厉害，我挺你，嘻嘻嘻。

谢谢大人的分享

人设人阿松大

前来围观，LZ好样的！

嘻嘻不错支持一个

感谢您的无私精神...

这个不错，谢谢共享

我表示压力很大