simple health bar not working correctly

Author

Message

dandrews

3

Years of Service

User Offline

Joined: 26th Jun 2020

Location:

Posted: 20th Nov 2021 04:17

Link

This post has been marked by the post author as the answer.

i have a simple health bar code that seems to only work for full health and no health, meaning the size only changes when its dead

+ Code Snippet

global progress_step as float
	
	global aliennumber as integer
	global totalaliens as integer
	progress = 100
	 totalaliens = 1000
	 aliennumber = 1000
	
	type wave_class
    hpbarfront as integer
    hpbarback as integer
   
endtype
global wave as wave_class
	wave.hpbarback=CreateSprite(0)
	SetSpriteColor(wave.hpbarback, 0, 0, 255, 100)
    SetSpriteSize(wave.hpbarback,300,20)
    SetSpritePosition(wave.hpbarback, 100,100)
//--------------------------------------------------------------
	wave.hpbarfront=CreateSprite(0)
    SetSpriteColor(wave.hpbarfront, 255, 0, 66, 255)
    SetSpriteSize(wave.hpbarfront,300,20)
    SetSpritePosition(wave.hpbarfront, 100,100)
	SetSpriteDepth(wave.hpbarfront,0)
	setspritedepth(wave.hpbarback,0)
	
	do 
		print (aliennumber)
		attck= random2(0,500)
		if attck = 5
		bonk = random2(1,50)
		aliennumber = aliennumber - bonk
		endif
		
		pprogress_step = Aliennumber*100.0/totalaliens/100 
		setspritesize(wave.hpbarfront, pprogress_step*300,20)
		sync()
		loop

Back to top

Profile PM

PartTimeCoder

AGK Tool Maker

9

Years of Service

User Offline

Joined: 9th Mar 2015

Location: London UK

Posted: 20th Nov 2021 04:36

Link

I made this a while ago if its any help

I actually have an updated version of that include here somewhere on a HDD with text overlays and stuff, I'll see if I can find it.

Open Source plugins
Cl - DnD Plugin
Buy Me A Coffee

Back to top

Profile PM

PartTimeCoder

AGK Tool Maker

9

Years of Service

User Offline

Joined: 9th Mar 2015

Location: London UK

Posted: 20th Nov 2021 04:41 Edited at: 20th Nov 2021 04:46

Link

I had renamed it to "ProgressBar", but the same thing

ProgressBar.agc

Type tProgressBar
	id
	spr_back
	spr_front
	spr_border
	show_border
	is_vertical
	max_range
	caption as string
	caption_align 
	txt_caption
EndType
Global gProgressBar as tProgressBar[]

Function ProgressBar_Create(id, x, y, width, height, vertical, range, caption as string)
	
	hb as tProgressBar
	hb.id=id
	hb.is_vertical=vertical
	hb.max_range=range	
	
	hb.spr_border = CreateSprite(0)
	SetSpritePosition(hb.spr_border, x-1, y-1)
	SetSpriteSize(hb.spr_border, width+2, height+2)
	SetSpriteColor(hb.spr_border, 0, 0, 0, 255)
	FixSpriteToScreen(hb.spr_border, 1)	
	
	hb.spr_back = CreateSprite(0)
	SetSpritePosition(hb.spr_back, x, y)
	SetSpriteSize(hb.spr_back, width, height)
	SetSpriteColor(hb.spr_back, 255, 255, 255, 125)
	FixSpriteToScreen(hb.spr_back, 1)	
	
	hb.spr_front = CreateSprite(0)
	SetSpritePosition(hb.spr_front, x, y)
	SetSpriteSize(hb.spr_front, width, height)
	SetSpriteColor(hb.spr_front, 255, 0, 0, 125)
	FixSpriteToScreen(hb.spr_front, 1)	
	
	hb.txt_caption=CreateText(caption)
	hb.caption=caption
	hb.caption_align=1
	SetTextAlignment(hb.txt_caption, 1)
	FixTextToScreen(hb.txt_caption, 1)	
	
	SetTextColor(hb.txt_caption, 255, 255, 255, 255)
	
	if vertical
		SetTextPosition(hb.txt_caption, x-1, y+height/2)
		SetTextSize(hb.txt_caption, width)
		SetTextAngle(hb.txt_caption, -90)
	else
		SetTextPosition(hb.txt_caption, x+width/2, y-1)
		SetTextSize(hb.txt_caption, height)
		SetTextAngle(hb.txt_caption, 0)
	endif
	
	gProgressBar.insertSorted(hb)
	
	ProgressBar_SetCaption(id, caption)

EndFunction gProgressBar.length

// Internal Functions

// Public Functions
Function ProgressBar_Delete(id)
	index as integer
	index = gProgressBar.find(id)
	if index<>-1
		if GetSpriteExists(gProgressBar[index].spr_border) : DeleteSprite(gProgressBar[index].spr_border) : endif
		if GetSpriteExists(gProgressBar[index].spr_back) : DeleteSprite(gProgressBar[index].spr_back) : endif
		if GetSpriteExists(gProgressBar[index].spr_front) : DeleteSprite(gProgressBar[index].spr_front) : endif
	endif
	
EndFunction
Function ProgressBar_Hide(id, hide)
	index as integer
	index = gProgressBar.find(id)
	if index<>-1
		if GetSpriteExists(gProgressBar[index].spr_border) and GetSpriteExists(gProgressBar[index].spr_back) and GetSpriteExists(gProgressBar[index].spr_front)
			SetSpriteVisible(gProgressBar[index].spr_border, abs(hide-1))
			SetSpriteVisible(gProgressBar[index].spr_back, abs(hide-1))
			SetSpriteVisible(gProgressBar[index].spr_front, abs(hide-1))
			
			SetSpriteActive(gProgressBar[index].spr_border, abs(hide-1))
			SetSpriteActive(gProgressBar[index].spr_back, abs(hide-1))
			SetSpriteActive(gProgressBar[index].spr_front, abs(hide-1))
		endif
	endif
