Function EvaluateFireProcedural

Descent3/procedurals.cpp:1248–1346

  procedural->memory_type = PROC_MEMORY_TYPE_FIRE;
}
void EvaluateFireProcedural(int handle) {
  proc_struct *procedural = GameTextures[handle].procedural;

  int dest_bitmap = procedural->procedural_bitmap;
  if (procedural->memory_type != PROC_MEMORY_TYPE_FIRE) {
    AllocateMemoryForFireProcedural(handle);
  }
  ProcDestData = (uint8_t *)procedural->proc1;
  // fade and the current texture
  FadeProcTexture(handle);
  // HeatProcTexture (handle);
  // Do the static procedurals first
  int i;
  for (i = 0; i < procedural->num_static_elements; i++) {
    static_proc_element *proc = &procedural->static_proc_elements[i];
    switch (proc->type) {
    case PROC_LINE_LIGHTNING:
      AddProcLightning(proc->x1, proc->y1, proc->x2, proc->y2, BRIGHT_COLOR, proc);
      break;
    case PROC_SPHERE_LIGHTNING:
      AddProcSphereLightning(handle, proc);
      break;
    case PROC_RISING_EMBER:
      AddProcRisingEmber(handle, proc);
      break;
    case PROC_RANDOM_EMBERS:
      AddProcRandomEmber(handle, proc);
      break;
    case PROC_SPINNERS:
      AddProcSpinners(handle, proc);
      break;
    case PROC_ROAMERS:
      AddProcRoamers(handle, proc);
      break;
    case PROC_FOUNTAIN:
      AddProcFountain(handle, proc);
      break;
    case PROC_CONE:
      AddProcCone(handle, proc);
      break;
    case PROC_FALL_RIGHT:
      AddProcFallRight(handle, proc);
      break;
    case PROC_FALL_LEFT:
      AddProcFallLeft(handle, proc);
      break;
    default:
      break;
    }
  }
  int proc_num = procedural->dynamic_proc_elements;
  while (proc_num != -1) {
    dynamic_proc_element *proc = &DynamicProcElements[proc_num];

    switch (proc->type) {
    case PROC_RISING_EMBER:
      DoDynamicRisingEmber(handle, proc);
      break;