Zandronum

Code: Select all

ACTOR VariableTest 8806
{
Health 5000
Radius 20
Height 43
speed 10
damagefactor thing , 0.0
Scale 0.05
MONSTER
+shootable
+solid
var int user_angle;
var int user_pitchthing;
states
{
	spawn:
		TEST A 1 a_look
		loop
	see:
		TEST A 1 a_chase
		TEST A 0 a_takeinventory("anglevar",999)
		TEST A 0 a_takeinventory("pitchvar",999)
		loop
	missile:
		TEST A 0 a_custommissile("testrocket",10,0,AmountOfPitchVar,CMF_ABSOLUTEPITCH,AmountOfAngleVar)
		TEST A 0 a_jumpifinventory("anglevar",360,"pitchshit")
		TEST A 0 a_giveinventory("anglevar",1)
		loop
	pitchshit:
		TEST A 0 a_takeinventory("anglevar",999)
		TEST A 0 a_giveinventory("pitchvar",1)
		TEST A 0 a_jumpifinventory("anglevar",90,"see")
		goto missile
	death:
		TNT1 A 0 a_die
		stop
	}
}

ACTOR AngleVar : Inventory
{
   Inventory.MaxAmount 360
}

ACTOR PitchVar : Inventory
{
   Inventory.MaxAmount 90
}

ACTOR TestRocket : Rocket
{
DamageType thing
}

Code: Select all

ACTOR VariableTest 8806
{
Health 5000
Radius 20
Height 43
speed 10
damagefactor thing , 0.0
Scale 0.05
MONSTER
+shootable
+solid
states
{
	spawn:
		TEST A 1 a_look
		loop
	see:
		TEST A 1 a_chase
		TEST A 0 a_takeinventory("anglevar",999)
		TEST A 0 a_takeinventory("pitchvar",999)
		loop
	missile:
		TEST A 0 a_custommissile("testrocket",10,0,ACS_ExecuteWithResult(923,0),CMF_AIMDIRECTION,ACS_ExecuteWithResult(923,1))
		TEST A 0 a_jumpif(ACS_ExecuteWithResult(923,0)>359,"pitchshist")
		TEST A 0 a_giveinventory("anglevar",45)
		loop
	pitchshit:
		TEST A 0 a_takeinventory("anglevar",999)
		TEST A 0 a_giveinventory("pitchvar",11)
		TEST A 0 a_jumpif(ACS_ExecuteWithResult(923,1)>359,"see")
		goto missile
	death:
		TNT1 A 0 a_die
		stop
	}
}

ACTOR AngleVar : Inventory
{
   Inventory.MaxAmount 360
}

ACTOR PitchVar : Inventory
{
   Inventory.MaxAmount 90
}

ACTOR TestRocket : Rocket
{
DamageType thing
}



ACTOR SpecialBaronOfHell : BaronOfHell
{
  States
  {
  Spawn:
    BOSS A 0 NoDelay A_CustomMissile("OrbitBall", 32, 0, 0, CMF_AIMDIRECTION)
  Idle:
    Goto Super::Spawn
  }
}

ACTOR OrbitBall
{
  RenderStyle "Add"
  Translation "0:255=%[0,0,0]:[0.93,2,0.87]" // Makes it green-colored
  +MISSILE
  +NOINTERACTION

  var int user_angle; // See user variables

  States
  {
  Spawn:
    BAL1 A 1 Bright NoDelay A_Warp(AAPTR_TARGET, 32, 0, 32, user_angle, WARPF_ABSOLUTEANGLE|WARPF_NOCHECKPOSITION|WARPF_INTERPOLATE)
    TNT1 A 0 A_SetUserVar("user_angle", user_angle + 8)
    Loop
  }
}

Code: Select all

#include "zcommon.acs"

int inventoryshit[2]={"anglevar","pitchvar"};

script 923 (int i)
{
	SetResultValue(checkinventory(inventoryshit[i]));
}

Code: Select all

Script X (void) {
    SetResultValue(CheckInventory("Item"));
}

Code: Select all

LoopState:
    TNT1 A 0 A_JumpIfInventory("Item", MY_ITEM_LIMIT, "LeaveLoop")
    TNT1 A 0 A_CustomMissile("MyMissile", 0, 0, ACS_ExecuteWithResult(X) * 45)
    TNT1 A 0 A_GiveInventory("Item", 1)
Loop
LeaveLoop:
    TNT1 A 0 A_TakeInventory("Item", MY_ITEM_LIMIT)
Goto Whatever