LiteRGSS 0.1.3

data/ext/LiteRGSS/Graphics.h

@@ -0,0 +1,31 @@
+#ifndef GR_HEADER
+#define GR_HEADER
+#include "CViewport_Element.h"
+#include "CSprite_Element.h"
+#include "CShaderSprite_Element.h"
+#include <SFML/Graphics.hpp>
+
+VALUE rb_Graphics_start(VALUE self);
+VALUE rb_Graphics_stop(VALUE self);
+VALUE rb_Graphics_update(VALUE self);
+VALUE rb_Graphics_snap_to_bitmap(VALUE self);
+VALUE rb_Graphics_freeze(VALUE self);
+VALUE rb_Graphics_transition(int argc, VALUE* argv, VALUE self);
+VALUE rb_Graphics_list_res(VALUE self);
+VALUE rb_Graphics_get_frame_count(VALUE self);
+VALUE rb_Graphics_set_frame_count(VALUE self, VALUE val);
+VALUE rb_Graphics_width(VALUE self);
+VALUE rb_Graphics_height(VALUE self);
+VALUE rb_Graphics_ReloadStack(VALUE self);
+VALUE rb_Graphics_update_no_input_count(VALUE self);
+VALUE rb_Graphics_update_only_input(VALUE self);
+VALUE rb_Graphics_getBrightness(VALUE self);
+VALUE rb_Graphics_setBrightness(VALUE self, VALUE brightness);
+VALUE rb_Graphics_getShader(VALUE self);
+VALUE rb_Graphics_setShader(VALUE self, VALUE shader);
+
+void global_Graphics_Bind(CDrawable_Element* element);
+void rb_Sprite_Free(void* data);
+
+extern double Graphics_Scale;
+#endif

data/ext/LiteRGSS/Graphics.local.cpp

