广告广告
  加入我的最爱 设为首页 风格修改
首页 首尾
 手机版   订阅   地图  繁体 
您是第 7329 个阅读者
04:00 ~ 4:30 资料库备份中,需等较久的时间,请耐心等候
 
<< 上页  1   2  >>(共 2 页)
发表文章 发表投票 回覆文章
  可列印版   加为IE收藏   收藏主题   上一主题 | 下一主题   
za08280714
数位造型
个人文章 个人相簿 个人日记 个人地图
小人物
级别: 小人物 该用户目前不上站
推文 x0 鲜花 x3
分享: 转寄此文章 Facebook Plurk Twitter 复制连结到剪贴簿 转换为繁体 转换为简体 载入图片

又来麻烦大大了.大大我又想到一个问题了.我试这更换ㄧ张有方向的图.结果只有图作抛物线.而图的方向就没变.要如何修改成[抛物线往上的时候是ㄧ张方向上的图.抛物线往下的时候是ㄧ张方向下的图.抛物线往右的时候是ㄧ张方向右的图.碰到之后反弹是方向左边的图.左边的图在反弹到上面碰到之后变反弹下来又是一张往下的图]依角度反弹换图片方向.


本帖包含附件
zip 方向图片.zip   (2022-06-09 14:18 / 71 KB)   下载次数:5



献花 x0 回到顶端 [10 楼] From:台湾中华电信股份有限公司 | Posted:2011-08-11 21:36 |
ebolaman 手机 会员卡
个人文章 个人相簿 个人日记 个人地图
特殊贡献奖

级别: 副版主 该用户目前不上站
版区: 程式设计
推文 x38 鲜花 x458
分享: 转寄此文章 Facebook Plurk Twitter 复制连结到剪贴簿 转换为繁体 转换为简体 载入图片

下面是引用 za08280714 于 2011-08-11 21:36 发表的 : 到引言文
又来麻烦大大了.大大我又想到一个问题了.我试这更换ㄧ张有方向的图.结果只有图作抛物线.而图的方向就没变.要如何修改成[抛物线往上的时候是ㄧ张方向上的图.抛物线往下的时候是ㄧ张方向下的图.抛物线往右的时候是ㄧ张方向右的图.碰到之后反弹是方向左边的图.左边的图在反弹到上面碰到之后变反弹下来又是一张往下的图]依角度反弹换图片方向.

抛物线瞬间某一时刻 的角度(Angle) 会 在 Sub local_clb_pos  中被调整

在这个 Sub 中加入判断角度等于 什么什么 (例如 45~135 度是 上,135~225 度是左...要注意角度在程式中是 RAD 形式哦,要转换的话可以用内建的 math_degtorad() 函数把 DEG 转换到 RAD,要转回来请自己设一个函数  )

的时候,就改变图片



底下红色字体标示的就是纪录角度的变数 ang  在图片被抛来抛去的时候(运动中),会改变的关键的一行

把改变图片的  程式码加入在附近即可,最好是用新的一个函数


    Private Sub local_clb_pos(ByRef mode As Integer)

        '----- Formula -----
        'vx=vx
        'vy=vy-(g*t)

        'x=x0+(v0x*t)
        'y=y0+(v0y*t)-(1/2*g*t^2)
        '___________________

        With pos
            If mode = 0 Then 'Initial values
                .ang = math_degtorad(listAng(stat_ang))
                .ini_vx = .ini_v * Math.Cos(.ang) : .ini_vy = .ini_v * Math.Sin(.ang)
            Else
                .vx = .ini_vx
                .vy = .ini_vy - (.g * passedTime)
                .ang = Math.Atan(.vy / .vx)
                If .vx < 0 And .vy > 0 Then .ang = math_revang(0, .ang)
                If .vx < 0 And .vy < 0 Then .ang = .ang + Math.PI


                'You may insert the new sub/function/codes here


                '--- Debug ---
                Me.Text = "ang=" & .ang * 180 / Math.PI & " vx=" & .vx & " vy=" & .vy & " Delta y=" & (.vy * passedTime) - (0.5 * .g * (passedTime ^ 2))
                '_____________

                .x = .ini_x + (.ini_vx * passedTime)
                .y = .ini_y + -((.ini_vy * passedTime) - (0.5 * .g * (passedTime ^ 2)))
            End If
        End With

    End Sub


[ 此文章被ebolaman在2011-08-11 22:37重新编辑 ]


My BOINC stats :

献花 x0 回到顶端 [11 楼] From:台湾宽频通讯顾问股份有限公司 | Posted:2011-08-11 22:05 |
za08280714
数位造型
个人文章 个人相簿 个人日记 个人地图
小人物
级别: 小人物 该用户目前不上站
推文 x0 鲜花 x3
分享: 转寄此文章 Facebook Plurk Twitter 复制连结到剪贴簿 转换为繁体 转换为简体 载入图片

