ENIGMA Development Environment

Notice: These functions work with any sprite size, but the functionality in _ext differs from GM one. The difference is with scaling. x and y arguments, according to manual, is "(x,y) is the place where one of the sprites is drawn". In GM these arguments are modified with scaling, so, for example, when you have a 100x100 sprite, you tile it with 0.5 scale, and put 25 in x and y position, then you won't have a sprite drawn in 25,25 as manual suggests, but you will have one drawn at 12.5,12.5. In this code this it will be drawn in 25,25. This can be changed with two parenthesis, but I think this is how the function needed to work in the first place.

Function: draw_sprite_tiled(int spr,int subimg,double x,double y);

GSsprite.h:
int draw_sprite_tiled(int spr,int subimg,double x,double y);
GSsprite.cpp:
int draw_sprite_tiled(int spr,int subimg,double x,double y)
{
  enigma::sprite *spr2d = enigma::spritestructarray[spr];
  if (!spr2d)
    return -1;

  if (enigma::cur_bou_tha_noo_sho_eve_cha_eve != spr2d->texturearray[subimg % spr2d->subcount])
  {
    glBindTexture(GL_TEXTURE_2D,spr2d->texturearray[subimg % spr2d->subcount]);
    enigma::cur_bou_tha_noo_sho_eve_cha_eve = spr2d->texturearray[subimg % spr2d->subcount];
  }


  glTexParameteri(GL_TEXTURE_2D,GL_TEXTURE_WRAP_S,GL_CLAMP);
  glTexParameteri(GL_TEXTURE_2D,GL_TEXTURE_WRAP_T,GL_CLAMP);


  glPushAttrib(GL_CURRENT_BIT);
    glColor4f(1,1,1,1);

    const float tbx=spr2d->texbordx,tby=spr2d->texbordy,
        xoff=spr2d->xoffset+x,
        yoff=spr2d->yoffset+y;
    const int hortil= int (ceil(room_width/(spr2d->width*tbx))),
        vertil= int (ceil(room_height/(spr2d->height*tby)));
    glBegin(GL_QUADS);
    for (int i=0; i<hortil; i++){
        for (int c=0; c<vertil; c++){
      glTexCoord2f(0,0);
        glVertex2f(i*spr2d->width-xoff,c*spr2d->height-yoff);
      glTexCoord2f(tbx,0);
        glVertex2f((i+1)*spr2d->width-xoff,c*spr2d->height-yoff);
      glTexCoord2f(tbx,tby);
        glVertex2f((i+1)*spr2d->width-xoff,(c+1)*spr2d->height-yoff);
      glTexCoord2f(0,tby);
        glVertex2f(i*spr2d->width-xoff,(c+1)*spr2d->height-yoff);
        }
    }
    glEnd();

    glPopAttrib();
    return 0;
}
Function:draw_sprite_tiled_ext(int spr,int subimg,double x,double y,double xscale,double yscale,int color,double alpha);

GSsprite.h:
int draw_sprite_tiled_ext(int spr,int subimg,double x,double y,double xscale,double yscale,int color,double alpha);
GSsprite.cpp:
int draw_sprite_tiled_ext(int spr,int subimg,double x,double y, double xscale,double yscale,int color,double alpha)
{
  enigma::sprite *spr2d = enigma::spritestructarray[spr];
  if (!spr2d)
    return -1;

  if (enigma::cur_bou_tha_noo_sho_eve_cha_eve != spr2d->texturearray[subimg % spr2d->subcount])
  {
    glBindTexture(GL_TEXTURE_2D,spr2d->texturearray[subimg % spr2d->subcount]);
    enigma::cur_bou_tha_noo_sho_eve_cha_eve = spr2d->texturearray[subimg % spr2d->subcount];
  }

  glTexParameteri(GL_TEXTURE_2D,GL_TEXTURE_WRAP_S,GL_CLAMP);
  glTexParameteri(GL_TEXTURE_2D,GL_TEXTURE_WRAP_T,GL_CLAMP);


  glPushAttrib(GL_CURRENT_BIT);
  glColor4ub(__GETR(color),__GETG(color),__GETB(color),char(alpha*255));

    const float tbx=spr2d->texbordx,tby=spr2d->texbordy,
        xoff=spr2d->xoffset*xscale+x,
        yoff=spr2d->yoffset*yscale+y;
    const int hortil= int (ceil(room_width/(spr2d->width*tbx*xscale))),
        vertil= int (ceil(room_height/(spr2d->height*tby*yscale)));
    glBegin(GL_QUADS);
    for (int i=0; i<hortil; i++){
        for (int c=0; c<vertil; c++){
      glTexCoord2f(0,0);
        glVertex2f(i*spr2d->width*xscale-xoff,c*spr2d->height*yscale-yoff);
      glTexCoord2f(tbx,0);
        glVertex2f((i+1)*spr2d->width*xscale-xoff,c*spr2d->height*yscale-yoff);
      glTexCoord2f(tbx,tby);
        glVertex2f((i+1)*spr2d->width*xscale-xoff,(c+1)*spr2d->height*yscale-yoff);
      glTexCoord2f(0,tby);
        glVertex2f(i*spr2d->width*xscale-xoff,(c+1)*spr2d->height*yscale-yoff);
        }
    }
    glEnd();

    glPopAttrib();
    return 0;
}
In attachments you can see two images.
First one is: draw_sprite_tiled(spr_0,0,50,50);
Other one is: draw_sprite_tiled_ext(spr_0,0,25,25,0.5,0.5,c_yellow,0.5);

I actually like first two themes over the current LGM one. Maybe just because I am used to GM and its colors, but I do like the Window'y style and colors of the first one.

All other sprite functions use the same for alpha. But anyway, as this method doesn't really work, and as this function is almost never used, then I don't see any reason to continue this. I will wait until Josh creates framework for backgrounds and then I will add functions for that.

Ou I see. Didn't check for non ^2 sprites. Actually, I did want to make this function in another way (which is a lot slower, that is why in the end I did this). The slower way would be to just draw individual textures in a for loop (two for loops, or repeat or whatever). Thou this would just be like doing it the same in LGM with draw_sprite, so I guess its redundant. Anyway, I will look into backgrounds when all of the basic framework is there.

Something like enigme:room_width? Because room_width isn't declared in the functions scope and it trows an error.

edit: Nevermind. extern int room_width, room_height; fixed it.

Also, I know that backgroundstruct.h exists, but there are no GSbackground.h and .cpp files, so can I try to create them so I can make some background functions? Or is it better for me to wait a little so you can make them in the distribution?

How to interface with rooms? I am trying to make sprite_tiled, but I need to know room_width/room_height, or even better would be view_width and view_height, as that would make sprites tile only in view, and thus eliminate call when outside the screen.
I tried including roomsystem.h and then just use room_width and room_height, but it trows:

../../Universal_System/roomsystem.h:46: error: `string' does not name a type
../../Universal_System/roomsystem.h:85: error: `string' does not name a type
../../Universal_System/roomsystem.h:86: error: `string' does not name a type

So I guess its not what I want to include? I saw that there are file like GMinstance.h and another file instance.h, which looks similar in function, so are some files redundant?

Actually repeat crashes on me too. I wanted to report that, but I thought it just wasn't implemented. I just created one object, put "repeat (5) {}" in step event, and put the object in the room. And it crashes LGM with:

Event[3]: Parsing 1 sub-events:
Check "obj::step...Done. Starting parse..."
This application has requested the Runtime to terminate it in an unusual way.
Please contact the application's support team for more information.
poof.
poof.
poof.

Whats your OS ?

Win7 64bit.