@@ -0,0 +1,365 @@
+#include "LiteRGSS.h"
+#include "CViewport_Element.h"
+#include "Graphics.local.h"
+
+double Graphics_Scale = 1;
+bool SmoothScreen = false;
+bool RGSSTransition = false;
+unsigned char Graphics_Brightness = 255;
+sf::RenderTexture* Graphics_Render = nullptr;
+sf::RenderStates* Graphics_States = nullptr;
+
+void* local_Graphics_Update_Internal(void* data)
+{
+    GraphicUpdateMessage* message = nullptr;
+    if(game_window->isOpen())
+    {
+        /* Draw Processing */
+        game_window->clear();
+        local_Graphics_Update_Draw((std::vector<CDrawable_Element*>*)data);
+        game_window->display();
+    }
+    else
+    {
+        message = new GraphicUpdateMessage();
+        message->errorObject = rb_eStoppedGraphics;
+        message->message = "Game Window was closed during Graphics.update by a unknow cause...";
+    }
+    return message;
+}
+
+void local_Graphics_Update_Process_Event(GraphicUpdateMessage*& message)
+{
+    if(message != nullptr) // We'll try not to cause other error during this
+        return;
+    sf::Event event;
+	L_EnteredText.clear();
+    while(game_window->pollEvent(event))
+    {
+        switch(event.type)
+        {
+            case sf::Event::EventType::Closed:
+                message = new GraphicUpdateMessage();
+                message->errorObject = rb_eClosedWindow;
+                message->message = "Game Window has been closed by user.";
+                return;
+            case sf::Event::EventType::KeyPressed:
+                L_Input_Update_Key(event.key.code, true);
+                break;
+            case sf::Event::EventType::KeyReleased:
+                L_Input_Update_Key(event.key.code, false);
+                break;
+            case sf::Event::EventType::JoystickButtonPressed:
+                L_Input_Update_Joy(event.joystickButton.joystickId, event.joystickButton.button, true);
+                break;
+            case sf::Event::EventType::JoystickButtonReleased:
+                L_Input_Update_Joy(event.joystickButton.joystickId, event.joystickButton.button, false);
+                break;
+            case sf::Event::EventType::JoystickMoved:
+                L_Input_Update_JoyPos(event.joystickMove.joystickId,
+                    event.joystickMove.axis,
+                    event.joystickMove.position);
+                break;
+            case sf::Event::EventType::MouseMoved:
+                L_Input_Mouse_Pos_Update(event.mouseMove.x, event.mouseMove.y);
+                break;
+            case sf::Event::EventType::MouseButtonPressed:
+                L_Input_Mouse_Button_Update(event.mouseButton.button, true);
+                L_Input_Mouse_Pos_Update(event.mouseButton.x, event.mouseButton.y);
+                break;
+            case sf::Event::EventType::MouseButtonReleased:
+                L_Input_Mouse_Button_Update(event.mouseButton.button, false);
+                L_Input_Mouse_Pos_Update(event.mouseButton.x, event.mouseButton.y);
+                break;
+            case sf::Event::EventType::MouseWheelScrolled:
+                if(event.mouseWheelScroll.wheel == sf::Mouse::Wheel::VerticalWheel)
+                    L_Input_Mouse_Wheel_Update(static_cast<long>(event.mouseWheelScroll.delta));
+                L_Input_Mouse_Pos_Update(event.mouseWheelScroll.x, event.mouseWheelScroll.y);
+                break;
+            case sf::Event::EventType::MouseLeft:
+                L_Input_Mouse_Pos_Update(-256, -256);
+                break;
+			case sf::Event::EventType::TextEntered:
+				L_EnteredText.append((char*)sf::String(event.text.unicode).toUtf8().c_str());
+				break;
+        }
+    }
+}
+
+VALUE local_Graphics_Update_RaiseError(VALUE self, GraphicUpdateMessage* message)
+{
+    /* If the error is ClosedWindowError, we manage the window closing 
+     * When @on_close is defined to a proc, @on_close can decide if the window closing is allowed or not
+     * or do things before closing the window
+     * That's a kind of rescue process 
+     */
+    if(message->errorObject == rb_eClosedWindow)
+    {
+        VALUE closeHandle = rb_iv_get(self, "@on_close");
+        if(closeHandle != Qnil)
+        {
+            VALUE handleClass = rb_class_of(closeHandle);
+            if(handleClass == rb_cProc)
+                if(rb_proc_call(closeHandle, rb_ary_new()) == Qfalse)
+                {
+                    InsideGraphicsUpdate = false;
+                    return self; /* If the proc returns false we doesn't show the exception */
+                }
+        }
+        local_Graphics_Clear_Stack();
+        game_window->close();
+        delete game_window;
+        game_window = nullptr;
+    }
+    /* We raise the message */
+    InsideGraphicsUpdate = false;
+    rb_raise(message->errorObject, "%s", message->message);
+    return self;
+}
+
+void local_Graphics_Update_Draw(std::vector<CDrawable_Element*>* stack)
+{
+    bool was_viewport = false;
+    sf::View defview = game_window->getDefaultView();
+	sf::RenderTarget* render_target = game_window;
+	// Setting the default view parameters
+    defview.setSize(ScreenWidth, ScreenHeight);
+    defview.setCenter(round(ScreenWidth / 2.0f), round(ScreenHeight / 2.0f));
+	// Appying the default view to final renders
+    game_window->setView(defview);
+	if (Graphics_Render)
+	{
+		Graphics_Render->setView(defview);
+		Graphics_Render->clear();
+		render_target = Graphics_Render;
+	}
+	// Rendering stuff
+    for(auto element = stack->begin();element != stack->end(); element++)
+    {
+        if(was_viewport && !(*element)->isViewport())
+			render_target->setView(defview);
+        was_viewport = (*element)->isViewport();
+        (*element)->draw(*render_target);
+    }
+	// Drawing render to window if finished
+	if (Graphics_Render)
+	{
+		Graphics_Render->display();
+		sf::Sprite sp(Graphics_Render->getTexture());
+		game_window->draw(sp, *Graphics_States);
+	}
+	// Display transition sprite
+	if (Graphics_freeze_sprite != nullptr)
+	{
+		if (RGSSTransition)
+			game_window->draw(*Graphics_freeze_sprite, Graphics_freeze_shader);
+		else
+			game_window->draw(*Graphics_freeze_sprite);
+	}
+	// Update the brightness (applied to game_window)
+	if (Graphics_Brightness != 255)
+		local_Graphics_DrawBrightness();
+}
+
+void local_Graphics_DrawBrightness()
+{
+	sf::Vertex	vertices[4];
+	sf::Vector2u size = game_window->getSize();
+	vertices[0].position = sf::Vector2f(0, 0);
+	vertices[1].position = sf::Vector2f(0, size.y);
+	vertices[2].position = sf::Vector2f(size.x, 0);
+	vertices[3].position = sf::Vector2f(size.x, size.y);
+	vertices[0].color = vertices[1].color = vertices[2].color = vertices[3].color = sf::Color(0, 0, 0, 255 - Graphics_Brightness);
+	game_window->draw(vertices, 4, sf::PrimitiveType::TriangleStrip);
+}
+
+void local_LoadVideoModeFromConfigs(sf::VideoMode& vmode)
+{
+    ID swidth = rb_intern("ScreenWidth");
+    ID sheight = rb_intern("ScreenHeight");
+    ID sscale = rb_intern("ScreenScale");
+    long max_width, max_height = 0xFFFFFF;
+    long pixdepth = 32;
+    double scale = 1;
+    std::vector<sf::VideoMode> modes = sf::VideoMode::getFullscreenModes();
+    /* If there's a fullscreen mode */
+    if(modes.size() > 0)
+    {
+        max_width = modes[0].width;
+        max_height = modes[0].height;
+        vmode.bitsPerPixel = modes[0].bitsPerPixel;
+    }
+    /* Adjust Width */
+    if(rb_const_defined(rb_mConfig, swidth))
+        vmode.width = normalize_long(rb_num2long(rb_const_get(rb_mConfig, swidth)), 160, max_width);
+    /* Adjust Height */
+    if(rb_const_defined(rb_mConfig, sheight))
+        vmode.height = normalize_long(rb_num2long(rb_const_get(rb_mConfig, sheight)), 144, max_height);
+    /* Adjust Scale */
+    if(rb_const_defined(rb_mConfig, sscale))
+        scale = normalize_double(NUM2DBL(rb_const_get(rb_mConfig, sscale)), 0.1, 10);
+    ScreenWidth = vmode.width;
+    ScreenHeight = vmode.height;
+    vmode.width *= scale;
+    vmode.height *= scale;
+    Graphics_Scale = scale;
+}
+
+const sf::String local_LoadTitleFromConfigs()
+{
+    ID title = rb_intern("Title");
+    if(rb_const_defined(rb_mConfig, title))
+    {
+        VALUE str_title = rb_const_get(rb_mConfig, title);
+        rb_check_type(str_title, T_STRING);
+        std::string str(RSTRING_PTR(str_title));
+        return sf::String::fromUtf8(str.begin(), str.end());
+    }
+    return sf::String("LiteRGSS");
+}
+
+unsigned int local_LoadFrameRateFromConfigs()
+{
+    ID framerate = rb_intern("FrameRate");
+    if(rb_const_defined(rb_mConfig, framerate))
+        return normalize_long(rb_num2long(rb_const_get(rb_mConfig, framerate)), 1, 120);
+    return 60;
+}
+
+bool local_LoadVSYNCFromConfigs()
+{
+    ID vsync = rb_intern("Vsync");
+    if(rb_const_defined(rb_mConfig, vsync))
+        return RTEST(rb_const_get(rb_mConfig, vsync));
+    return true;
+}
+
+bool local_LoadFullScreenFromConfigs()
+{
+    ID fsc = rb_intern("FullScreen");
+    if(rb_const_defined(rb_mConfig, fsc))
+        return RTEST(rb_const_get(rb_mConfig, fsc));
+    return false;
+}
+
+void local_LoadSmoothScreenFromConfigs()
+{
+    ID fsc = rb_intern("SmoothScreen");
+    if(rb_const_defined(rb_mConfig, fsc))
+        SmoothScreen = RTEST(rb_const_get(rb_mConfig, fsc));
+    else
+        SmoothScreen = false;
+}
+
+void local_Graphics_TransitionBasic(VALUE self, long time)
+{
+	RGSSTransition = false;
+	sf::Color freeze_color(255, 255, 225, 255);
+	for (long i = 1; i <= time; i++)
+	{
+		freeze_color.a = 255 * (time - i) / time;
+		Graphics_freeze_sprite->setColor(freeze_color);
+		rb_Graphics_update(self);
+	}
+}
+
+void local_Graphics_TransitionRGSS(VALUE self, long time, VALUE bitmap)
+{
+	Graphics_freeze_sprite->setColor(sf::Color(255, 255, 255, 255));
+	RGSSTransition = true;
+	Graphics_freeze_shader->setUniform("transition", *rb_Bitmap_getTexture(bitmap));
+	for (long i = 1; i <= time; i++)
+	{
+		Graphics_freeze_shader->setUniform("param", static_cast<float>(i) / time);
+		rb_Graphics_update(self);
+	}
+}
+
+const std::string GraphicsTransitionFragmentShader = \
+	"uniform float param;" \
+	"uniform sampler2D texture;" \
+	"uniform sampler2D transition;" \
+	"const float sensibilite = 0.05;" \
+	"const float scale = 1.0 + sensibilite;" \
+	"void main()" \
+	"{" \
+	"  vec4 frag = texture2D(texture, gl_TexCoord[0].xy);" \
+	"  vec4 tran = texture2D(transition, gl_TexCoord[0].xy);" \
+	"  float pixel = max(max(tran.r, tran.g), tran.b);" \
+	"  pixel -= (param * scale);" \
+	"  if(pixel < sensibilite)" \
+	"  {" \
+	"    frag.a = max(0.0, sensibilite + pixel / sensibilite);" \
+	"  }" \
+	"  gl_FragColor = frag;" \
+	"}";
+
+void local_Graphics_LoadShader()
+{
+	Graphics_freeze_shader = new sf::Shader();
+	Graphics_freeze_shader->loadFromMemory(GraphicsTransitionFragmentShader, sf::Shader::Type::Fragment);
+}
+
+void local_Graphics_Take_Snapshot(sf::Texture* text)
+{
+    sf::Vector2u sc_sz = game_window->getSize();
+    int x = 0;
+    int y = 0;
+    int sw = ScreenWidth * Graphics_Scale;
+    int sh = ScreenHeight * Graphics_Scale;
+    if(sc_sz.x < sw)
+    {
+        x = sw - sc_sz.x;
+    }
+    else
+        sw = sc_sz.x;
+    if(sc_sz.y < sh)
+    {
+        y = sh - sc_sz.y;
+    }
+    else
+        sh = sc_sz.y;
+    text->create(sw, sh);
+    text->update(*game_window, x, y);
+}
+
+void local_Graphics_initRender()
+{
+	if (Graphics_Render == nullptr && Graphics_States != nullptr)
+	{
+		Graphics_Render = new sf::RenderTexture();
+		Graphics_Render->create(ScreenWidth, ScreenHeight);
+	}
+}
+
+VALUE local_Graphics_Dispose_Bitmap(VALUE block_arg, VALUE data, int argc, VALUE* argv)
+{
+    if(RDATA(block_arg)->data != nullptr)
+        rb_Bitmap_Dispose(block_arg);
+}
+
+void local_Graphics_Clear_Stack()
+{
+    //std::cout << "CLEAN STACK" << std::endl;
+    VALUE table = rb_ivar_get(rb_mGraphics, rb_iElementTable);
+    long sz = RARRAY_LEN(table);
+    VALUE* ori = RARRAY_PTR(table);
+    /* Disposing each Sprite/Viewport/Text */
+    for(long i = 0; i < sz; i++)
+    {
+        if(rb_obj_is_kind_of(ori[i], rb_cViewport) == Qtrue)
+        {
+            if(RDATA(ori[i])->data != nullptr)
+                rb_Viewport_Dispose(ori[i]);
+        }
+        else if(rb_obj_is_kind_of(ori[i], rb_cSprite) == Qtrue)
+            rb_Sprite_DisposeFromViewport(ori[i]);
+        else if(rb_obj_is_kind_of(ori[i], rb_cText) == Qtrue)
+            rb_Text_DisposeFromViewport(ori[i]);
+    }
+    rb_ary_clear(table);
+    /* Disposing each Bitmap */
+    rb_block_call(rb_const_get(rb_cObject, rb_intern("ObjectSpace")), rb_intern("each_object"), 1, &rb_cBitmap,
+    (rb_block_call_func_t)local_Graphics_Dispose_Bitmap, Qnil);
+    rb_gc_start();
+}

