Différences

Ci-dessous, les différences entre deux révisions de la page.

--- playground:light [2017/05/09 00:49] – falsam
+++ playground:light [2017/05/09 02:23] – falsam
@@ Ligne 1: / Ligne 1: @@
+**04-Light.sb**
+[[http://falsam.com/sbbjs/light.html|Voir]]
+<file purebasic 04-light.sb>
+;Babylon.sbi - Light
+EnableExplicit
+IncludeFile "babylon/babylon.sbi"
+Global Scene, Camera, Light0, Light1, Light2, Ligh3, Mesh, Material
+Declare LoadGame()
+Declare RenderGame()
+InitEngine(@LoadGame())
+Procedure LoadGame()
+  Scene = CreateScene()
+  If Scene
+    Camera = CreateCamera("camera", 0, 10, 20, #ArcRotate)
+    ;Lights
+    CreateLight("General", 0, 20, 0, 0.2, #Hemispheric)
+    Light0 = CreateLight("Red Light", -1, 10, -1, 1, #Spot)
+    SpotLightRange(Light0, 2, 10)
+    SetLightColor(Light0, #Diffuse, RGB(255, 0, 0))
+    SetLightColor(Light0, #Specular, RGB(0, 255, 0))
+    Light1 = CreateLight("Green Light", 5, 10, 1, 0.8, #Spot)
+    SpotLightRange(Light1, 2, 5)
+    SetLightColor(Light1, #Diffuse, RGB(0, 255, 0))
+    SetLightColor(Light1, #Specular, RGB(0, 255, 0))
+    Light2 = CreateLight("Blue Light", -9, 10, -9, 1, #Spot)
+    SpotLightRange(Light2, 2, 6)
+    SetLightColor(Light2, #Diffuse, RGB(0, 0, 255))
+    SetLightColor(Light2, #Specular, RGB(0, 255, 0))
+    ;Ground & Box
+    Material = CreateMaterial("ground", "data/textures/floor.png")
+    Mesh = CreateGround("ground", 30, 30)
+    SetMaterial(Mesh, Material)
+    ScaleMaterial(Material, 5, 5)
+    Material = CreateMaterial("Box", "data/textures/crate.png")
+    Mesh = CreateBox("Box", 5)
+    SetMaterial(Mesh, Material)
+    MoveMesh(Mesh, 0, 2.5, 0)
+    RenderLoop(@RenderGame())
+  EndIf
+EndProcedure
+Procedure RenderGame()
+  Static z.f
+  RenderWorld()
+EndProcedure
+</file>