ACS Prefab Database

[Apothem]

Well, ease of use is rather important, and lets not forget that we're looking for well commented code, and also efficentcy is somewhat of an issue. Lets make sure that the way you're doing your prefab is an easy to reproduce method that can be easily applied to anything you're doing. (*Adds a guidleline to the list*)

[farlowj]

Well, here's one, I'm pretty sure it works. It makes a line transparent, or opaqe, depending on the initial state of it.

Code: Select all

#include"zcommon.acs"
script 1 (void)  //any script number, just activate it, makes line translucent
}
        int line;
	line=255;  //variable to control transparency
	While(line>=1){  //going translucent
		TranslucentLine(3,line,0);  //any line ID will do, just make sure to have a texture on it
		line--;  //makes it a little more translucent
		Delay(1);  //necessary to avoid a run away script
	}
}
script 2 (void)  //makes line opaque
{
        int line2;
        line2=255;  //variable to control opaquness
	While(line2<=255){ //becoming opaque
		TranslucentLine(3,line2,0);  //once again, any line ID will do
		line2++;  //makes it more opaque
		Delay(1);  //necessary to avoid a run away script
	}
}

[Dr_Ian]

That's really good. A slight bug: the second line=255 should be line=0. After that it works perfectly. You could make the lineid a parameter of the script therefore making it really general?

[Apothem]