data/ext/LiteRGSS/Graphics.local.h

@@ -0,0 +1,37 @@
+#ifndef L_GRAPHICS_LOCAL_H
+#define L_GRAPHICS_LOCAL_H
+#include "LiteRGSS.h"
+
+struct GraphicUpdateMessage {
+    VALUE errorObject;
+    const char* message;
+};
+
+void local_LoadVideoModeFromConfigs(sf::VideoMode& vmode);
+const sf::String local_LoadTitleFromConfigs();
+unsigned int local_LoadFrameRateFromConfigs();
+bool local_LoadVSYNCFromConfigs();
+bool local_LoadFullScreenFromConfigs();
+void local_LoadSmoothScreenFromConfigs();
+void* local_Graphics_Update_Internal(void* data);
+VALUE local_Graphics_Update_RaiseError(VALUE self, GraphicUpdateMessage* message);
+void local_Graphics_Update_Process_Event(GraphicUpdateMessage*& message);
+void local_Graphics_Update_Draw(std::vector<CDrawable_Element*>* stack);
+void local_Graphics_Take_Snapshot(sf::Texture* text);
+void local_Graphics_Clear_Stack();
+void local_Graphics_TransitionBasic(VALUE self, long time);
+void local_Graphics_TransitionRGSS(VALUE self, long time, VALUE bitmap);
+void local_Graphics_LoadShader();
+void local_Graphics_DrawBrightness();
+void local_Graphics_initRender();
+
+extern sf::RenderWindow* game_window;
+extern bool InsideGraphicsUpdate;
+extern sf::Texture* Graphics_freeze_texture;
+extern sf::Sprite* Graphics_freeze_sprite;
+extern sf::Shader* Graphics_freeze_shader;
+extern unsigned char Graphics_Brightness;
+extern sf::RenderTexture* Graphics_Render;
+extern sf::RenderStates* Graphics_States;
+
+#endif