感谢大大我在去试看看


献花 x0 回到顶端 [12 楼] From:台湾中华电信股份有限公司 | Posted:2011-08-12 22:03 |
za08280714
数位造型
个人文章 个人相簿 个人日记 个人地图
小人物
级别: 小人物 该用户目前不上站
推文 x0 鲜花 x3
分享: 转寄此文章 Facebook Plurk Twitter 复制连结到剪贴簿 转换为繁体 转换为简体 载入图片

请问大大我在这个程式中.加了自动产生图片的程式.建立单独的系统中都没出现问题.
我把2个程式合起来却出现了二个问题.检查之后好像跟:(mstp = 25)这个数值有关.
是宣告格式错误还是有相冲突 .感谢大大帮忙.


问题ㄧ:自动产生图片中前2个都很正常.后面3个就变不正常.控制角度时候面3个图片就开始跟这动.

问题二:用空白键启动角度也失效了.


本帖包含附件
zip WindowsApplication1.zip   (2022-06-09 14:18 / 189 KB)   下载次数:7


献花 x0 回到顶端 [13 楼] From:台湾中华电信股份有限公司 | Posted:2011-08-24 18:32 |
ebolaman 手机 会员卡
个人文章 个人相簿 个人日记 个人地图
特殊贡献奖

级别: 副版主 该用户目前不上站
版区: 程式设计
推文 x38 鲜花 x458
分享: 转寄此文章 Facebook Plurk Twitter 复制连结到剪贴簿 转换为繁体 转换为简体 载入图片

下面是引用 za08280714 于 2011-08-24 18:32 发表的 : 到引言文
请问大大我在这个程式中.加了自动产生图片的程式.建立单独的系统中都没出现问题.
我把2个程式合起来却出现了二个问题.检查之后好像跟:(mstp = 25)这个数值有关.
是宣告格式错误还是有相冲突 .感谢大大帮忙.


问题ㄧ:自动产生图片中前2个都很正常.后面3个就变不正常.控制角度时候面3个图片就开始跟这动.

问题二:用空白键启动角度也失效了.


能不能附上 两个程式混合后的专案

一杯冰淇淋红茶,可以半糖,可以无糖,还可以选冰淇淋口味

要用看的猜出好不好喝,很困难啊


My BOINC stats :

献花 x0 回到顶端 [14 楼] From:台湾宽频通讯顾问股份有限公司 | Posted:2011-08-24 18:44 |
za08280714
数位造型
个人文章 个人相簿 个人日记 个人地图
小人物
级别: 小人物 该用户目前不上站
推文 x0 鲜花 x3
分享: 转寄此文章 Facebook Plurk Twitter 复制连结到剪贴簿 转换为繁体 转换为简体 载入图片

大大我找到问题点出在哪了.问题出在背景图吃掉资源太多变成没有动静.我把背景图用掉之后就变成正常了.请问大大这资源问题要怎么解决.

如果把上下换图片角度跟碰撞角度之后变换角度用 ImageList 宣告 这方法行的通吗.


献花 x0 回到顶端 [15 楼] From:台湾中华电信股份有限公司 | Posted:2011-08-25 18:54 |
za08280714
数位造型
个人文章 个人相簿 个人日记 个人地图
小人物
级别: 小人物 该用户目前不上站
推文 x0 鲜花 x3
分享: 转寄此文章 Facebook Plurk Twitter 复制连结到剪贴簿 转换为繁体 转换为简体 载入图片

又来麻烦大大了.大大我又碰到二个问题了WindowsApplication1.第一个:就是要创造3个目标使之碰撞后消失.消失后会显示分数.第二个:就是让能够变换角度依照方向变换往上或往下图片

我有新作一个程式WindowsApplication2.用键盘控制方向.碰撞都没问题.之后要修改成抛物线跟ImageList 宣告
作碰撞结果失败了.不管怎宣告都没用.还是抛物线的碰撞有不同的宣告方法


本帖包含附件
zip WindowsApplication2.zip   (2022-06-09 14:19 / 1843 KB)   下载次数:2
zip WindowsApplication1.zip   (2022-06-09 14:19 / 934 KB)   下载次数:2


[ 此文章被za08280714在2011-11-06 17:00重新编辑 ]


献花 x0 回到顶端 [16 楼] From:台湾中华电信股份有限公司 | Posted:2011-11-06 16:33 |

<< 上页  1   2  >>(共 2 页)
首页  发表文章 发表投票 回覆文章
Powered by PHPWind v1.3.6
Copyright © 2003-04 PHPWind
Processed in 0.015858 second(s),query:16 Gzip disabled
本站由 瀛睿律师事务所 担任常年法律顾问 | 免责声明 | 本网站已依台湾网站内容分级规定处理 | 连络我们 | 访客留言