TC官方合作论坛

 找回密码
 立即注册
查看: 986|回复: 3

[源码分享] 带源码 蛋疼做品 如果做游戏这是起步哦~对学习有帮助 标签移动到指定范围停止 键盘上下左右操作

[复制链接]
发表于 2013-3-10 17:47:08 | 显示全部楼层 |阅读模式
空间 自己做游戏
u,y,键值,随机数,随机数1,我,随1,随,i,k
功能 线程方法()
    辅助.等待(1000)
    键值=38
    随机=array[500]
    随数=array[500]
    辅助.等待(1000)
    遍历(i=0;i<13;i++)
        随机=随机数1+i
    遍历结束
    辅助.等待(1000)
    遍历(k=0;k<13;k++)
        随数[k]=随机数+k
    遍历结束
    u=100
    y=100
    是否移动=控件.创建("标签","我","我",u,y,12,13,"设置颜色#800000","点击:空间名.事件响应函数")
   
    线程.开启("自己做游戏.方法","")
    颜色 = 标签.设置颜色("我",#ff00ff,1)
    辅助.等待(1000)
    随=随机数+13
   
    随1=随机数1+12
    循环(u<=290)
        如果(键值==38)
            u=u-1
        否则
            如果(键值==40)
                u=u+1
            否则
                如果(键值==37)
                    y=y-1
                否则
                    如果(键值==39)
                        y=y+1
                        
                    如果结束
                如果结束
            如果结束
        如果结束
        是否移动1=控件.设置位置("我",y,u,50,80,1)
        
        辅助.等待(编辑框.获得文本("编辑框0"))
        如果(u<=0)
            跳出
        如果结束
        如果(y<=0)
            跳出
        如果结束
        如果(y>=470)
            跳出
        如果结束
        
        如果(y>随机[1])
            如果(y<随机[11])
                如果(u>随数[1])
                    如果(u<随数[11])
                        跳出
                    如果结束
                如果结束
            如果结束
        如果结束
        
        z=y+13
        x=u+13  
        如果(z>随机[1])
            如果(z<随机[11])
                如果(x>随数[1])
                    如果(x<随数[11])
                        跳出
                    如果结束
                如果结束
            如果结束
        如果结束
        如果(z>随机[1])
            如果(z<随机[11])
                如果(u>随数[1])
                    如果(u<随数[11])
                        跳出
                    如果结束
                如果结束
            如果结束
        如果结束
        如果(y>随机[1])
            如果(y<随机[11])
                如果(x>随数[1])
                    如果(x<随数[11])
                        跳出
                    如果结束
                如果结束
            如果结束
        如果结束//辅助.消息框(u&"."&随数[1]&"."&随数[10]&y&"."&随机[1]&"."&随机[10])
    循环结束
    返回 0
功能结束
功能 方法()
    循环(真)
        键值=键盘.等待按键()
    循环结束
    返回 0
功能结束

功能 按钮0()
    随机数 = 辅助.随机数(10,100)
    随机数1 = 辅助.随机数(10,200)
    辅助.等待(100)
    随1=随机数1+12
    控件.创建("标签","标签23","贼",随机数1,随机数,12,12,"设置颜色#800000","点击:空间名.事件响应函数")
   
    线程.开启("自己做游戏.线程方法","")
    颜色 = 标签.设置颜色("标签23",#00ff00,1)
功能结束
功能 按钮0_点击()
    线程.开启("自己做游戏.按钮0","")
功能结束
功能 退出_点击()
   
    辅助.退出()
功能结束
功能 按钮2_点击()
    //这里添加你要执行的代码
    线程句柄=控件.销毁("我")
    线程句柄1=控件.销毁("标签23")
    线程句柄=线程.开启("自己做游戏.按钮0","")
    //线程句柄1=线程.开启("自己做游戏.按钮0","")
功能结束
空间结束
//空间结束语句

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?立即注册

x
回复

使用道具 举报

发表于 2013-3-10 17:48:12 | 显示全部楼层
   哦  我不看
回复 支持 反对

使用道具 举报

发表于 2013-3-10 18:04:24 | 显示全部楼层
学习一下,谢谢
回复 支持 反对

使用道具 举报

发表于 2013-3-10 21:10:40 | 显示全部楼层
这怎么用啊
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

关闭

推荐上一条 /2 下一条

关闭

小黑屋|TC官方合作论坛 (苏ICP备18045623号)

GMT+8, 2024-5-21 14:32 , Processed in 0.036685 second(s), 23 queries .

Powered by 海安简单软件服务部

© 2008-2019 版权所有 保留所有权利

快速回复 返回顶部 返回列表