You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
tqt3/examples/demo/qasteroids/toplevel.cpp

495 lines
12 KiB

/*
* KAsteroids - Copyright (c) Martin R. Jones 1997
*
* Part of the KDE project
*/
// --- toplevel.cpp ---
#include <ntqaccel.h>
#include <tqlabel.h>
#include <ntqlayout.h>
#include <ntqlcdnumber.h>
#include <ntqpushbutton.h>
#include <ntqapplication.h>
#include "toplevel.h"
#include "ledmeter.h"
#define SB_SCORE 1
#define SB_LEVEL 2
#define SB_SHIPS 3
struct SLevel
{
int nrocks;
double rockSpeed;
};
#define MAX_LEVELS 16
SLevel levels[MAX_LEVELS] =
{
{ 1, 0.4 },
{ 1, 0.6 },
{ 2, 0.5 },
{ 2, 0.7 },
{ 2, 0.8 },
{ 3, 0.6 },
{ 3, 0.7 },
{ 3, 0.8 },
{ 4, 0.6 },
{ 4, 0.7 },
{ 4, 0.8 },
{ 5, 0.7 },
{ 5, 0.8 },
{ 5, 0.9 },
{ 5, 1.0 }
};
const char *soundEvents[] =
{
"ShipDestroyed",
"RockDestroyed",
0
};
const char *soundDefaults[] =
{
"Explosion.wav",
"ploop.wav",
0
};
KAstTopLevel::KAstTopLevel( TQWidget *parent, const char *name )
: TQMainWindow( parent, name, 0 )
{
TQWidget *border = new TQWidget( this );
border->setBackgroundColor( black );
setCentralWidget( border );
TQVBoxLayout *borderLayout = new TQVBoxLayout( border );
borderLayout->addStretch( 1 );
TQWidget *mainWin = new TQWidget( border );
mainWin->setFixedSize(640, 480);
borderLayout->addWidget( mainWin, 0, AlignHCenter );
borderLayout->addStretch( 1 );
view = new KAsteroidsView( mainWin );
view->setFocusPolicy( StrongFocus );
connect( view, TQ_SIGNAL( shipKilled() ), TQ_SLOT( slotShipKilled() ) );
connect( view, TQ_SIGNAL( rockHit(int) ), TQ_SLOT( slotRockHit(int) ) );
connect( view, TQ_SIGNAL( rocksRemoved() ), TQ_SLOT( slotRocksRemoved() ) );
connect( view, TQ_SIGNAL( updateVitals() ), TQ_SLOT( slotUpdateVitals() ) );
TQVBoxLayout *vb = new TQVBoxLayout( mainWin );
TQHBoxLayout *hb = new TQHBoxLayout;
TQHBoxLayout *hbd = new TQHBoxLayout;
vb->addLayout( hb );
TQFont labelFont( "helvetica", 24 );
TQColorGroup grp( darkGreen, black, TQColor( 128, 128, 128 ),
TQColor( 64, 64, 64 ), black, darkGreen, black );
TQPalette pal( grp, grp, grp );
mainWin->setPalette( pal );
hb->addSpacing( 10 );
TQLabel *label;
label = new TQLabel( tr("Score"), mainWin );
label->setFont( labelFont );
label->setPalette( pal );
label->setFixedWidth( label->sizeHint().width() );
hb->addWidget( label );
scoreLCD = new TQLCDNumber( 6, mainWin );
scoreLCD->setFrameStyle( TQFrame::NoFrame );
scoreLCD->setSegmentStyle( TQLCDNumber::Flat );
scoreLCD->setFixedWidth( 150 );
scoreLCD->setPalette( pal );
hb->addWidget( scoreLCD );
hb->addStretch( 10 );
label = new TQLabel( tr("Level"), mainWin );
label->setFont( labelFont );
label->setPalette( pal );
label->setFixedWidth( label->sizeHint().width() );
hb->addWidget( label );
levelLCD = new TQLCDNumber( 2, mainWin );
levelLCD->setFrameStyle( TQFrame::NoFrame );
levelLCD->setSegmentStyle( TQLCDNumber::Flat );
levelLCD->setFixedWidth( 70 );
levelLCD->setPalette( pal );
hb->addWidget( levelLCD );
hb->addStretch( 10 );
label = new TQLabel( tr("Ships"), mainWin );
label->setFont( labelFont );
label->setFixedWidth( label->sizeHint().width() );
label->setPalette( pal );
hb->addWidget( label );
shipsLCD = new TQLCDNumber( 1, mainWin );
shipsLCD->setFrameStyle( TQFrame::NoFrame );
shipsLCD->setSegmentStyle( TQLCDNumber::Flat );
shipsLCD->setFixedWidth( 40 );
shipsLCD->setPalette( pal );
hb->addWidget( shipsLCD );
hb->addStrut( 30 );
vb->addWidget( view, 10 );
// -- bottom layout:
vb->addLayout( hbd );
TQFont smallFont( "helvetica", 14 );
hbd->addSpacing( 10 );
TQString sprites_prefix = "qasteroids/sprites/";
/*
label = new TQLabel( tr( "T" ), mainWin );
label->setFont( smallFont );
label->setFixedWidth( label->sizeHint().width() );
label->setPalette( pal );
hbd->addWidget( label );
teleportsLCD = new TQLCDNumber( 1, mainWin );
teleportsLCD->setFrameStyle( TQFrame::NoFrame );
teleportsLCD->setSegmentStyle( TQLCDNumber::Flat );
teleportsLCD->setPalette( pal );
teleportsLCD->setFixedHeight( 20 );
hbd->addWidget( teleportsLCD );
hbd->addSpacing( 10 );
*/
TQPixmap pm( sprites_prefix + "powerups/brake.png" );
label = new TQLabel( mainWin );
label->setPixmap( pm );
label->setFixedWidth( label->sizeHint().width() );
label->setPalette( pal );
hbd->addWidget( label );
brakesLCD = new TQLCDNumber( 1, mainWin );
brakesLCD->setFrameStyle( TQFrame::NoFrame );
brakesLCD->setSegmentStyle( TQLCDNumber::Flat );
brakesLCD->setPalette( pal );
brakesLCD->setFixedHeight( 20 );
hbd->addWidget( brakesLCD );
hbd->addSpacing( 10 );
pm.load( sprites_prefix + "powerups/shield.png" );
label = new TQLabel( mainWin );
label->setPixmap( pm );
label->setFixedWidth( label->sizeHint().width() );
label->setPalette( pal );
hbd->addWidget( label );
shieldLCD = new TQLCDNumber( 1, mainWin );
shieldLCD->setFrameStyle( TQFrame::NoFrame );
shieldLCD->setSegmentStyle( TQLCDNumber::Flat );
shieldLCD->setPalette( pal );
shieldLCD->setFixedHeight( 20 );
hbd->addWidget( shieldLCD );
hbd->addSpacing( 10 );
pm.load( sprites_prefix + "powerups/shoot.png" );
label = new TQLabel( mainWin );
label->setPixmap( pm );
label->setFixedWidth( label->sizeHint().width() );
label->setPalette( pal );
hbd->addWidget( label );
shootLCD = new TQLCDNumber( 1, mainWin );
shootLCD->setFrameStyle( TQFrame::NoFrame );
shootLCD->setSegmentStyle( TQLCDNumber::Flat );
shootLCD->setPalette( pal );
shootLCD->setFixedHeight( 20 );
hbd->addWidget( shootLCD );
hbd->addStretch( 1 );
label = new TQLabel( tr( "Fuel" ), mainWin );
label->setFont( smallFont );
label->setFixedWidth( label->sizeHint().width() + 10 );
label->setPalette( pal );
hbd->addWidget( label );
powerMeter = new KALedMeter( mainWin );
powerMeter->setFrameStyle( TQFrame::Box | TQFrame::Plain );
powerMeter->setRange( MAX_POWER_LEVEL );
powerMeter->addColorRange( 10, darkRed );
powerMeter->addColorRange( 20, TQColor(160, 96, 0) );
powerMeter->addColorRange( 70, darkGreen );
powerMeter->setCount( 40 );
powerMeter->setPalette( pal );
powerMeter->setFixedSize( 200, 12 );
hbd->addWidget( powerMeter );
shipsRemain = 3;
showHiscores = FALSE;
actions.insert( TQt::Key_Up, Thrust );
actions.insert( TQt::Key_Left, RotateLeft );
actions.insert( TQt::Key_Right, RotateRight );
actions.insert( TQt::Key_Space, Shoot );
actions.insert( TQt::Key_Z, Teleport );
actions.insert( TQt::Key_X, Brake );
actions.insert( TQt::Key_S, Shield );
actions.insert( TQt::Key_P, Pause );
actions.insert( TQt::Key_L, Launch );
actions.insert( TQt::Key_N, NewGame );
view->showText( tr( "Press N to start playing" ), yellow );
}
KAstTopLevel::~KAstTopLevel()
{
}
void KAstTopLevel::playSound( const char * )
{
}
void KAstTopLevel::keyPressEvent( TQKeyEvent *event )
{
if ( event->isAutoRepeat() || !actions.contains( event->key() ) )
{
event->ignore();
return;
}
Action a = actions[ event->key() ];
switch ( a )
{
case RotateLeft:
view->rotateLeft( TRUE );
break;
case RotateRight:
view->rotateRight( TRUE );
break;
case Thrust:
view->thrust( TRUE );
break;
case Shoot:
view->shoot( TRUE );
break;
case Shield:
view->setShield( TRUE );
break;
case Teleport:
view->teleport( TRUE );
break;
case Brake:
view->brake( TRUE );
break;
default:
event->ignore();
return;
}
event->accept();
}
void KAstTopLevel::keyReleaseEvent( TQKeyEvent *event )
{
if ( event->isAutoRepeat() || !actions.contains( event->key() ) )
{
event->ignore();
return;
}
Action a = actions[ event->key() ];
switch ( a )
{
case RotateLeft:
view->rotateLeft( FALSE );
break;
case RotateRight:
view->rotateRight( FALSE );
break;
case Thrust:
view->thrust( FALSE );
break;
case Shoot:
view->shoot( FALSE );
break;
case Brake:
view->brake( FALSE );
break;
case Shield:
view->setShield( FALSE );
break;
case Teleport:
view->teleport( FALSE );
break;
case Launch:
if ( waitShip )
{
view->newShip();
waitShip = FALSE;
view->hideText();
}
else
{
event->ignore();
return;
}
break;
case NewGame:
slotNewGame();
break;
/*
case Pause:
{
view->pause( TRUE );
TQMessageBox::information( this,
tr("KAsteroids is paused"),
tr("Paused") );
view->pause( FALSE );
}
break;
*/
default:
event->ignore();
return;
}
event->accept();
}
void KAstTopLevel::showEvent( TQShowEvent *e )
{
TQMainWindow::showEvent( e );
view->pause( FALSE );
view->setFocus();
}
void KAstTopLevel::hideEvent( TQHideEvent *e )
{
TQMainWindow::hideEvent( e );
view->pause( TRUE );
}
void KAstTopLevel::slotNewGame()
{
score = 0;
shipsRemain = SB_SHIPS;
scoreLCD->display( 0 );
level = 0;
levelLCD->display( level+1 );
shipsLCD->display( shipsRemain-1 );
view->newGame();
view->setRockSpeed( levels[0].rockSpeed );
view->addRocks( levels[0].nrocks );
// view->showText( tr( "Press L to launch." ), yellow );
view->newShip();
waitShip = FALSE;
view->hideText();
isPaused = FALSE;
}
void KAstTopLevel::slotShipKilled()
{
shipsRemain--;
shipsLCD->display( shipsRemain-1 );
playSound( "ShipDestroyed" );
if ( shipsRemain )
{
waitShip = TRUE;
view->showText( tr( "Ship Destroyed. Press L to launch."), yellow );
}
else
{
view->showText( tr("Game Over!"), red );
view->endGame();
doStats();
// highscore->addEntry( score, level, showHiscores );
}
}
void KAstTopLevel::slotRockHit( int size )
{
switch ( size )
{
case 0:
score += 10;
break;
case 1:
score += 20;
break;
default:
score += 40;
}
playSound( "RockDestroyed" );
scoreLCD->display( score );
}
void KAstTopLevel::slotRocksRemoved()
{
level++;
if ( level >= MAX_LEVELS )
level = MAX_LEVELS - 1;
view->setRockSpeed( levels[level-1].rockSpeed );
view->addRocks( levels[level-1].nrocks );
levelLCD->display( level+1 );
}
void KAstTopLevel::doStats()
{
TQString r( "0.00" );
if ( view->shots() )
r = TQString::number( (double)view->hits() / view->shots() * 100.0,
'g', 2 );
/* multi-line text broken in TQt 3
TQString s = tr( "Game Over\n\nShots fired:\t%1\n Hit:\t%2\n Missed:\t%3\nHit ratio:\t%4 %\n\nPress N for a new game" )
.arg(view->shots()).arg(view->hits())
.arg(view->shots() - view->hits())
.arg(r);
*/
view->showText( "Game Over. Press N for a new game.", yellow, FALSE );
}
void KAstTopLevel::slotUpdateVitals()
{
brakesLCD->display( view->brakeCount() );
shieldLCD->display( view->shieldCount() );
shootLCD->display( view->shootCount() );
// teleportsLCD->display( view->teleportCount() );
powerMeter->setValue( view->power() );
}