/*
********************************************************
splashDisp - displays splash screen waiting for button press
********************************************************
*/
void splashDisp(void)
{
lclr();
pos(3,2);
pmsglcd("MEYER SWEEPER");
//pmsglcd("SWEEPER");
pos(3,5);
pmsglcd("Press joystick");
pos(5,6);
pmsglcd("to start");
}
/*
********************************************************
gameDisp - displays game screen for PLAY :D
********************************************************
*/
void gameDisp(void)
{
lclr();
Create_board(nbomb,mine);
for(i = 0; i < NROW; i++){ //y var
for(j = 0; j < NCOL; j++){ //x var
pos(j,i);
if(mask[i][j] == 9){
pmsglcd("#");
}
}
}
pos(0,0); //init cursor in top corner
}
/*
********************************************************
diffDisp - displays splash screen for difficulty selection
********************************************************
*/
void diffDisp(void)
{
lclr();
mensel(8,2,4);
pmsglcd("Easy");
mensel(8,4,4);
pmsglcd("Hard");
mensel(9,5,2);
pmsglcd("GG");
mensel(7,3,6); //final cursor position to work with difficulty()
pmsglcd("Normal");
}
void CSinglePrealertEdit::updateTypes()
{
if(m_paTypes)
{
ui->trvDutyTypes->clear();
for(int i = 0; i < m_paTypes->count(); i++)
{
QTreeWidgetItem* litem = new QTreeWidgetItem();
litem->setText(0, m_paTypes->at(i).type()->Desc());
QColor lclr(m_paTypes->at(i).type()->RosterColorR(),m_paTypes->at(i).type()->RosterColorG(),m_paTypes->at(i).type()->RosterColorB());
litem->setBackground(0,QBrush(lclr));
litem->setData(0, Qt::UserRole, QVariant(m_paTypes->at(i).id()));
ui->trvDutyTypes->addTopLevelItem(litem);
}
}
}
int main()
{ /* MIRACL rational calculator */
int i,j,k,p,q,c,hpos;
BOOL over,help;
screen();
#if MIRACL==16
mip=mirsys(10,0); /*** 16-bit computer ***/
#else
mip=mirsys(6,0); /*** 32-bit computer ***/
#endif
mip->ERCON=TRUE;
x=mirvar(0);
for (i=0;i<=top;i++) y[i]=mirvar(0);
m=mirvar(0);
t=mirvar(0);
radeg=mirvar(0);
loge2=mirvar(0);
loge10=mirvar(0);
eps=mirvar(0);
mip->pi=mirvar(0);
cinstr(mip->pi,cpi); /* read in constants */
fpmul(mip->pi,1,180,radeg);
cinstr(loge2,clg2);
cinstr(loge10,clg10);
cinstr(eps,ceps);
help=OFF;
show(TRUE);
p=6;
q=0;
flag=OFF;
newx=OFF;
over=FALSE;
setopts();
clrall();
drawit();
while (!over)
{ /* main loop */
if (mip->ERNUM)
{
aprint(ORDINARY,4+5*p,6+3*q,keys[q][p]);
p=5,q=0;
}
if (width==80 || !help)
{
aprint(INVER,4+5*p,6+3*q,keys[q][p]);
curser(1,24);
c=gethit();
aprint(ORDINARY,4+5*p,6+3*q,keys[q][p]);
}
else while ((c=gethit())!='H') ;
result=TRUE;
if ((k=arrow(c))!=0)
{ /* arrow key hit */
if (k==1 && q>0) q--;
if (k==2 && q<5) q++;
if (k==3 && p<6) p++;
if (k==4 && p>0) p--;
continue;
}
if (c=='H')
{ /* switch help on/off */
help=!help;
for (i=1;i<=24;i++)
{
if (width==80) hpos=41;
else hpos=1;
if (help) aprint(HELPCOL,hpos,i,htext[i-1]);
else lclr(hpos,i);
}
if (width==40 && !help) drawit();
continue;
}
if (c>='A' && c<='F')
{ /* hex only */
if (!next(c)) putchar(BELL);
else show(FALSE);
continue;
}
for (j=0;j<6;j++)
for (i=0;i<7;i++)
if (c==qkeys[j][i]) p=i,q=j,c=' ';
if (c==8 || c==127) p=6,q=1,c=' '; /* aliases */
if (c==',' || c=='a') p=5,q=5,c=' ';
if (c=='O' || c==ESC) p=6,q=0,c=' ';
if (c==13) p=6,q=5,c=' ';
if (c=='[' || c=='{') p=3,q=5,c=' ';
if (c==']' || c=='}') p=4,q=5,c=' ';
if (c=='d') p=5,q=2,c=' ';
if (c=='b') p=5,q=3,c=' ';
if (c=='^') p=3,q=2,c=' ';
if (c==' ') over=act(p,q);
else continue;
absol(x,t);
if (fcomp(t,eps)<0) zero(x);
if (result)
{ /* output result to display */
cotstr(x,mip->IOBUFF);
just((char *)mip->IOBUFF);
if (mip->ERNUM<0)
{ /* convert to radix and try again */
mip->ERNUM=0;
mip->RPOINT=ON;
cotstr(x,mip->IOBUFF);
putchar(BELL);
just((char *)mip->IOBUFF);
}
clr();
}
if (newx)
{ /* update display */
getstat();
show(FALSE);
}
}
curser(1,24);
restore();
return 0;
}