bonkmaykr/otyaSMILEBASIC
1
0
Fork 0
Code Activity

Implement SPSET (5),(6)

Browse Source
This commit is contained in:
otya128
2016-12-23 20:01:38 +09:00
parent f1b5a3852e
commit 28a0d8b7e2
2 changed files with 59 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

34
SMILEBASIC/builtinfunctions.d
View File

@@ -1319,6 +1319,40 @@ class BuiltinFunction
}
p.sprite.spset(id, defno);
}
static void SPSET(PetitComputer p, int lower, int upper, int defno, out int ix)
{
if (!p.sprite.isValidSpriteId(upper))
throw new OutOfRange("SPSET", 1);
if (!p.sprite.isValidSpriteId(lower))
throw new OutOfRange("SPSET", 2);
if (upper < lower)
throw new IllegalFunctionCall("SPSET", 2);
ix = p.sprite.allocSprite(lower, upper);
if (ix == -1)
return;
p.sprite.spset(ix, defno);
}
static void SPSET(PetitComputer p, int upper, int lower, int u, int v, out int ix)
{
SPSET(p, upper, lower, u, v, 16, 16, 0x01, ix);
}
static void SPSET(PetitComputer p, int upper, int lower, int u, int v, int w, int h, out int ix)
{
SPSET(p, upper, lower, u, v, w, h, 0x01, ix);
}
static void SPSET(PetitComputer p, int lower, int upper, int u, int v, int w, int h, int attr, out int ix)
{
if (!p.sprite.isValidSpriteId(upper))
throw new OutOfRange("SPSET", 1);
if (!p.sprite.isValidSpriteId(lower))
throw new OutOfRange("SPSET", 2);
if (upper < lower)
throw new IllegalFunctionCall("SPSET", 2);
ix = p.sprite.allocSprite(lower, upper);
if (ix == -1)
return;
p.sprite.spset(ix, u, v, w, h, cast(SpriteAttr)attr);
}
static void SPCHR(PetitComputer p, int id, int defno, DefaultValue!(int, false) V, DefaultValue!(int, false) W, DefaultValue!(int, false) H, DefaultValue!(int, false) ATTR)
{
if(!V.isDefault && !W.isDefault)

25
SMILEBASIC/sprite.d
View File

@@ -870,6 +870,16 @@ class Sprite
synchronized (this)
sprites[id] = SpriteData(id, spdef, 0/*要調査*/);
}
int allocSprite(int lower, int upper)
{
for (int i = lower; i <= upper; i++)
{
int id = spid(i);
if (!sprites[id].define)
return i;
}
return -1;
}
int spchk(int id)
{
id = spid(id);
@@ -1179,4 +1189,19 @@ class Sprite
}
clipRect[petitcom.displaynum] = SDL_Rect(x1, y1, x2 - x1 + 1, y2 - y1 + 1);
}
bool isValidSpriteId(int id)
{
if (id < 0)
{
return false;
}
if (petitcom.displaynum == 0)
{
return spmax > id;
}
else
{
return sprites.length > id + spmax;
}
}
}