The code is designed for a4+ so maybe right now it doesn't work great in a8 so you need to change some codes for working fine.

The code is:

//////////////////////////////////Lava Sprout/////////////////////////////
SYNONYM lavasurger {TYPE ENTITY;} //Important
////////////////////////////////////////////////////////////////////////////////
Function watchurtail ()//Function for hurting player and removing the lava that hit em
{
if((EVENT_TYPE == EVENT_IMPACT) && (YOU == PLAYER))
{
player._health -= RANDOM(50); //Randomness is the spice of life:)
PLAY_SOUND ouch,400; //Any sound for player screaming
REMOVE ME;
}
////////////////////////////////////////////////
}
ACTION risingball //Main action for ball created at ejector
{
MY.NEAR = ON;
MY.TRANSPARENT = ON; //You can add My.alpha = X here. Will look cool
MY.FLARE = ON;
SET MY.LIGHTRANGE,50; //Increase laugh
SET MY.LIGHTRED,255; //Idealy adjust to your need
MY.AMBIENT = 105;
MY.SCALE_X = 2;
MY.SCALE_Y = 2;
WAIT 1;
WHILE (MY.SCALE_X < 2.5) //Play with this value
{
MY.SCALE_X +=0.01;
MY.SCALE_Y +=0.01;
MY.AMBIENT -=0.2;
MY.Z += 20 * TIME;//Speed of rising sprout
//MY.X += 20 * TIME;//Not cool if the ball tumbles in air
//MY.Y += 20 * TIME;//''
WAIT 3;//Avoid adding a spurting sound here
}
REMOVE ME; //lava sprouts dissapers in air
//Function burst_ball() //If you want the ball to explode then you must add your own script
}
ACTION LASENBOT //Dont assign by wed
{
MY.ENABLE_IMPACT = ON;
MY.ENABLE_SONAR = ON;
MY.EVENT = watchurtail;
risingball(); //Ball rise control - Play with this function

//Trailsmoke();//Removed :You can make and add an function for a trail of smoke if you want:- I wanted
//The effect to be there but the author wanted to remove it:(

}
////////////////////////Important/////////////////////////////////////
/*This action must be assigned to a object placed in your lava through wed
This will make the object emit lava sprouts. */
//////////////////////////Read me first:)//////////////////////////////////////////////
ACTION PLASMABALL// makes plasma balls independent
{
MY.ENABLE_IMPACT = ON;
MY.PASSABLE = ON;
LAVASURGEr = ME;
while(1) //Sure you can make this random instead of continous
{
WAIT 40; //Adjust
CREATE <lavabub.mdl>,MY.POS,Lasenbot;//Initiate sprout//Lavabub.mdl required
WAIT 40; //Dont forget this
}
}
/////////////////////////////////////////////////////////////////////////////

so you need to check the replacements and then this code works great on your 3DGS. for example i think the SYNONYM command is changed in new 3DGS.

http://www.devharbor.com - The place you can share or sale your 3DGS Contents.