EndFunction

// State Functions
Function ProgressBar_SetState(id, pos)
	
	index as integer
	bar_width as integer
	bar_height as integer
	new_width as integer
	new_height as integer
	
	index = gProgressBar.find(id)
	if index<>-1
		if GetSpriteExists(gProgressBar[index].spr_back)
			bar_x as integer
			bar_y as integer
			bar_width=GetSpriteWidth(gProgressBar[index].spr_back)
			bar_height=GetSpriteHeight(gProgressBar[index].spr_back)
			new_width=0
			new_height=0
			if gProgressBar[index].is_vertical = 1
				new_width = bar_width
				new_height = bar_height*pos/gProgressBar[index].max_range
				
				bar_x = GetSpriteX(gProgressBar[index].spr_back)
				bar_y = GetSpriteY(gProgressBar[index].spr_back)
				SetSpritePosition(gProgressBar[index].spr_front, bar_x, bar_y+bar_height-new_height)
			else
				new_width = bar_width*pos/gProgressBar[index].max_range
				new_height = bar_height
				
			endif
			SetSpriteSize(gProgressBar[index].spr_front, new_width, new_height)
			
			ProgressBar_SetCaption(id, gProgressBar[index].caption)
		endif
	endif
EndFunction
Function ProgressBar_GetState(id)
	
	
	index as integer
	bar_width as integer
	bar_height as integer
	front_width as integer
	front_height as integer
	max_Y as integer
	min_Y as integer
	max_X as integer
	min_X as integer
	percent as integer
	
	index = gProgressBar.find(id)
	if index<>-1
		if GetSpriteExists(gProgressBar[index].spr_back)
			bar_width=GetSpriteWidth(gProgressBar[index].spr_back)
			bar_height=GetSpriteHeight(gProgressBar[index].spr_back)
			front_width=GetSpriteWidth(gProgressBar[index].spr_front)
			front_height=GetSpriteHeight(gProgressBar[index].spr_front)
			if gProgressBar[index].is_vertical = 1
				max_Y=GetSpriteY(gProgressBar[index].spr_back)+GetSpriteHeight(gProgressBar[index].spr_back)
				min_Y=GetSpriteY(gProgressBar[index].spr_back)
				percent=(GetSpriteHeight(gProgressBar[index].spr_front) / (max_Y-min_Y)) * gProgressBar[index].max_range
			else
				max_X=GetSpriteX(gProgressBar[index].spr_back)+GetSpriteWidth(gProgressBar[index].spr_back)
				min_X=GetSpriteX(gProgressBar[index].spr_back)
				percent=(GetSpriteWidth(gProgressBar[index].spr_front) / (max_X-min_X)) * gProgressBar[index].max_range
			endif
		endif
	endif
EndFunction percent

// Size/Position Functions
Function ProgressBar_SetPosition(id, x, y)
	index as integer
	index = gProgressBar.find(id)
	if index<>-1
		if GetSpriteExists(gProgressBar[index].spr_border) : SetSpritePosition(gProgressBar[index].spr_border, x-1, y-1) : endif
		if GetSpriteExists(gProgressBar[index].spr_back) : SetSpritePosition(gProgressBar[index].spr_back, x, y) : endif
		if GetSpriteExists(gProgressBar[index].spr_front) : SetSpritePosition(gProgressBar[index].spr_front, x, y) : endif
		
		ProgressBar_SetCaptionAlign(id, gProgressBar[index].caption_align)	
		
	endif
EndFunction
// TODO: add ProgressBar_GetPosition

Function ProgressBar_SetSize(id, width, height)
	old_state as integer
	index as integer
	index = gProgressBar.find(id)
	if index<>-1
		if GetSpriteExists(gProgressBar[index].spr_border) and GetSpriteExists(gProgressBar[index].spr_back) and GetSpriteExists(gProgressBar[index].spr_front)
			old_state=ProgressBar_GetState(id)
			SetSpriteSize(gProgressBar[index].spr_border, width+2, height+2)
			SetSpriteSize(gProgressBar[index].spr_back, width, height)
			SetSpriteSize(gProgressBar[index].spr_front, width, height)
			
			//x as integer
			//y as integer
			//x = GetSpriteX(gProgressBar[index].spr_back)	
			//y = GetSpriteY(gProgressBar[index].spr_back)	
			//SetTextPosition(gProgressBar[index].txt_caption, x+width/2, y-2)
			SetTextSize(gProgressBar[index].txt_caption, height)
			ProgressBar_SetCaptionAlign(id, gProgressBar[index].caption_align)	
			
			ProgressBar_SetState(id, old_state)
		endif
	endif
EndFunction
// TODO: add ProgressBar_GetSize

Function ProgressBar_SetMax(id, max)
	old_state as integer
	index as integer
	index = gProgressBar.find(id)
	if index<>-1
		if GetSpriteExists(gProgressBar[index].spr_border) and GetSpriteExists(gProgressBar[index].spr_back) and GetSpriteExists(gProgressBar[index].spr_front)
			old_state=ProgressBar_GetState(id)
			gProgressBar[index].max_range=max
			ProgressBar_SetState(id, old_state)
		endif
	endif
EndFunction
Function ProgressBar_GetMax(id)
	index as integer
	max as integer
	index = gProgressBar.find(id)
	if index<>-1
		max=gProgressBar[index].max_range
	endif
EndFunction max

