This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.
Messages - blue_bear_94
Pages: 1 ... 44 45 [46] 47 48 ... 68
676
« on: July 11, 2012, 04:15:25 pm »
I think it uses Celtic 2.
677
« on: July 11, 2012, 01:04:01 pm »
TI-89 Basic: I can't understand half of the words.
678
« on: July 11, 2012, 12:27:46 pm »
Axe: This is on a calculator.
679
« on: July 11, 2012, 11:27:24 am »
Oh. Thanks! (I pressed Auto)
680
« on: July 11, 2012, 10:58:36 am »
Where is it?
(I'm using Windows 7.)
681
« on: July 11, 2012, 10:24:57 am »
Right now the contents on my screen is cut off to the right. I am using 2048x1152, the recommended resolution for the monitor, and I don't know how to fix it. Any ideas?
682
« on: July 10, 2012, 05:42:45 pm »
Maybe the next TI calc. will be more programmer-friendly.
I seriously doubt it.
683
« on: July 09, 2012, 05:31:05 pm »
There's a mistake on Page 26. Output takes only 3 arguments.
684
« on: July 09, 2012, 05:26:41 pm »
Whatever you do, don't buy a TI-Nspire. Better, buy a Casio.
Why not? Nspire Cx has better specs than Casio Prizm. Also I think that Casio products are not of very good quality. I have an old rudimentary Casio graphing calculator that I have troubles with the display (unstable contrast).
No. The Nspire has a crappy version of TI-Basic, no assembly/C support (at least not without hacking), and a two-way incompatible implementation of Lua (no standard print function). The Prizm is more open to third-party programming.
686
« on: July 09, 2012, 03:58:50 pm »
Over the last 2 nights I came up with a new calculator design. 1. The original keyboard layout and some specs. Notice the similarity to the TI-Nspire. Only with more programming capabilities. 2. Partial list of programming commands. HomeDisp is for the homescreen. 3. Improved keyboard layout. Note that the arrow keys should be larger. 4. Some "screenshots." Questions? Comments? Edit: I can't upload the images here; I'll post the links to them soon. Edit 2: The links are: 1234
687
« on: July 09, 2012, 03:02:49 pm »
I seem to be having trouble on using a flood fill algorithm for Kraphyko. I am using the right-hand algorithm and here is my code:
typedef struct {
int x,y,dir;
} pt;
enum {LEFT,UP,RIGHT,DOWN};
#define DEF_DIR DOWN
#define PT_NULL (pt){-20,-20,0}
#define pteq(pt1,pt2) (pt1.x==pt2.x)&&(pt1.y==pt2.y)&&(pt1.dir==pt2.dir)
#define pteqc(pt1,pt2) (pt1.x==pt2.x)&&(pt1.y==pt2.y)
#define ptcolor(Pt) (Pt.x>=0&&Pt.x<whole_scn->xy.x1&&Pt.y>=0&&Pt.y<whole_scn->xy.y1)?GetGPix(Pt.x,Pt.y):mf
#define nextdir(Dir) (Dir+1)%4
#define prevdir(Dir) (Dir+3)%4
#define oppdir(Dir) (Dir+2)%4
int mf=3;
void FillPt(pt Pt,int col)
{
int w=whole_scn->xy.x1;
int h=whole_scn->xy.y1;
if (Pt.x>=0&&Pt.x<w&&Pt.y>=0&&Pt.y<h)
DrawGPix(Pt.x,Pt.y,col,GA_DRAW);
}
pt ptDir(pt Pt,int Dir)
{
switch (Dir)
{
case LEFT:
Pt.x--;
break;
case RIGHT:
Pt.x++;
break;
case UP:
Pt.y--;
break;
case DOWN:
Pt.y++;
break;
}
return Pt;
}
#define ptdir ptDir
pt inFront(pt Pt)
{
return ptDir(Pt,Pt.dir);
}
void FloodFill(short x,short y,short tcol, short rcol)
{
mf=rcol;
pt cur={x,y,DEF_DIR};
pt mark=PT_NULL;
pt mark2=PT_NULL;
//save marks
pt md=PT_NULL;
pt md2=PT_NULL;
int backtrack=0;
int findloop=0;
int count=0;
int temp;
//while front pixel is empty.........move forward
while (ptcolor(inFront(cur))==tcol) cur=inFront(cur);
goto START;
MAIN://MAIN LOOP!
cur=inFront(cur);//move forward
//if right pixel is empty
if (ptcolor(ptDir(cur,nextdir(cur.dir)))==tcol)
{
//if backtrack is true and findloop is false
//and either front pixel or left pixel is empty
//set findloop to true
if (backtrack && !findloop && ((ptcolor(inFront(cur))==tcol)||(ptcolor(ptDir(cur,prevdir(cur.dir)))==tcol))) findloop=1;
//turn right
cur.dir=nextdir(cur.dir);
PAINT:
//move forward
cur=inFront(cur);
}
START:
//set count to # of nondiagonally adjacent pixels filled
count=(ptcolor(inFront(cur))!=tcol)+(ptcolor(ptDir(cur,prevdir(cur.dir)))!=tcol)+(ptcolor(ptDir(cur,nextdir(cur.dir)))!=tcol)+(ptcolor(ptDir(cur,oppdir(cur.dir)))!=tcol);
if (count!=4)
{
do {
cur.dir=nextdir(cur.dir);//turn right
} while(ptcolor(inFront(cur))==tcol);//front pixel is empty
do {
cur.dir=prevdir(cur.dir);//turn left
} while(ptcolor(inFront(cur))!=tcol);//front pixel is filled
}
switch (count)
{
case 1:
if (backtrack) findloop=1;
else if (findloop)
{
//if mark is null........restore mark
if (pteq(mark,PT_NULL)) mark=md;
}
else if ((ptcolor(ptdir(inFront(cur),prevdir(cur.dir)))==tcol)&&(ptcolor(ptdir(ptdir(cur,oppdir(cur.dir)),prevdir(cur.dir)))==tcol))
{//front left pixel and back left pixel are both empty
md=mark;//save mark
mark=PT_NULL;//clear mark
cur.dir=prevdir(cur.dir);//turn left
FillPt(cur,rcol);//fill cur
goto PAINT;
}
break;
case 2:
//if back pixel is filled
if (ptcolor(ptdir(cur,oppdir(cur.dir)))!=tcol)
{
//if front left pixel is not filled
if (ptcolor(ptdir(inFront(cur),prevdir(cur.dir)))==tcol)
{
//save mark
md=mark;
//clear mark
mark=PT_NULL;
//turn around
cur.dir=oppdir(cur.dir);
//fill cur
FillPt(cur,rcol);
goto PAINT;
}
}
else if (pteq(mark,PT_NULL))//mark is not set
{
mark=cur;//set mark to cur
md2=mark2;
mark2=PT_NULL;//clear mark2
findloop=0;
backtrack=0;
}
else
{
if (pteq(mark2,PT_NULL))//if mark2 is not set
{
if (pteqc(cur,mark))//if cur is at mark
{
if (cur.dir==mark.dir)//if cur-dir==mark-dir
{
md=mark;
mark=PT_NULL;//clear mark
cur.dir=oppdir(mark.dir);//turn around
goto PAINT;
}
else
{
backtrack=1;
findloop=0;
cur.dir=mark.dir;
}
}
else if (findloop)
{
mark2=cur;//set mark2 to cur, set mark2-dir to cur-dir
}
}
else
{
if (pteqc(cur,mark))//if cur is at mark
{
cur=mark2;//set cur to mark2, set cur-dir to mark2-dir
md=mark;
md2=mark2;
mark=PT_NULL;
mark2=PT_NULL;//clear mark and mark2
backtrack=0;
cur.dir=oppdir(cur.dir);//turn around
FillPt(cur,rcol);//fill cur
goto PAINT;
}
else if (pteqc(cur,mark2))//if cur is at mark2
{
temp=mark.dir;//set mark to cur
mark=cur;
mark.dir=temp;
cur.dir=mark2.dir;//set cur-dir and mark-dir to
mark.dir=mark2.dir;//mark2-dir
md2=mark2;
mark2=PT_NULL;//clear mark2
}
}
}
break;
case 3:
md=mark;
mark=PT_NULL;//clear mark
cur.dir=prevdir(cur.dir);//fill cur
FillPt(cur,rcol);
goto PAINT;
break;
case 4:
FillPt(cur,rcol);//fill cur
return;//done
break;
}
goto MAIN;
}
#define Fill(x,y,col) FloodFill(x,y,GetPix(x,y),col);Thanks for any help!
688
« on: July 09, 2012, 11:26:36 am »
When I have to announce my loss of the game to my parent(s) * blue_bear_94 lost
689
« on: July 08, 2012, 07:13:13 pm »
Happy birthday, DJ_O!
690
« on: July 08, 2012, 07:02:58 pm »
Whatever you do, don't buy a TI-Nspire. Better, buy a Casio.
Pages: 1 ... 44 45 [46] 47 48 ... 68
|
Show Posts