data/ext/LiteRGSS/Image.cpp

@@ -0,0 +1,460 @@
+#include "LiteRGSS.h"
+#include "CBitmap_Element.h"
+#include "CRect_Element.h"
+
+VALUE rb_cImage = Qnil;
+
+#define IMAGE_PROTECT if(RDATA(self)->data == nullptr) \
+{\
+    rb_raise(rb_eRGSSError, "Disposed Image."); \
+}
+
+#define GET_IMAGE sf::Image* img; \
+    Data_Get_Struct(self, sf::Image, img); \
+    IMAGE_PROTECT \
+
+void rb_Image_Free(void* data)
+{
+    sf::Image* img = reinterpret_cast<sf::Image*>(data);
+    if(img != nullptr)
+    {
+        delete img;
+    }
+}
+
+VALUE rb_Image_Alloc(VALUE klass)
+{
+    sf::Image* img = new sf::Image();
+    return Data_Wrap_Struct(klass, NULL, rb_Image_Free, img);
+}
+
+void Init_Image()
+{
+    rb_cImage = rb_define_class_under(rb_mLiteRGSS, "Image", rb_cObject);
+    rb_define_alloc_func(rb_cImage, rb_Image_Alloc);
+    rb_define_method(rb_cImage, "initialize", _rbf rb_Image_Initialize, -1);
+    rb_define_method(rb_cImage, "initialize_copy", _rbf rb_Image_Initialize_Copy, 1);
+    rb_define_method(rb_cImage, "dispose", _rbf rb_Image_Dispose, 0);
+    rb_define_method(rb_cImage, "disposed?", _rbf rb_Image_Disposed, 0);
+    rb_define_method(rb_cImage, "width", _rbf rb_Image_Width, 0);
+    rb_define_method(rb_cImage, "height", _rbf rb_Image_Height, 0);
+    rb_define_method(rb_cImage, "rect", _rbf rb_Image_Rect, 0);
+    rb_define_method(rb_cImage, "copy_to_bitmap", _rbf rb_Image_Copy_to_Bitmap, 1);
+    rb_define_method(rb_cImage, "blt", _rbf rb_Image_blt, 4);
+    rb_define_method(rb_cImage, "blt!", _rbf rb_Image_blt_fast, 4);
+	rb_define_method(rb_cImage, "stretch_blt", _rbf rb_Image_stretch_blt, 3);
+	rb_define_method(rb_cImage, "stretch_blt!", _rbf rb_Image_stretch_blt_fast, 3);
+	rb_define_method(rb_cImage, "get_pixel", _rbf rb_Image_get_pixel, 2);
+	rb_define_method(rb_cImage, "get_pixel_alpha", _rbf rb_Image_get_pixel_alpha, 2);
+	rb_define_method(rb_cImage, "set_pixel", _rbf rb_Image_set_pixel, 3);
+    rb_define_method(rb_cImage, "clear_rect", _rbf rb_Image_clear_rect, 4);
+    rb_define_method(rb_cImage, "fill_rect", _rbf rb_Image_fill_rect, 5);
+	rb_define_method(rb_cImage, "create_mask", _rbf rb_Image_create_mask, 2);
+    rb_define_method(rb_cImage, "to_png", _rbf rb_Image_toPNG, 0);
+    rb_define_method(rb_cImage, "to_png_file", _rbf rb_Image_toPNG_file, 1);
+}
+
+VALUE rb_Image_Initialize(int argc, VALUE *argv, VALUE self)
+{
+    VALUE string, fromMemory;
+    GET_IMAGE
+    rb_scan_args(argc, argv, "11", &string, &fromMemory);
+    /* Load From filename */
+    if(NIL_P(fromMemory))
+    {
+        rb_check_type(string, T_STRING);
+		if(!rb_Image_LoadLodePNG(img, RSTRING_PTR(string), 0))
+			if(!img->loadFromFile(RSTRING_PTR(string)))
+			{
+				errno = ENOENT;
+				rb_sys_fail(RSTRING_PTR(string));
+			}
+    }
+    /* Load From Memory */
+    else if(fromMemory == Qtrue)
+    {
+        rb_check_type(string, T_STRING);
+		if(!rb_Image_LoadLodePNG(img, RSTRING_PTR(string), RSTRING_LEN(string)))
+			if(!img->loadFromMemory(RSTRING_PTR(string), RSTRING_LEN(string)))
+				rb_raise(rb_eRGSSError, "Failed to load image from memory.");
+    }
+    else
+    {
+        rb_check_type(string, T_FIXNUM);
+        rb_check_type(fromMemory, T_FIXNUM);
+        img->create(rb_num2long(string), rb_num2long(fromMemory), sf::Color(0, 0, 0, 0));
+        //rb_raise(rb_eRGSSError, "Bitmap no longer allow drawing, thus Bitmap.new(width, height) is not allowed.");
+    }
+    return self;
+}
+
+VALUE rb_Image_Initialize_Copy(VALUE self, VALUE other)
+{
+    //rb_notimplement();
+    rb_check_frozen(self);
+    if(rb_obj_is_kind_of(other, rb_cImage) != Qtrue)
+    {
+        rb_raise(rb_eTypeError, "Cannot clone %s into Image.", RSTRING_PTR(rb_class_name(CLASS_OF(other))));
+        return self;
+    }
+    sf::Image* img;
+    sf::Image* imgo;
+    Data_Get_Struct(self, sf::Image, img);
+    Data_Get_Struct(other, sf::Image, imgo);
+    if(imgo == nullptr)
+        rb_raise(rb_eRGSSError, "Disposed Image.");
+    img->create(imgo->getSize().x, imgo->getSize().y, imgo->getPixelsPtr());
+    return self;
+}
+
+VALUE rb_Image_Dispose(VALUE self)
+{
+    GET_IMAGE
+    delete img;
+    RDATA(self)->data = nullptr;
+    return self;
+}
+
+VALUE rb_Image_Disposed(VALUE self)
+{
+    rb_check_type(self, T_DATA);
+    return (RDATA(self)->data == nullptr ? Qtrue : Qfalse);
+}
+
+VALUE rb_Image_Width(VALUE self)
+{
+    GET_IMAGE
+    sf::Vector2u size = img->getSize();
+    return rb_int2inum(size.x);
+}
+
+VALUE rb_Image_Height(VALUE self)
+{
+    GET_IMAGE
+    sf::Vector2u size = img->getSize();
+    return rb_int2inum(size.y);
+}
+
+VALUE rb_Image_Rect(VALUE self)
+{
+    GET_IMAGE
+    sf::Vector2u size = img->getSize();
+    VALUE argv[4] = {LONG2FIX(0), LONG2FIX(0), rb_int2inum(size.x), rb_int2inum(size.y)};
+    return rb_class_new_instance(4, argv, rb_cRect);
+}
+
+VALUE rb_Image_Copy_to_Bitmap(VALUE self, VALUE bitmap)
+{
+    GET_IMAGE
+    rb_Bitmap_getTexture(bitmap)->update(*img);
+    return self;
+}
+
+VALUE rb_Image_blt_fast(VALUE self, VALUE x, VALUE y, VALUE src_image, VALUE rect)
+{
+    GET_IMAGE
+    sf::Image* img2 = rb_Image_get_image(src_image);
+    CRect_Element* s_rect = rb_Rect_get_rect(rect);
+    img->copy(
+        *img2,
+        NUM2ULONG(x),
+        NUM2ULONG(y),
+        *s_rect->getRect()
+    );
+    return self;
+}
+
+VALUE rb_Image_blt(VALUE self, VALUE x, VALUE y, VALUE src_image, VALUE rect)
+{
+    GET_IMAGE
+    sf::Image* img2 = rb_Image_get_image(src_image);
+    CRect_Element* s_rect = rb_Rect_get_rect(rect);
+    img->copy(
+        *img2,
+        NUM2ULONG(x),
+        NUM2ULONG(y),
+        *s_rect->getRect(),
+		true
+    );
+    return self;
+}
+
+VALUE rb_Image_clear_rect(VALUE self, VALUE x, VALUE y, VALUE width, VALUE height)
+{
+	GET_IMAGE
+	rb_check_type(x, T_FIXNUM);
+	rb_check_type(y, T_FIXNUM);
+	rb_check_type(width, T_FIXNUM);
+	rb_check_type(height, T_FIXNUM);
+	long x1 = NUM2LONG(x);
+	long x2 = NUM2LONG(width) + x1;
+	if (x1 < 0)
+		x1 = 0;
+	long y1 = NUM2LONG(y);
+	long y2 = NUM2LONG(height) + y1;
+	if (y1 < 0)
+		y1 = 0;
+	sf::Color clr = sf::Color(0, 0, 0, 0);
+	while (y1 < y2)
+	{
+		for (long x3 = x1; x3 < x2; x3++)
+			img->setPixel(x3, y1, clr);
+		y1++;
+	}
+	return self;
+}
+
+VALUE rb_Image_fill_rect(VALUE self, VALUE x, VALUE y, VALUE width, VALUE height, VALUE color)
+{
+	GET_IMAGE;
+	if (rb_obj_is_kind_of(color, rb_cColor) != Qtrue)
+		return self;
+	sf::Color* rcolor;
+	Data_Get_Struct(color, sf::Color, rcolor);
+	rb_check_type(x, T_FIXNUM);
+	rb_check_type(y, T_FIXNUM);
+	rb_check_type(width, T_FIXNUM);
+	rb_check_type(height, T_FIXNUM);
+	long x1 = NUM2LONG(x);
+	long x2 = NUM2LONG(width) + x1;
+	if (x1 < 0)
+		x1 = 0;
+	long y1 = NUM2LONG(y);
+	long y2 = NUM2LONG(height) + y1;
+	if (y1 < 0)
+		y1 = 0;
+	while (y1 < y2)
+	{
+		for (long x3 = x1; x3 < x2; x3++)
+			img->setPixel(x3, y1, *rcolor);
+		y1++;
+	}
+	return self;
+}
+
+VALUE rb_Image_toPNG(VALUE self)
+{
+	GET_IMAGE;
+	unsigned char* out;
+	size_t size;
+	if (lodepng_encode32(&out, &size, img->getPixelsPtr(), img->getSize().x, img->getSize().y) != 0)
+	{
+		if (out)
+			free(out);
+		return Qnil;
+	}
+	VALUE ret_val = rb_str_new(reinterpret_cast<const char*>(out), size);
+	free(out);
+	return ret_val;
+}
+
+VALUE rb_Image_toPNG_file(VALUE self, VALUE filename)
+{
+	rb_check_type(filename, T_STRING);
+	GET_IMAGE;
+	if (lodepng_encode32_file(RSTRING_PTR(filename), img->getPixelsPtr(), img->getSize().x, img->getSize().y) != 0)
+		return Qfalse;
+	return Qtrue;
+}
+
+VALUE rb_Image_get_pixel(VALUE self, VALUE x, VALUE y)
+{
+	GET_IMAGE;
+	unsigned long px = NUM2ULONG(x);
+	unsigned long py = NUM2ULONG(y);
+	sf::Vector2u size = img->getSize();
+	if (px < size.x && py < size.y)
+	{
+		sf::Color color = img->getPixel(px, py);
+		VALUE argv[4] = { LONG2FIX(color.r), LONG2FIX(color.g), LONG2FIX(color.b), LONG2FIX(color.a) };
+		return rb_class_new_instance(4, argv, rb_cColor);
+	}
+	return Qnil;
+}
+
+VALUE rb_Image_get_pixel_alpha(VALUE self, VALUE x, VALUE y)
+{
+	GET_IMAGE;
+	unsigned long px = NUM2ULONG(x);
+	unsigned long py = NUM2ULONG(y);
+	sf::Vector2u size = img->getSize();
+	if (px < size.x && py < size.y)
+	{
+		sf::Color color = img->getPixel(px, py);
+		return LONG2FIX(color.a);
+	}
+	return LONG2FIX(0);
+}
+
+VALUE rb_Image_set_pixel(VALUE self, VALUE x, VALUE y, VALUE color)
+{
+	GET_IMAGE;
+	unsigned long px = NUM2ULONG(x);
+	unsigned long py = NUM2ULONG(y);
+	sf::Vector2u size = img->getSize();
+	if (px < size.x && py < size.y)
+	{
+		sf::Color* color2 = rb_Color_get_color(color);
+		Data_Get_Struct(color, sf::Color, color2);
+		if(color2 != nullptr)
+			img->setPixel(px, py, *color2);
+	}
+	return self;
+}
+
+VALUE rb_Image_stretch_blt_fast(VALUE self, VALUE dest_rect, VALUE src_image, VALUE src_rect)
+{
+	GET_IMAGE;
+	CRect_Element* dst_rc = rb_Rect_get_rect(dest_rect);
+	CRect_Element* src_rc = rb_Rect_get_rect(src_rect);
+	sf::Image* src_img = rb_Image_get_image(src_image);
+	int s_w = src_rc->getRect()->width;
+	int d_w = dst_rc->getRect()->width;
+	int s_h = src_rc->getRect()->height;
+	int d_h = dst_rc->getRect()->height;
+	int os_x = src_rc->getRect()->left;
+	int os_y = src_rc->getRect()->top;
+	int od_x = dst_rc->getRect()->left;
+	int od_y = dst_rc->getRect()->top;
+	sf::Vector2u simg_size = src_img->getSize();
+	sf::Vector2u dimg_size = img->getSize();
+	int s_x, s_y, d_x, d_y;
+	for (int y = 0; y < d_h; y++)
+	{
+		d_y = y + od_y;
+		if (d_y >= dimg_size.y)
+			break;
+		if (d_y < 0)
+			continue;
+		s_y = y * s_h / d_h + os_y;
+		if (s_y >= simg_size.y)
+			break;
+		if (s_y < 0)
+			continue;
+		for (int x = 0; x < d_w; x++)
+		{
+			d_x = x + od_x;
+			if (d_x >= dimg_size.x)
+				break;
+			if (d_x < 0)
+				continue;
+			s_x = x * s_w / d_w + os_x;
+			if (s_x >= simg_size.x)
+				break;
+			if (s_x < 0)
+				continue;
+			img->setPixel(d_x, d_y, src_img->getPixel(s_x, s_y));
+		}
+	}
+	return self;
+}
+
+VALUE rb_Image_stretch_blt(VALUE self, VALUE dest_rect, VALUE src_image, VALUE src_rect)
+{
+	GET_IMAGE;
+	CRect_Element* dst_rc = rb_Rect_get_rect(dest_rect);
+	CRect_Element* src_rc = rb_Rect_get_rect(src_rect);
+	sf::Image* src_img = rb_Image_get_image(src_image);
+	sf::Color src, dest;
+	int s_w = src_rc->getRect()->width;
+	int d_w = dst_rc->getRect()->width;
+	int s_h = src_rc->getRect()->height;
+	int d_h = dst_rc->getRect()->height;
+	int os_x = src_rc->getRect()->left;
+	int os_y = src_rc->getRect()->top;
+	int od_x = dst_rc->getRect()->left;
+	int od_y = dst_rc->getRect()->top;
+	sf::Vector2u simg_size = src_img->getSize();
+	sf::Vector2u dimg_size = img->getSize();
+	int s_x, s_y, d_x, d_y;
+	unsigned char mina;
+	for (int y = 0; y < d_h; y++)
+	{
+		d_y = y + od_y;
+		if (d_y >= dimg_size.y)
+			break;
+		if (d_y < 0)
+			continue;
+		s_y = y * s_h / d_h + os_y;
+		if (s_y >= simg_size.y)
+			break;
+		if (s_y < 0)
+			continue;
+		for (int x = 0; x < d_w; x++)
+		{
+			d_x = x + od_x;
+			if (d_x >= dimg_size.x)
+				break;
+			if (d_x < 0)
+				continue;
+			s_x = x * s_w / d_w + os_x;
+			if (s_x >= simg_size.x)
+				break;
+			if (s_x < 0)
+				continue;
+			src = src_img->getPixel(s_x, s_y);
+			dest = img->getPixel(d_x, d_y);
+			if(dest.a > 0)
+			{
+				mina = 255 - src.a;
+				src.r = (src.r * src.a + dest.r * mina) / 255;
+				src.g = (src.g * src.a + dest.g * mina) / 255;
+				src.b = (src.b * src.a + dest.b * mina) / 255;
+				src.a += (dest.a * mina / 255);
+			}
+			img->setPixel(d_x, d_y, src);
+		}
+	}
+	return self;
+}
+
+VALUE rb_Image_create_mask(VALUE self, VALUE color, VALUE alpha)
+{
+	GET_IMAGE;
+	sf::Color* col = rb_Color_get_color(color);
+	img->createMaskFromColor(*col, NUM2ULONG(alpha));
+	return self;
+}
+
+sf::Image* rb_Image_get_image(VALUE self)
+{
+	rb_Image_test_image(self);
+	GET_IMAGE;
+	return img;
+}
+
+void rb_Image_test_image(VALUE self)
+{
+	if (rb_obj_is_kind_of(self, rb_cImage) != Qtrue)
+	{
+		rb_raise(rb_eTypeError, "Expected Image got %s.", RSTRING_PTR(rb_class_name(CLASS_OF(self))));
+	}
+}
+
+bool rb_Image_LoadLodePNG(sf::Image* img, char* str, long from_memory_size)
+{
+	unsigned char* out = nullptr;
+	unsigned w;
+	unsigned h;
+	if (from_memory_size > 0)
+	{
+		if (lodepng_decode32(&out, &w, &h, reinterpret_cast<unsigned char*>(str), from_memory_size) != 0)
+		{
+			if (out)
+				free(out);
+			return false;
+		}
+	}
+	else
+	{
+		if (lodepng_decode32_file(&out, &w, &h, str) != 0)
+		{
+			if (out)
+				free(out);
+			return false;
+		}
+	}
+	img->create(w, h, reinterpret_cast<sf::Uint8*>(out));
+	free(out);
+	return true;
+}