Function ProgressBar_SetColor(id, border, back, front, alpha)
	
	index as integer
	r as integer
	g as integer
	b as integer
	
	index = gProgressBar.find(id)
	if index<>-1
		if GetSpriteExists(gProgressBar[index].spr_border) and GetSpriteExists(gProgressBar[index].spr_back) and GetSpriteExists(gProgressBar[index].spr_front)
			
			r=GetColorRed(border)
			g=GetColorRed(border)
			b=GetColorRed(border)
			SetSpriteColor(gProgressBar[index].spr_border, r, g, b, alpha)
			
			r=GetColorRed(back)
			g=GetColorRed(back)
			b=GetColorRed(back)
			SetSpriteColor(gProgressBar[index].spr_back, r, g, b, alpha)
			
			r=GetColorRed(front)
			g=GetColorRed(front)
			b=GetColorRed(front)
			SetSpriteColor(gProgressBar[index].spr_front, r, g, b, alpha)
			
		endif
	endif
EndFunction

// Caption Functions
Function ProgressBar_SetCaption(id, caption as string)
	
	index as integer
	index = gProgressBar.find(id)
	if index<>-1
		if GetTextExists(gProgressBar[index].txt_caption)
			gProgressBar[index].caption=caption
			caption=ReplaceString(caption, "[c]", str(ProgressBar_GetState(id)), 1)
			caption=ReplaceString(caption, "[m]", str(ProgressBar_GetMax(id)), 1)
			SetTextString(gProgressBar[index].txt_caption, caption)
		endif
	endif
	
EndFunction
Function ProgressBar_SetCaptionColor(id, r, g, b, alpha)
	
	index as integer
	index = gProgressBar.find(id)
	if index<>-1
		if GetTextExists(gProgressBar[index].txt_caption)
			SetTextColor(gProgressBar[index].txt_caption, r, g, b, alpha)
		endif
	endif
	
EndFunction
Function ProgressBar_SetCaptionSize(id, size)
	
	index as integer
	index = gProgressBar.find(id)
	if index<>-1
		if GetTextExists(gProgressBar[index].txt_caption)
			SetTextSize(gProgressBar[index].txt_caption, size)
		endif
	endif
	
EndFunction
Function ProgressBar_SetCaptionAlign(id, align)
	
	index as integer
	index = gProgressBar.find(id)
	if index<>-1
		if GetTextExists(gProgressBar[index].txt_caption)
			gProgressBar[index].caption_align=align
			
			SetTextAlignment(gProgressBar[index].txt_caption, gProgressBar[index].caption_align)
			
			width as integer
			height as integer
			x as integer
			y as integer
			
			width = GetSpriteWidth(gProgressBar[index].spr_back)
			height = GetSpriteHeight(gProgressBar[index].spr_back)
				
			x = GetSpriteX(gProgressBar[index].spr_back)	
			y = GetSpriteY(gProgressBar[index].spr_back)	
			
			if gProgressBar[index].is_vertical
				SetTextSize(gProgressBar[index].txt_caption, width)
				SetTextAngle(gProgressBar[index].txt_caption, -90)
				
				Select gProgressBar[index].caption_align
					Case 0
						SetTextPosition(gProgressBar[index].txt_caption, x-1, y+height-5)
					EndCase
					Case 1
						SetTextPosition(gProgressBar[index].txt_caption, x-1, y+height/2)
					EndCase		
					Case 2
						SetTextPosition(gProgressBar[index].txt_caption, x-1, y+5)
					EndCase	
				EndSelect

else
				SetTextSize(gProgressBar[index].txt_caption, height)
				SetTextAngle(gProgressBar[index].txt_caption, 0)
				
				Select gProgressBar[index].caption_align
					Case 0
						SetTextPosition(gProgressBar[index].txt_caption, x+5, y-1)
					EndCase
					Case 1
						SetTextPosition(gProgressBar[index].txt_caption, x+width/2, y-1)
					EndCase		
					Case 2
						SetTextPosition(gProgressBar[index].txt_caption, x+width-5, y-1)
					EndCase	
				EndSelect		
				
			endif

endif
	endif
	
EndFunction

+ Code Snippet

Type tProgressBar
	id
	spr_back
	spr_front
	spr_border
	show_border
	is_vertical
	max_range
	caption as string
	caption_align 
	txt_caption
EndType
Global gProgressBar as tProgressBar[]

Function ProgressBar_Create(id, x, y, width, height, vertical, range, caption as string)
	
	hb as tProgressBar
	hb.id=id
	hb.is_vertical=vertical
	hb.max_range=range	
	
	hb.spr_border = CreateSprite(0)
	SetSpritePosition(hb.spr_border, x-1, y-1)
	SetSpriteSize(hb.spr_border, width+2, height+2)
	SetSpriteColor(hb.spr_border, 0, 0, 0, 255)
	FixSpriteToScreen(hb.spr_border, 1)	
	
	hb.spr_back = CreateSprite(0)
	SetSpritePosition(hb.spr_back, x, y)
	SetSpriteSize(hb.spr_back, width, height)
	SetSpriteColor(hb.spr_back, 255, 255, 255, 125)
	FixSpriteToScreen(hb.spr_back, 1)	
	
	hb.spr_front = CreateSprite(0)
	SetSpritePosition(hb.spr_front, x, y)
	SetSpriteSize(hb.spr_front, width, height)
	SetSpriteColor(hb.spr_front, 255, 0, 0, 125)
	FixSpriteToScreen(hb.spr_front, 1)	
	
	hb.txt_caption=CreateText(caption)
	hb.caption=caption
	hb.caption_align=1
	SetTextAlignment(hb.txt_caption, 1)
	FixTextToScreen(hb.txt_caption, 1)	
	
	SetTextColor(hb.txt_caption, 255, 255, 255, 255)
	
	if vertical
		SetTextPosition(hb.txt_caption, x-1, y+height/2)
		SetTextSize(hb.txt_caption, width)
		SetTextAngle(hb.txt_caption, -90)
	else
		SetTextPosition(hb.txt_caption, x+width/2, y-1)
		SetTextSize(hb.txt_caption, height)
		SetTextAngle(hb.txt_caption, 0)
	endif
	
	gProgressBar.insertSorted(hb)
	
	ProgressBar_SetCaption(id, caption)

