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.
tdebindings/qtruby/rubylib/tutorial/t13/cannon.rb

220 lines
5.4 KiB

13 years ago
require 'Qt'
include Math
class CannonField < TQt::Widget
signals 'hit()', 'missed()', 'angleChanged(int)', 'forceChanged(int)',
'canShoot(bool)'
slots 'setAngle(int)', 'setForce(int)', 'shoot()', 'moveShot()',
'newTarget()', 'setGameOver()', 'restartGame'
def initialize(parent, name)
super
@ang = 45
@f = 0
@timerCount = 0;
@autoShootTimer = TQt::Timer.new( self, "movement handler" )
connect( @autoShootTimer, SIGNAL('timeout()'),
self, SLOT('moveShot()') );
@shoot_ang = 0
@shoot_f = 0
@target = TQt::Point.new(0, 0)
@gameEnded = false
setPalette( TQt::Palette.new( TQt::Color.new( 250, 250, 200) ) )
newTarget()
@barrelRect = TQt::Rect.new(33, -4, 15, 8)
end
def angle()
return @ang
end
def force()
return @f
end
def gameOver()
return @gameEnded
end
def setAngle( degrees )
if degrees < 5
degrees = 5
elsif degrees > 70
degrees = 70
end
if @ang == degrees
return
end
@ang = degrees
repaint( cannonRect(), false )
emit angleChanged( @ang )
end
def setForce( newton )
if newton < 0
newton = 0
end
if @f == newton
return
end
@f = newton
emit forceChanged( @f )
end
def shoot()
if isShooting()
return
end
@timerCount = 0
@shoot_ang = @ang
@shoot_f = @f
@autoShootTimer.start( 50 )
emit canShoot( false )
end
@@first_time = true
def newTarget()
if @@first_time
@@first_time = false
midnight = TQt::Time.new( 0, 0, 0 )
srand( midnight.secsTo(TQt::Time.currentTime()) )
end
r = TQt::Region.new( targetRect() )
@target = TQt::Point.new( 200 + rand(190),
10 + rand(255) )
repaint( r.unite( TQt::Region.new(targetRect()) ) )
end
def setGameOver()
if @gameEnded
return
end
if isShooting()
@autoShootTimer.stop()
end
@gameEnded = true
repaint()
end
def restartGame()
if isShooting()
@autoShootTimer.stop()
end
@gameEnded = false
repaint()
emit canShoot( true )
end
def moveShot()
r = TQt::Region.new( shotRect() )
@timerCount += 1
shotR = shotRect()
if shotR.intersects( targetRect() )
@autoShootTimer.stop()
emit hit()
emit canShoot(true)
elsif shotR.x() > width() || shotR.y() > height()
@autoShootTimer.stop()
emit missed()
emit canShoot(true)
else
r = r.unite( TQt::Region.new( shotR ) )
end
repaint( r )
end
def paintEvent( e )
updateR = e.rect()
p = TQt::Painter.new( self )
if @gameEnded
p.setPen( black )
p.setFont( TQt::Font.new( "Courier", 48, TQFont::Bold ) )
p.drawText( rect(), AlignCenter, "Game Over" )
end
if updateR.intersects( cannonRect() )
paintCannon( p )
end
if isShooting() && updateR.intersects( shotRect() )
paintShot( p )
end
if !@gameEnded && updateR.intersects( targetRect() )
paintTarget( p )
end
p.end()
end
def paintShot( p )
p.setBrush( black )
p.setPen( TQt::NoPen )
p.drawRect( shotRect() )
end
def paintTarget( p )
p.setBrush( red )
p.setPen( black )
p.drawRect( targetRect() )
end
def paintCannon(p)
cr = cannonRect()
pix = TQt::Pixmap.new( cr.size() )
pix.fill( self, cr.topLeft() )
tmp = TQt::Painter.new( pix )
tmp.setBrush( blue )
tmp.setPen( TQt::NoPen )
tmp.translate( 0, pix.height() - 1 )
tmp.drawPie( TQt::Rect.new(-35, -35, 70, 70), 0, 90*16 )
tmp.rotate( - @ang )
tmp.drawRect( @barrelRect )
tmp.end()
p.drawPixmap(cr.topLeft(), pix )
end
def cannonRect()
r = TQt::Rect.new( 0, 0, 50, 50)
r.moveBottomLeft( rect().bottomLeft() )
return r
end
def shotRect()
gravity = 4.0
time = @timerCount / 4.0
velocity = @shoot_f
radians = @shoot_ang*3.14159265/180.0
velx = velocity*cos( radians )
vely = velocity*sin( radians )
x0 = ( @barrelRect.right() + 5.0 )*cos(radians)
y0 = ( @barrelRect.right() + 5.0 )*sin(radians)
x = x0 + velx*time
y = y0 + vely*time - 0.5*gravity*time*time
r = TQt::Rect.new( 0, 0, 6, 6 );
r.moveCenter( TQt::Point.new( x.round, height() - 1 - y.round ) )
return r
end
def targetRect()
r = TQt::Rect.new( 0, 0, 20, 10 )
r.moveCenter( TQt::Point.new(@target.x(),height() - 1 - @target.y()) );
return r
end
def isShooting()
return @autoShootTimer.isActive()
end
def sizePolicy()
return TQt::SizePolicy.new( TQt::SizePolicy::Expanding, TQt::SizePolicy::Expanding )
end
end