[CHANGE] microwave only removes access (#6747)

Co-authored-by: fishfish458 <fishfish458>

Content.Server/Access/Systems/IdCardSystem.cs

@@ -41,8 +41,23 @@ namespace Content.Server.Access.Systems
         {
             if (TryComp<AccessComponent>(uid, out var access))
             {
+                float randomPick = _random.NextFloat();
+                // if really unlucky, burn card
+                if (randomPick <= 0.15f)
+                {
+                    TryComp<TransformComponent>(uid, out TransformComponent? transformComponent);
+                    if (transformComponent != null)
+                    {
+                        _popupSystem.PopupCoordinates(Loc.GetString("id-card-component-microwave-burnt", ("id", uid)),
+                         transformComponent.Coordinates, Filter.Pvs(uid));
+                        EntityManager.SpawnEntity("FoodBadRecipe",
+                            transformComponent.Coordinates);
+                    }
+                    EntityManager.QueueDeleteEntity(uid);
+                    return;
+                }
                 // If they're unlucky, brick their ID
-                if (_random.Prob(0.25f))
+                if (randomPick <= 0.25f)
                 {
                     _popupSystem.PopupEntity(Loc.GetString("id-card-component-microwave-bricked", ("id", uid)),
                         uid, Filter.Pvs(uid));

Resources/Locale/en-US/access/components/id-card-component.ftl

@@ -3,5 +3,6 @@
 access-id-card-component-owner-name-job-title-text = {$originalOwnerName}{$jobSuffix}
 access-id-card-component-owner-full-name-job-title-text = {$fullName}'s ID card{$jobSuffix}
 
+id-card-component-microwave-burnt = {$id}'s circuits pop loudly!
 id-card-component-microwave-bricked = {$id}'s circuits sizzle!
 id-card-component-microwave-safe = {$id}'s circuits make a weird noise.