EndFunction gProgressBar.length

// Internal Functions


// Public Functions
Function ProgressBar_Delete(id)
	index as integer
	index = gProgressBar.find(id)
	if index<>-1
		if GetSpriteExists(gProgressBar[index].spr_border) : DeleteSprite(gProgressBar[index].spr_border) : endif
		if GetSpriteExists(gProgressBar[index].spr_back) : DeleteSprite(gProgressBar[index].spr_back) : endif
		if GetSpriteExists(gProgressBar[index].spr_front) : DeleteSprite(gProgressBar[index].spr_front) : endif
	endif
	
EndFunction
Function ProgressBar_Hide(id, hide)
	index as integer
	index = gProgressBar.find(id)
	if index<>-1
		if GetSpriteExists(gProgressBar[index].spr_border) and GetSpriteExists(gProgressBar[index].spr_back) and GetSpriteExists(gProgressBar[index].spr_front)
			SetSpriteVisible(gProgressBar[index].spr_border, abs(hide-1))
			SetSpriteVisible(gProgressBar[index].spr_back, abs(hide-1))
			SetSpriteVisible(gProgressBar[index].spr_front, abs(hide-1))
			
			SetSpriteActive(gProgressBar[index].spr_border, abs(hide-1))
			SetSpriteActive(gProgressBar[index].spr_back, abs(hide-1))
			SetSpriteActive(gProgressBar[index].spr_front, abs(hide-1))
		endif
	endif
EndFunction

// State Functions
Function ProgressBar_SetState(id, pos)
	
	index as integer
	bar_width as integer
	bar_height as integer
	new_width as integer
	new_height as integer
	
	index = gProgressBar.find(id)
	if index<>-1
		if GetSpriteExists(gProgressBar[index].spr_back)
			bar_x as integer
			bar_y as integer
			bar_width=GetSpriteWidth(gProgressBar[index].spr_back)
			bar_height=GetSpriteHeight(gProgressBar[index].spr_back)
			new_width=0
			new_height=0
			if gProgressBar[index].is_vertical = 1
				new_width = bar_width
				new_height = bar_height*pos/gProgressBar[index].max_range
				
				bar_x = GetSpriteX(gProgressBar[index].spr_back)
				bar_y = GetSpriteY(gProgressBar[index].spr_back)
				SetSpritePosition(gProgressBar[index].spr_front, bar_x, bar_y+bar_height-new_height)
			else
				new_width = bar_width*pos/gProgressBar[index].max_range
				new_height = bar_height
				
			endif
			SetSpriteSize(gProgressBar[index].spr_front, new_width, new_height)
			
			ProgressBar_SetCaption(id, gProgressBar[index].caption)
		endif
	endif
EndFunction
Function ProgressBar_GetState(id)
	
	
	index as integer
	bar_width as integer
	bar_height as integer
	front_width as integer
	front_height as integer
	max_Y as integer
	min_Y as integer
	max_X as integer
	min_X as integer
	percent as integer
	
	index = gProgressBar.find(id)
	if index<>-1
		if GetSpriteExists(gProgressBar[index].spr_back)
			bar_width=GetSpriteWidth(gProgressBar[index].spr_back)
			bar_height=GetSpriteHeight(gProgressBar[index].spr_back)
			front_width=GetSpriteWidth(gProgressBar[index].spr_front)
			front_height=GetSpriteHeight(gProgressBar[index].spr_front)
			if gProgressBar[index].is_vertical = 1
				max_Y=GetSpriteY(gProgressBar[index].spr_back)+GetSpriteHeight(gProgressBar[index].spr_back)
				min_Y=GetSpriteY(gProgressBar[index].spr_back)
				percent=(GetSpriteHeight(gProgressBar[index].spr_front) / (max_Y-min_Y)) * gProgressBar[index].max_range
			else
				max_X=GetSpriteX(gProgressBar[index].spr_back)+GetSpriteWidth(gProgressBar[index].spr_back)
				min_X=GetSpriteX(gProgressBar[index].spr_back)
				percent=(GetSpriteWidth(gProgressBar[index].spr_front) / (max_X-min_X)) * gProgressBar[index].max_range
			endif
		endif
	endif
EndFunction percent

// Size/Position Functions
Function ProgressBar_SetPosition(id, x, y)
	index as integer
	index = gProgressBar.find(id)
	if index<>-1
		if GetSpriteExists(gProgressBar[index].spr_border) : SetSpritePosition(gProgressBar[index].spr_border, x-1, y-1) : endif
		if GetSpriteExists(gProgressBar[index].spr_back) : SetSpritePosition(gProgressBar[index].spr_back, x, y) : endif
		if GetSpriteExists(gProgressBar[index].spr_front) : SetSpritePosition(gProgressBar[index].spr_front, x, y) : endif
		
		ProgressBar_SetCaptionAlign(id, gProgressBar[index].caption_align)	
		
	endif
EndFunction
// TODO: add ProgressBar_GetPosition

Function ProgressBar_SetSize(id, width, height)
	old_state as integer
	index as integer
	index = gProgressBar.find(id)
	if index<>-1
		if GetSpriteExists(gProgressBar[index].spr_border) and GetSpriteExists(gProgressBar[index].spr_back) and GetSpriteExists(gProgressBar[index].spr_front)
			old_state=ProgressBar_GetState(id)
			SetSpriteSize(gProgressBar[index].spr_border, width+2, height+2)
			SetSpriteSize(gProgressBar[index].spr_back, width, height)
			SetSpriteSize(gProgressBar[index].spr_front, width, height)
			
			//x as integer
			//y as integer
			//x = GetSpriteX(gProgressBar[index].spr_back)	
			//y = GetSpriteY(gProgressBar[index].spr_back)	
			//SetTextPosition(gProgressBar[index].txt_caption, x+width/2, y-2)
			SetTextSize(gProgressBar[index].txt_caption, height)
			ProgressBar_SetCaptionAlign(id, gProgressBar[index].caption_align)	
			
			ProgressBar_SetState(id, old_state)
		endif
	endif
