playground:picking
Différences
Ci-dessous, les différences entre deux révisions de la page.
Les deux révisions précédentesRévision précédente | Prochaine révisionLes deux révisions suivantes | ||
playground:picking [2017/05/09 02:31] – falsam | playground:picking [2017/05/11 17:31] – falsam | ||
---|---|---|---|
Ligne 1: | Ligne 1: | ||
+ | **12-picking.sb** | ||
+ | |||
+ | [[http:// | ||
+ | |||
+ | <file purebasic 12-picking.sb> | ||
+ | ; | ||
+ | |||
+ | EnableExplicit | ||
+ | |||
+ | IncludeFile " | ||
+ | |||
+ | Declare LoadGame() | ||
+ | Declare RenderGame() | ||
+ | |||
+ | UseModule BJS | ||
+ | |||
+ | InitEngine(@LoadGame()) | ||
+ | |||
+ | Procedure LoadGame() | ||
+ | Protected Mesh | ||
+ | | ||
+ | If CreateScene() | ||
+ | CreateCamera(" | ||
+ | | ||
+ | CreateLight(" | ||
+ | | ||
+ | CreateGround(" | ||
+ | Mesh = CreateBox(" | ||
+ | MoveMesh(Mesh, | ||
+ | | ||
+ | Mesh = CreateSphere(" | ||
+ | MoveMesh(Mesh, | ||
+ | | ||
+ | Mesh = CreateCylinder(" | ||
+ | MoveMesh(Mesh, | ||
+ | | ||
+ | ;Active le systeme de picking | ||
+ | PickEnable() | ||
+ | | ||
+ | RenderLoop(@RenderGame()) | ||
+ | EndIf | ||
+ | EndProcedure | ||
+ | |||
+ | Procedure RenderGame() | ||
+ | Protected Mesh = IsPick() | ||
+ | | ||
+ | If Mesh | ||
+ | Debug "Name " + GetMeshName(Pick\mesh) | ||
+ | Debug " | ||
+ | Debug "x/y/z " + StrD(PickX(), | ||
+ | | ||
+ | EndIf | ||
+ | | ||
+ | RenderWorld() | ||
+ | EndProcedure | ||
+ | </ | ||
playground/picking.txt · Dernière modification : 2023/03/15 15:49 de 127.0.0.1