+(define-method (get-position (scrollbar <gui-scrollbar>))
+ (let ((getPos (get-irrlicht-proc "getPos" scrollbar)))
+ (getPos scrollbar)))
+
+(define-method (set-max! (scrollbar <gui-scrollbar>) max)
+ (let ((setMax (get-irrlicht-proc "setMax" scrollbar)))
+ (setMax scrollbar max)))
+
+(define-method (set-position! (scrollbar <gui-scrollbar>) pos)
+ (let ((setPos (get-irrlicht-proc "setPos" scrollbar)))
+ (setPos scrollbar pos)))
+
+(export <gui-scrollbar> get-position set-max! set-position!)