EndFunction
// TODO: add ProgressBar_GetSize

Function ProgressBar_SetMax(id, max)
	old_state as integer
	index as integer
	index = gProgressBar.find(id)
	if index<>-1
		if GetSpriteExists(gProgressBar[index].spr_border) and GetSpriteExists(gProgressBar[index].spr_back) and GetSpriteExists(gProgressBar[index].spr_front)
			old_state=ProgressBar_GetState(id)
			gProgressBar[index].max_range=max
			ProgressBar_SetState(id, old_state)
		endif
	endif
EndFunction
Function ProgressBar_GetMax(id)
	index as integer
	max as integer
	index = gProgressBar.find(id)
	if index<>-1
		max=gProgressBar[index].max_range
	endif
EndFunction max

Function ProgressBar_SetColor(id, border, back, front, alpha)
	
	index as integer
	r as integer
	g as integer
	b as integer
	
	index = gProgressBar.find(id)
	if index<>-1
		if GetSpriteExists(gProgressBar[index].spr_border) and GetSpriteExists(gProgressBar[index].spr_back) and GetSpriteExists(gProgressBar[index].spr_front)
			
			r=GetColorRed(border)
			g=GetColorRed(border)
			b=GetColorRed(border)
			SetSpriteColor(gProgressBar[index].spr_border, r, g, b, alpha)
			
			r=GetColorRed(back)
			g=GetColorRed(back)
			b=GetColorRed(back)
			SetSpriteColor(gProgressBar[index].spr_back, r, g, b, alpha)
			
			r=GetColorRed(front)
			g=GetColorRed(front)
			b=GetColorRed(front)
			SetSpriteColor(gProgressBar[index].spr_front, r, g, b, alpha)
			
		endif
	endif
EndFunction


// Caption Functions
Function ProgressBar_SetCaption(id, caption as string)
	
	index as integer
	index = gProgressBar.find(id)
	if index<>-1
		if GetTextExists(gProgressBar[index].txt_caption)
			gProgressBar[index].caption=caption
			caption=ReplaceString(caption, "[c]", str(ProgressBar_GetState(id)), 1)
			caption=ReplaceString(caption, "[m]", str(ProgressBar_GetMax(id)), 1)
			SetTextString(gProgressBar[index].txt_caption, caption)
		endif
	endif
	
EndFunction
Function ProgressBar_SetCaptionColor(id, r, g, b, alpha)
	
	index as integer
	index = gProgressBar.find(id)
	if index<>-1
		if GetTextExists(gProgressBar[index].txt_caption)
			SetTextColor(gProgressBar[index].txt_caption, r, g, b, alpha)
		endif
	endif
	
EndFunction
Function ProgressBar_SetCaptionSize(id, size)
	
	index as integer
	index = gProgressBar.find(id)
	if index<>-1
		if GetTextExists(gProgressBar[index].txt_caption)
			SetTextSize(gProgressBar[index].txt_caption, size)
		endif
	endif
	
EndFunction
Function ProgressBar_SetCaptionAlign(id, align)
	
	index as integer
	index = gProgressBar.find(id)
	if index<>-1
		if GetTextExists(gProgressBar[index].txt_caption)
			gProgressBar[index].caption_align=align
			
			SetTextAlignment(gProgressBar[index].txt_caption, gProgressBar[index].caption_align)
			
			width as integer
			height as integer
			x as integer
			y as integer
			
			width = GetSpriteWidth(gProgressBar[index].spr_back)
			height = GetSpriteHeight(gProgressBar[index].spr_back)
				
			x = GetSpriteX(gProgressBar[index].spr_back)	
			y = GetSpriteY(gProgressBar[index].spr_back)	
			
			if gProgressBar[index].is_vertical
				SetTextSize(gProgressBar[index].txt_caption, width)
				SetTextAngle(gProgressBar[index].txt_caption, -90)
				
				Select gProgressBar[index].caption_align
					Case 0
						SetTextPosition(gProgressBar[index].txt_caption, x-1, y+height-5)
					EndCase
					Case 1
						SetTextPosition(gProgressBar[index].txt_caption, x-1, y+height/2)
					EndCase		
					Case 2
						SetTextPosition(gProgressBar[index].txt_caption, x-1, y+5)
					EndCase	
				EndSelect		

			else
				SetTextSize(gProgressBar[index].txt_caption, height)
				SetTextAngle(gProgressBar[index].txt_caption, 0)
				
				Select gProgressBar[index].caption_align
					Case 0
						SetTextPosition(gProgressBar[index].txt_caption, x+5, y-1)
					EndCase
					Case 1
						SetTextPosition(gProgressBar[index].txt_caption, x+width/2, y-1)
					EndCase		
					Case 2
						SetTextPosition(gProgressBar[index].txt_caption, x+width-5, y-1)
					EndCase	
				EndSelect		
				
			endif
			

		endif
	endif
	
EndFunction

+ Code Snippet

