if %PROGRESS_SELF
	setAlign #CENTER, #MIDDLE
	setCursor #WIDTH / 2, #HEIGHT - 64
	setFontSize %VIDHEIGHT / 48

	// draw background
	setColor 0.0, 0.0, 0.0, 0.5
	setSize 200, 18
	drawPicByName $whiteimage

	moveCursor -100, 0

	// fill coloured bar
	setAlign #LEFT, #MIDDLE
	setColorToTeamColor %TEAM
	setSize %PROGRESS_SELF * 2, 18
	if %PROGRESS_SELF < 0
		setColorToTeamColor %TEAM_ENEMY
		setSize %PROGRESS_SELF * -2, 18
	endif
	drawPicByName $whiteimage

	// draw bomb icon
	setColor 1, 1, 1, 1
	moveCursor 5 * 1.333 * %VIDHEIGHT / %VIDWIDTH, -1
	setAlign #LEFT, #MIDDLE
	setSize 20 * 1.333 * %VIDHEIGHT / %VIDWIDTH, 20
	drawPicByName gfx/bomb/carriericon.png

	// draw Planting/Defusing
	setColor 1, 1, 1, 1
	moveCursor 19 * 1.333 * %VIDHEIGHT / %VIDWIDTH, 1
	setAlign #LEFT, #MIDDLE
	setSize 12 * 1.333 * %VIDHEIGHT / %VIDWIDTH, 12
	setFontStyle bold
	if %MESSAGE_SELF == #BombProgress_Planting
		drawString "Planting..."
	endif
	if %MESSAGE_SELF == #BombProgress_Defusing
		drawString "Defusing..."
	endif
	setFontStyle normal
endif