void zflush(void) {
msm_hidecursor();
if (in_graphics_mode)
fg_flush();
else {
disp_flush();
if (cursor_off) disp_showcursor();
cursor_off = 0;
}
msm_showcursor();
}
void show_orgs()
{
struct organism *org;
int i, j, num=1, total, x, y, lastnumcells=0, last;
char key;
char string[110];
fg_box_t nbox, xbox, lbox, blankbox, topbox, cellbox, itembox;
fg_msm_cursor_t arrow = {arrow_matrix,{0,0,7,14}, 0, 14};
unsigned int status, last_status;
fg_coord_t xx, yy;
int stop=0, response;
fg_color_t pcols[10] = {2,3,4,5,6,9,10,12,13,14};
nbox [FG_X1] = 0;
nbox [FG_Y1] = 581;
nbox [FG_X2] = 98;
nbox [FG_Y2] = 597;
lbox [FG_X1] = 0;
lbox [FG_Y1] = 561;
lbox [FG_X2] = 98;
lbox [FG_Y2] = 577;
xbox [FG_X1] = 0;
xbox [FG_Y1] = 541;
xbox [FG_X2] = 98;
xbox [FG_Y2] = 557;
topbox[FG_X1] = 100;
topbox[FG_X2] = 799;
topbox[FG_Y1] = 541;
topbox[FG_Y2] = 597;
blankbox[FG_X1] = 0;
blankbox[FG_X2] = 394;
cellbox[FG_Y1]=400;
cellbox[FG_Y2]=420;
cellbox[FG_X1]=100;
cellbox[FG_X2]=140;
fg_msm_setcursor(arrow);
fg_msm_motion(0);
fg_msm_setcurpos(fg_box_width(fg_displaybox)/2, fg_box_height(fg_displaybox)/2);
fg_msm_showcursor();
fg_fillbox(FG_BLUE, FG_MODE_SET, ~0, nbox);
fg_fillbox(FG_BLUE, FG_MODE_SET, ~0, lbox);
fg_fillbox(FG_RED, FG_MODE_SET, ~0, xbox);
fg_drawbox(FG_LIGHT_BLUE,FG_MODE_SET,~0,FG_LINE_SOLID,nbox,fg.displaybox);
fg_drawbox(FG_LIGHT_BLUE,FG_MODE_SET,~0,FG_LINE_SOLID,lbox,fg.displaybox);
fg_drawbox(FG_LIGHT_RED,FG_MODE_SET,~0,FG_LINE_SOLID,xbox,fg.displaybox);
fg_puts(FG_WHITE, FG_MODE_SET, ~0, FG_ROT0, 10, 582, "NEXT", fg.displaybox);
fg_puts(FG_WHITE, FG_MODE_SET, ~0, FG_ROT0, 10, 562, "LAST", fg.displaybox);
fg_puts(FG_WHITE, FG_MODE_SET, ~0, FG_ROT0, 10, 542, "EXIT", fg.displaybox);
sprintf(string," CYCLES: %8.0f",cycles);
fg_puts(FG_WHITE, FG_MODE_SET, ~0, FG_ROT0, 550, 580, string,fg.displaybox);
sprintf(string,"POPULATION: %8d",numorgs);
fg_puts(FG_WHITE, FG_MODE_SET, ~0, FG_ROT0, 550, 565, string,fg.displaybox);
sprintf(string," SPAWNED: %8.0f", numspawned);
fg_puts(FG_WHITE, FG_MODE_SET, ~0, FG_ROT0, 550, 550, string,fg.displaybox);
fg_drawbox(FG_BLUE,FG_MODE_SET,~0,FG_LINE_SOLID,topbox,fg.displaybox);
show_colour_table();
show_inputs();
itembox[FG_Y1]=400;
itembox[FG_Y2]=420;
itembox[FG_X1]=0;
itembox[FG_X2]=98;
org = root;
while(!stop){
if(lastnumcells>org->numcells){
blankbox[FG_Y1]=420-(lastnumcells*22);
blankbox[FG_Y2]=420-(org->numcells*22);
fg_fillbox(FG_BLACK,FG_MODE_SET,~0,blankbox);
}
lastnumcells = org->numcells;
itembox[FG_Y1]=400;
itembox[FG_Y2]=420;
show_bug_details(org, num);
for(i=0;i<org->numcells;i++){
sprintf(string,"Cell: %2d",i+1);
fg_puts(FG_WHITE,FG_MODE_SET,~0,FG_ROT0,cellbox[FG_X1]-80,cellbox[FG_Y1]+3,string,fg.displaybox);
fg_drawbox(FG_BLUE,FG_MODE_SET,~0,FG_LINE_SOLID,itembox,fg.displaybox);
itembox[FG_Y1]-=22;
itembox[FG_Y2]-=22;
for(j=0;j<NUMINPUTS;j++){
fg_fillbox(pcols[org->cells[i]->inout[j]],FG_MODE_SET,~0,cellbox);
sprintf(string,"%2d",org->cells[i]->next[j]+1);
fg_puts(FG_BLACK,FG_MODE_SET,~0,FG_ROT0,cellbox[FG_X1]+10,cellbox[FG_Y1]+3,string,fg.displaybox);
cellbox[FG_X1]+=42;
cellbox[FG_X2]+=42;
}
cellbox[FG_X1]=100;
cellbox[FG_X2]=140;
cellbox[FG_Y1]-=22;
cellbox[FG_Y2]-=22;
}
cellbox[FG_Y1]=400;
cellbox[FG_Y2]=420;
response=0;
while(!response){
fg_flush();
last_status = status;
status = fg_msm_getstatus(&xx, &yy);
if(kbhit()) key = getch();
if((key == 'n')||((fg_pt_inbox(nbox, xx, yy))&&(status == FG_MSM_LEFT))) {
get_release(FG_WHITE,10,582,"NEXT");
org = org->next;
if(org==NULL){
org = root;
num = 0;
}
response++;
num++;
key = 'w';
}
else if((key == 'l')||((fg_pt_inbox(lbox, xx, yy))&&(status == FG_MSM_LEFT))) {
get_release(FG_WHITE,10,562,"LAST");
last = num-1;
if(last < 1){
while(org->next!=NULL){
org = org->next;
num++;
}
}
else {
org = root;
num = 1;
while(num!=last){
org = org->next;
num++;
}
}
response++;
key = 'w';
}
else if((key == 'x')||((fg_pt_inbox(xbox, xx, yy))&&(status == FG_MSM_LEFT))){
get_release(FG_WHITE,10,542,"EXIT");
stop++;
key = 'w';
response++;
}
}
}
fg_msm_hidecursor();
}