ProgressBar_Create(BAR_SHIP_HULL, (RES_WIDTH/2)-100, RES_HEIGHT-30, 200, 20, 0, 100, "Hull: [c]/[m]%")
ProgressBar_Create(BAR_SHIP_ARMOR, (RES_WIDTH/2)-100, RES_HEIGHT-55, 200, 20, 0, 100, "Armor: [c]/[m]%")
ProgressBar_Create(BAR_SHIP_SHIELD, (RES_WIDTH/2)-100, RES_HEIGHT-80, 200, 20, 0, 100, "Shield: [c]/[m]%")
ProgressBar_Create(BAR_SHIP_CARGO, (RES_WIDTH/2)-150, RES_HEIGHT-110, 20, 100, 1, 100, "Cargo Hold")
ProgressBar_Create(BAR_SHIP_ORE, (RES_WIDTH/2)-125, RES_HEIGHT-110, 20, 100, 1, 100, "Ore Hold")
ProgressBar_Create(BAR_SHIP_WARP, (RES_WIDTH/2)+105, RES_HEIGHT-110, 20, 100, 1, 100, "Warp")
ProgressBar_Create(BAR_SHIP_IMPULSE, (RES_WIDTH/2)+130, RES_HEIGHT-110, 20, 100, 1, 100, "Impulse")

Edit: [c]/[m] are placeholder to automatically insert "Current, Maximum" values

How that helps

Open Source plugins
Cl - DnD Plugin
Buy Me A Coffee

Attachments

Login to view attachments

Back to top

Profile PM

dandrews

3

Years of Service

User Offline

Joined: 26th Jun 2020

Location:

Posted: 20th Nov 2021 04:47

Link

thats great! thank you ill be looking at that for sure. my original code is still bugging me though lol

Back to top

Profile PM

PartTimeCoder

AGK Tool Maker

9

Years of Service

User Offline

Joined: 9th Mar 2015

Location: London UK

Posted: 20th Nov 2021 04:52

Link

lol, as I remember the math was a little tricky to get right, a static bar is easy enough but making it dynamic was a bit of a challenge.

Open Source plugins
Cl - DnD Plugin
Buy Me A Coffee

Back to top

Profile PM

dandrews

3

Years of Service

User Offline

Joined: 26th Jun 2020

Location:

Posted: 20th Nov 2021 04:59

Link

i need to work on making functional code like that instead of hundreds of lines setting positions and so on

Back to top

Profile PM

PartTimeCoder

AGK Tool Maker

9

Years of Service

User Offline

Joined: 9th Mar 2015

Location: London UK

Posted: 20th Nov 2021 05:09 Edited at: 20th Nov 2021 05:10

Link

Yeah I like to write modular code, if you think of everything in your game as an independent system and code it as such you then build a library of "drop in" solutions for the next projects.

Actually, looking over that code it could use some refactoring, and the text is not getting deleted, the functional part is good though I just have not used it in a project so there are edge cases you might need to catch.

Open Source plugins
Cl - DnD Plugin
Buy Me A Coffee

Back to top

Profile PM

dandrews

3

Years of Service

User Offline

Joined: 26th Jun 2020

Location:

Posted: 20th Nov 2021 16:34

Link

omg i had an extra "p" in progress somewhere..............

Back to top

Profile PM

PartTimeCoder

AGK Tool Maker

9

Years of Service

User Offline

Joined: 9th Mar 2015

Location: London UK

Posted: 20th Nov 2021 16:57

Link

HaHa, it happens ...

You can use #Option_Explicit to avoid stuff like that, it makes AppGameKit act more like C (for example) so you have to declare variables first and anything not declared (like progress with 2 p's lol) will get pinged by the compiler

Open Source plugins
Cl - DnD Plugin
Buy Me A Coffee

Back to top

Profile PM

dandrews

3

Years of Service

User Offline

Joined: 26th Jun 2020

Location:

Posted: 20th Nov 2021 22:36

Link

so when i use optionexplict my for i loops come up as i isnt defined like this one

+ Code Snippet

function AlienAatk()
	for i = 0 to AlienA.length
		if AlienA[i].active = 1
			if GetSpriteCollision(dummya[i].id, barrier.id) = 1 and AlienA[i].atktime <=0 and  AlienA[i].dead = 0 
				//playsound(7,50,0)
				player.health = player.health - 3
				AlienA[i].atktime = 50
			endif
			if AlienA[i].atktime >0
				AlienA[i].atktime = AlienA[i].atktime -1
			endif
		endif
	next i
endfunction

Back to top

Profile PM

Virtual Nomad

Moderator

18

Years of Service

User Offline

Joined: 14th Dec 2005

Location: SF Bay Area, USA

Posted: 20th Nov 2021 23:01 Edited at: 20th Nov 2021 23:03

Link

#option_explicit is very strict.

ie, your variable i isn't explicitly declared.

so, something like:

+ Code Snippet

Local i as Integer

is required before you use it.

AGK Tower Defense Community Competition | [TD]
AGK Resource Directory
AGK on Itch.io
TGC @ GitHub

Back to top

Profile PM Website

dandrews

3

Years of Service

User Offline

Joined: 26th Jun 2020

Location:

Posted: 20th Nov 2021 23:21

Link

I see thank you. Is it better to locally declare i for every loop or to use global once?

Back to top

Profile PM

PartTimeCoder

AGK Tool Maker

9

Years of Service

User Offline

Joined: 9th Mar 2015

Location: London UK

Posted: 21st Nov 2021 02:48

Link

Noooooooo!

Generally speaking you want to avoid globals *where you can*, I would declare locally every time.

Open Source plugins
Cl - DnD Plugin
Buy Me A Coffee

Back to top

Profile PM

Phaelax

DBPro Master

21

Years of Service

User Offline

Joined: 16th Apr 2003

Location: Metropia

Posted: 21st Nov 2021 08:18

Link

Quote: "pprogress_step = Aliennumber*100.0/totalaliens/100
setspritesize(wave.hpbarfront, pprogress_step*300,20)"

This confuses me. Should be as simple as:

+ Code Snippet

max_health = 485
current_health = 390
max_progress_length = 300

