source_dir/documentation/Examples/EntityAnimation.pb.html · PureBasic/PureBasicPreference

代码拉取完成,页面将自动刷新

开源项目 > 其他开源 > 图书/手册/教程 &&

扫描微信二维码支付

取消

支付完成

richgiteeai

Watch

不关注关注所有动态仅关注版本发行动态关注但不提醒动态

6 Star 9 Fork 3

PureBasic/PureBasicPreference

代码 Issues 0 Pull Requests 0 Wiki 统计流水线

服务

加入 Gitee

与超过 1400万开发者一起发现、参与优秀开源项目,私有仓库也完全免费 :)

免费加入

已有帐号? 立即登录

文件

master

分支 (1)

管理

master

克隆/下载

HTTPS SSH SVN SVN+SSH 下载ZIP

提示

下载代码请复制以下命令到终端执行

为确保你提交的代码身份被 Gitee 正确识别,请执行以下命令完成配置

git config --global user.name userName 
git config --global user.email userEmail

初次使用 SSH 协议进行代码克隆、推送等操作时,需按下述提示完成 SSH 配置

1 生成 RSA 密钥

2 获取 RSA 公钥内容,并配置到 SSH公钥中

在 Gitee 上使用 SVN,请访问使用指南

使用 HTTPS 协议时,命令行会出现如下账号密码验证步骤。基于安全考虑,Gitee 建议配置并使用私人令牌替代登录密码进行克隆、推送等操作

Username for 'https://gitee.com': userName

Password for 'https://userName@gitee.com': # 私人令牌

分支 1

标签 0

PureBasicPreference

source_dir

documentation

Examples

EntityAnimation.pb.html

EntityAnimation.pb.html 6.83 KB

<html><head><title>EntityAnimation.pb</title></head>
<body bgcolor="#EFF1F0" link="#3A3966" vlink="#000000" alink="#000000">
<pre>;
; ------------------------------------------------------------
;
; PureBasic - EntityAnimation
;
; (c) Fantaisie Software
;
; ------------------------------------------------------------
;

;Speed animation = PageUp and PageDown 

IncludeFile #PB_Compiler_Home + &quot;examples/3d/Screen3DRequester.pb&quot;

Define.f KeyX, KeyY, MouseX, MouseY, Speed = 0.3

