]> git.jsancho.org Git - guile-irrlicht.git/blobdiff - irrlicht/bindings/scene.scm
create-device
[guile-irrlicht.git] / irrlicht / bindings / scene.scm
diff --git a/irrlicht/bindings/scene.scm b/irrlicht/bindings/scene.scm
deleted file mode 100644 (file)
index ad2646b..0000000
+++ /dev/null
@@ -1,106 +0,0 @@
-;;; guile-irrlicht --- FFI bindings for Irrlicht Engine
-;;; Copyright (C) 2019 Javier Sancho <jsf@jsancho.org>
-;;;
-;;; This file is part of guile-irrlicht.
-;;;
-;;; Guile-irrlicht is free software; you can redistribute it and/or modify
-;;; it under the terms of the GNU Lesser General Public License as
-;;; published by the Free Software Foundation; either version 3 of the
-;;; License, or (at your option) any later version.
-;;;
-;;; Guile-irrlicht is distributed in the hope that it will be useful, but
-;;; WITHOUT ANY WARRANTY; without even the implied warranty of
-;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
-;;; General Public License for more details.
-;;;
-;;; You should have received a copy of the GNU Lesser General Public
-;;; License along with guile-irrlicht.  If not, see
-;;; <http://www.gnu.org/licenses/>.
-
-
-(define-module (irrlicht bindings scene)
-  #:use-module (system foreign)
-  #:use-module (irrlicht util foreign))
-
-;;  irr_scene_EMD2_ANIMATION_TYPE enum
-(define-public EMAT_STAND                 0)
-(define-public EMAT_RUN                   1)
-(define-public EMAT_ATTACK                2)
-(define-public EMAT_PAIN_A                3)
-(define-public EMAT_PAIN_B                4)
-(define-public EMAT_PAIN_C                5)
-(define-public EMAT_JUMP                  6)
-(define-public EMAT_FLIP                  7)
-(define-public EMAT_SALUTE                8)
-(define-public EMAT_FALLBACK              9)
-(define-public EMAT_WAVE                 10)
-(define-public EMAT_POINT                11)
-(define-public EMAT_CROUCH_STAND         12)
-(define-public EMAT_CROUCH_WALK          13)
-(define-public EMAT_CROUCH_ATTACK        14)
-(define-public EMAT_CROUCH_PAIN          15)
-(define-public EMAT_CROUCH_DEATH         16)
-(define-public EMAT_DEATH_FALLBACK       17)
-(define-public EMAT_DEATH_FALLFORWARD    18)
-(define-public EMAT_DEATH_FALLBACKSLOW   19)
-(define-public EMAT_BOOM                 20)
-(define-public EMAT_COUNT                21)
-
-;; irr_scene_E_PRIMITIVE_TYPE enum
-(define-public EPT_POINTS          0)
-(define-public EPT_LINE_STRIP      1)
-(define-public EPT_LINE_LOOP       2)
-(define-public EPT_LINES           3)
-(define-public EPT_TRIANGLE_STRIP  4)
-(define-public EPT_TRIANGLE_FAN    5)
-(define-public EPT_TRIANGLES       6)
-(define-public EPT_QUAD_STRIP      7)
-(define-public EPT_QUADS           8)
-(define-public EPT_POLYGON         9)
-(define-public EPT_POINT_SPRITES  10)
-
-;; Scene functions
-(define-foreign add-animated-mesh-scene-node
-  '* "irr_scene_addAnimatedMeshSceneNode" (list '* '* '* int '* '* '* int))
-
-(define-foreign add-animator
-  void "irr_scene_addAnimator" (list '* '*))
-
-(define-foreign add-camera-scene-node
-  '* "irr_scene_addCameraSceneNode" (list '* '* '* '* int int))
-
-(define-foreign add-camera-scene-node-fps
-  '* "irr_scene_addCameraSceneNodeFPS" (list '* '* float float int '* int int float int int))
-
-(define-foreign add-custom-scene-node
-  '* "irr_scene_addCustomSceneNode" (list '* '* int '* '* '* '* '* '* '*))
-
-(define-foreign add-octree-scene-node
-  '* "irr_scene_addOctreeSceneNode" (list '* '* '* int int int))
-
-(define-foreign create-rotation-animator
-  '* "irr_scene_createRotationAnimator" (list '* '*))
-
-(define-foreign draw-all
-  void "irr_scene_drawAll" (list '*))
-
-(define-foreign get-absolute-transformation
-  '* "irr_scene_getAbsoluteTransformation" (list '*))
-
-(define-foreign get-mesh
-  '* "irr_scene_getMesh" (list '* '*))
-
-(define-foreign get-root-scene-node
-  '* "irr_scene_getRootSceneNode" (list '*))
-
-(define-foreign set-material-flag
-  void "irr_scene_setMaterialFlag" (list '* int int))
-
-(define-foreign set-material-texture
-  void "irr_scene_setMaterialTexture" (list '* int '*))
-
-(define-foreign set-md2-animation
-  void "irr_scene_setMD2Animation" (list '* int))
-
-(define-foreign set-position
-  void "irr_scene_setPosition" (list '* '*))