1
0
Files
otyaSMILEBASIC/SMILEBASIC/console.d

680 lines
20 KiB
D

module otya.smilebasic.console;
import derelict.sdl2.sdl;
import derelict.sdl2.image;
import derelict.opengl3.gl;
import otya.smilebasic.petitcomputer;
import std.string;
import undead.string;
import std.stdio;
import std.file;
import std.conv;
import std.csv;
import std.net.curl;
import std.algorithm;
struct ConsoleCharacter
{
wchar character;
int foreColor;
int backColor;
ConsoleAttribute attr;
int z;
}
enum ConsoleAttribute
{
TROT0 = 0,
TROT90 = 1,
TROT180= 2,
TROT270 = 3,
TREVH = 4,
TREVV = 8,
}
struct FontRect
{
int x, y, w, h;
bool define = true;
}
class Console
{
//width 16,16 => return 16
int fontDefWidth()
{
return 8;
}
int fontDefHeight()
{
return 8;
}
int[2] fontWidths;
int[2] fontHeights;
int consoleWidthDisplay1;
int consoleHeightDisplay1;
int consoleWidth4;
int consoleHeight4;
int consoleHeightC, consoleWidthC;
ConsoleCharacter[][] consoleC;
int[] consoleColor =
[
0x00000000,
0xFF000000,
0xFF7F0000,
0xFFFF0000,
0xFF007F00,
0xFF00FF00,
0xFF7F7F00,
0xFFFFFF00,
0xFF00007F,
0xFF0000FF,
0xFF7F007F,
0xFFFF00FF,
0xFF007F7F,
0xFF00FFFF,
0xFF7F7F7F,
0xFFFFFFFF,
];
int[] consoleColorGL = new int[16];
ConsoleCharacter[][][] console;
int[2] CSRXs;
int[2] CSRYs;
int[2] CSRZs;
@property ref fontWidth()
{
return fontWidths[petitcom.displaynum];
}
@property int fontWidth(int value)
{
return fontWidths[petitcom.displaynum] = value;
}
@property ref fontHeight()
{
return fontHeights[petitcom.displaynum];
}
@property int fontHeight(int value)
{
return fontHeights[petitcom.displaynum] = value;
}
@property ref CSRX()
{
return CSRXs[petitcom.displaynum];
}
@property void CSRX(int value)
{
CSRXs[petitcom.displaynum] = value;
}
@property ref CSRY()
{
return CSRYs[petitcom.displaynum];
}
@property void CSRY(int value)
{
CSRYs[petitcom.displaynum] = value;
}
@property ref CSRZ()
{
return CSRZs[petitcom.displaynum];
}
@property void CSRZ(int value)
{
CSRZs[petitcom.displaynum] = value;
}
int[2] foreColors, backColors;
@property ref foreColor()
{
return foreColors[petitcom.displaynum];
}
@property void foreColor(int value)
{
foreColors[petitcom.displaynum] = value;
}
@property ref backColor()
{
return backColors[petitcom.displaynum];
}
@property void backColor(int value)
{
backColors[petitcom.displaynum] = value;
}
struct IMEditInfo
{
wstring editingText;
int start;
int length;
}
IMEditInfo imEditInfo;
void setIMEditInfo(wstring e, int s, int l)
{
imEditInfo.editingText = e;
imEditInfo.start = s;
imEditInfo.length = l;
}
bool showCursor;
bool animationCursor;
FontRect[] fontTable = new FontRect[65536];
GraphicPage GRPF;
PetitComputer petitcom;
bool[2] visibles = [true, true];
Object consoleSync = new Object();
int width()
{
return fontWidth;
}
void resizeConsole()
{
console.length = petitcom.currentDisplay.rect.length;
for(int i = 0; i < petitcom.currentDisplay.rect.length; i++)
{
auto h = petitcom.currentDisplay.rect[i].h / fontHeights[i];
auto w = petitcom.currentDisplay.rect[i].w / fontWidths[i];
if (!console[i] || console[i].length != h || console[i][0].length != w)
{
console[i] = new ConsoleCharacter[][h];
for(int j = 0; j < console[i].length; j++)
{
console[i][j] = new ConsoleCharacter[w];
console[i][j][] = ConsoleCharacter(0, foreColor, backColor);
}
CSRXs[i] = 0;
CSRYs[i] = 0;
CSRZs[i] = 0;
}
}
}
void initConsole()
{
fontWidths = 8;
fontHeights = 8;
CSRXs = 0;
CSRYs = 0;
CSRZs = 0;
foreColors = 15;//#T_WHITE
backColors = 0;
attrs = ConsoleAttribute.TROT0;
resizeConsole();
}
void width(int w)
{
synchronized(this)
{
cls();
fontWidth = fontHeight = w;
resizeConsole();
display(petitcom.displaynum);
}
}
void changeDisplay(ref Display display)
{
resizeConsole();
}
bool visible()
{
return visibles[petitcom.displaynum];
}
void visible(bool value)
{
visibles[petitcom.displaynum] = value;
}
this(PetitComputer p)
{
petitcom = p;
initConsole();
for(int i = 0; i < consoleColor.length; i++)
consoleColorGL[i] = petitcom.toGLColor(consoleColor[i]);
}
void createFontTable()
{
auto file = File(petitcom.fontTableFile, "w");
std.algorithm.fill(fontTable, FontRect(488,120, 8, 8, false));//TODO:480,120とどっちが使われているかは要調査
for (int i = 1; i <= 16; i++)
{
string html = cast(string)get("http://smilebasic.com/supplements/unicode" ~ format("%02d",i));
std.stdio.writeln("http://smilebasic.com/supplements/unicode" ~ format("%02d",i));
int pos = 0, index;
while(true)
{
pos = cast(int)html.indexOf("<tr>\r\n<th>U+");
if(pos == -1) break;
pos += "<tr>\r\n<th>U+".length;
html = html[pos..$];
writeln(index = html.parse!int(16));
file.write(index, ',');
pos = cast(int)html.indexOf("</td>\r\n<td>(");
if(pos == -1) break;
pos += "</td>\r\n<td>(".length;
html = html[pos..$];
writeln(fontTable[index].x = html.parse!int);
file.write(fontTable[index].x, ',');
pos = cast(int)html.indexOf(',');
html = html[pos + 1..$];
munch(html, " ");
writeln(fontTable[index].y = html.parse!int);
file.write(fontTable[index].y, '\n');
fontTable[index].w = 8;
fontTable[index].h = 8;
fontTable[index].define = true;
}
}
}
void loadFontTable()
{
import std.csv;
import std.typecons;
std.algorithm.fill(fontTable, FontRect(488,120, 8, 8, false));//TODO:480,120とどっちが使われているかは要調査
auto csv = csvReader!(Tuple!(int,int,int))(readText(petitcom.fontTableFile));
foreach(record; csv)
{
fontTable[record[0]].x = record[1];
fontTable[record[0]].y = record[2];
fontTable[record[0]].w = 8;
fontTable[record[0]].h = 8;
fontTable[record[0]].define = true;
}
}
void cls()
{
for(int i = 0; i < consoleC.length; i++)
{
consoleC[i][] = ConsoleCharacter(0, foreColor, backColor);
}
CSRX = 0;
CSRY = 0;
CSRZ = 0;
}
void display(int number)
{
synchronized(this)
{
consoleHeightC = petitcom.currentDisplay.rect[number].h / fontHeight;
consoleWidthC = petitcom.currentDisplay.rect[number].w / fontWidth;
consoleC = console[number];
}
}
void drawCharacter(int x, int y, ConsoleCharacter ch)
{
import std.algorithm.mutation : swap;
auto fore = consoleColorGL[ch.foreColor];
auto rect = &fontTable[ch.character];
ConsoleAttribute rot = ch.attr & ConsoleAttribute.TROT270;
int z = ch.z;
glColor4ubv(cast(ubyte*)&fore);
float tx1 = (rect.x) / (cast(float)petitcom.graphic.GRPFWidth) - 1;
float ty1 = (rect.y + 8) / (cast(float)petitcom.graphic.GRPFHeight) - 1;
float tx2 = (rect.x + 8) / (cast(float)petitcom.graphic.GRPFWidth) - 1;
float ty2 = (rect.y) / (cast(float)petitcom.graphic.GRPFHeight) - 1;
int x1 = x * 8;
int x2 = x * 8 + 8;
int y1 = y * 8;
int y2 = y * 8 + 8;
if (ch.attr & ConsoleAttribute.TREVH)
swap(x1, x2);
if (ch.attr & ConsoleAttribute.TREVV)
swap(y1, y2);
if (rot == ConsoleAttribute.TROT0)
{
glTexCoord2f(tx1 , ty1);
glVertex3i(x1, y2, z);
glTexCoord2f(tx1, ty2);
glVertex3i(x1, y1, z);
glTexCoord2f(tx2, ty2);
glVertex3i(x2, y1, z);
glTexCoord2f(tx2, ty1);
glVertex3i(x2, y2, z);
}
if (rot == ConsoleAttribute.TROT90)
{
glTexCoord2f(tx2, ty1);
glVertex3i(x1, y2, z);
glTexCoord2f(tx1 , ty1);
glVertex3i(x1, y1, z);
glTexCoord2f(tx1, ty2);
glVertex3i(x2, y1, z);
glTexCoord2f(tx2, ty2);
glVertex3i(x2, y2, z);
}
if (rot == ConsoleAttribute.TROT180)
{
glTexCoord2f(tx2, ty2);
glVertex3i(x1, y2, z);
glTexCoord2f(tx2, ty1);
glVertex3i(x1, y1, z);
glTexCoord2f(tx1 , ty1);
glVertex3i(x2, y1, z);
glTexCoord2f(tx1, ty2);
glVertex3i(x2, y2, z);
}
if (rot == ConsoleAttribute.TROT270)
{
glTexCoord2f(tx1, ty2);
glVertex3i(x1, y2, z);
glTexCoord2f(tx2, ty2);
glVertex3i(x1, y1, z);
glTexCoord2f(tx2, ty1);
glVertex3i(x2, y1, z);
glTexCoord2f(tx1 , ty1);
glVertex3i(x2, y2, z);
}
}
void adjustScreen(int disp)
{
glMatrixMode(GL_MODELVIEW);
glPopMatrix();
glPushMatrix();
glScalef(fontWidths[disp] / 8f, fontHeights[disp] / 8f, 1);
}
void render()
{
glMatrixMode(GL_MODELVIEW);
glPushMatrix();
scope (exit)
{
glMatrixMode(GL_MODELVIEW);
glPopMatrix();
}
synchronized(this)
{
glBindTexture(GL_TEXTURE_2D, GRPF.glTexture);
for (int i = 0; i < petitcom.currentDisplay.rect.length; i++)
{
if (!visibles[i] && !showCursor)
continue;
petitcom.chRenderingDisplay(i);
adjustScreen(i);
int consoleWidth = petitcom.currentDisplay.rect[i].w / fontWidths[i];
int consoleHeight = petitcom.currentDisplay.rect[i].h / fontHeights[i];
glEnable(GL_TEXTURE_2D);
glBegin(GL_QUADS);
if (i == 0 && !imEditInfo.editingText.empty)
{
foreach (j, c; imEditInfo.editingText)
{
ConsoleCharacter cc;
cc.character = c;
cc.z = -256;
if (imEditInfo.start <= j && (imEditInfo.start + imEditInfo.length > j || imEditInfo.length == 0))
{
cc.foreColor = 10;
}
else
{
cc.foreColor = 1;
}
drawCharacter(cast(int)j, CSRYs[0], cc);
}
}
for(int y = 0; y < consoleHeight; y++)
for(int x = 0; x < consoleWidth; x++)
{
drawCharacter(x, y, console[i][y][x]);
}
glEnd();
glDisable(GL_TEXTURE_2D);
glBegin(GL_QUADS);
if (i == 0 && !imEditInfo.editingText.empty)
{
foreach (j, c; imEditInfo.editingText)
{
auto x = j, y = CSRYs[0];
auto back = consoleColorGL[15];
if (imEditInfo.start <= j && (imEditInfo.start + imEditInfo.length > j || imEditInfo.length == 0))
{
back = consoleColorGL[1];
}
if(back)
{
glColor4ubv(cast(ubyte*)&back);
glVertex3f(x * 8, y * 8 + 8, -256);
glVertex3f(x * 8, y * 8, -256);
glVertex3f(x * 8 + 8, y * 8, -256);
glVertex3f(x * 8 + 8, y * 8 + 8, -256);
}
}
}
for(int y = 0; y < consoleHeight; y++)
for(int x = 0; x < consoleWidth; x++)
{
auto back = consoleColorGL[console[i][y][x].backColor];
if(back)
{
glColor4ubv(cast(ubyte*)&back);
glVertex3f(x * 8, y * 8 + 8, console[i][y][x].z);
glVertex3f(x * 8, y * 8, console[i][y][x].z);
glVertex3f(x * 8 + 8, y * 8, console[i][y][x].z);
glVertex3f(x * 8 + 8, y * 8 + 8, console[i][y][x].z);
}
}
if(petitcom.displaynum == i && showCursor && animationCursor)
{
glColor4ubv(cast(ubyte*)&consoleColorGL[15]);
glVertex3f((CSRX * 8), (CSRY * 8 + 8), -256);
glVertex3f((CSRX * 8), (CSRY * 8), -256);
glVertex3f((CSRX * 8 + 2), (CSRY * 8), -256);
glVertex3f((CSRX * 8 + 2), (CSRY * 8 + 8), -256);
}
glEnd();
}
}
}
void print(T...)(T args)
{
foreach(i; args)
{
printString(i.to!wstring);
}
}
//0<=TABSTEP<=16
int TABSTEP = 4;
ConsoleAttribute[2] attrs;
ConsoleAttribute attr()
{
return attrs[petitcom.displaynum];
}
void attr(ConsoleAttribute ca)
{
attrs[petitcom.displaynum] = ca;
}
int tab;
void printString(wstring text)
{
//consolem.lock();
//scope(exit) consolem.unlock();
//write(text);
foreach(wchar c; text)
{
if(CSRX == consoleWidthC)
{
CSRX = 0;
CSRY++;
if(CSRY >= consoleHeightC)
{
scrollY1;
CSRY = consoleHeightC - 1;
}
}
if(CSRY >= consoleHeightC)
{
CSRY = consoleHeightC - 1;
}
if(c == '\t')
{
import std.algorithm : min;
if(tab == 2 && CSRX == 0)
{
CSRX--;
}
else
{
auto t = min(CSRX + TABSTEP - CSRX % TABSTEP, consoleWidthC - 1);
consoleC[CSRY][CSRX..t] = ConsoleCharacter(0, foreColor, backColor, attr, CSRZ);
CSRX += TABSTEP - (CSRX % TABSTEP) - 1;
if(CSRX + 1 >= consoleWidthC)
{
CSRX = consoleWidthC - 2;
}
tab = true;
}
}
else if(c != '\n')
{
consoleC[CSRY][CSRX] = ConsoleCharacter(c, foreColor, backColor, attr, CSRZ);
tab = tab ? 2 : 0;
}
CSRX++;
if(CSRX > consoleWidthC || c == '\n')
{
CSRX = 0;
CSRY++;
}
if(CSRY >= consoleHeightC)
{
scrollY1;
CSRY = consoleHeightC - 1;
}
}
}
void scrollY1()
{
auto tmp = consoleC[0];
for(int i = 0; i < consoleHeightC - 1; i++)
{
consoleC[i] = consoleC[i + 1];
}
consoleC[consoleHeightC - 1] = tmp;
tmp[] = ConsoleCharacter(0, foreColor, backColor, attr, CSRZ);
}
import std.range;
void tonikakusugokutesutekinasaikyounaFill(T, T2)(T input, T2 v)
{
foreach (ref e; input)
{
e[] = v;
}
}
void scroll(int x, int y)
{
import std.math;
if (abs(x) >= consoleWidthC)
{
auto oldCSRX = CSRX;
auto oldCSRY = CSRY;
auto oldCSRZ = CSRZ;
cls();
CSRX = oldCSRX;
CSRY = oldCSRY;
CSRZ = oldCSRZ;
return;
}
if (abs(y) >= consoleHeightC)
{
cls();
return;
}
for (int i = 0; i < consoleHeightC; i++)
{
if (x > 0)
{
for (int j = x; j < consoleWidthC; j++)
{
consoleC[i][j - x] = consoleC[i][j];
}
consoleC[i][$ - x..$] = ConsoleCharacter(0, foreColor, backColor);
}
else if (x < 0)
{
for (int j = consoleWidthC - 1; j >= -x; j--)
{
consoleC[i][j] = consoleC[i][j + x];
}
consoleC[i][0..-x] = ConsoleCharacter(0, foreColor, backColor);
}
}
if (y > 0)
{
for (int i = y; i < consoleHeightC; i++)
{
consoleC[i - y][] = consoleC[i][];
}
tonikakusugokutesutekinasaikyounaFill(consoleC[$ - y..$], ConsoleCharacter(0, foreColor, backColor));
}
else if (y < 0)
{
for (int i = consoleHeightC - 1; i >= -y; i--)
{
consoleC[i][] = consoleC[i + y][];
}
tonikakusugokutesutekinasaikyounaFill(consoleC[0..-y], ConsoleCharacter(0, foreColor, backColor));
}
}
bool canDefine(ushort a)
{
return fontTable[a].define;
}
void define(T)(ushort code, T[] array)
{
import otya.smilebasic.graphic;
if (!canDefine(code))
{
return;
}
auto buffer = cast(int*)GRPF.surface.pixels;
auto w = GRPF.surface.w;
auto h = GRPF.surface.h;
auto font = fontTable[code];
for (int y = 0; y < font.h; y++)
{
for (int x = 0; x < font.w; x++)
{
buffer[x + font.x + (font.y + y) * w] = Graphic.RGBA16ToARGB32Color(cast(int)array[x + y * font.w]);
}
}
updateTexture;
}
public void updateTexture()
{
auto buffer = cast(int*)GRPF.surface.pixels;
auto w = GRPF.surface.w;
auto h = GRPF.surface.h;
//update texture
glBindTexture(GL_TEXTURE_2D, GRPF.glTexture);
glTexSubImage2D(GL_TEXTURE_2D, 0, 0, 0, w, h, GL_BGRA, GL_UNSIGNED_BYTE, buffer);
glFlush();
}
void initGRPF()
{
if (GRPF)
{
GRPF.deleteGL();
GRPF.deleteSDL();
}
GRPF = petitcom.graphic.createGRPF(petitcom.fontFile);
petitcom.graphic.GRPFWidth = GRPF.surface.w;
petitcom.graphic.GRPFHeight = GRPF.surface.h;
GRPF.createTexture(petitcom.renderer, petitcom.textureScaleMode);
}
}
class NativeConsole : Console
{
File file;
this(File file, PetitComputer p)
{
super(p);
this.file = file;
}
override void printString(wstring text)
{
super.printString(text);
file.write(text);
file.flush;
}
}