If InitEngine3D()
 
 
 Add3DArchive(#PB_Compiler_Home + &quot;examples/3d/Data/Textures&quot;, #PB_3DArchive_FileSystem)
 Add3DArchive(#PB_Compiler_Home + &quot;examples/3d/Data/Models&quot;, #PB_3DArchive_FileSystem)
 Add3DArchive(#PB_Compiler_Home + &quot;examples/3d/Data/Scripts&quot;, #PB_3DArchive_FileSystem)
 Add3DArchive(#PB_Compiler_Home + &quot;examples/3d/Data/Packs/desert.zip&quot;, #PB_3DArchive_Zip)
 Parse3DScripts()
 
 InitSprite()
 InitKeyboard()
 InitMouse()
 
 If Screen3DRequester()
 
 WorldShadows(#PB_Shadow_Modulative, -1, RGB(175, 175, 175))
 
 ;Ground
 ;
 CreateMaterial(0, LoadTexture(0, &quot;Dirt.jpg&quot;))
 CreatePlane(0, 1500, 1500, 40, 40, 15, 15)
 CreateEntity(0,MeshID(0),MaterialID(0))
 EntityRenderMode(0, 0)
 
 ;Mesh
 ;
 LoadMesh(1, &quot;robot.mesh&quot;)
 
 ; Entity
 ;
 CreateEntity(1, MeshID(1), #PB_Material_None)
 
 ; Animation
 ;
 StartEntityAnimation(1, &quot;Walk&quot;, #PB_EntityAnimation_Manual)
 
 ; SkyBox
 ;
 SkyBox(&quot;Desert07.jpg&quot;)
 
 ; Camera
 ;
 CreateCamera(0, 0, 0, 100, 100)
 MoveCamera(0, 50, 100, 80, #PB_Absolute)
 CameraLookAt(0, EntityX(1), EntityY(1) + 40, EntityZ(1))
 
 CreateLight(0, RGB(255, 255, 255), -40, 100, 80)
 AmbientColor(RGB(80, 80, 80))
 KeyboardMode(#PB_Keyboard_International)
 
 Repeat
 Screen3DEvents()
 
 If ExamineMouse()
 MouseX = -MouseDeltaX()/10 
 MouseY = -MouseDeltaY()/10
 EndIf
 
 
 If ExamineKeyboard()
 
 If KeyboardPushed(#PB_Key_Left)
 KeyX = -1
 ElseIf KeyboardPushed(#PB_Key_Right)
 KeyX = 1
 Else
 KeyX = 0
 EndIf
 
 If KeyboardPushed(#PB_Key_Up)
 KeyY = -1
 ElseIf KeyboardPushed(#PB_Key_Down)
 KeyY = 1
 Else
 KeyY = 0
 EndIf
 
 If KeyboardPushed(#PB_Key_PageUp) And Speed &lt; 2.0
 Speed + 0.05
 ElseIf KeyboardPushed(#PB_Key_PageDown) And Speed &gt; 0.1 
 Speed - 0.05
 EndIf
 
 EndIf

AddEntityAnimationTime(1, &quot;Walk&quot;, TimeSinceLastFrame * Speed)
 
 RotateCamera(0, MouseY, MouseX, 0, #PB_Relative)
 MoveCamera (0, KeyX, 0, KeyY)
 
 TimeSinceLastFrame = RenderWorld()

FlipBuffers()
 Until KeyboardPushed(#PB_Key_Escape) Or Quit = 1
 EndIf
 
Else
 MessageRequester(&quot;Error&quot;, &quot;The 3D Engine can't be initialized&quot;,0)
EndIf
 
End</pre>
</body></html>

一键复制编辑原始数据按行查看历史

麦壳饼提交于 2016年07月21日 13:08 +08:00 . chuci

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120

<html><head><title>EntityAnimation.pb</title></head>
<body bgcolor="#EFF1F0" link="#3A3966" vlink="#000000" alink="#000000">
<pre><font face="Courier New, Courier, mono"size="2"><font color="#3A3966">;
</font><font color="#3A3966">; ------------------------------------------------------------
</font><font color="#3A3966">;
</font><font color="#3A3966">; PureBasic - EntityAnimation
</font><font color="#3A3966">;
</font><font color="#3A3966">; (c) Fantaisie Software
</font><font color="#3A3966">;
</font><font color="#3A3966">; ------------------------------------------------------------
</font><font color="#3A3966">;
</font>
<font color="#3A3966">;Speed animation = PageUp and PageDown 
</font>
<b><font color="#3A3966">IncludeFile</font></b> <font color="#924B72">#PB_Compiler_Home</font> + &quot;examples/3d/Screen3DRequester.pb&quot;

<b><font color="#3A3966">Define</font></b>.f KeyX, KeyY, MouseX, MouseY, Speed = 0.3

<b><font color="#3A3966">If</font></b> <font color="#3A3966">InitEngine3D</font>()
 
 
<font color="#3A3966"> Add3DArchive</font>(<font color="#924B72">#PB_Compiler_Home</font> + &quot;examples/3d/Data/Textures&quot;, <font color="#924B72">#PB_3DArchive_FileSystem</font>)
<font color="#3A3966"> Add3DArchive</font>(<font color="#924B72">#PB_Compiler_Home</font> + &quot;examples/3d/Data/Models&quot;, <font color="#924B72">#PB_3DArchive_FileSystem</font>)
<font color="#3A3966"> Add3DArchive</font>(<font color="#924B72">#PB_Compiler_Home</font> + &quot;examples/3d/Data/Scripts&quot;, <font color="#924B72">#PB_3DArchive_FileSystem</font>)
<font color="#3A3966"> Add3DArchive</font>(<font color="#924B72">#PB_Compiler_Home</font> + &quot;examples/3d/Data/Packs/desert.zip&quot;, <font color="#924B72">#PB_3DArchive_Zip</font>)
<font color="#3A3966"> Parse3DScripts</font>()
 
<font color="#3A3966"> InitSprite</font>()
<font color="#3A3966"> InitKeyboard</font>()
<font color="#3A3966"> InitMouse</font>()
 
 <b><font color="#3A3966">If</font></b> <font color="#3A3966">Screen3DRequester</font>()
 
<font color="#3A3966"> WorldShadows</font>(<font color="#924B72">#PB_Shadow_Modulative</font>, -1,<font color="#3A3966"> RGB</font>(175, 175, 175))
 
 <font color="#3A3966">;Ground
</font> <font color="#3A3966">;
</font><font color="#3A3966"> CreateMaterial</font>(0,<font color="#3A3966"> LoadTexture</font>(0, &quot;Dirt.jpg&quot;))
<font color="#3A3966"> CreatePlane</font>(0, 1500, 1500, 40, 40, 15, 15)
<font color="#3A3966"> CreateEntity</font>(0,<font color="#3A3966">MeshID</font>(0),<font color="#3A3966">MaterialID</font>(0))
<font color="#3A3966"> EntityRenderMode</font>(0, 0)
 
 <font color="#3A3966">;Mesh
</font> <font color="#3A3966">;
</font><font color="#3A3966"> LoadMesh</font>(1, &quot;robot.mesh&quot;)
 
 <font color="#3A3966">; Entity
</font> <font color="#3A3966">;
</font><font color="#3A3966"> CreateEntity</font>(1,<font color="#3A3966"> MeshID</font>(1), <font color="#924B72">#PB_Material_None</font>)
 
 <font color="#3A3966">; Animation
</font> <font color="#3A3966">;
</font><font color="#3A3966"> StartEntityAnimation</font>(1, &quot;Walk&quot;, <font color="#924B72">#PB_EntityAnimation_Manual</font>)
 
 <font color="#3A3966">; SkyBox
</font> <font color="#3A3966">;
</font><font color="#3A3966"> SkyBox</font>(&quot;Desert07.jpg&quot;)
 
 <font color="#3A3966">; Camera
</font> <font color="#3A3966">;
</font><font color="#3A3966"> CreateCamera</font>(0, 0, 0, 100, 100)
<font color="#3A3966"> MoveCamera</font>(0, 50, 100, 80, <font color="#924B72">#PB_Absolute</font>)
<font color="#3A3966"> CameraLookAt</font>(0,<font color="#3A3966"> EntityX</font>(1),<font color="#3A3966"> EntityY</font>(1) + 40,<font color="#3A3966"> EntityZ</font>(1))
 
<font color="#3A3966"> CreateLight</font>(0,<font color="#3A3966"> RGB</font>(255, 255, 255), -40, 100, 80)
<font color="#3A3966"> AmbientColor</font>(<font color="#3A3966">RGB</font>(80, 80, 80))
<font color="#3A3966"> KeyboardMode</font>(<font color="#924B72">#PB_Keyboard_International</font>)
 
 <b><font color="#3A3966">Repeat</font></b>
<font color="#3A3966"> Screen3DEvents</font>()
 
 <b><font color="#3A3966">If</font></b> <font color="#3A3966">ExamineMouse</font>()
 MouseX = -<font color="#3A3966">MouseDeltaX</font>()/10 
 MouseY = -<font color="#3A3966">MouseDeltaY</font>()/10
 <b><font color="#3A3966">EndIf</font></b>
 
 
 <b><font color="#3A3966">If</font></b> <font color="#3A3966">ExamineKeyboard</font>()
 
 <b><font color="#3A3966">If</font></b> <font color="#3A3966">KeyboardPushed</font>(<font color="#924B72">#PB_Key_Left</font>)
 KeyX = -1
 <b><font color="#3A3966">ElseIf</font></b> <font color="#3A3966">KeyboardPushed</font>(<font color="#924B72">#PB_Key_Right</font>)
 KeyX = 1
 <b><font color="#3A3966">Else</font></b>
 KeyX = 0
 <b><font color="#3A3966">EndIf</font></b>
 
 <b><font color="#3A3966">If</font></b> <font color="#3A3966">KeyboardPushed</font>(<font color="#924B72">#PB_Key_Up</font>)
 KeyY = -1
 <b><font color="#3A3966">ElseIf</font></b> <font color="#3A3966">KeyboardPushed</font>(<font color="#924B72">#PB_Key_Down</font>)
 KeyY = 1
 <b><font color="#3A3966">Else</font></b>
 KeyY = 0
 <b><font color="#3A3966">EndIf</font></b>
 
 <b><font color="#3A3966">If</font></b> <font color="#3A3966">KeyboardPushed</font>(<font color="#924B72">#PB_Key_PageUp</font>) <b><font color="#3A3966">And</font></b> Speed &lt; 2.0
 Speed + 0.05
 <b><font color="#3A3966">ElseIf</font></b> <font color="#3A3966">KeyboardPushed</font>(<font color="#924B72">#PB_Key_PageDown</font>) <b><font color="#3A3966">And</font></b> Speed &gt; 0.1 
 Speed - 0.05
 <b><font color="#3A3966">EndIf</font></b>
 
 <b><font color="#3A3966">EndIf</font></b>

<font color="#3A3966"> AddEntityAnimationTime</font>(1, &quot;Walk&quot;, TimeSinceLastFrame * Speed)
 
<font color="#3A3966"> RotateCamera</font>(0, MouseY, MouseX, 0, <font color="#924B72">#PB_Relative</font>)
<font color="#3A3966"> MoveCamera </font>(0, KeyX, 0, KeyY)
 
 TimeSinceLastFrame =<font color="#3A3966"> RenderWorld</font>()

<font color="#3A3966"> FlipBuffers</font>()
 <b><font color="#3A3966">Until</font></b> <font color="#3A3966">KeyboardPushed</font>(<font color="#924B72">#PB_Key_Escape</font>) <b><font color="#3A3966">Or</font></b> Quit = 1
 <b><font color="#3A3966">EndIf</font></b>
 
<b><font color="#3A3966">Else</font></b>
<font color="#3A3966"> MessageRequester</font>(&quot;Error&quot;, &quot;The 3D Engine can't be initialized&quot;,0)
<b><font color="#3A3966">EndIf</font></b>
 
<b><font color="#3A3966">End</font></b></font></pre>
</body></html>