[UPDATE] Allied Marines Pack (2022 Update)

DBJ87 wrote:

Code:

//Ally Marine template/Upgrade to ZScript //In ZScript you start with "Class" instead of "Actor", and actors need to explicitly inherit from the base Actor class. Class AllyMarine : Actor {     //The actors' properties and flags have to be put inside a Default{} block, similar to how states are put in a States{} block.     Default     {         //Actor properties need to have semicolons at the end.         Health 200;         GibHealth -50; //-35 orignal submission Default. -200 Vanilla Doom Default         Radius 20;         Height 56;         Mass 100;         SeeSound "Ally/Site";         PainSound "Ally/Pain";         DeathSound "Ally/Death";         ActiveSound "Ally/Active";         MaxTargetRange 2048;         MaxStepHeight 32;         MaxDropoffHeight 64;         //Default speeds & pain chance for majority         Speed 10;         FastSpeed 12;         PainChance 128;         MONSTER;         //Default Flags for majority         +BOSS         +FLOORCLIP         +FRIENDLY         +AVOIDMELEE         +MISSILEMORE         +QUICKTORETALIATE         +SLIDESONWALLS         +CANPUSHWALLS         +CANUSEWALLS         +JUMPDOWN         +NODROPOFF         +PUSHABLE         +NOBLOCKMONST         +LOOKALLAROUND         -COUNTKILL         //Optional Flags that I'm leaving you to decide whether to use them         //+NOTAUTOAIMED         //+NOTIMEFREEZE         //+NOFEAR     }     States     {         //All state frames in ZScript need to have semicolons, even ones that don't contain anonymous functions.         Crush:             TNT1 A 0 A_XScream();             POL5 R -1;             Loop;     } } // Intend on Script below by inkoalawetrust but no idea where to add it. // It's meant to give you extra control over Marine movement & probably replace // or be integrated into their "Patrol" set up so they aren't wondering // aimlessly when all targets have been killed & I'm assuming Spawn or See for // full control as soon as they're active from Dormant states. //Update 1 (ZScript & new Jetpack Marine Sprites) to be completed first. /* by inkoalawetrust  //This function is called by actors any time a player presses the use key on them.     Override Bool Used (Actor User)     {         Super.Used (User); //Run any of the other code inside the base Actor class first.                  //Only run the code if the player that used the marine is friendly to him. (Useful for deathmatch, where friendly monsters can work for different players.)         If (IsFriend (User))         {             //The marine isn't set to not follow players already.             If (!bDontFollowPlayers)             {                 bDontFollowPlayers = True; //So make him stop following the player.                 A_StartSound ("somesound"); //Can also play a sound cue or something if you want.                 Return True; //Marine was used.             }             //If the marine already isn't following the player anymore.             Else             {                 bDontFollowPlayers = False; //So make him start following the player again.                 A_StartSound ("somesound");                 Return True; //Marine was used.             }         }     Return False;     } */ //FIST Class AllyPunch : AllyMarine 11811 {     Default     {     //$Category Monsters     //$Title Ally 01- Punch     //$Sprite ALY1A1     Damage 10; //Skull Attack Damage     Speed 15;     FastSpeed 18;     PainChance 64;     OBITUARY "%o was punched in the face!";     Tag "AllyPunch";     MeleeThreshold 64;     -AVOIDMELEE     States     {     Spawn:         ALY1 AB 10 A_Look;         Loop;     See:         ALY1 AABBCCDD 3 A_Chase;         TNT1 A 0 A_CheckSight("A01Patrol");         loop;     A01Patrol:         ALY1 AABBCCDD 3 A_Wander;         TNT1 A 0 A_Look;         Loop;     Melee:         ALY1 A 3 A_FaceTarget;         TNT1 A 0 A_Jump(96,"Combo");         TNT1 A 0 A_PlaySound("Punch/Swing",Chan_Auto);         ALY1 E 5 A_CustomMeleeAttack(random(3,10)*6,"Ally/PunchImpact");         ALY1 A 5 A_Jump(64,"Missile");         ALY1 A 3 A_CheckRange(56,"Combo");         Goto See;     Combo:         TNT1 A 0 A_PlaySound("Punch/Swing",Chan_Auto);         ALY1 E 5 A_CustomMeleeAttack(random(3,10)*6,"Ally/PunchImpact");         ALY1 B 2;         TNT1 A 0 A_PlaySound("Punch/Swing",Chan_Auto);         ALY1 F 5 A_CustomMeleeAttack(random(3,10)*6,"Ally/PunchImpact");         ALY1 B 2;         TNT1 A 0 A_PlaySound("Punch/Swing",Chan_Auto);         ALY1 E 5 A_CustomMeleeAttack(random(3,10)*6,"Ally/PunchImpact");         ALY1 B 2;         TNT1 A 0 A_PlaySound("Punch/Swing",Chan_Auto);         ALY1 F 5 A_CustomMeleeAttack(random(3,10)*6,"Ally/PunchImpact");         ALY1 A 5 A_Jump(64,"Missile");         Goto See;     Missile:         ALY1 A 10 A_FaceTarget;         ALY1 A 5 A_PlaySound("Punch/Ready",6);         ALY1 A 5 A_FaceTarget;         TNT1 A 0 A_PlaySound("Punch/Charge",Chan_Auto);         ALY1 AE 5 A_SkullAttack;         ALY1 B 3 A_Gravity;         TNT1 A 0 A_FaceTarget;         TNT1 A 0 A_PlaySound("Punch/Swing",Chan_Auto);         ALY1 F 5 A_CustomMeleeAttack(random(3,10)*6,"Ally/PunchImpact");         ALY1 B 3 A_FaceTarget;         TNT1 A 0 A_PlaySound("Punch/Swing",Chan_Auto);         ALY1 E 5 A_CustomMeleeAttack(random(3,10)*6,"Ally/PunchImpact");         goto See;     Pain:         ALY1 G 5 A_Pain;         ALY1 G 3;         Goto See;     Death:         ALY1 H 5 A_Scream;         ALY1 I 5;         ALY1 J 5 A_NoBlocking;         ALY1 KLM 5;         ALY1 N -1;         Stop;     XDeath:         ALY1 O 5;         ALY1 P 5 A_XScream;         ALY1 Q 5 A_NoBlocking;         ALY1 RSTUV 5;         ALY1 W -1;         Stop;     Raise:         ALY1 N 3;         ALY1 MLKJ 5;         ALY1 IH 3;         Goto See;     } } //PISTOL Class AllyPistol : AllyMarine 11812 {     Default     {     //$Category Monsters     //$Title Ally 02- Pistol     //$Sprite ALY2E1     OBITUARY "%o was killed by an ally's reckless shooting!";     Tag "AllyPistol";     DropItem "Clip";     Decal "BulletChip";     states     {     Spawn:         ALY2 AABB 5 A_Look;         Loop;     See:         ALY2 AABBCCDD 3 A_Chase;         TNT1 A 0 A_CheckSight("A02Patrol");         loop;     A02Patrol:         ALY2 AABBCCDD 3 A_Wander;         TNT1 A 0 A_Look;         Loop;     Missile:         ALY2 E 7 A_FaceTarget;         TNT1 A 0 A_Jump(128,"10mmBurst");         TNT1 A 0 A_PlaySound("ALPist/FIRE");         ALY2 F 2 BRIGHT A_CustomBulletAttack(4.5,5.5,1,3,"BulletPuff");         ALY2 E 3;         goto See;     10mmBurst:         TNT1 A 0 A_PlaySound("ALPist/FIRE");         ALY2 F 3 BRIGHT A_CustomBulletAttack(4.5,5.5,1,3,"BulletPuff");         ALY2 E 1;         TNT1 A 0 A_PlaySound("ALPist/FIRE");         ALY2 F 3 BRIGHT A_CustomBulletAttack(4.5,5.5,1,3,"BulletPuff");         ALY2 E 1;         TNT1 A 0 A_PlaySound("ALPist/FIRE");         ALY2 F 3 BRIGHT A_CustomBulletAttack(4.5,5.5,1,3,"BulletPuff");         ALY2 E 3;         goto See;     Pain:         ALY2 G 5 A_Pain;         ALY2 G 3;         Goto See;     Death:         ALY2 H 5 A_Scream;         ALY2 I 5;         ALY2 J 5 A_NoBlocking;         ALY2 KLM 5;         ALY2 N -1;         Stop;     XDeath:         ALY2 O 5;         ALY2 P 5 A_XScream;         ALY2 Q 5 A_NoBlocking;         ALY2 RSTUV 5;         ALY2 W -1;         Stop;     Raise:         ALY2 N 3;         ALY2 MLKJ 5;         ALY2 IH 3;         Goto See;     } }

• Unlike in DECORATE, editor numbers are assigned to actors through MAPINFO only in ZScript.
• The "Default" blocks, where actor properties and flags are put, are missing their closing parenthesis in AllyPunch and AllyPistol actors.