t# = max_health / current_health 

progress_length = max_progress_length  * t#

Tiled TMX Importer V.2
XML Parser V.2
Base64 Encoder/Decoder
Purple Token - Free online hi-score database
Legend of Zelda

"I like offending people, because I think people who get offended should be offended." - Linus Torvalds

Back to top

Profile PM Email Website

PartTimeCoder

AGK Tool Maker

9

Years of Service

User Offline

Joined: 9th Mar 2015

Location: London UK

Posted: 21st Nov 2021 08:37

Link

Its only easy, when you know how

Open Source plugins
Cl - DnD Plugin
Buy Me A Coffee

Back to top

Profile PM

dandrews

3

Years of Service

User Offline

Joined: 26th Jun 2020

Location:

Posted: 21st Nov 2021 16:36 Edited at: 21st Nov 2021 17:14

Link

si i tried something..... now im just unclear how to add "name" and ".hpbarfront"

type alienspawnType
    id as integer
    img as integer
    health as float
    atktime as integer
    active as integer
    hpbarfront as integer
    hpbarback as integer
endtype
global alienA as alienspawntype[9]

createhealthbar(aliena[i],alienA[i].x+ GetSpriteWidth(aliena[i].id) /2,alienA [i].y+ GetSpriteHeight(aliena[i].id),1,100,5,0,255,0,255)

function createhealthbar(name as string,posx as float, posy as float,visible as integer,sizex as integer,sizey as integer,rired as integer,igreen as integer,iblue as integer,ialpha as integer)
			//name,posx,posy,visible,sizex,sizey,ired,igreen,iblue,ialpha
			name.hpbarfront = createsprite(0)
			name.hpbarback = createsprite(0)
			SetSpriteSize(name.hpbarfront,sizex,sizey)
			SetSpriteSize(name.hpbarback,sizex,sizey)
			SetSpritePosition(name.hpbarfront,posx,posy)
			SetSpritePosition(name.hpbarback,posx,posy)
			setspritecolor(name.hpbarfront,ired,igree,iblue,ialpha)
			setspritecolor(name.hpbarback, 0, 0, 0, 100)
			SetSpriteVisible(name.hpbarfront,0)
			SetSpriteVisible(name.hpbarback,0)
			endfunction

+ Code Snippet

type alienspawnType
    id as integer
    img as integer
    health as float
    atktime as integer
    active as integer
    hpbarfront as integer
    hpbarback as integer
endtype
global alienA as alienspawntype[9]

createhealthbar(aliena[i],alienA[i].x+ GetSpriteWidth(aliena[i].id) /2,alienA [i].y+ GetSpriteHeight(aliena[i].id),1,100,5,0,255,0,255)


function createhealthbar(name as string,posx as float, posy as float,visible as integer,sizex as integer,sizey as integer,rired as integer,igreen as integer,iblue as integer,ialpha as integer)
			//name,posx,posy,visible,sizex,sizey,ired,igreen,iblue,ialpha
			name.hpbarfront = createsprite(0)
			name.hpbarback = createsprite(0)
			SetSpriteSize(name.hpbarfront,sizex,sizey)
			SetSpriteSize(name.hpbarback,sizex,sizey)
			SetSpritePosition(name.hpbarfront,posx,posy)
			SetSpritePosition(name.hpbarback,posx,posy)
			setspritecolor(name.hpbarfront,ired,igree,iblue,ialpha)
			setspritecolor(name.hpbarback, 0, 0, 0, 100)
			SetSpriteVisible(name.hpbarfront,0)
			SetSpriteVisible(name.hpbarback,0)
			endfunction

im thinking i need to convert the "name" into a string then add the ".hpbarfront" inside the function but im not sure how

Back to top

Profile PM

PartTimeCoder

AGK Tool Maker

9

Years of Service

User Offline

Joined: 9th Mar 2015

Location: London UK

Posted: 21st Nov 2021 22:11

Link

