443 lines
14 KiB
D
443 lines
14 KiB
D
module otya.smilebasic.graphic;
|
|
import derelict.sdl2.sdl;
|
|
import derelict.sdl2.image;
|
|
import derelict.opengl3.gl;
|
|
import derelict.opengl3.gl3;
|
|
import otya.smilebasic.petitcomputer;
|
|
|
|
class Graphic
|
|
{
|
|
PetitComputer petitcom;
|
|
this(PetitComputer p)
|
|
{
|
|
petitcom = p;
|
|
//nnnue
|
|
paint.buffer = new uint[512 * 512];
|
|
}
|
|
|
|
bool visibleGRP = true;
|
|
private int[2] showPage = [0, 1];
|
|
private int[2] usePage = [0, 1];
|
|
@property int useGRP()
|
|
{
|
|
return usePage[petitcom.displaynum];
|
|
}
|
|
@property int showGRP()
|
|
{
|
|
return showPage[petitcom.displaynum];
|
|
}
|
|
@property void useGRP(int page)
|
|
{
|
|
usePage[petitcom.displaynum] = page;
|
|
}
|
|
@property void showGRP(int page)
|
|
{
|
|
showPage[petitcom.displaynum] = page;
|
|
}
|
|
uint gcolor = -1;
|
|
GraphicPage[] GRP;
|
|
struct Paint
|
|
{
|
|
uint[] buffer;
|
|
static const MAXSIZE = 1024; /* バッファサイズ */
|
|
|
|
/* 画面サイズは 1024 X 1024 とする */
|
|
static const MINX = 0;
|
|
static const MINY = 0;
|
|
static const MAXX = 511;
|
|
static const MAXY = 511;
|
|
|
|
struct BufStr {
|
|
int lx; /* 領域右端のX座標 */
|
|
int rx; /* 領域右端のX座標 */
|
|
int y; /* 領域のY座標 */
|
|
int oy; /* 親ラインのY座標 */
|
|
};
|
|
BufStr buff[MAXSIZE]; /* シード登録用バッファ */
|
|
BufStr* sIdx, eIdx; /* buffの先頭・末尾ポインタ */
|
|
uint point(int x, int y)
|
|
{
|
|
return buffer.ptr[x + y * 512];
|
|
}
|
|
void pset(int x, int y, uint col)
|
|
{
|
|
buffer.ptr[x + y * 512] = col;
|
|
}
|
|
/*
|
|
scanLine : 線分からシードを探索してバッファに登録する
|
|
|
|
int lx, rx : 線分のX座標の範囲
|
|
int y : 線分のY座標
|
|
int oy : 親ラインのY座標
|
|
unsigned int col : 領域色
|
|
*/
|
|
void scanLine( int lx, int rx, int y, int oy, uint col )
|
|
{
|
|
while ( lx <= rx ) {
|
|
|
|
/* 非領域色を飛ばす */
|
|
for ( ; lx < rx ; lx++ )
|
|
if ( point( lx, y ) == col ) break;
|
|
if ( point( lx, y ) != col ) break;
|
|
|
|
eIdx.lx = lx;
|
|
|
|
/* 領域色を飛ばす */
|
|
for ( ; lx <= rx ; lx++ )
|
|
if ( point( lx, y ) != col ) break;
|
|
|
|
eIdx.rx = lx - 1;
|
|
eIdx.y = y;
|
|
eIdx.oy = oy;
|
|
|
|
if ( ++eIdx == &buff.ptr[MAXSIZE] )
|
|
eIdx = buff.ptr;
|
|
}
|
|
}
|
|
|
|
/*
|
|
paint : 塗り潰し処理(高速版)
|
|
|
|
int x, y : 開始座標
|
|
unsigned int paintCol : 塗り潰す時の色(描画色)
|
|
*/
|
|
void paint( int x, int y, uint paintCol , out int dx, out int dy, out int dx2, out int dy2)
|
|
{
|
|
int lx, rx; /* 塗り潰す線分の両端のX座標 */
|
|
int ly; /* 塗り潰す線分のY座標 */
|
|
int oy; /* 親ラインのY座標 */
|
|
int i;
|
|
uint col = point( x, y ); /* 閉領域の色(領域色) */
|
|
dx = int.max, dy = int.max, dx2 = int.min, dy2 = int.min;
|
|
if ( col == paintCol ) return; /* 領域色と描画色が等しければ処理不要 */
|
|
sIdx = buff.ptr;
|
|
eIdx = buff.ptr + 1;
|
|
sIdx.lx = sIdx.rx = x;
|
|
sIdx.y = sIdx.oy = y;
|
|
|
|
do {
|
|
lx = sIdx.lx;
|
|
rx = sIdx.rx;
|
|
ly = sIdx.y;
|
|
oy = sIdx.oy;
|
|
|
|
int lxsav = lx - 1;
|
|
int rxsav = rx + 1;
|
|
|
|
if ( ++sIdx == &buff.ptr[MAXSIZE] ) sIdx = buff.ptr;
|
|
|
|
/* 処理済のシードなら無視 */
|
|
if ( point( lx, ly ) != col )
|
|
continue;
|
|
|
|
/* 右方向の境界を探す */
|
|
while ( rx < MAXX ) {
|
|
if ( point( rx + 1, ly ) != col ) break;
|
|
rx++;
|
|
}
|
|
/* 左方向の境界を探す */
|
|
while ( lx > MINX ) {
|
|
if ( point( lx - 1, ly ) != col ) break;
|
|
lx--;
|
|
}
|
|
import std.algorithm;
|
|
dy = min(dy, ly);
|
|
dy2 = max(dy2, ly);
|
|
dx = min(dx, lx);
|
|
dx2 = max(dx2, rx);
|
|
//
|
|
/* lx-rxの線分を描画 */
|
|
for ( i = lx; i <= rx; i++ ) pset( i, ly, paintCol );
|
|
|
|
/* 真上のスキャンラインを走査する */
|
|
if ( ly - 1 >= MINY ) {
|
|
if ( ly - 1 == oy ) {
|
|
scanLine( lx, lxsav, ly - 1, ly, col );
|
|
scanLine( rxsav, rx, ly - 1, ly, col );
|
|
} else {
|
|
scanLine( lx, rx, ly - 1, ly, col );
|
|
}
|
|
}
|
|
|
|
/* 真下のスキャンラインを走査する */
|
|
if ( ly + 1 <= MAXY ) {
|
|
if ( ly + 1 == oy ) {
|
|
scanLine( lx, lxsav, ly + 1, ly, col );
|
|
scanLine( rxsav, rx, ly + 1, ly, col );
|
|
} else {
|
|
scanLine( lx, rx, ly + 1, ly, col );
|
|
}
|
|
}
|
|
|
|
} while ( sIdx != eIdx );
|
|
}
|
|
void gpaintBuffer(uint* pixels, int x, int y, uint color, GLenum tf)
|
|
{
|
|
int dx, dy, dx2, dy2;
|
|
paint(x, y, color, dx, dy, dx2, dy2);
|
|
if(dx == int.max) return;
|
|
int h = dy2 - dy;
|
|
glTexSubImage2D(GL_TEXTURE_2D , 0, 0, dy, 512, h, tf, GL_UNSIGNED_BYTE, pixels + (dy * 512));
|
|
// glDrawPixels(512, dy2, tf, GL_UNSIGNED_BYTE, buffer.ptr);
|
|
}
|
|
}
|
|
Paint paint;
|
|
void drawCircle(int x, int y, int r, int startr, int endr, int flag)
|
|
{
|
|
import std.math : sin, cos, PI;
|
|
int count = r;
|
|
glBegin(GL_LINE_LOOP);
|
|
for (int i = 0; i <= r; i++)
|
|
{
|
|
//float a = i * (360f / r);
|
|
glVertex2f(sin(cast(float)i / count * 2f * PI) * r + x, cos(cast(float)i / count * 2f * PI) * r + y);
|
|
}
|
|
glEnd();
|
|
}
|
|
void draw()
|
|
{
|
|
if(!drawMessageLength) return;
|
|
drawflag = true;
|
|
//betuni kouzoutai demo sonnnani sokudo kawaranasasou
|
|
auto len = drawMessageLength;
|
|
int s = petitcom.renderstartpos;
|
|
GLint old;
|
|
auto a = &glBindFramebuffer;
|
|
glGetIntegerv(GL_FRAMEBUFFER_BINDING, &old);
|
|
int oldpage = drawMessageQueue[0].page;
|
|
glBindFramebufferEXT(GL_FRAMEBUFFER, this.GRP[oldpage].buffer);
|
|
glDisable(GL_TEXTURE_2D);
|
|
glDisable(GL_ALPHA_TEST);
|
|
glDisable(GL_DEPTH_TEST);
|
|
|
|
//glAlphaFunc(GL_GEQUAL, 0.0);
|
|
void chScreen(int x, int y, int w, int h)
|
|
{
|
|
glViewport(x, y, w, h);
|
|
glMatrixMode(GL_PROJECTION);
|
|
glLoadIdentity();
|
|
glOrtho(0, w, 0, h, -256, 1024);//wakaranai
|
|
}
|
|
chScreen(0, 0, 511, 511);
|
|
DrawType dt;
|
|
auto start = SDL_GetTicks();
|
|
int i = s;
|
|
static const size = 255.5f;
|
|
for(; i < len; i++)
|
|
{
|
|
DrawMessage dm = drawMessageQueue[i];
|
|
if(oldpage != dm.page)
|
|
{
|
|
oldpage = dm.page;
|
|
glBindFramebufferEXT(GL_FRAMEBUFFER, this.GRP[oldpage].buffer);
|
|
}
|
|
switch(dm.type)
|
|
{
|
|
case DrawType.PSET:
|
|
glBegin(GL_POINTS);
|
|
glColor4ubv(cast(ubyte*)&dm.color);
|
|
glVertex2f(dm.x, dm.y);
|
|
glEnd();
|
|
break;
|
|
case DrawType.LINE:
|
|
{
|
|
glBegin(GL_LINES);
|
|
glColor4ubv(cast(ubyte*)&dm.color);
|
|
glVertex2f(dm.x, dm.y);
|
|
glVertex2f(dm.x2, dm.y2);
|
|
//glFlush();
|
|
glEnd();
|
|
}
|
|
break;
|
|
case DrawType.FILL:
|
|
{
|
|
glBegin(GL_QUADS);
|
|
glColor4ubv(cast(ubyte*)&dm.color);
|
|
glVertex2f(dm.x, dm.y);
|
|
glVertex2f(dm.x, dm.y2);
|
|
glVertex2f(dm.x2, dm.y2);
|
|
glVertex2f(dm.x2, dm.y);
|
|
glEnd();
|
|
}
|
|
break;
|
|
case DrawType.BOX:
|
|
{
|
|
glBegin(GL_LINE_LOOP);
|
|
glColor4ubv(cast(ubyte*)&dm.color);
|
|
glVertex2f(dm.x, dm.y);
|
|
glVertex2f(dm.x, dm.y2);
|
|
glVertex2f(dm.x2, dm.y2);
|
|
glVertex2f(dm.x2, dm.y);
|
|
glEnd();
|
|
}
|
|
break;
|
|
case DrawType.PAINT:
|
|
{
|
|
glBindTexture(GL_TEXTURE_2D, GRP[oldpage].glTexture);
|
|
if(dt != DrawType.PAINT)
|
|
{
|
|
glFinish();
|
|
//glGetTexImage(GL_TEXTURE_2D,0,GRP[oldpage].textureFormat,GL_UNSIGNED_BYTE,buffer.ptr);
|
|
glReadPixels(0, 0, 512, 512, GRP[oldpage].textureFormat, GL_UNSIGNED_BYTE, paint.buffer.ptr);
|
|
}
|
|
paint.gpaintBuffer(paint.buffer.ptr, dm.x, dm.y, dm.color, GRP[oldpage].textureFormat);
|
|
//gpaintBufferExW(oldpage, dm.x, dm.y, dm.color);
|
|
if(SDL_GetTicks() - start >= 16 && i != len - 1)
|
|
{
|
|
s = i + 1;
|
|
goto brk;
|
|
}
|
|
}
|
|
break;
|
|
case DrawType.CIRCLE:
|
|
{
|
|
glColor4ubv(cast(ubyte*)&dm.color);
|
|
drawCircle(dm.x, dm.y, dm.circle.r, dm.circle.startr, dm.circle.endr, dm.circle.flag);
|
|
}
|
|
break;
|
|
default:
|
|
}
|
|
dt = dm.type;
|
|
}
|
|
brk:
|
|
if(i == len)
|
|
{
|
|
petitcom.renderstartpos = 0;
|
|
drawMessageLength = 0;
|
|
}
|
|
else
|
|
{
|
|
petitcom.renderstartpos = s;
|
|
}
|
|
glBindFramebufferEXT(GL_FRAMEBUFFER, old);
|
|
glEnable(GL_DEPTH_TEST);
|
|
drawflag = false;
|
|
glEnable(GL_ALPHA_TEST);
|
|
}
|
|
enum DrawType
|
|
{
|
|
CLEAR,
|
|
PSET,
|
|
LINE,
|
|
FILL,
|
|
BOX,
|
|
CIRCLE,
|
|
TRI,
|
|
PAINT,
|
|
}
|
|
struct Circle
|
|
{
|
|
short r, startr, endr;
|
|
short flag;
|
|
}
|
|
struct DrawMessage
|
|
{
|
|
DrawType type;
|
|
byte page;
|
|
short x;
|
|
short y;
|
|
uint color;
|
|
short x2;
|
|
short y2;
|
|
Circle circle;
|
|
//
|
|
}
|
|
static const int dmqqueuelen = 8192;
|
|
DrawMessage[] drawMessageQueue = new DrawMessage[dmqqueuelen];
|
|
int drawMessageLength;
|
|
bool drawflag;
|
|
void sendDrawMessage(DrawMessage dm)
|
|
{
|
|
//grpmutex.lock();
|
|
//scope(exit)
|
|
// grpmutex.unlock();
|
|
if(drawMessageLength >= dmqqueuelen)
|
|
{
|
|
while(drawMessageLength)
|
|
{
|
|
SDL_Delay(1);
|
|
}
|
|
}
|
|
while(drawflag){}
|
|
dm.color = petitcom.toGLColor(this.GRP[0].textureFormat, dm.color & 0xFFF8F8F8);
|
|
drawMessageQueue[drawMessageLength] = dm;
|
|
drawMessageLength++;
|
|
}
|
|
void sendDrawMessage(DrawType type, byte page, short x, short y, uint color)
|
|
{
|
|
DrawMessage dm;
|
|
dm.type = type;
|
|
dm.page = page;
|
|
dm.x = x;
|
|
dm.y = y;
|
|
dm.color = color;
|
|
sendDrawMessage(dm);
|
|
}
|
|
void sendDrawMessage(DrawType type, byte page, short x, short y, short x2, short y2, uint color)
|
|
{
|
|
DrawMessage dm;
|
|
dm.type = type;
|
|
dm.page = page;
|
|
dm.x = x;
|
|
dm.y = y;
|
|
dm.x2 = x2;
|
|
dm.y2 = y2;
|
|
dm.color = color;
|
|
sendDrawMessage(dm);
|
|
}
|
|
//TODO:範囲チェック
|
|
void gpset(int page, int x, int y, uint color)
|
|
{
|
|
sendDrawMessage(DrawType.PSET, cast(byte)page, cast(short)x, cast(short)y, color);
|
|
}
|
|
void gline(int page, int x, int y, int x2, int y2, uint color)
|
|
{
|
|
sendDrawMessage(DrawType.LINE, cast(byte)page, cast(short)x, cast(short)y, cast(short)x2, cast(short)y2, color);
|
|
}
|
|
void gbox(int page, int x, int y, int x2, int y2, uint color)
|
|
{
|
|
sendDrawMessage(DrawType.BOX, cast(byte)page, cast(short)x, cast(short)y, cast(short)x2, cast(short)y2, color);
|
|
}
|
|
void gfill(int page, int x, int y, int x2, int y2, uint color)
|
|
{
|
|
sendDrawMessage(DrawType.FILL, cast(byte)page, cast(short)x, cast(short)y, cast(short)x2, cast(short)y2, color);
|
|
}
|
|
void gpaint(int page, int x, int y, uint color)
|
|
{
|
|
sendDrawMessage(DrawType.PAINT, cast(byte)page, cast(short)x, cast(short)y, color);
|
|
}
|
|
void gcircle(int page, int x, int y, int r, int startr, int endr, int flag, uint color)
|
|
{
|
|
DrawMessage dm;
|
|
dm.page = cast(byte)page;
|
|
dm.x = cast(short)x;
|
|
dm.y = cast(short)y;
|
|
dm.circle.r = cast(short)r;
|
|
dm.circle.startr = cast(short)startr;
|
|
dm.circle.endr = cast(short)endr;
|
|
dm.circle.flag = cast(short)flag;
|
|
dm.color = color;
|
|
dm.type = DrawType.CIRCLE;
|
|
sendDrawMessage(dm);
|
|
}
|
|
int gprio;
|
|
void render(int display, float w, float h)
|
|
{
|
|
float z = gprio;
|
|
glColor3f(1.0, 1.0, 1.0);
|
|
glBindTexture(GL_TEXTURE_2D, GRP[showPage[display]].glTexture);
|
|
glEnable(GL_TEXTURE_2D);
|
|
glBegin(GL_QUADS);
|
|
glTexCoord2f(0 / 512f - 1 , h / 512f - 1);
|
|
glVertex3f(0, h, z);
|
|
glTexCoord2f(0 / 512f - 1, 0 / 512f - 1);
|
|
glVertex3f(0, 0, z);
|
|
glTexCoord2f(w / 512f - 1, 0 / 512f - 1);
|
|
glVertex3f(w, 0, z);
|
|
glTexCoord2f(w / 512f - 1, h / 512f - 1);
|
|
glVertex3f(w, h, z);
|
|
glEnd();
|
|
//glFlush();
|
|
}
|
|
}
|