Line 3, got } expected {. Aside from that, It looks like it should run properly. I'll check it for syntax more closely when I have time later today. After looking at your script, I think I'm gonna have to add a thing or two to the guidlines... *updates*

Make sure to add a description at the top with an explanation of all tid's, line id's, and sector id's used.

EDIT: I'm going to break off the camera script I'm using for vehicles, fix it up a bit, comment and document it and post it here in this thread. I know some of you may want to have this.

[jallamann]

RPG script. Note that this isn't the same version as the one on my home page. I haven't tried compiling it, but if I don't suck too hard, it should work.
To make a monster give XP on death, make one of the death frames have ACS_Execute(scriptnum,0,0,0,0) in it.

---

Code: Select all

/* ---------------- JALLAMANN'S RPG SCRIPT BEGINS -----------------


  Script version 1.4 beta - Sep 26th, 2005

  Experience and level system script
  Originally designed for Crusader: Jewel Case

  Copyright (c) 2004-2005 Ivar Remøy aka. jallamann

  Big thanks to Wasted Youth for the original script,
  which was used for reference for this one.

  You can use this in your map or modification if
  you give me credit for it. If you enhance it in
  any way, I'll be interested in looking at it,
  perhaps include it in my coming projects.

  If you decide to use it, please tell me at either
  mail: ivar@nightmaster.net
  or at the ZDoom.org forums.

  If you use it, you MUST leave this comment intact
  with NO modifications, include the entire script in
  your SCRIPTS lump, and don't delete it, so that I
  can become popular and take over the world.
  No, really, just an Acceptable Usage Policy.

  Enjoy! ;D

*/


// INITIAL VARIABLES
int xp = 0; // player experience
int lv = 1; // player level
int nextlv = 2; // next level
int hp = 100; // player health
int ar = 0; // player armour
str gained = "";
int xp2lv[10] = {50,125,250,450,675,900,1200,1500,2000,2500} // xp2lv[total number of levels] = {xp to each level}


script 150 open
{
  // experience and level screen refresh loop
  setfont("bigfont");
  hudmessage(s:"xp: ", d:xp, s:"/", d:xp2lv[(lv+1)]; hudmsg_fadeout, 1, cr_brown, 0.99, 0.70, 2.0);
  hudmessage(s:"level: ", d:lv; hudmsg_fadeout, 2, cr_brown, 0.99, 0.75, 2.0);
  setfont("smallfont");
  delay(1);
  restart;
}

script 151 (void) // xp check script, executed when a monster that gives xp dies
{
  if(xp>=xp2lv[(lv+1)])
  {
    xp=0; // reset xp counter
    lv++; // increase level by 1
    acs_execute(152,0,0,0,0);
  }
}

script 152 (void) // Reward script
{
  if(lv==2)
  { //Level 2 - Give 25 HP
    hp += 25;
    gained = "Gained 25 HP";
  }
  if(lv==3)
  { //Level 3 - Give 25 more HP and some bullets
    hp += 25;
    gained = "Gained 25 HP\nGained 100 bullets";
    giveinventory("Clip", 100);
  }
  if(lv==4)
  { //Level 4
    gained = "Gained shotgun!";
    giveinventory("Shotgun", 1);
  }
  if(lv==5)
  { //Level 5
    gained = "Gained 100 armor";
    ar+=100;
  }
  if(lv==6)
  { //Level 6
    gained = "Gained 50 armor";
    ar+=50;
  }
  if(lv==7)
  { //Level 7
    gained = "Gained 50 armor\nGained 50 HP";
    ar+=50;
    hp+=50;
  }
  if(lv==8)
  { //Level 8
    gained = "Gained Backpack";
    giveinventory("Backpack",1);
  }
  if(lv==9)
  { //Level 9
    gained = "Gained chaingun!";
    giveinventory("Chaingun",1);
  }
  if(lv==10)
  { //Level 10
    gained = "Gained 50 Armor\nGained 50 HP\nGained plasma rifle";
    ar+=50;
    hp+=50;
    giveinventory("PlasmaRifle",1);
  }

  setfont("bigfont");
  print(s:"You reached level ", d:lv);
  setfont("smallfont");
  hudmessage(s:gained; hudmsg_fadeout, 0, cr_gold, 0.50, 0.55, 3.0);
  setactorproperty(playernumber(),aprop_health,hp) // give the player the new maxhealth (if any) and heal
  takeinventory("BlueArmor",999); // take all armor
  giveinventory("ArmorBonus", ar); // give max armor
  delay(1);
  gained = "";


}

script 154 enter
{
print(s:"This modification uses jallamann's\nexperience and level script.\n\nfor more info, see www.nightmaster.net");
}

/*
  experience scripts
  ------------------

  201 - zombieman
  202 - sargeant
  203 - imp and demon
  204 - chaingunner
  205 - hissie
  206 - stealth hissie
  207 - stealth baron

  Just edit these to suit your needs...
*/

int xpzombie = 2;
int xpsarge = 5;
int xpimpdemon = 10;
int xpchaing = 15;
int xphissie = 20;



script 201 (void)
{
  xp += xpzombie;
  hudmessage(s:"gained ", d:xpzombie, s:" xp"; hudmsg_fadeout, 0, cr_red, 0.5, 0.6, 2.0);
  acs_execute(151,0,0,0,0);
}

script 202 (void)
{
  xp += xpsarge;
  hudmessage(s:"gained ", d:xpsarge, s:" xp"; hudmsg_fadeout, 0, cr_red, 0.5, 0.6, 2.0);
  acs_execute(151,0,0,0,0);
}

script 203 (void)
{
  xp += xpimpdemon;
  hudmessage(s:"gained ", d:xpimpdemon, s:" xp"; hudmsg_fadeout, 0, cr_red, 0.5, 0.6, 2.0);
  acs_execute(151,0,0,0,0);
}

script 204 (void)
{
  xp += xpchaing;
  hudmessage(s:"gained ", d:xpchaing, s:" xp"; hudmsg_fadeout, 0, cr_red, 0.5, 0.6, 2.0);
  acs_execute(151,0,0,0,0);
}

script 205 (void)
{
  xp += xphissie;
  hudmessage(s:"gained ", d:xphissie, s:" xp"; hudmsg_fadeout, 0, cr_red, 0.5, 0.6, 2.0);
  acs_execute(151,0,0,0,0);
}

script 206 (void)
{
  xp += 50;
  hudmessage(s:"gained 50 xp"; hudmsg_fadeout,0,cr_red, 0.5, 0.6, 2.0);
  acs_execute(151,0,0,0,0);
}

script 207 (void)
{
  xp += 60;
  hudmessage(s:"gained 60 xp"; hudmsg_fadeout,0,cr_red, 0.5, 0.6, 2.0);
  acs_execute(151,0,0,0,0);
}


// ---------------- JALLAMANN'S RPG SCRIPT ENDS -----------------

Report any bugs in the code, please.

[Apothem]

Are you sure that will require a decorate monster and not just the assignment of the acs_execute as a thing special to the monster? I'm not at a computer to check that but I'm pretty sure you only need to do that in order for it to work right without a decorate entry.

[jallamann]

Well, with DECORATE, you don't have to assign specials to every damn monster thing. And maybe you want to have a monster give xp in addition to having a special?

[Apothem]

Well, if that's the case, you might as well pack a decorate with that script as to help with implementation.

[Shadelight]

@jallamann: also, make it so the RPG script works with all the regular Doom2 monsters.

[Apothem]

@jallamann: also, make it so the RPG script works with all the regular Doom2 monsters.

That's why I said for him to pack a decorate with the script. That would solve that problem.

[jallamann]

No. I havent given a rat's ass about the mod that I originally made it for. That's the only reason why I released the script. If someone else wants to do it, fine.
Besides, it would just be adding a line to each monster that you want to give xp's death frame. Even I managed to do that when I was making the mod (and I still don't know much DECORATE). If someone that wants to use these scripts can't be arsed to learn something, they don't deserve ready scripts on a golden platter.

[Doomguy0505]

Making maps in Zen Dynamics

[Shadelight]

What in hell's name does Doomguy's post mean?!

[Deathsong12]

It means he's trying to be Xaser. Unless (Like WWE, which will have a Doom Builder config) you make your mod so that it can be mapped for, people shouldn't even try. I'm touching that file, as it may ruin my memories of Zen Dynamics forever.

[Shadelight]

So what you mean, is, that people can make configs for their maps, so people can make maps using the map? that dosen't seem right to me......