ACS Prefab Database

[Apothem]

okay! Here's the script for the HP bar!
HP Bar script -

---

Code: Select all

/*This script is a healthbar script for bosses and minibosses
To use this script replace mtid with the TID of the monster
you want the bar to monitor and replace the value of mmaxhp 
with the max health of the monster you're monitoring.
!! Make sure to replace ENTER with (void) if you dont want 
the script to activate with the player entering the level. !!
The lumps fillcrit, filldang, fillnorm, and fillcaut are all
the filler pics for the bar. Please put these inside the wad 
outside of any tags. The bar itself, HPMONBAR, is the actual 
bar pic. also place that inside the wad, but outside of any 
tags.
*/

#include "zcommon.acs"

int monhp;
int mtid = 666; //Replace the number here with your monster TID
int mmaxhp = 4000; //Replace number here with your monster's Max HP


Script 4 ENTER //Replace ENTER with (void) if you want to activate the script
{              //with a line instead of on level entry.
int hdisp;
monhp = getactorproperty(MTID, APROP_Health);
setfont("NORMAL");
hdisp = (monhp * 100 / mmaxhp);
sethudsize(800,600,0);
if (hdisp <= 0)
hdisp = 0;
hudmessage(i:hdisp; 1, 0, CR_WHITE, 120.1, 10.1, 1);
int acounter;
int bcounter;
setfont ("MONHPBAR");
hudmessagebold(s:"a"; 1, 101, CR_GREEN, 0.1, 1.1, 1);
for (acounter = 0; acounter <= hdisp; acounter++)
{
if (hdisp <= 0)
break;
bcounter = bcounter + 2.0;
setfont ("FILLNORM"); //By default, the bar shows as a blue bar.
if (hdisp < 75) //If the hp is at a caution level (75%) Display a yellow bar.
setfont ("FILLCAUT");
if (hdisp < 50) //If the hp is at a danger level (50%) Display an orange bar.
setfont ("FILLDANG"); 
if (hdisp < 25) // If the hp is at a critical level (25%) Display a red bar.
setfont ("FILLCRIT");
hudmessagebold(s:"a"; 1, acounter, CR_GREEN, 23.1 + bcounter, 7.1, 1);
}
bcounter = 0;
acounter = 0;
delay(1);
restart;
}

EDIT: I just realized I didn't document the code enough. But it's documented enough to get a general idea for what i did.

EDIT2: HOLY SHIT THAT'S A MESSY MAP! *Fixes script and map so it's half-way descent*

[Shadelight]

nice job Apothem, I like the gfx you made for it.

/me implements script into prototype map07 of DemonicLair.

[Apothem]

I didn't make them, solarsnowfall did. As he is my GFX designer for the time being

EDIT: God damn it people, I wanna see someone else make some contributions!!

[DoomRater]

Let me go dig out my old HP bar script. It's accurate to 1HP thanks to a few tricks in segmentation, and you can scale it to however many lifebars of 100 you need, up to as many colors as there are for letters.

[Shadelight]

can you have more then one hp bar? if so.....

[DoomRater]

What the code does is draw two bars if the target has over 100 life. It uses the color of the bar divided by 100 to draw the back bar, then calculates the bar for the remainder and draws that overtop. It kinda works the same way that the life bars worked in most street brawler games.

[Shadelight]

actually I was talking about Apothem's hp bar, and asking him.

[Siggi]

Make yourself more clear next time...

[Apothem]

If you want to have more than one bar, just copy-paste the script and replace the variables at the top with the appropriate numbers.

[Shadelight]

thanks for the info Apothem, this'll come in handy.

[Apothem]

What the code does is draw two bars if the target has over 100 life. It uses the color of the bar divided by 100 to draw the back bar, then calculates the bar for the remainder and draws that overtop. It kinda works the same way that the life bars worked in most street brawler games.

I know what you're talking about, I did the same thing for the overshield effect with the shieldtest.wad... Speaking of which I should also post that here as well.

[Bio Hazard]

Gah! All this code is so inefficent! >.<
I see no abstraction, no for loops... IYAA!

[DoomRater]

You'll see mine soon enough. The actual output on HUD_Message is messy however but it does work.

---

Code: Select all

#include "zcommon.acs"

int ST_LIFE = 400;
str lifebar[13]={"", "H", "HH", "HHH", "HHHH", "HHHHH", "HHHHHH", "HHHHHHH", "HHHHHHHH", "HHHHHHHHH", "HHHHHHHHHH", "HHHHHHHHHHH","HHHHHHHHHHHH"};
str lifebarEnd[9] = {" ","A","B","C","D","E","F","G","H"};
int color[3] = {10, 3, 7};
script 1 (void)
{
int health = getactorproperty(ActivatorTID(), aprop_health); 
int bar = health / 100;
health -= (bar * 100); 
int inbar = health / 8; 
health %= 8;  

//setfont("lifebar");
SetHudSize(400,300,1);
if(bar>0)
 hudmessage(s:"HHHHHHHHHHHHD"; HUDMSG_PLAIN, ST_LIFE, color[bar-1], 1 * 1.1 , 100 * 1.0 , 0);
else
 hudmessage(s:" "; HUDMSG_PLAIN, ST_LIFE, -1, 1 * 1.1, 100 * 1.0, 0);
hudmessage(s:lifebar[inbar],s:lifebarend[health]; HUDMSG_PLAIN, ST_LIFE-1, color[bar], 1 *1.1, 100 * 1.0, 0);
delay(const:1);
restart;
}

script 2 enter
{
	Thing_ChangeTID(0, 256 + PlayerNumber());
        ACS_Execute(1,0);
}

And here's the WAD that uses it...

http://rapidshare.de/files/5816130/brain.WAD.html

It's in a sector where you cannot die so feel free to go nuts on it. Only problem as you can see is it's designed to be used with a lifebar font and I don't have one, and I don't know how to build one either... Each letter is 8 pixels wide and A has one pixel colored from the left, B has two, etc.

[Bio Hazard]

I had an excellent smooth health bar script that I stashed somewhere. I gave part of it to Risen and he did some killer stuff with it cause he rocks like that.

[Apothem]

I think that's good enough for HP Bar scripts.... We need more variety here! C'mon lets see something unique.