Change
createhealthbar(name as string

to

createhealthbar(name as alienspawnType

Open Source plugins
Cl - DnD Plugin
Buy Me A Coffee

Back to top

Profile PM

dandrews

3

Years of Service

User Offline

Joined: 26th Jun 2020

Location:

Posted: 21st Nov 2021 22:58 Edited at: 21st Nov 2021 23:34

Link

ok i see but i have 4 different alien types each have up to 9 of them aliena, alienb, alienc and aliend each have hp bars im trying to create. so basically i want to be able to use "name", (aliena,alienb,alienc,aliend) then the alien number (0- alien.length)

Back to top

Profile PM

PartTimeCoder

AGK Tool Maker

9

Years of Service

User Offline

Joined: 9th Mar 2015

Location: London UK

Posted: 22nd Nov 2021 16:49

Link

Hmm, ok

problem is you are referencing type fields and AppGameKit needs to know what type the fields belong to, so you need to either

1. use a single generic type all aliens use
2. use a select inside the function to set the right type fields
3. have the function return a healthbar type which you then apply to the alien type outside the function
4. have a createhealthbar function for each alien type.

either way you are going to have to rethink and restructure your code

Open Source plugins
Cl - DnD Plugin
Buy Me A Coffee

Back to top

Profile PM

dandrews

3

Years of Service

User Offline

Joined: 26th Jun 2020

Location:

Posted: 23rd Nov 2021 04:17

Link

Quote: "2. use a select inside the function to set the right type fields"

Could you explain this to me better or show me where to research it?

Back to top

Profile PM

Virtual Nomad

Moderator

18

Years of Service

User Offline

Joined: 14th Dec 2005

Location: SF Bay Area, USA

Posted: 23rd Nov 2021 05:05

Link

A select statement allows you to branch to different actions based on the value of the provided variable.

AGK Tower Defense Community Competition | [TD]
AGK Resource Directory
AGK on Itch.io
TGC @ GitHub

Back to top

Profile PM Website

dandrews

3

Years of Service

User Offline

Joined: 26th Jun 2020

Location:

Posted: 23rd Nov 2021 19:31

Link

so im going to put the aliens under a s ingle type like in the code below then try to construct it inside the function i just need to figure out how to reconstruct it inside im guessing turning the val into a string maybe

type dummyaliena
	id as integer
	img as integer
	x as float
	y as float
endtype
type alienaspawntype
    id as integer
    img as integer
    speed as float
    health as float
   	dead as integer
    x as float
    y as float 
    oldx as float
    oldy as float
    state_last as string
    state_now as string
    decaytime as float
    atktime as integer
    active as integer
    hpbarfront as integer
    hpbarback as integer
    froze as integer
    reset as integer
    frozetime as float
endtype 
type alienabullet_type
    sprite as integer
    img as integer
    speed as float
    state as integer 
    gunbulletx as float
    gunbullety as float
    alienbulletimg  as integer
	dummyapic  as integer
endtype

type allaliens_type
	aliena as alienaspawntype[9]
	alienabullet as alienabullet_type[9]
	dummya as dummyaliena[9]
	endtype

function createhealthbar(name as allaliens_type ,posx,posy,visible,sizex,sizey,rired,igreen,iblue,ialpha)
	//name,posx,posy,visible,sizex,sizey,ired,igreen,iblue,ialpha
	local i as integer
	for i = 0 to name.length
			name[i].hpbarfront = createsprite(0)
			name[i].hpbarback = createsprite(0)
			SetSpriteSize(name[i].hpbarfront,sizex,sizey)
			SetSpriteSize(name[i].hpbarback,sizex,sizey)
			SetSpritePosition(name[i].hpbarfront,posx,posy)
			SetSpritePosition(name[i].hpbarback,posx,posy)
			setspritecolor(name[i].hpbarfront,ired,igree,iblue,ialpha)
			setspritecolor(name[i].hpbarback, 0, 0, 0, 100)
			SetSpriteVisible(name[i].hpbarfront,0)
			SetSpriteVisible(name[i].hpbarback,0)
			next i
			endfunction

+ Code Snippet

type dummyaliena
	id as integer
	img as integer
	x as float
	y as float
endtype
type alienaspawntype
    id as integer
    img as integer
    speed as float
    health as float
   	dead as integer
    x as float
    y as float 
    oldx as float
    oldy as float
    state_last as string
    state_now as string
    decaytime as float
    atktime as integer
    active as integer
    hpbarfront as integer
    hpbarback as integer
    froze as integer
    reset as integer
    frozetime as float
endtype 
type alienabullet_type
    sprite as integer
    img as integer
    speed as float
    state as integer 
    gunbulletx as float
    gunbullety as float
    alienbulletimg  as integer
	dummyapic  as integer
endtype

type allaliens_type
	aliena as alienaspawntype[9]
	alienabullet as alienabullet_type[9]
	dummya as dummyaliena[9]
	endtype

function createhealthbar(name as allaliens_type ,posx,posy,visible,sizex,sizey,rired,igreen,iblue,ialpha)
	//name,posx,posy,visible,sizex,sizey,ired,igreen,iblue,ialpha
	local i as integer
	for i = 0 to name.length
			name[i].hpbarfront = createsprite(0)
			name[i].hpbarback = createsprite(0)
			SetSpriteSize(name[i].hpbarfront,sizex,sizey)
			SetSpriteSize(name[i].hpbarback,sizex,sizey)
			SetSpritePosition(name[i].hpbarfront,posx,posy)
			SetSpritePosition(name[i].hpbarback,posx,posy)
			setspritecolor(name[i].hpbarfront,ired,igree,iblue,ialpha)
			setspritecolor(name[i].hpbarback, 0, 0, 0, 100)
			SetSpriteVisible(name[i].hpbarfront,0)
			SetSpriteVisible(name[i].hpbarback,0)
			next i
			endfunction

Back to top

Profile PM

Virtual Nomad

Moderator

18

Years of Service

User Offline

Joined: 14th Dec 2005

Location: SF Bay Area, USA

Posted: 23rd Nov 2021 19:37

Link

Quote: "function createhealthbar(name as allaliens_type ,posx,posy,visible,sizex,sizey,rired,igreen,iblue,ialpha)"

mind your typos, unless you really want no red in your aliens

AGK Tower Defense Community Competition | [TD]
AGK Resource Directory
AGK on Itch.io
TGC @ GitHub

Back to top

Profile PM Website

PartTimeCoder

AGK Tool Maker

9

Years of Service

User Offline

Joined: 9th Mar 2015

Location: London UK

Posted: 23rd Nov 2021 20:03

Link

name.aliena[i].hpbarfront >> but you are still going to have the same problem, no matter how many ways you try to work around it you can not have 1 function apply type fields for different types, I get what you are trying to do but AppGameKit just will not allow it like this.

dummyaliena and alienaspawntype both contain the same fields (id, img, x, y) so just use this type for ALL aliens and just omit the fields you do not need in alien b,c,d etc, consolidate into a single type and reuse, then you can have your createhealthbar function work on all aliens

Open Source plugins
Cl - DnD Plugin
Buy Me A Coffee

Back to top

Profile PM

dandrews

3

Years of Service

User Offline

Joined: 26th Jun 2020

Location:

Posted: 25th Nov 2021 14:31

Link

Quote: " I get what you are trying to do but AppGameKit just will not allow it like this."

guess i just have trouble accepting no for an answer lol but thanks for the help. im just mainly trying simplify my code and functions now that i know a little bit of what im doing

Back to top

Profile PM

Sorry your browser is not supported!

Newcomers AppGameKit Corner / [SOLVED] simple health bar not working correctly

Attachments